Mercurial > urweb
diff src/urweb.lex @ 1128:e1cf925e2074
Allow escaped backslashes in literals; conversion betwixt int and char
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Tue, 12 Jan 2010 16:09:13 -0500 |
parents | c023bc6ab914 |
children | c316ca3c9ec6 |
line wrap: on
line diff
--- a/src/urweb.lex Tue Jan 12 11:19:02 2010 -0500 +++ b/src/urweb.lex Tue Jan 12 16:09:13 2010 -0500 @@ -198,6 +198,7 @@ <STRING,CHAR> "\\\"" => (str := #"\"" :: !str; continue()); <STRING,CHAR> "\\'" => (str := #"'" :: !str; continue()); <STRING,CHAR> "\\n" => (str := #"\n" :: !str; continue()); +<STRING,CHAR> "\\\\" => (str := #"\\" :: !str; continue()); <STRING,CHAR> "\\t" => (str := #"\t" :: !str; continue()); <STRING,CHAR> "\n" => (newline yypos; str := #"\n" :: !str; continue());