
        <push state="comment"/>
      </rule>
      <rule pattern="&#34;">
        <token type="LiteralString"/>
        <push state="string_double"/>
      </rule>
      <rule pattern="&#39;">
        <token type="LiteralString"/>
        <push state="string_single"/>
      </rule>
      <rule pattern="[0-9]+(\.[0-9]+)?(e[+-]?[0-9])?">
        <token type="LiteralNumber"/>
      </rule>
      <rule pattern="([a-z_]\w*)(\s*)(:)(\s*)(procedure)\b">
        <bygroups>
          <token type="NameFunction"/>
          <token type="TextWhitespace"/>
          <token type="Operator"/>
          <token type="TextWhitespace"/>
          <token type="KeywordDeclaration"/>
        </bygroups>
      </rule>
      <rule pattern="([a-z_]\w*)(\s*)(:)">
        <bygroups>
          <token type="NameLabel"/>
          <token type="TextWhitespace"/>
          <token type="Operator"/>
        </bygroups>
      </rule>
      <rule>
        <include state="function"/>
      </rule>
      <rule>
        <include state="keyword"/>
      </rule>
      <rule>
        <include state="operator"/>
      </rule>
      <rule pattern="[a-z_]\w*">
        <token type="Text"/>
      </rule>
    </state>
    <state name="function">
      <rule pattern="(sourceline|wordlength|errortext|translate|wordindex|condition|datatype|subword|lineout|lastpos|delword|address|charout|wordpos|compare|overlay|reverse|symbol|stream|charin|center|delstr|verify|digits|abbrev|bitxor|format|random|insert|bitand|queued|length|linein|substr|copies|xrange|space|words|lines|bitor|trunc|strip|right|value|chars|trace|sign|form|fuzz|word|left|time|date|c2d|d2c|d2x|c2x|pos|b2x|arg|abs|min|x2b|x2c|x2d|max)(\s*)(\()">
        <bygroups>
          <token type="NameBuiltin"/>
          <token type="TextWhitespace"/>
          <token type="Operator"/>
        </bygroups>
      </rule>
    </state>
  </rules>
</lexer>