gistfile1.xml

<?xml version="1.0" encoding="UTF-8"?>

<language id="lisp" _name="Common Lisp" version="1.0" _section="Sources">

  <metadata>
    <!-- <property name="mimetypes">text/x-lisp</property> -->
    <property name="mimetypes">text/plain</property>
    <property name="globs">*.lisp</property>
    <property name="line-comment-start">;</property>
  </metadata>

  <styles>
    <style id="comment" _name="Comment" map-to="def:comment"/>
    <style id="key" _name="Key" map-to="def:character"/>    
    <style id="string" _name="String" map-to="def:string"/>
    <style id="decimal" _name="Decimal number" map-to="def:decimal"/>
    <style id="floating-point" _name="Floating point number" map-to="def:floating-point"/>    
    <style id="hexadecimal" _name="Hexadecimal number" map-to="def:base-n-integer"/>
    <style id="boolean" _name="Boolean value" map-to="def:special-constant"/>    
    <style id="loop-keyword" _name="Loop Cycles Keyword" map-to="def:statement"/>
    <style id="keyword" _name="Keyword" map-to="def:keyword"/>
    <style id="function" _name="Function" map-to="def:function"/>
    <style id="variable" _name="Variable Name" map-to="def:operator"/>
    <style id="operator" _name="Sytax Operator" map-to="def:operator"/>    
    <style id="ext-function" _name="External Function" map-to="def:type"/>
  </styles>

  <definitions>
  
    <context id="line-comment" style-ref="comment" end-at-line-end="true">
      <start>;</start>
      <include>
        <context ref="def:in-comment"/>
      </include>
    </context>
    
    <context id="block-comment" style-ref="comment">
      <start>#\|</start>
      <end>\|#</end>
      <include>
        <context ref="def:in-comment"/>
      </include>
    </context>    

    <context id="string" style-ref="string">
      <start>"</start>
      <end>"</end>
      <include>
        <context ref="def:escape" />
      </include>
    </context>
    
    <context id="decimal" style-ref="decimal">
      <match extended="true">
        (?&lt;![\w\.])
        [0-9]*
        (?![\w\.])
      </match>
    </context>

    <context id="hexadecimal" style-ref="hexadecimal">
      <match extended="true">
	(?&lt;![\w\.])
        [#][x][a-fA-F0-9]*
	(?![\w\.])
      </match>
    </context>
    
    <context id="float" style-ref="floating-point">
      <match extended="true">
        (?&lt;![\w\.])
        ((\.[0-9]+)|([0-9]+((\.[0-9]+)|(\.[0-9]+[eEd][+-]?[0-9]+)|([eEd][+-]?[0-9]+))))
        (?![\w\.])
      </match>
    </context>     
    
    <context id="boolean" style-ref="boolean">
      <prefix>(?&lt;![\w\d/._-])</prefix>
      <suffix>(?![\w\d_-])</suffix>    
      <keyword>nil</keyword>    
      <keyword>t</keyword>
    </context>    
    
    <context id="key" style-ref="key">
      <match extended="true">
      (?&lt;![\w\d/._-])
      ([:&amp;][\w\d_-]+)
      (?![\w\d_-])
      </match>
    </context>
    
    <context id="variable" style-ref="variable">
      <match extended="true">
      (?&lt;![\w\d/._-])
      ([*][\w\d_-]+[*])
      (?![\w\d_-])
      </match>
    </context>
    
    <context id="operator" style-ref="operator">
      <match extended="true">
      (?&lt;![\w\d_/.-])(([.](?![\w\d_-]))|([@,'#`]+)(?=[(\w\d_-]))      
      </match>
    </context>    
    
    <context id="ext-function" style-ref="ext-function">
      <match extended="true">
      (?&lt;![\w\d_/.-])
      ([\w\d_-]+[:][%]?[\w\d_-]+)
      (?![\w\d_-])
      </match>
    </context>        
    
    <context id="loop-keyword" style-ref="loop-keyword">
      <prefix>(?&lt;![\w\d/._-])</prefix>
      <suffix>(?![\w\d_-])</suffix>
      <keyword>for</keyword>
      <keyword>in</keyword>
      <keyword>on</keyword>      
      <keyword>by</keyword>
      <keyword>being</keyword>
      <keyword>below</keyword>      
      <keyword>the</keyword>      
      <keyword>using</keyword>
      <keyword>then</keyword>
      <keyword>with</keyword>
      <keyword>thereis</keyword>
      <keyword>across</keyword>      
      <keyword>to</keyword>
      <keyword>upto</keyword>
      <keyword>downto</keyword>
      <keyword>into</keyword>      
      <keyword>from</keyword>
      <keyword>upfrom</keyword>
      <keyword>downfrom</keyword>   
      <keyword>where</keyword>
      <keyword>repeat</keyword>
      <keyword>collect</keyword>
      <keyword>append</keyword>
      <keyword>nconc</keyword>
      <keyword>count</keyword>
      <keyword>sum</keyword>
      <keyword>maximize</keyword>
      <keyword>minimize</keyword>
      <keyword>collecting</keyword>
      <keyword>appending</keyword>
      <keyword>nconcing</keyword>
      <keyword>counting</keyword>
      <keyword>summing</keyword>
      <keyword>maximizing</keyword>
      <keyword>minimizing</keyword>
    </context>

    <context id="keyword" style-ref="keyword">
      <prefix>(?&lt;![\w\d/._-])</prefix>
      <suffix>(?![\w\d_-])</suffix>
      <keyword>and</keyword>
      <keyword>break</keyword>
      <keyword>case</keyword>
      <keyword>do</keyword>
      <keyword>do\*</keyword>
      <keyword>dolist</keyword>
      <keyword>dotimes</keyword>
      <keyword>if</keyword>
      <keyword>loop</keyword>
      <keyword>or</keyword>
      <keyword>quote</keyword>
      <keyword>when</keyword>
      <keyword>\*break-on-signals\*</keyword>
      <keyword>\*compile-fale-pathname\*</keyword>
      <keyword>\*compile-file-truename\*</keyword>
      <keyword>\*compile-print\*</keyword>
      <keyword>\*compile-verbose\*</keyword>
      <keyword>\*debug-io\*</keyword>
      <keyword>\*debugger-hook\*</keyword>
      <keyword>\*default-pathname-defaults\*</keyword>
      <keyword>\*error-output\*</keyword>
      <keyword>\*features\*</keyword>
      <keyword>\*gensym-counter\*</keyword>
      <keyword>\*load-pathname\*</keyword>
      <keyword>\*load-print\*</keyword>
      <keyword>\*load-truename\*</keyword>
      <keyword>\*load-verbose\*</keyword>
      <keyword>\*macroexpand-hook\*</keyword>
      <keyword>\*modules\*</keyword>
      <keyword>\*package\*</keyword>
      <keyword>\*print-array\*</keyword>
      <keyword>\*print-base\*</keyword>
      <keyword>\*print-case\*</keyword>
      <keyword>\*print-circle\*</keyword>
      <keyword>\*print-escape\*</keyword>
      <keyword>\*print-gensym\*</keyword>
      <keyword>\*print-length\*</keyword>
      <keyword>\*print-level\*</keyword>
      <keyword>\*print-lines\*</keyword>
      <keyword>\*print-miser-width\*</keyword>
      <keyword>\*print-pprint-dispatch\*</keyword>
      <keyword>\*print-pretty\*</keyword>
      <keyword>\*print-radix\*</keyword>
      <keyword>\*print-readably\*</keyword>
      <keyword>\*print-right-margin\*</keyword>
      <keyword>\*query-io\*</keyword>
      <keyword>\*random-state\*</keyword>
      <keyword>\*read-base\*</keyword>
      <keyword>\*read-default-float-format\*</keyword>
      <keyword>\*read-eval\*</keyword>
      <keyword>\*read-suppress\*</keyword>
      <keyword>\*readtable\*</keyword>
      <keyword>\*standard-input\*</keyword>
      <keyword>\*standard-ouput\*</keyword>
      <keyword>\*terminal-io\*</keyword>
      <keyword>\*trace-output\*</keyword>
    </context>

    <context id="function" style-ref="function">
      <prefix>(?&lt;![\w\d/._-])</prefix>
      <suffix>(?![\w\d_-])</suffix>
      <keyword>\+</keyword>
      <keyword>\-</keyword>
      <keyword>\/</keyword>
      <keyword>\/=</keyword>
      <keyword>1+</keyword>
      <keyword>1-</keyword>
      <keyword>&gt;</keyword>
      <keyword>&gt;=</keyword>
      <keyword>&lt;</keyword>
      <keyword>&gt;=</keyword>
      <keyword>=</keyword>
      <keyword>#c</keyword>      
      <keyword>abort</keyword>
      <keyword>abs</keyword>
      <keyword>acons</keyword>
      <keyword>acos</keyword>
      <keyword>acosh</keyword>
      <keyword>add-method</keyword>
      <keyword>adjoin</keyword>
      <keyword>adjoin-array</keyword>
      <keyword>adjustable-array-p</keyword>
      <keyword>allocate-instance</keyword>
      <keyword>alpha-char-p</keyword>
      <keyword>alphanumericp</keyword>
      <keyword>append</keyword>
      <keyword>apply</keyword>
      <keyword>apropos</keyword>
      <keyword>apropos-list</keyword>
      <keyword>aref</keyword>
      <keyword>arithmetic-error</keyword>
      <keyword>arithmetic-error-operands</keyword>
      <keyword>array</keyword>
      <keyword>array-dimension</keyword>
      <keyword>array-dimension-limit</keyword>
      <keyword>array-dimensions</keyword>
      <keyword>array-displacement</keyword>
      <keyword>array-element-type</keyword>
      <keyword>array-has-fill-pointer-p</keyword>
      <keyword>array-in-bounds-p</keyword>
      <keyword>array-rank</keyword>
      <keyword>array-rank-limit</keyword>
      <keyword>array-row-major-index</keyword>
      <keyword>array-total-size</keyword>
      <keyword>array-total-size-limit</keyword>
      <keyword>arrayp</keyword>
      <keyword>ash</keyword>
      <keyword>asin</keyword>
      <keyword>asinh</keyword>
      <keyword>assert</keyword>
      <keyword>assoc</keyword>
      <keyword>assoc-if</keyword>
      <keyword>assoc-if-not</keyword>
      <keyword>atan</keyword>
      <keyword>atanh</keyword>
      <keyword>atom</keyword>
      <keyword>base-char</keyword>
      <keyword>base-string</keyword>
      <keyword>bignum</keyword>
      <keyword>bit</keyword>
      <keyword>bit-and</keyword>
      <keyword>bit-andc1</keyword>
      <keyword>bit-andc2</keyword>
      <keyword>bit-eqv</keyword>
      <keyword>bit-ior</keyword>
      <keyword>bit-nand</keyword>
      <keyword>bit-nor</keyword>
      <keyword>bit-orc1</keyword>
      <keyword>bit-orc2</keyword>
      <keyword>bit-vector</keyword>
      <keyword>bit-vector-p</keyword>
      <keyword>bit-xor</keyword>
      <keyword>block</keyword>
      <keyword>boole</keyword>
      <keyword>boole-1</keyword>
      <keyword>boole-2</keyword>
      <keyword>boole-and</keyword>
      <keyword>boole-andc1</keyword>
      <keyword>boole-andc2</keyword>
      <keyword>boole-c1</keyword>
      <keyword>boole-c2</keyword>
      <keyword>boole-clr</keyword>
      <keyword>boole-eqv</keyword>
      <keyword>boole-ior</keyword>
      <keyword>boole-nand</keyword>
      <keyword>boole-orc1</keyword>
      <keyword>boole-orc2</keyword>
      <keyword>boole-set</keyword>
      <keyword>boole-xor</keyword>
      <keyword>boolean</keyword>
      <keyword>both-case-p</keyword>
      <keyword>boundp</keyword>
      <keyword>broadcast-stream</keyword>
      <keyword>broadcast-stream-streams</keyword>
      <keyword>built-in-class</keyword>
      <keyword>butlast</keyword>
      <keyword>byte</keyword>
      <keyword>byte-position</keyword>
      <keyword>byte-size</keyword>
      <keyword>caaaar</keyword>
      <keyword>caaadr</keyword>
      <keyword>caaar</keyword>
      <keyword>caadar</keyword>
      <keyword>caaddr</keyword>
      <keyword>caadr</keyword>
      <keyword>caar</keyword>
      <keyword>cadaar</keyword>
      <keyword>cadadr</keyword>
      <keyword>cadar</keyword>
      <keyword>caddar</keyword>
      <keyword>cadddr</keyword>
      <keyword>caddr</keyword>
      <keyword>cadr</keyword>
      <keyword>call-arguments-limit</keyword>
      <keyword>call-method</keyword>
      <keyword>call-next-method</keyword>
      <keyword>car</keyword>
      <keyword>catch</keyword>
      <keyword>ccase</keyword>
      <keyword>cdaaar</keyword>
      <keyword>cdaadr</keyword>
      <keyword>cdaar</keyword>
      <keyword>cdadar</keyword>
      <keyword>cdaddr</keyword>
      <keyword>cdadr</keyword>
      <keyword>cdar</keyword>
      <keyword>cddaar</keyword>
      <keyword>cddadr</keyword>
      <keyword>cddar</keyword>
      <keyword>cdddar</keyword>
      <keyword>cddddr</keyword>
      <keyword>cdddr</keyword>
      <keyword>cddr</keyword>
      <keyword>cdr</keyword>
      <keyword>ceiling</keyword>
      <keyword>cell-error</keyword>
      <keyword>cell-error-name</keyword>
      <keyword>cerror</keyword>
      <keyword>change-class</keyword>
      <keyword>char</keyword>
      <keyword>char-code</keyword>
      <keyword>char-code-limit</keyword>
      <keyword>char-downcase</keyword>
      <keyword>char-equal</keyword>
      <keyword>char-greaterp</keyword>
      <keyword>char-int</keyword>
      <keyword>char-lessp</keyword>
      <keyword>char-name</keyword>
      <keyword>char-not-equal</keyword>
      <keyword>char-not-greaterp</keyword>
      <keyword>char-not-lessp</keyword>
      <keyword>char-upcase</keyword>
      <keyword>\char/=</keyword>
      <keyword>\char=</keyword>
      <keyword>\char&gt;</keyword>
      <keyword>\char&gt;=</keyword>
      <keyword>character</keyword>
      <keyword>characterp</keyword>
      <keyword>check-type</keyword>
      <keyword>cis</keyword>
      <keyword>class</keyword>
      <keyword>class-name</keyword>
      <keyword>class-of</keyword>
      <keyword>clear-input</keyword>
      <keyword>clear-output</keyword>
      <keyword>close</keyword>
      <keyword>clrhash</keyword>
      <keyword>code-char</keyword>
      <keyword>coerce</keyword>
      <keyword>compilation-speed</keyword>
      <keyword>compile</keyword>
      <keyword>compile-file</keyword>
      <keyword>compile-file-pathname</keyword>
      <keyword>compiled-function</keyword>
      <keyword>compiled-function-p</keyword>
      <keyword>compiler-macro</keyword>
      <keyword>compiler-macro-function</keyword>
      <keyword>complement</keyword>
      <keyword>complex</keyword>
      <keyword>complexp</keyword>
      <keyword>compute-applicable-methods</keyword>
      <keyword>compute-restarts</keyword>
      <keyword>concatenate</keyword>
      <keyword>concatenate-stream</keyword>
      <keyword>concatenate-stream-streams</keyword>
      <keyword>cond</keyword>
      <keyword>condition</keyword>
      <keyword>conjugate</keyword>
      <keyword>cons</keyword>
      <keyword>consp</keyword>
      <keyword>constantly</keyword>
      <keyword>constantp</keyword>
      <keyword>continue</keyword>
      <keyword>control-error</keyword>
      <keyword>copy-alist</keyword>
      <keyword>copy-list</keyword>
      <keyword>copy-pprint-dispatch</keyword>
      <keyword>copy-readtable</keyword>
      <keyword>copy-seq</keyword>
      <keyword>copy-structure</keyword>
      <keyword>copy-symbol</keyword>
      <keyword>copy-tree</keyword>
      <keyword>cos</keyword>
      <keyword>cosh</keyword>
      <keyword>count</keyword>
      <keyword>count-if</keyword>
      <keyword>count-if-not</keyword>
      <keyword>ctypecase</keyword>
      <keyword>debug</keyword>
      <keyword>decf</keyword>
      <keyword>declaim</keyword>
      <keyword>declaration</keyword>
      <keyword>declare</keyword>
      <keyword>decode-float</keyword>
      <keyword>decode-universal-time</keyword>
      <keyword>defclass</keyword>
      <keyword>defconstant</keyword>
      <keyword>defgeneric</keyword>
      <keyword>define-compiler-macro</keyword>
      <keyword>define-condition</keyword>
      <keyword>define-method-combination</keyword>
      <keyword>define-modify-macro</keyword>
      <keyword>define-setf-expander</keyword>
      <keyword>define-symbol-macro</keyword>
      <keyword>defmacro</keyword>
      <keyword>defmethod</keyword>
      <keyword>defpackage</keyword>
      <keyword>defparameter</keyword>
      <keyword>defsetf</keyword>
      <keyword>defstruct</keyword>
      <keyword>deftype</keyword>
      <keyword>defun</keyword>
      <keyword>defvar</keyword>
      <keyword>delete</keyword>
      <keyword>delete-duplicates</keyword>
      <keyword>delete-file</keyword>
      <keyword>delete-if</keyword>
      <keyword>delete-if-not</keyword>
      <keyword>delete-package</keyword>
      <keyword>denominator</keyword>
      <keyword>deposit-field</keyword>
      <keyword>describe</keyword>
      <keyword>describe-object</keyword>
      <keyword>destructuring-bind</keyword>
      <keyword>digit-char</keyword>
      <keyword>digit-char-p</keyword>
      <keyword>directory</keyword>
      <keyword>directory-namestring</keyword>
      <keyword>disassemble</keyword>
      <keyword>division-by-zero</keyword>
      <keyword>do-all-symbols</keyword>
      <keyword>do-external-symbols</keyword>
      <keyword>do-symbols</keyword>
      <keyword>documentation</keyword>
      <keyword>double-float</keyword>
      <keyword>double-float-epsilon</keyword>
      <keyword>double-float-negative-epsilon</keyword>
      <keyword>dpb</keyword>
      <keyword>dribble</keyword>
      <keyword>dynamic-extent</keyword>
      <keyword>ecase</keyword>
      <keyword>echo-stream</keyword>
      <keyword>echo-stream-input-stream</keyword>
      <keyword>echo-stream-output-stream</keyword>
      <keyword>ed</keyword>
      <keyword>eighth</keyword>
      <keyword>elt</keyword>
      <keyword>encode-universal-time</keyword>
      <keyword>end-of-file</keyword>
      <keyword>endp</keyword>
      <keyword>enough-namestring</keyword>
      <keyword>ensure-directories-exist</keyword>
      <keyword>ensure-generic-function</keyword>
      <keyword>eq</keyword>
      <keyword>eql</keyword>
      <keyword>equal</keyword>
      <keyword>eqaulp</keyword>
      <keyword>error</keyword>
      <keyword>etypecase</keyword>
      <keyword>eval</keyword>
      <keyword>eval-when</keyword>
      <keyword>evenp</keyword>
      <keyword>every</keyword>
      <keyword>exp</keyword>
      <keyword>export</keyword>
      <keyword>expt</keyword>
      <keyword>extended-char</keyword>
      <keyword>fboundp</keyword>
      <keyword>fceiling</keyword>
      <keyword>fdefinition</keyword>
      <keyword>ffloor</keyword>
      <keyword>fifth</keyword>
      <keyword>file-author</keyword>
      <keyword>file-error</keyword>
      <keyword>file-error-pathname</keyword>
      <keyword>file-length</keyword>
      <keyword>file-namestring</keyword>
      <keyword>file-position</keyword>
      <keyword>file-stream</keyword>
      <keyword>file-string-length</keyword>
      <keyword>file-write-date</keyword>
      <keyword>fill</keyword>
      <keyword>fill-pointer</keyword>
      <keyword>find</keyword>
      <keyword>find-all-symbols</keyword>
      <keyword>find-class</keyword>
      <keyword>find-if</keyword>
      <keyword>find-if-not</keyword>
      <keyword>find-method</keyword>
      <keyword>find-package</keyword>
      <keyword>find-restart</keyword>
      <keyword>find-symbol</keyword>
      <keyword>finish-output</keyword>
      <keyword>first</keyword>
      <keyword>fixnum</keyword>
      <keyword>flet</keyword>
      <keyword>float</keyword>
      <keyword>float-digits</keyword>
      <keyword>float-precision</keyword>
      <keyword>float-radix</keyword>
      <keyword>float-sign</keyword>
      <keyword>floating-point-inexact</keyword>
      <keyword>floating-point-invalid-operation</keyword>
      <keyword>floating-point-overflow</keyword>
      <keyword>floating-point-underflow</keyword>
      <keyword>floatp</keyword>
      <keyword>floor</keyword>
      <keyword>fmakunbound</keyword>
      <keyword>force-output</keyword>
      <keyword>format</keyword>
      <keyword>formatter</keyword>
      <keyword>fourth</keyword>
      <keyword>fresh-line</keyword>
      <keyword>fround</keyword>
      <keyword>ftruncate</keyword>
      <keyword>ftype</keyword>
      <keyword>funcall</keyword>
      <keyword>function</keyword>
      <keyword>function-keywords</keyword>
      <keyword>function-lambda-expression</keyword>
      <keyword>functionp</keyword>
      <keyword>gcd</keyword>
      <keyword>generic-function</keyword>
      <keyword>gensym</keyword>
      <keyword>gentemp</keyword>
      <keyword>get</keyword>
      <keyword>get-decoded-time</keyword>
      <keyword>get-dispatch-macro-character</keyword>
      <keyword>get-internal-real-time</keyword>
      <keyword>get-internal-run-time</keyword>
      <keyword>get-macro-character</keyword>
      <keyword>get-output-stream-string</keyword>
      <keyword>get-properties</keyword>
      <keyword>get-setf-expension</keyword>
      <keyword>get-universal-time</keyword>
      <keyword>getf</keyword>
      <keyword>gethash</keyword>
      <keyword>go</keyword>
      <keyword>graphic-char-p</keyword>
      <keyword>handler-bind</keyword>
      <keyword>handler-case</keyword>
      <keyword>hash-table</keyword>
      <keyword>hash-table-count</keyword>
      <keyword>hash-table-p</keyword>
      <keyword>hash-table-rehash-size</keyword>
      <keyword>hash-table-rehash-threshold</keyword>
      <keyword>hash-table-size</keyword>
      <keyword>hash-table-test</keyword>
      <keyword>host-namestring</keyword>
      <keyword>identity</keyword>
      <keyword>ignorable</keyword>
      <keyword>ignore</keyword>
      <keyword>ignore-errors</keyword>
      <keyword>imagpart</keyword>
      <keyword>import</keyword>
      <keyword>in-package</keyword>
      <keyword>incf</keyword>
      <keyword>initialize-instance</keyword>
      <keyword>inline</keyword>
      <keyword>input-stream-p</keyword>
      <keyword>inspect</keyword>
      <keyword>integer</keyword>
      <keyword>integer-decode-float</keyword>
      <keyword>integer-length</keyword>
      <keyword>integerp</keyword>
      <keyword>interactive-stream</keyword>
      <keyword>intern</keyword>
      <keyword>internal-time-units-per-second</keyword>
      <keyword>intersection</keyword>
      <keyword>invalid-method-error</keyword>
      <keyword>invoke-debugger</keyword>
      <keyword>invoke-restart</keyword>
      <keyword>invoke-restart-interactively</keyword>
      <keyword>isqrt</keyword>
      <keyword>keyword</keyword>
      <keyword>keywordp</keyword>
      <keyword>labels</keyword>
      <keyword>lambda</keyword>
      <keyword>lambda-list-keywords</keyword>
      <keyword>lambda-parameters-limit</keyword>
      <keyword>last</keyword>
      <keyword>lcm</keyword>
      <keyword>ldb</keyword>
      <keyword>ldb-test</keyword>
      <keyword>ldiff</keyword>
      <keyword>least-negative-doubde-float</keyword>
      <keyword>least-negative-long-float</keyword>
      <keyword>least-negative-normalized-double-float</keyword>
      <keyword>least-negative-normalized-long-float</keyword>
      <keyword>least-negative-normalized-short-float</keyword>
      <keyword>least-negative-normalized-single-float</keyword>
      <keyword>least-negative-short-float</keyword>
      <keyword>least-negative-single-float</keyword>
      <keyword>least-positive-doubde-float</keyword>
      <keyword>least-positive-long-float</keyword>
      <keyword>least-positive-normalized-double-float</keyword>
      <keyword>least-positive-normalized-long-float</keyword>
      <keyword>least-positive-normalized-short-float</keyword>
      <keyword>least-positive-normalized-single-float</keyword>
      <keyword>least-positive-short-float</keyword>
      <keyword>least-positive-single-float</keyword>
      <keyword>length</keyword>
      <keyword>let</keyword>
      <keyword>let\*</keyword>
      <keyword>lisp-implementation-type</keyword>
      <keyword>lisp-implementation-version</keyword>
      <keyword>list</keyword>
      <keyword>list\*</keyword>
      <keyword>list-all-packages</keyword>
      <keyword>list-length</keyword>
      <keyword>listen</keyword>
      <keyword>listp</keyword>
      <keyword>load</keyword>
      <keyword>load-logical-pathname-translations</keyword>
      <keyword>load-time-value</keyword>
      <keyword>locally</keyword>
      <keyword>log</keyword>
      <keyword>logand</keyword>
      <keyword>logandc1</keyword>
      <keyword>logandc2</keyword>
      <keyword>logbitp</keyword>
      <keyword>logcount</keyword>
      <keyword>logeqv</keyword>
      <keyword>logical-pathname</keyword>
      <keyword>logical-pathname-translations</keyword>
      <keyword>logior</keyword>
      <keyword>logand</keyword>
      <keyword>lognor</keyword>
      <keyword>lognot</keyword>
      <keyword>logorc1</keyword>
      <keyword>logorc2</keyword>
      <keyword>logtest</keyword>
      <keyword>logxor</keyword>
      <keyword>long-float</keyword>
      <keyword>long-float-epsilon</keyword>
      <keyword>long-float-negative-epsilon</keyword>
      <keyword>long-site-name</keyword>
      <keyword>loop-finish</keyword>
      <keyword>lower-case-p</keyword>
      <keyword>machine-instance</keyword>
      <keyword>machine-type</keyword>
      <keyword>machine-version</keyword>
      <keyword>macro-function</keyword>
      <keyword>macroexpand</keyword>
      <keyword>macroexpand-1</keyword>
      <keyword>macrolet</keyword>
      <keyword>make-array</keyword>
      <keyword>make-broadcast-stream</keyword>
      <keyword>make-concatenated-stream</keyword>
      <keyword>make-condition</keyword>
      <keyword>make-dispatch-macro-character</keyword>
      <keyword>make-echo-stream</keyword>
      <keyword>make-hash-table</keyword>
      <keyword>make-instance</keyword>
      <keyword>make-instance-obsolete</keyword>
      <keyword>make-list</keyword>
      <keyword>make-load-form</keyword>
      <keyword>make-load-form-saving-slots</keyword>
      <keyword>make-method</keyword>
      <keyword>make-package</keyword>
      <keyword>make-pathname</keyword>
      <keyword>make-random-state</keyword>
      <keyword>make-sequence</keyword>
      <keyword>make-string</keyword>
      <keyword>make-string-input-stream</keyword>
      <keyword>make-string-output-stream</keyword>
      <keyword>make-symbol</keyword>
      <keyword>make-synonym-stream</keyword>
      <keyword>make-two-way-stream</keyword>
      <keyword>makunbound</keyword>
      <keyword>map</keyword>
      <keyword>map-info</keyword>
      <keyword>mapc</keyword>
      <keyword>mapcan</keyword>
      <keyword>mapcar</keyword>
      <keyword>mapcon</keyword>
      <keyword>maphash</keyword>
      <keyword>mapl</keyword>
      <keyword>maplist</keyword>
      <keyword>mask-field</keyword>
      <keyword>max</keyword>
      <keyword>member</keyword>
      <keyword>member-if</keyword>
      <keyword>member-if-not</keyword>
      <keyword>merge</keyword>
      <keyword>merge-pathname</keyword>
      <keyword>method</keyword>
      <keyword>method-combinaison</keyword>
      <keyword>method-combinaison-error</keyword>
      <keyword>method-qualifiers</keyword>
      <keyword>min</keyword>
      <keyword>minusp</keyword>
      <keyword>mismatch</keyword>
      <keyword>mod</keyword>
      <keyword>most-negative-double-float</keyword>
      <keyword>most-negative-fixnum</keyword>
      <keyword>most-negative-long-float</keyword>
      <keyword>most-negative-short-float</keyword>
      <keyword>most-negative-single-float</keyword>
      <keyword>most-positive-double-float</keyword>
      <keyword>most-positive-fixnum</keyword>
      <keyword>most-positive-long-float</keyword>
      <keyword>most-positive-short-float</keyword>
      <keyword>most-positive-single-float</keyword>
      <keyword>muffle-warning</keyword>
      <keyword>multiple-value-bind</keyword>
      <keyword>multiple-value-call</keyword>
      <keyword>multiple-value-list</keyword>
      <keyword>multiple-vulue-prog1</keyword>
      <keyword>multiple-value-setq</keyword>
      <keyword>multiple-value-limit</keyword>
      <keyword>name-char</keyword>
      <keyword>namestring</keyword>
      <keyword>nbutlast</keyword>
      <keyword>nconc</keyword>
      <keyword>next-method-p</keyword>
      <keyword>nintersection</keyword>
      <keyword>ninth</keyword>
      <keyword>no-applicable-method</keyword>
      <keyword>no-next-method</keyword>
      <keyword>not</keyword>
      <keyword>notany</keyword>
      <keyword>notinline</keyword>
      <keyword>nreconc</keyword>
      <keyword>nreverse</keyword>
      <keyword>nset-difference</keyword>
      <keyword>nset-exclusive-or</keyword>
      <keyword>nstring-capitalize</keyword>
      <keyword>nstring-downcase</keyword>
      <keyword>nstring-upcase</keyword>
      <keyword>nsublis</keyword>
      <keyword>nsubst</keyword>
      <keyword>nsubst-if</keyword>
      <keyword>nsubst-if-not</keyword>
      <keyword>nsubstitute</keyword>
      <keyword>nsubstitute-if</keyword>
      <keyword>nsubstitute-if-not</keyword>
      <keyword>nth</keyword>
      <keyword>nth-value</keyword>
      <keyword>nthcdr</keyword>
      <keyword>null</keyword>
      <keyword>number</keyword>
      <keyword>numberp</keyword>
      <keyword>numerator</keyword>
      <keyword>nunion</keyword>
      <keyword>oddp</keyword>
      <keyword>open</keyword>
      <keyword>open-stream-p</keyword>
      <keyword>optimize</keyword>
      <keyword>otherwise</keyword>
      <keyword>output-stream-p</keyword>
      <keyword>package</keyword>
      <keyword>package-error</keyword>
      <keyword>package-error-package</keyword>
      <keyword>package-name</keyword>
      <keyword>package-nicknames</keyword>
      <keyword>package-shadowing-symbols</keyword>
      <keyword>package-use-list</keyword>
      <keyword>package-used-by-list</keyword>
      <keyword>packagep</keyword>
      <keyword>pairlis</keyword>
      <keyword>parse-error</keyword>
      <keyword>parse-integer</keyword>
      <keyword>parse-namestring</keyword>
      <keyword>pathname</keyword>
      <keyword>pathname-device</keyword>
      <keyword>pathname-directory</keyword>
      <keyword>pathname-host</keyword>
      <keyword>pathname-match-p</keyword>
      <keyword>pathname-name</keyword>
      <keyword>pathname-type</keyword>
      <keyword>pathname-version</keyword>
      <keyword>pathnamep</keyword>
      <keyword>peek-char</keyword>
      <keyword>phase</keyword>
      <keyword>pi</keyword>
      <keyword>plusp</keyword>
      <keyword>pop</keyword>
      <keyword>position</keyword>
      <keyword>position-if</keyword>
      <keyword>position-if-not</keyword>
      <keyword>pprint</keyword>
      <keyword>pprint-dispatch</keyword>
      <keyword>pprint-exit-if-list-exhausted</keyword>
      <keyword>pprint-fill</keyword>
      <keyword>pprint-indent</keyword>
      <keyword>pprint-linear</keyword>
      <keyword>pprint-logical-block</keyword>
      <keyword>pprint-newline</keyword>
      <keyword>pprint-pop</keyword>
      <keyword>pprint-tab</keyword>
      <keyword>pprint-tabular</keyword>
      <keyword>prin1</keyword>
      <keyword>prin1-to-string</keyword>
      <keyword>princ</keyword>
      <keyword>princ-to-string</keyword>
      <keyword>print</keyword>
      <keyword>print-not-readable</keyword>
      <keyword>print-not-readable-object</keyword>
      <keyword>print-object</keyword>
      <keyword>print-unreadable-object</keyword>
      <keyword>probe-file</keyword>
      <keyword>proclaim</keyword>
      <keyword>prog</keyword>
      <keyword>prog\*</keyword>
      <keyword>prog1</keyword>
      <keyword>prog2</keyword>
      <keyword>progn</keyword>
      <keyword>program-error</keyword>      
      <keyword>progv</keyword>
      <keyword>provide</keyword>
      <keyword>psetf</keyword>
      <keyword>psetq</keyword>
      <keyword>push</keyword>
      <keyword>pushnew</keyword>
      <keyword>random</keyword>
      <keyword>random-state</keyword>
      <keyword>random-state-p</keyword>
      <keyword>rassoc</keyword>
      <keyword>rassoc-if</keyword>
      <keyword>rassoc-if-not</keyword>
      <keyword>ratio</keyword>
      <keyword>rational</keyword>
      <keyword>rationalize</keyword>
      <keyword>rationalp</keyword>
      <keyword>read</keyword>
      <keyword>read-byte</keyword>
      <keyword>read-char</keyword>
      <keyword>read-char-no-hang</keyword>
      <keyword>read-delimited-list</keyword>
      <keyword>read-from-string</keyword>
      <keyword>read-line</keyword>
      <keyword>read-preserving-whitespace</keyword>
      <keyword>read-sequence</keyword>
      <keyword>reader-error</keyword>
      <keyword>readtable</keyword>
      <keyword>readtable-case</keyword>
      <keyword>readtablep</keyword>
      <keyword>real</keyword>
      <keyword>realp</keyword>
      <keyword>realpart</keyword>
      <keyword>reduce</keyword>
      <keyword>reinitialize-instance</keyword>
      <keyword>rem</keyword>
      <keyword>remf</keyword>
      <keyword>remhash</keyword>
      <keyword>remove</keyword>
      <keyword>remove-duplicates</keyword>
      <keyword>remove-if</keyword>
      <keyword>remove-if-not</keyword>
      <keyword>remove-method</keyword>
      <keyword>remprop</keyword>
      <keyword>rename-file</keyword>
      <keyword>rename-package</keyword>
      <keyword>replace</keyword>
      <keyword>require</keyword>
      <keyword>rest</keyword>
      <keyword>restart</keyword>
      <keyword>restart-bind</keyword>
      <keyword>restart-case</keyword>
      <keyword>restart-name</keyword>
      <keyword>return</keyword>
      <keyword>return-from</keyword>
      <keyword>revappend</keyword>
      <keyword>reverse</keyword>
      <keyword>room</keyword>
      <keyword>rotatef</keyword>
      <keyword>round</keyword>
      <keyword>row-major-aref</keyword>
      <keyword>rplaca</keyword>
      <keyword>rplacd</keyword>
      <keyword>safety</keyword>
      <keyword>satisfies</keyword>
      <keyword>sbit</keyword>
      <keyword>scale-float</keyword>
      <keyword>schar</keyword>
      <keyword>search</keyword>
      <keyword>second</keyword>
      <keyword>sequence</keyword>
      <keyword>serious-condition</keyword>
      <keyword>set</keyword>
      <keyword>set-difference</keyword>
      <keyword>set-dispatch-macro-character</keyword>
      <keyword>set-exclusive-or</keyword>
      <keyword>set-macro-character</keyword>
      <keyword>set-pprint-dispatch</keyword>
      <keyword>set-syntax-from-char</keyword>
      <keyword>setf</keyword>
      <keyword>setq</keyword>
      <keyword>seventh</keyword>
      <keyword>shadow</keyword>
      <keyword>shadowing-import</keyword>
      <keyword>shared-initialize</keyword>
      <keyword>shiftf</keyword>
      <keyword>short-float</keyword>
      <keyword>short-float-epsilon</keyword>
      <keyword>short-float-negative-epsilon</keyword>
      <keyword>short-site-name</keyword>
      <keyword>signal</keyword>
      <keyword>signed-byte</keyword>
      <keyword>signum</keyword>
      <keyword>simple-array</keyword>
      <keyword>simple-base-string</keyword>
      <keyword>simple-bit-vector</keyword>
      <keyword>simple-bit-vector-p</keyword>
      <keyword>simple-condition</keyword>
      <keyword>simple-condition-format-arguments</keyword>
      <keyword>simple-condition-format-control</keyword>
      <keyword>simple-error</keyword>
      <keyword>simple-string</keyword>
      <keyword>simple-string-p</keyword>
      <keyword>simple-type-vector</keyword>
      <keyword>simple-vector</keyword>
      <keyword>simple-vector-p</keyword>
      <keyword>simple-warning</keyword>
      <keyword>sin</keyword>
      <keyword>sixth</keyword>
      <keyword>sleep</keyword>
      <keyword>slot-boundp</keyword>
      <keyword>slot-exists-p</keyword>
      <keyword>slot-makunbound</keyword>
      <keyword>slot-missing</keyword>
      <keyword>slot-unbound</keyword>
      <keyword>slot-value</keyword>
      <keyword>software-type</keyword>
      <keyword>software-version</keyword>
      <keyword>some</keyword>
      <keyword>sort</keyword>
      <keyword>space</keyword>
      <keyword>special</keyword>
      <keyword>special-operator-p</keyword>
      <keyword>speed</keyword>
      <keyword>sqrt</keyword>
      <keyword>stable-sort</keyword>
      <keyword>standard</keyword>
      <keyword>standard-char</keyword>
      <keyword>standard-char-p</keyword>
      <keyword>standard-class</keyword>
      <keyword>standard-generic-function</keyword>
      <keyword>standard-method</keyword>
      <keyword>standard-object</keyword>
      <keyword>step</keyword>
      <keyword>storage-condition</keyword>
      <keyword>store-value</keyword>
      <keyword>stream</keyword>
      <keyword>stream-element-type</keyword>
      <keyword>stream-error</keyword>
      <keyword>stream-error-stream</keyword>
      <keyword>stream-external-format</keyword>
      <keyword>streamp</keyword>
      <keyword>string</keyword>
      <keyword>string-capitalize</keyword>
      <keyword>string-downcase</keyword>
      <keyword>string-equal</keyword>
      <keyword>string-greaterp</keyword>
      <keyword>string-left-trim</keyword>
      <keyword>string-lessp</keyword>
      <keyword>string-not-equal</keyword>
      <keyword>string-not-greaterp</keyword>
      <keyword>string-not-lessp</keyword>
      <keyword>string-right-trim</keyword>
      <keyword>string-stream</keyword>
      <keyword>string-trim</keyword>
      <keyword>string-upcase</keyword>
      <keyword>\string/=</keyword>	  
      <keyword>string&lt;</keyword>
      <keyword>string&lt;=</keyword>
      <keyword>\string=</keyword>
      <keyword>\string&gt;=</keyword>
      <keyword>stringp</keyword>
      <keyword>structure</keyword>
      <keyword>structure-class</keyword>
      <keyword>structure-object</keyword>
      <keyword>styple-warning</keyword>
      <keyword>sublis</keyword>
      <keyword>subseq</keyword>
      <keyword>subsetp</keyword>
      <keyword>subst</keyword>
      <keyword>subst-if</keyword>
      <keyword>subst-if-not</keyword>
      <keyword>substitute</keyword>
      <keyword>substitute-if</keyword>
      <keyword>substitude-if-not</keyword>
      <keyword>subtypep</keyword>
      <keyword>svref</keyword>
      <keyword>sxhash</keyword>
      <keyword>symbol</keyword>
      <keyword>symbol-function</keyword>
      <keyword>symbol-macrolet</keyword>
      <keyword>symbol-name</keyword>
      <keyword>symbol-package</keyword>
      <keyword>symbol-plist</keyword>
      <keyword>symbol-value</keyword>
      <keyword>symbolp</keyword>
      <keyword>synonym-stream</keyword>
      <keyword>synonym-stream-symbol</keyword>
      <keyword>tagbody</keyword>
      <keyword>tailp</keyword>
      <keyword>tan</keyword>
      <keyword>tanh</keyword>
      <keyword>tenth</keyword>
      <keyword>terpri</keyword>
      <keyword>the</keyword>
      <keyword>third</keyword>
      <keyword>throw</keyword>
      <keyword>time</keyword>
      <keyword>trace</keyword>
      <keyword>translate-logical-pathname</keyword>
      <keyword>translate-pathname</keyword>
      <keyword>tree-equal</keyword>
      <keyword>truename</keyword>
      <keyword>truncate</keyword>
      <keyword>two-way-stream</keyword>
      <keyword>two-way-stream-input-stream</keyword>
      <keyword>two-way-stream-output-stream</keyword>
      <keyword>type</keyword>
      <keyword>type-error</keyword>
      <keyword>type-error-datum</keyword>
      <keyword>type-error-expected-type</keyword>
      <keyword>type-of</keyword>
      <keyword>typecase</keyword>
      <keyword>typep</keyword>
      <keyword>unbound-slot</keyword>
      <keyword>unbound-slot-instance</keyword>
      <keyword>unbound-variable</keyword>
      <keyword>undefined-function</keyword>
      <keyword>unexport</keyword>
      <keyword>unintern</keyword>
      <keyword>union</keyword>
      <keyword>unless</keyword>
      <keyword>unread-char</keyword>
      <keyword>unsigned-byte</keyword>
      <keyword>untrace</keyword>
      <keyword>unuse-package</keyword>
      <keyword>unwind-protect</keyword>
      <keyword>update-instance-for-different-class</keyword>
      <keyword>update-instance-for-redefined-class</keyword>
      <keyword>upgraded-array-element-type</keyword>
      <keyword>upgraded-complex-part-type</keyword>
      <keyword>upper-case-p</keyword>
      <keyword>use-package</keyword>
      <keyword>use-value</keyword>
      <keyword>user-homedir-pathname</keyword>
      <keyword>values</keyword>
      <keyword>values-list</keyword>
      <keyword>variable</keyword>
      <keyword>vector</keyword>
      <keyword>vector-pop</keyword>
      <keyword>vector-push</keyword>
      <keyword>vector-push-extend</keyword>
      <keyword>vectorp</keyword>
      <keyword>warn</keyword>
      <keyword>warning</keyword>
      <keyword>wild-pathname-p</keyword>
      <keyword>with-accessors</keyword>
      <keyword>with-compilation-unit</keyword>
      <keyword>with-condition-restart</keyword>
      <keyword>with-hash-table-iterator</keyword>
      <keyword>with-input-from-string</keyword>
      <keyword>with-open-file</keyword>
      <keyword>with-open-stream</keyword>
      <keyword>with-output-to-string</keyword>
      <keyword>with-package-iterator</keyword>
      <keyword>with-simple-restart</keyword>
      <keyword>with-slots</keyword>
      <keyword>with-standard-io-syntax</keyword>
      <keyword>write</keyword>
      <keyword>write-byte</keyword>
      <keyword>write-char</keyword>
      <keyword>write-line</keyword>
      <keyword>wirte-sequence</keyword>
      <keyword>write-string</keyword>
      <keyword>write-to-string</keyword>
      <keyword>y-or-n-p</keyword>
      <keyword>yes-or-no-p</keyword>
      <keyword>zerop</keyword>
    </context>

    <context id="lisp">
      <include>
        <context ref="line-comment"/>
        <context ref="block-comment"/>        
        <context ref="string"/>
        <context ref="decimal"/>
        <context ref="float"/>
        <context ref="key"/>
        <context ref="boolean"/>        
        <context ref="hexadecimal"/>
        <context ref="keyword"/>
        <context ref="loop-keyword"/>        
        <context ref="function"/>
        <context ref="variable"/>
        <context ref="operator"/>        
        <context ref="ext-function"/>        
      </include>
    </context>

  </definitions>
</language>