Mercurial > urweb
diff src/lacweb.lex @ 40:e3d3c2791105
Functor parsing
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Thu, 19 Jun 2008 15:15:00 -0400 |
parents | 1c91c5e6840f |
children | b3fbbc6cb1e5 |
line wrap: on
line diff
--- a/src/lacweb.lex Thu Jun 19 12:39:22 2008 -0400 +++ b/src/lacweb.lex Thu Jun 19 15:15:00 2008 -0400 @@ -133,6 +133,7 @@ <INITIAL> "struct" => (Tokens.STRUCT (yypos, yypos + size yytext)); <INITIAL> "sig" => (Tokens.SIG (yypos, yypos + size yytext)); <INITIAL> "end" => (Tokens.END (yypos, yypos + size yytext)); +<INITIAL> "functor" => (Tokens.FUNCTOR (yypos, yypos + size yytext)); <INITIAL> "Type" => (Tokens.TYPE (yypos, yypos + size yytext)); <INITIAL> "Name" => (Tokens.NAME (yypos, yypos + size yytext));