local mt = getmetatable(_G)
if mt == nil then
- mt = {}
- setmetatable(_G, mt)
+ mt = {}
+ setmetatable(_G, mt)
end
mt.__declared = {}
local function what ()
- local d = debug.getinfo(3, "S")
- return d and d.what or "C"
+ local d = debug.getinfo(3, "S")
+ return d and d.what or "C"
end
mt.__newindex = function (t, n, v)
- if not mt.__declared[n] then
- local w = what()
- if w ~= "main" and w ~= "C" then
- error("assign to undeclared variable '"..n.."'", 2)
+ if not mt.__declared[n] then
+ local w = what()
+ if w ~= "main" and w ~= "C" then
+ error("assign to undeclared variable '"..n.."'", 2)
+ end
+ mt.__declared[n] = true
end
- mt.__declared[n] = true
- end
- rawset(t, n, v)
+ rawset(t, n, v)
end
mt.__index = function (t, n)
- if not mt.__declared[n] and what() ~= "C" then
- error("variable '"..n.."' is not declared", 2)
- end
- return rawget(t, n)
+ if not mt.__declared[n] and what() ~= "C" then
+ error("variable '"..n.."' is not declared", 2)
+ end
+ return rawget(t, n)
end
+-- vim:sw=4:sts=4:et: