gh-mirror/mikepaul-LuaJIT
1
0
Fork 0
mirror of https://github.com/LuaJIT/LuaJIT.git synced 2025-02-07 23:24:09 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Allow @ in DynASM globals.

Browse Source
This commit is contained in:
Mike Pall 2010-01-05 22:07:54 +01:00
parent 93ee10642e
commit 9df01f96b9
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
dynasm/dasm_x86.lua
View File

@ -173,7 +173,7 @@ end
-- Global label name -> global label number. With auto assignment on 1st use. -- Global label name -> global label number. With auto assignment on 1st use.
local next_global = 10 local next_global = 10
local map_global = setmetatable({}, { __index = function(t, name) local map_global = setmetatable({}, { __index = function(t, name)
if not match(name, "^[%a_][%w_]*$") then werror("bad global label") end if not match(name, "^[%a_][%w_@]*$") then werror("bad global label") end
local n = next_global local n = next_global
if n > 246 then werror("too many global labels") end if n > 246 then werror("too many global labels") end
next_global = n + 1 next_global = n + 1
@ -198,7 +198,7 @@ local function writeglobals(out, prefix)
for name, n in pairs(map_global) do t[n] = name end for name, n in pairs(map_global) do t[n] = name end
out:write("enum {\n") out:write("enum {\n")
for i=10,next_global-1 do for i=10,next_global-1 do
out:write(" ", prefix, t[i], ",\n") out:write(" ", prefix, gsub(t[i], "@.*", ""), ",\n")
end end
out:write(" ", prefix, "_MAX\n};\n") out:write(" ", prefix, "_MAX\n};\n")
end end