comparison src/lacweb.lex @ 42:b3fbbc6cb1e5

Elaborating 'where'
author Adam Chlipala <adamc@hcoop.net>
date Thu, 19 Jun 2008 16:35:40 -0400
parents e3d3c2791105
children 0a5c312de09a
comparison
equal deleted inserted replaced
41:1405d8c26790 42:b3fbbc6cb1e5
132 <INITIAL> "signature" => (Tokens.SIGNATURE (yypos, yypos + size yytext)); 132 <INITIAL> "signature" => (Tokens.SIGNATURE (yypos, yypos + size yytext));
133 <INITIAL> "struct" => (Tokens.STRUCT (yypos, yypos + size yytext)); 133 <INITIAL> "struct" => (Tokens.STRUCT (yypos, yypos + size yytext));
134 <INITIAL> "sig" => (Tokens.SIG (yypos, yypos + size yytext)); 134 <INITIAL> "sig" => (Tokens.SIG (yypos, yypos + size yytext));
135 <INITIAL> "end" => (Tokens.END (yypos, yypos + size yytext)); 135 <INITIAL> "end" => (Tokens.END (yypos, yypos + size yytext));
136 <INITIAL> "functor" => (Tokens.FUNCTOR (yypos, yypos + size yytext)); 136 <INITIAL> "functor" => (Tokens.FUNCTOR (yypos, yypos + size yytext));
137 <INITIAL> "where" => (Tokens.WHERE (yypos, yypos + size yytext));
137 138
138 <INITIAL> "Type" => (Tokens.TYPE (yypos, yypos + size yytext)); 139 <INITIAL> "Type" => (Tokens.TYPE (yypos, yypos + size yytext));
139 <INITIAL> "Name" => (Tokens.NAME (yypos, yypos + size yytext)); 140 <INITIAL> "Name" => (Tokens.NAME (yypos, yypos + size yytext));
140 141
141 <INITIAL> {id} => (Tokens.SYMBOL (yytext, yypos, yypos + size yytext)); 142 <INITIAL> {id} => (Tokens.SYMBOL (yytext, yypos, yypos + size yytext));