diff options
| author | sanine <sanine.not@pm.me> | 2022-08-23 13:38:27 -0500 |
|---|---|---|
| committer | sanine <sanine.not@pm.me> | 2022-08-23 13:38:27 -0500 |
| commit | 3afbf2a13b2dada445fb667bf25600407fea480a (patch) | |
| tree | 551329e6f74fc9f177616de0d6739e8b5331ae96 /libs/lua-5.1.5/test/globals.lua | |
| parent | 261e3f991221fbad6bbf262f5e65b773e4b6c73e (diff) | |
| parent | 25ed7eb9f84e9a822f698ad803901fbb2a5354cf (diff) | |
:wMerge branch 'gl-window' into main
Diffstat (limited to 'libs/lua-5.1.5/test/globals.lua')
| -rw-r--r-- | libs/lua-5.1.5/test/globals.lua | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/libs/lua-5.1.5/test/globals.lua b/libs/lua-5.1.5/test/globals.lua new file mode 100644 index 0000000..d4c20e1 --- /dev/null +++ b/libs/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 |