diff options
author | chai <chaifix@163.com> | 2018-12-07 01:18:45 +0800 |
---|---|---|
committer | chai <chaifix@163.com> | 2018-12-07 01:18:45 +0800 |
commit | afc5ebdeece428d4ef72f4f1f4b178a92d1b9cba (patch) | |
tree | 664aff4bdf9841346f044cb2a2f3cb4b55eba386 /src/3rdparty/lua-5.1.5/test/globals.lua | |
parent | 1acc1ecf398bc43bc304a449643fddbb65d1e733 (diff) |
+lua51
Diffstat (limited to 'src/3rdparty/lua-5.1.5/test/globals.lua')
-rw-r--r-- | src/3rdparty/lua-5.1.5/test/globals.lua | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/src/3rdparty/lua-5.1.5/test/globals.lua b/src/3rdparty/lua-5.1.5/test/globals.lua new file mode 100644 index 0000000..d4c20e1 --- /dev/null +++ b/src/3rdparty/lua-5.1.5/test/globals.lua @@ -0,0 +1,13 @@ +-- 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 |