redo/8608
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix string escapes

Browse Source
This commit is contained in:
Redo 2022-11-01 20:58:59 -06:00
parent 50183f0aff
commit a09fdcbf2b
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
assembler-8608.lua
View File

@ -180,6 +180,8 @@ local function evaluateExpression(expr)
return eval return eval
end end
local function preprocessCode(code) local function preprocessCode(code)
code = "\n"..code.."\n"
local curscope = "" local curscope = ""
local codet = {} local codet = {}
local wordt = {} local wordt = {}
@ -340,12 +342,14 @@ local function prefixCode(code, fn) -- fix strings, add line numbers
elseif c=="\"" then state = "code" elseif c=="\"" then state = "code"
else outn(c:byte()) end else outn(c:byte()) end
elseif state=="stringesc" then elseif state=="stringesc" then
out(stringEscapes[c] or error("invalid escape "..c)); state = "string"; outn(string.byte(stringEscapes[c] or error("invalid escape "..c))); state = "string";
end end
end end
assert(#bracestack==0, "unclosed brace") assert(#bracestack==0, "unclosed brace")
local code2 = table.concat(outt) local code2 = table.concat(outt)
print(code2)
return code2 return code2
end end
local function fixFilename(fn) local function fixFilename(fn)