From 2d1df4714e2736dbde7855ddcd76b4c1de822fa5 Mon Sep 17 00:00:00 2001
From: David Walter Seikel
Date: Mon, 23 Jan 2012 21:58:02 +1000
Subject: Added a big bunch of example lua scripts for testing the speed of lua
 compiling.

---
 LuaSL/testLua/yueliang-0.4.1/test_lua/5.1/readonly.lua | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 LuaSL/testLua/yueliang-0.4.1/test_lua/5.1/readonly.lua

(limited to 'LuaSL/testLua/yueliang-0.4.1/test_lua/5.1/readonly.lua')

diff --git a/LuaSL/testLua/yueliang-0.4.1/test_lua/5.1/readonly.lua b/LuaSL/testLua/yueliang-0.4.1/test_lua/5.1/readonly.lua
new file mode 100644
index 0000000..85c0b4e
--- /dev/null
+++ b/LuaSL/testLua/yueliang-0.4.1/test_lua/5.1/readonly.lua
@@ -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'
-- 
cgit v1.1