Mercurial > urweb

comparison src/lacweb.lex @ 235:0608a0cfd32a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
COUNT
author Adam Chlipala <adamc@hcoop.net>
date Thu, 28 Aug 2008 11:59:46 -0400
parents a338da9d82f3
children f5732dc1316c
comparison
equal deleted inserted replaced
234:82409ef72019 235:0608a0cfd32a
321 <INITIAL> "FALSE" => (Tokens.FALSE (pos yypos, pos yypos + size yytext)); 321 <INITIAL> "FALSE" => (Tokens.FALSE (pos yypos, pos yypos + size yytext));
322 <INITIAL> "AND" => (Tokens.CAND (pos yypos, pos yypos + size yytext)); 322 <INITIAL> "AND" => (Tokens.CAND (pos yypos, pos yypos + size yytext));
323 <INITIAL> "OR" => (Tokens.OR (pos yypos, pos yypos + size yytext)); 323 <INITIAL> "OR" => (Tokens.OR (pos yypos, pos yypos + size yytext));
324 <INITIAL> "NOT" => (Tokens.NOT (pos yypos, pos yypos + size yytext)); 324 <INITIAL> "NOT" => (Tokens.NOT (pos yypos, pos yypos + size yytext));
325 325
326 <INITIAL> "COUNT" => (Tokens.COUNT (pos yypos, pos yypos + size yytext));
327
326 <INITIAL> {id} => (Tokens.SYMBOL (yytext, pos yypos, pos yypos + size yytext)); 328 <INITIAL> {id} => (Tokens.SYMBOL (yytext, pos yypos, pos yypos + size yytext));
327 <INITIAL> {cid} => (Tokens.CSYMBOL (yytext, pos yypos, pos yypos + size yytext)); 329 <INITIAL> {cid} => (Tokens.CSYMBOL (yytext, pos yypos, pos yypos + size yytext));
328 330
329 <INITIAL> {intconst} => (case Int64.fromString yytext of 331 <INITIAL> {intconst} => (case Int64.fromString yytext of
330 SOME x => Tokens.INT (x, pos yypos, pos yypos + size yytext) 332 SOME x => Tokens.INT (x, pos yypos, pos yypos + size yytext)