better Lisp source highlighting
Annotate for file /lisp-hl.xml
2009-06-05 tobias 1 <?xml version="1.0" encoding="UTF-8"?>
14:17:33 ' 2 <!-- Common Lisp highlighter for xslthl -->
' 3 <highlighters>
2009-06-10 tobias 4 <highlighter type="word">
12:17:14 ' 5 <word>call-next-method</word>
' 6 <word>do-external-symbols</word>
' 7 <word>do</word>
' 8 <word>do*</word>
' 9 <word>eval-when</word>
' 10 <word>handler-bind</word>
' 11 <word>handler-case</word>
' 12 <word>in-package</word>
' 13 <word>let*</word>
' 14 <word>multiple-value-bind</word>
' 15 <word>restart-bind</word>
' 16 <word>restart-case</word>
' 17 <word>return-from</word>
' 18 <word>signal</word>
' 19 <word>unwind-protect</word>
' 20
' 21 <style>keyword</style>
' 22 <ignoreCase />
' 23 </highlighter>
2009-06-05 tobias 24 <highlighter type="keywords">
2009-06-10 tobias 25 <keyword>assert</keyword>
12:17:14 ' 26 <keyword>block</keyword>
' 27 <keyword>case</keyword>
' 28 <keyword>catch</keyword>
' 29 <keyword>ccase</keyword>
' 30 <keyword>cerror</keyword>
' 31 <keyword>check-type</keyword>
' 32 <keyword>declaim</keyword>
' 33 <keyword>declare</keyword>
' 34 <keyword>defclass</keyword>
' 35 <keyword>defconstant</keyword>
2009-06-05 tobias 36 <keyword>defgeneric</keyword>
2009-06-10 tobias 37 <keyword>define-condition</keyword>
12:17:14 ' 38 <keyword>defmacro</keyword>
2009-06-05 tobias 39 <keyword>defmethod</keyword>
14:17:33 ' 40 <keyword>defpackage</keyword>
2009-06-10 tobias 41 <keyword>defparameter</keyword>
2009-06-05 tobias 42 <keyword>defstruct</keyword>
2009-06-10 tobias 43 <keyword>deftype</keyword>
12:17:14 ' 44 <keyword>defun</keyword>
' 45 <keyword>defvar</keyword>
' 46 <keyword>dolist</keyword>
' 47 <keyword>dotimes</keyword>
' 48 <keyword>ecase</keyword>
' 49 <keyword>error</keyword>
' 50 <keyword>flet</keyword>
' 51 <keyword>go</keyword>
' 52 <keyword>if</keyword>
' 53 <keyword>labels</keyword>
' 54 <keyword>lambda</keyword>
' 55 <keyword>let</keyword>
' 56 <keyword>loop</keyword>
2009-06-05 tobias 57 <keyword>proclaim</keyword>
2009-06-10 tobias 58 <keyword>prog1</keyword>
12:17:14 ' 59 <keyword>prog2</keyword>
' 60 <keyword>progn</keyword>
' 61 <keyword>progv</keyword>
' 62 <keyword>return</keyword>
' 63 <keyword>tagbody</keyword>
' 64 <keyword>throw</keyword>
' 65 <keyword>typecase</keyword>
' 66 <keyword>unless</keyword>
' 67 <keyword>warn</keyword>
' 68 <keyword>when</keyword>
' 69
2009-06-05 tobias 70 <ignoreCase />
14:17:33 ' 71 </highlighter>
2009-06-10 tobias 72 <!-- with- -->
12:17:14 ' 73 <highlighter type="regex">
' 74 <pattern>(?&lt;=\()(\S+[:])?(with-\S+)</pattern>
2009-06-05 tobias 75 <style>keyword</style>
14:17:33 ' 76 </highlighter>
' 77
' 78 <!-- comments -->
' 79 <highlighter type="multiline-comment">
' 80 <start>#|</start>
' 81 <end>|#</end>
' 82 <style>comment</style>
' 83 </highlighter>
' 84 <highlighter type="oneline-comment">
' 85 ;
' 86 </highlighter>
' 87
' 88 <!-- string -->
' 89 <highlighter type="string">
' 90 <string>"</string>
' 91 <spanNewLines/>
' 92 </highlighter>
' 93
' 94 <!-- keyword package -->
' 95 <highlighter type="regex">
' 96 <pattern>(?&lt;=[ \(])(:[^\s\)]+)</pattern>
' 97 <style>attribute</style>
' 98 </highlighter>
' 99
2009-06-10 tobias 100 <!-- lambda list keywords -->
12:17:14 ' 101 <highlighter type="word">
' 102 <word>&amp;allow-other-keys</word>
' 103 <word>&amp;aux</word>
' 104 <word>&amp;body</word>
' 105 <word>&amp;environment</word>
' 106 <word>&amp;key</word>
' 107 <word>&amp;optional</word>
' 108 <word>&amp;rest</word>
' 109 <word>&amp;whole</word>
' 110
' 111 <style>attribute</style>
' 112 <ignoreCase />
' 113 </highlighter>
' 114
' 115 <!-- emacs style highlighted names -->
2009-06-05 tobias 116 <!-- defclass -->
14:17:33 ' 117 <highlighter type="regex">
' 118 <pattern>(?&lt;=defclass\s)(\S+)</pattern>
' 119 <style>directive</style>
2009-06-10 tobias 120 <flags>CASE_INSENSITIVE</flags>
2009-06-05 tobias 121 </highlighter>
14:17:33 ' 122 <!-- defun -->
' 123 <highlighter type="regex">
' 124 <pattern>(?&lt;=defun\s)(\S+)</pattern>
' 125 <style>directive</style>
' 126 </highlighter>
2009-06-10 tobias 127 <!-- defmacro -->
12:17:14 ' 128 <highlighter type="regex">
' 129 <pattern>(?&lt;=defmacro\s)(\S+)</pattern>
' 130 <style>directive</style>
' 131 </highlighter>
2009-06-05 tobias 132 <!-- defgeneric -->
14:17:33 ' 133 <highlighter type="regex">
' 134 <pattern>(?&lt;=defgeneric\s)(\S+)</pattern>
' 135 <style>directive</style>
' 136 </highlighter>
' 137 <!-- defmethod -->
' 138 <highlighter type="regex">
' 139 <pattern>(?&lt;=defmethod\s)(\S+)</pattern>
' 140 <style>directive</style>
' 141 </highlighter>
' 142 <!-- defvar -->
' 143 <highlighter type="regex">
' 144 <pattern>(?&lt;=defvar\s)(\S+)</pattern>
' 145 <style>directive</style>
' 146 </highlighter>
' 147 <!-- defparameter -->
' 148 <highlighter type="regex">
' 149 <pattern>(?&lt;=defparameter\s)(\S+)</pattern>
' 150 <style>directive</style>
' 151 </highlighter>
2009-06-10 tobias 152 <!-- defparameter -->
12:17:14 ' 153 <highlighter type="regex">
' 154 <pattern>(?&lt;=defconstant\s)(\S+)</pattern>
' 155 <style>directive</style>
' 156 </highlighter>
2009-06-05 tobias 157 <!-- defstruct -->
14:17:33 ' 158 <highlighter type="regex">
' 159 <pattern>(?&lt;=defstruct\s)(\S+)</pattern>
' 160 <style>directive</style>
' 161 </highlighter>
2009-06-10 tobias 162 <!-- define-condition -->
12:17:14 ' 163 <highlighter type="regex">
' 164 <pattern>(?&lt;=define-condition\s)(\S+)</pattern>
' 165 <style>directive</style>
2009-06-05 tobias 166 </highlighter>
14:17:33 ' 167 </highlighters>