Commit c5110182 authored by Kim Nguyễn's avatar Kim Nguyễn
Browse files

Fix handling of unary minus in the lexer.

parent d782e892
......@@ -116,7 +116,7 @@ let rec token lexbuf =
let s = L.Utf8.sub_lexeme lexbuf 0 (L.lexeme_length lexbuf - 2) in
ANY_IN_NS s
| ".:*" -> ANY_IN_NS ""
| Opt '-', Plus '0' .. '9' -> INT (L.Utf8.lexeme lexbuf)
| Plus '0' .. '9' -> INT (L.Utf8.lexeme lexbuf)
| "(" -> LP
| ")" -> RP
| "[" -> LSB
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment