Mercurial > urweb
diff src/lacweb.lex @ 211:e86411f647c6
Initial type class support
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sat, 16 Aug 2008 14:32:18 -0400 |
parents | 1487c712eb12 |
children | 5292c0113024 |
line wrap: on
line diff
--- a/src/lacweb.lex Sat Aug 16 12:35:46 2008 -0400 +++ b/src/lacweb.lex Sat Aug 16 14:32:18 2008 -0400 @@ -280,6 +280,7 @@ <INITIAL> "constraints"=> (Tokens.CONSTRAINTS (pos yypos, pos yypos + size yytext)); <INITIAL> "export" => (Tokens.EXPORT (pos yypos, pos yypos + size yytext)); <INITIAL> "table" => (Tokens.TABLE (pos yypos, pos yypos + size yytext)); +<INITIAL> "class" => (Tokens.CLASS (pos yypos, pos yypos + size yytext)); <INITIAL> "Type" => (Tokens.TYPE (pos yypos, pos yypos + size yytext)); <INITIAL> "Name" => (Tokens.NAME (pos yypos, pos yypos + size yytext));