Bruce/nomsu
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Rebuilt.

Browse Source
This commit is contained in:
Bruce Hill 2017-09-21 04:04:08 -07:00
parent 5f2db8da0e
commit 34f50056ad
1 changed files with 10 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
nomsu.lua
View File

@ -415,10 +415,7 @@ do
end end
return (lua_thunk())(self, vars or { }) return (lua_thunk())(self, vars or { })
end, end,
tree_to_lua = function(self, tree, kind) tree_to_lua = function(self, tree)
if kind == nil then
kind = "Expression"
end
assert(tree, "No tree provided.") assert(tree, "No tree provided.")
if not tree.type then if not tree.type then
self:error("Invalid tree: " .. tostring(utils.repr(tree))) self:error("Invalid tree: " .. tostring(utils.repr(tree)))
@ -427,8 +424,8 @@ do
local buffer = { } local buffer = { }
local return_value = nil local return_value = nil
local to_lua local to_lua
to_lua = function(t, kind) to_lua = function(t)
local ret = self:tree_to_lua(t, kind) local ret = self:tree_to_lua(t)
return ret return ret
end end
local add local add
@ -602,11 +599,13 @@ do
if var.type ~= "Var" then if var.type ~= "Var" then
self:error("Tried to convert something that wasn't a Var into a lua identifier: it was not a Var, it was: " .. label.type) self:error("Tried to convert something that wasn't a Var into a lua identifier: it was not a Var, it was: " .. label.type)
end end
local identifier = "var_" return "var" .. (var.value:gsub("%W", function(verboten)
for i = 1, #var.value do if verboten == "_" then
identifier = identifier .. ("%x"):format(string.byte(var.value, i)) return "__"
else
return ("_%x"):format(verboten:byte())
end end
return identifier end))
end, end,
run_macro = function(self, tree, kind) run_macro = function(self, tree, kind)
if kind == nil then if kind == nil then