Mercurial > urweb

diff src/lacweb.lex @ 30:e6ccf961d8a3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Parsing and printing basic module system
author Adam Chlipala <adamc@hcoop.net>
date Thu, 12 Jun 2008 14:04:22 -0400
parents 9a578171de9e
children 1c91c5e6840f
line wrap: on
line diff
--- a/src/lacweb.lex	Tue Jun 10 18:28:43 2008 -0400
+++ b/src/lacweb.lex	Thu Jun 12 14:04:22 2008 -0400
@@ -128,6 +128,12 @@
 <INITIAL> "val"       => (Tokens.VAL (yypos, yypos + size yytext));
 <INITIAL> "fn"        => (Tokens.FN (yypos, yypos + size yytext));
 
+<INITIAL> "structure" => (Tokens.STRUCTURE (yypos, yypos + size yytext));
+<INITIAL> "signature" => (Tokens.STRUCTURE (yypos, yypos + size yytext));
+<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> "Type"      => (Tokens.TYPE (yypos, yypos + size yytext));
 <INITIAL> "Name"      => (Tokens.NAME (yypos, yypos + size yytext));