Finish being able to parse the first example file.

This commit is contained in:
2011-02-03 20:27:05 -05:00
parent 17ca2f7899
commit a64b8aa81c
4 changed files with 65 additions and 39 deletions

View File

@@ -21,7 +21,7 @@ $bindigit = [01]
$typestart = [A-Z\_]
$valstart = [a-z\_]
$identrest = [a-zA-Z0-9\_\.]
$opident = [\~\!\@\#\$\%\^\&\*\+\-\=\.\:\<\>\?\_]
$opident = [\~\!\@\#\$\%\^\&\*\+\-\=\.\<\>\?\_]
$escape_char = [abfnrtv'\"\\]
:-
@@ -42,6 +42,7 @@ $escape_char = [abfnrtv'\"\\]
$typestart $identrest* { emitS TokTypeIdent }
$valstart $identrest* { emitS TokValIdent }
$opident+ { emitS TokOpIdent }
":"+ { emitS TokOpIdent }
-- Characters and Strings
['].['] { emitS TokChar }