Fix lexer: integer literals matched empty string.

xlq · Aug 25, 2012 · be65496 · be65496
1 parent 5b69d9c
commit be65496
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lexer.mll b/lexer.mll
@@ -46,7 +46,7 @@ rule scan = parse
          try Hashtbl.find keywords id
          with Not_found -> IDENT(id)
       }
-   | ['0'-'9']* as value { INTEGER(big_int_of_string value) }
+   | ['0'-'9']+ as value { INTEGER(big_int_of_string value) }
    | '(' { LPAREN }
    | ')' { RPAREN }
    | '[' { LBRACKET }