1 files changed, 27 insertions, 0 deletions

diff --git a/tests/protectproxy.lua b/tests/protectproxy.lua
new file mode 100644
index 0000000..57ca831
--- /dev/null
+++ b/tests/protectproxy.lua
@@ -0,0 +1,27 @@
+require "lanes"
+
+local body = function( param)
+        print ( "lane body: " .. param)
+        return 1
+end
+
+local gen = lanes.gen( "*", body)
+
+local mylane = gen( "hello")
+
+local result = mylane[1]
+
+-- make sure we have properly protected the lane
+
+-- can't access the metatable
+print( "metatable:" .. tostring( getmetatable( mylane)))
+
+-- can't write to the userdata
+print( "lane result: " .. mylane[1])
+
+-- read nonexistent values -> nil
+print "reading nonexistent return value"
+a = mylane[2]
+
+print "writing to the lane -> error"
+mylane[4] = true