* lib/lua/test: Add.
This commit is contained in:
parent
149a0ba1d9
commit
e8ac11b670
21 changed files with 531 additions and 0 deletions
12
trunk/lib/lua/test/readonly.lua
Normal file
12
trunk/lib/lua/test/readonly.lua
Normal file
|
|
@ -0,0 +1,12 @@
|
|||
-- make global variables readonly
|
||||
|
||||
local f=function (t,i) error("cannot redefine global variable `"..i.."'",2) end
|
||||
local g={}
|
||||
local G=getfenv()
|
||||
setmetatable(g,{__index=G,__newindex=f})
|
||||
setfenv(1,g)
|
||||
|
||||
-- an example
|
||||
rawset(g,"x",3)
|
||||
x=2
|
||||
y=1 -- cannot redefine `y'
|
||||
Loading…
Add table
Add a link
Reference in a new issue