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));