mirror of
https://github.com/moparisthebest/minetest
synced 2024-12-22 15:48:48 -05:00
Make duplicate warning checks file and line specific
This commit is contained in:
parent
0dcc4b251f
commit
a1db83e93f
@ -11,16 +11,21 @@ end
|
|||||||
|
|
||||||
local meta = {}
|
local meta = {}
|
||||||
local declared = {}
|
local declared = {}
|
||||||
local alreadywarned = {}
|
-- Key is source file, line, and variable name; seperated by NULs
|
||||||
|
local warned = {}
|
||||||
|
|
||||||
function meta:__newindex(name, value)
|
function meta:__newindex(name, value)
|
||||||
local info = debug.getinfo(2, "Sl")
|
local info = debug.getinfo(2, "Sl")
|
||||||
local desc = ("%s:%d"):format(info.short_src, info.currentline)
|
local desc = ("%s:%d"):format(info.short_src, info.currentline)
|
||||||
if not declared[name] then
|
if not declared[name] then
|
||||||
if info.what ~= "main" and info.what ~= "C" then
|
local warn_key = ("%s\0%d\0%s"):format(info.source,
|
||||||
warn(("Assignment to undeclared global %q inside"
|
info.currentline, name)
|
||||||
.." a function at %s.")
|
if not warned[warn_key] and info.what ~= "main" and
|
||||||
|
info.what ~= "C" then
|
||||||
|
minetest.log("error", ("Assignment to undeclared "..
|
||||||
|
"global %q inside a function at %s.")
|
||||||
:format(name, desc))
|
:format(name, desc))
|
||||||
|
warned[warn_key] = true
|
||||||
end
|
end
|
||||||
declared[name] = true
|
declared[name] = true
|
||||||
end
|
end
|
||||||
@ -36,10 +41,11 @@ end
|
|||||||
|
|
||||||
function meta:__index(name)
|
function meta:__index(name)
|
||||||
local info = debug.getinfo(2, "Sl")
|
local info = debug.getinfo(2, "Sl")
|
||||||
if not declared[name] and info.what ~= "C" and not alreadywarned[name] then
|
local warn_key = ("%s\0%d\0%s"):format(info.source, info.currentline, name)
|
||||||
|
if not declared[name] and not warned[warn_key] and info.what ~= "C" then
|
||||||
warn(("Undeclared global variable %q accessed at %s:%s")
|
warn(("Undeclared global variable %q accessed at %s:%s")
|
||||||
:format(name, info.short_src, info.currentline))
|
:format(name, info.short_src, info.currentline))
|
||||||
alreadywarned[name] = true
|
warned[warn_key] = true
|
||||||
end
|
end
|
||||||
return rawget(self, name)
|
return rawget(self, name)
|
||||||
end
|
end
|
||||||
|
Loading…
Reference in New Issue
Block a user