Mercurial > urweb
diff src/urweb.lex @ 629:e68de2a5506b
Top.Fold.concat elaborates
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Tue, 24 Feb 2009 13:46:08 -0500 |
parents | 588b9d16b00a |
children | fab5998b840e |
line wrap: on
line diff
--- a/src/urweb.lex Tue Feb 24 12:01:24 2009 -0500 +++ b/src/urweb.lex Tue Feb 24 13:46:08 2009 -0500 @@ -276,6 +276,7 @@ <INITIAL> "*" => (Tokens.STAR (pos yypos, pos yypos + size yytext)); <INITIAL> "<-" => (Tokens.LARROW (pos yypos, pos yypos + size yytext)); <INITIAL> ";" => (Tokens.SEMI (pos yypos, pos yypos + size yytext)); +<INITIAL> "!" => (Tokens.BANG (pos yypos, pos yypos + size yytext)); <INITIAL> "+" => (Tokens.PLUS (pos yypos, pos yypos + size yytext)); <INITIAL> "-" => (Tokens.MINUS (pos yypos, pos yypos + size yytext));