diff options
author | Steven Noonan <steven@uplinklabs.net> | 2009-10-14 01:05:00 -0700 |
---|---|---|
committer | Steven Noonan <steven@uplinklabs.net> | 2009-10-14 21:33:59 -0700 |
commit | 9d51433ef6329e65938c5655586ea915493ba8ac (patch) | |
tree | a904d02f87629deaddb5cca83ff205eb836e53ba /crawl-ref/source/util/lua/test/trace-globals.lua | |
parent | 59134ed3b2808e4e48ecc64ed8579b84431af057 (diff) | |
download | crawl-ref-9d51433ef6329e65938c5655586ea915493ba8ac.tar.gz crawl-ref-9d51433ef6329e65938c5655586ea915493ba8ac.zip |
contribs: moved to contribs dir, added as submodules
Signed-off-by: Steven Noonan <steven@uplinklabs.net>
Diffstat (limited to 'crawl-ref/source/util/lua/test/trace-globals.lua')
-rw-r--r-- | crawl-ref/source/util/lua/test/trace-globals.lua | 38 |
1 files changed, 0 insertions, 38 deletions
diff --git a/crawl-ref/source/util/lua/test/trace-globals.lua b/crawl-ref/source/util/lua/test/trace-globals.lua deleted file mode 100644 index 295e670caa..0000000000 --- a/crawl-ref/source/util/lua/test/trace-globals.lua +++ /dev/null @@ -1,38 +0,0 @@ --- trace assigments to global variables - -do - -- a tostring that quotes strings. note the use of the original tostring. - local _tostring=tostring - local tostring=function(a) - if type(a)=="string" then - return string.format("%q",a) - else - return _tostring(a) - end - end - - local log=function (name,old,new) - local t=debug.getinfo(3,"Sl") - local line=t.currentline - io.write(t.short_src) - if line>=0 then io.write(":",line) end - io.write(": ",name," is now ",tostring(new)," (was ",tostring(old),")","\n") - end - - local g={} - local set=function (t,name,value) - log(name,g[name],value) - g[name]=value - end - setmetatable(getfenv(),{__index=g,__newindex=set}) -end - --- an example - -a=1 -b=2 -a=10 -b=20 -b=nil -b=200 -print(a,b,c) |