1. <lexer>
    
  2.   <config>
    
  3.     <name>Scheme</name>
    
  4.     <alias>scheme</alias>
    
  5.     <alias>scm</alias>
    
  6.     <filename>*.scm</filename>
    
  7.     <filename>*.ss</filename>
    
  8.     <mime_type>text/x-scheme</mime_type>
    
  9.     <mime_type>application/x-scheme</mime_type>
    
  10.   </config>
    
  11.   <rules>
    
  12.     <state name="root">
    
  13.       <rule pattern=";.*$">
    
  14.         <token type="CommentSingle"/>
    
  15.       </rule>
    
  16.       <rule pattern="#\|">
    
  17.         <token type="CommentMultiline"/>
    
  18.         <push state="multiline-comment"/>
    
  19.       </rule>
    
  20.       <rule pattern="#;\s*\(">
    
  21.         <token type="Comment"/>
    
  22.         <push state="commented-form"/>
    
  23.       </rule>
    
  24.       <rule pattern="#!r6rs">
    
  25.         <token type="Comment"/>
    
  26.       </rule>
    
  27.       <rule pattern="\s+">
    
  28.         <token type="Text"/>
    
  29.       </rule>
    
  30.       <rule pattern="-?\d+\.\d+">
    
  31.         <token type="LiteralNumberFloat"/>
    
  32.       </rule>
    
  33.       <rule pattern="-?\d+">
    
  34.         <token type="LiteralNumberInteger"/>
    
  35.       </rule>
    
  36.       <rule pattern="&#34;(\\\\|\\&#34;|[^&#34;])*&#34;">
    
  37.         <token type="LiteralString"/>
    
  38.       </rule>
    
  39.       <rule pattern="&#39;[\w!$%&amp;*+,/:&lt;=&gt;?@^~|-]+">
    
  40.         <token type="LiteralStringSymbol"/>
    
  41.       </rule>
    
  42.       <rule pattern="#\\(alarm|backspace|delete|esc|linefeed|newline|page|return|space|tab|vtab|x[0-9a-zA-Z]{1,5}|.)">
    
  43.         <token type="LiteralStringChar"/>
    
  44.       </rule>
    
  45.       <rule pattern="(#t|#f)">
    
  46.         <token type="NameConstant"/>
    
  47.       </rule>
    
  48.       <rule pattern="(&#39;|#|`|,@|,|\.)">
    
  49.         <token type="Operator"/>
    
  50.       </rule>
    
  51.       <rule pattern="(lambda |define |if |else |cond |and |or |case |let |let\* |letrec |begin |do |delay |set\! |\=\&gt; |quote |quasiquote |unquote |unquote\-splicing |define\-syntax |let\-syntax |letrec\-syntax |syntax\-rules )">
    
  52.         <token type="Keyword"/>
    
  53.       </rule>
    
  54.       <rule pattern="(?&lt;=&#39;\()[\w!$%&amp;*+,/:&lt;=&gt;?@^~|-]+">
    
  55.         <token type="NameVariable"/>
    
  56.       </rule>
    
  57.       <rule pattern="(?&lt;=#\()[\w!$%&amp;*+,/:&lt;=&gt;?@^~|-]+">
    
  58.         <token type="NameVariable"/>
    
  59.       </rule>
    
  60.       <rule pattern="(?&lt;=\()(\* |\+ |\- |\/ |\&lt; |\&lt;\= |\= |\&gt; |\&gt;\= |abs |acos |angle |append |apply |asin |assoc |assq |assv |atan |boolean\? |caaaar |caaadr |caaar |caadar |caaddr |caadr |caar |cadaar |cadadr |cadar |caddar |cadddr |caddr |cadr |call\-with\-current\-continuation |call\-with\-input\-file |call\-with\-output\-file |call\-with\-values |call\/cc |car |cdaaar |cdaadr |cdaar |cdadar |cdaddr |cdadr |cdar |cddaar |cddadr |cddar |cdddar |cddddr |cdddr |cddr |cdr |ceiling |char\-\&gt;integer |char\-alphabetic\? |char\-ci\&lt;\=\? |char\-ci\&lt;\? |char\-ci\=\? |char\-ci\&gt;\=\? |char\-ci\&gt;\? |char\-downcase |char\-lower\-case\? |char\-numeric\? |char\-ready\? |char\-upcase |char\-upper\-case\? |char\-whitespace\? |char\&lt;\=\? |char\&lt;\? |char\=\? |char\&gt;\=\? |char\&gt;\? |char\? |close\-input\-port |close\-output\-port |complex\? |cons |cos |current\-input\-port |current\-output\-port |denominator |display |dynamic\-wind |eof\-object\? |eq\? |equal\? |eqv\? |eval |even\? |exact\-\&gt;inexact |exact\? |exp |expt |floor |for\-each |force |gcd |imag\-part |inexact\-\&gt;exact |inexact\? |input\-port\? |integer\-\&gt;char |integer\? |interaction\-environment |lcm |length |list |list\-\&gt;string |list\-\&gt;vector |list\-ref |list\-tail |list\? |load |log |magnitude |make\-polar |make\-rectangular |make\-string |make\-vector |map |max |member |memq |memv |min |modulo |negative\? |newline |not |null\-environment |null\? |number\-\&gt;string |number\? |numerator |odd\? |open\-input\-file |open\-output\-file |output\-port\? |pair\? |peek\-char |port\? |positive\? |procedure\? |quotient |rational\? |rationalize |read |read\-char |real\-part |real\? |remainder |reverse |round |scheme\-report\-environment |set\-car\! |set\-cdr\! |sin |sqrt |string |string\-\&gt;list |string\-\&gt;number |string\-\&gt;symbol |string\-append |string\-ci\&lt;\=\? |string\-ci\&lt;\? |string\-ci\=\? |string\-ci\&gt;\=\? |string\-ci\&gt;\? |string\-copy |string\-fill\! |string\-length |string\-ref |string\-set\! |string\&lt;\=\? |string\&lt;\? |string\=\? |string\&gt;\=\? |string\&gt;\? |string\? |substring |symbol\-\&gt;string |symbol\? |tan |transcript\-off |transcript\-on |truncate |values |vector |vector\-\&gt;list |vector\-fill\! |vector\-length |vector\-ref |vector\-set\! |vector\? |with\-input\-from\-file |with\-output\-to\-file |write |write\-char |zero\? )">
    
  61.         <token type="NameBuiltin"/>
    
  62.       </rule>
    
  63.       <rule pattern="(?&lt;=\()[\w!$%&amp;*+,/:&lt;=&gt;?@^~|-]+">
    
  64.         <token type="NameFunction"/>
    
  65.       </rule>
    
  66.       <rule pattern="[\w!$%&amp;*+,/:&lt;=&gt;?@^~|-]+">
    
  67.         <token type="NameVariable"/>
    
  68.       </rule>
    
  69.       <rule pattern="(\(|\))">
    
  70.         <token type="Punctuation"/>
    
  71.       </rule>
    
  72.       <rule pattern="(\[|\])">
    
  73.         <token type="Punctuation"/>
    
  74.       </rule>
    
  75.     </state>
    
  76.     <state name="multiline-comment">
    
  77.       <rule pattern="#\|">
    
  78.         <token type="CommentMultiline"/>
    
  79.         <push/>
    
  80.       </rule>
    
  81.       <rule pattern="\|#">
    
  82.         <token type="CommentMultiline"/>
    
  83.         <pop depth="1"/>
    
  84.       </rule>
    
  85.       <rule pattern="[^|#]+">
    
  86.         <token type="CommentMultiline"/>
    
  87.       </rule>
    
  88.       <rule pattern="[|#]">
    
  89.         <token type="CommentMultiline"/>
    
  90.       </rule>
    
  91.     </state>
    
  92.     <state name="commented-form">
    
  93.       <rule pattern="\(">
    
  94.         <token type="Comment"/>
    
  95.         <push/>
    
  96.       </rule>
    
  97.       <rule pattern="\)">
    
  98.         <token type="Comment"/>
    
  99.         <pop depth="1"/>
    
  100.       </rule>
    
  101.       <rule pattern="[^()]+">
    
  102.         <token type="Comment"/>
    
  103.       </rule>
    
  104.     </state>
    
  105.   </rules>
    
  106. </lexer>