14 lines
418 B
Lua
14 lines
418 B
Lua
|
-- reads luac listings and reports global variable usage
|
||
|
|
-- lines where a global is written to are marked with "*"
|
||
|
|
-- typical usage: luac -p -l file.lua | lua globals.lua | sort | lua table.lua
|
||
|
|
|
||
|
|
while 1 do
|
||
|
|
local s=io.read()
|
||
|
|
if s==nil then break end
|
||
|
|
local ok,_,l,op,g=string.find(s,"%[%-?(%d*)%]%s*([GS])ETGLOBAL.-;%s+(.*)$")
|
||
|
|
if ok then
|
||
|
|
if op=="S" then op="*" else op="" end
|
||
|
|
io.write(g,"\t",l,op,"\n")
|
||
|
|
end
|
||
|
|
end
|