diff options
author | Adam Chlipala <adam@chlipala.net> | 2010-10-10 20:33:10 -0400 |
---|---|---|
committer | Adam Chlipala <adam@chlipala.net> | 2010-10-10 20:33:10 -0400 |
commit | 4e608544ebe87dd991d53ded5267f14f5df93b8b (patch) | |
tree | 4de957d9837f39c79ebc56b5ac2935e31a28d0b5 /src/urweb.lex | |
parent | 42d55420b84994ee61c0a4645d21d275dbbea2cd (diff) |
:::_ notation; switch to TooDeep error message
Diffstat (limited to 'src/urweb.lex')
-rw-r--r-- | src/urweb.lex | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/urweb.lex b/src/urweb.lex index a6df5f1b..fa8c5dde 100644 --- a/src/urweb.lex +++ b/src/urweb.lex @@ -371,6 +371,7 @@ xint = x[0-9a-fA-F][0-9a-fA-F]; <INITIAL> "<=" => (Tokens.LE (pos yypos, pos yypos + size yytext)); <INITIAL> ">=" => (Tokens.GE (pos yypos, pos yypos + size yytext)); <INITIAL> "," => (Tokens.COMMA (pos yypos, pos yypos + size yytext)); +<INITIAL> ":::_" => (Tokens.TCOLONWILD (pos yypos, pos yypos + size yytext)); <INITIAL> ":::" => (Tokens.TCOLON (pos yypos, pos yypos + size yytext)); <INITIAL> "::_" => (Tokens.DCOLONWILD (pos yypos, pos yypos + size yytext)); <INITIAL> "::" => (Tokens.DCOLON (pos yypos, pos yypos + size yytext)); |