tools/erlparse: Fix erlang string escape sequences.

This commit is contained in:
Waqas Hussain 2012-08-04 23:23:49 +05:00
parent 4c408e8dfe
commit d69fd55cf6

View file

@ -51,7 +51,7 @@ local function isSpace(ch)
return ch <= _space; return ch <= _space;
end end
local escapes = {["\\b"]="\b", ["\\d"]="\d", ["\\e"]="\e", ["\\f"]="\f", ["\\n"]="\n", ["\\r"]="\r", ["\\s"]="\s", ["\\t"]="\t", ["\\v"]="\v", ["\\\""]="\"", ["\\'"]="'", ["\\\\"]="\\"}; local escapes = {["\\b"]="\b", ["\\d"]="\127", ["\\e"]="\27", ["\\f"]="\f", ["\\n"]="\n", ["\\r"]="\r", ["\\s"]=" ", ["\\t"]="\t", ["\\v"]="\v", ["\\\""]="\"", ["\\'"]="'", ["\\\\"]="\\"};
local function readString() local function readString()
read("\""); -- skip quote read("\""); -- skip quote
local slash = nil; local slash = nil;