From 1bc105bd724e54c93b3d8c1050994f91595370f5 Mon Sep 17 00:00:00 2001
From: William S Fulton <wsf@fultondesigns.co.uk>
Date: Tue, 24 Apr 2012 18:56:16 +0000
Subject: [PATCH] Add missing Lua factory.i test for patch #3219676

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@13015 626c5289-ae23-0410-ae9c-e8d60b6d4f22
---
 Examples/test-suite/lua/li_factory_runme.lua | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100644 Examples/test-suite/lua/li_factory_runme.lua

diff --git a/Examples/test-suite/lua/li_factory_runme.lua b/Examples/test-suite/lua/li_factory_runme.lua
new file mode 100644
index 000000000..794959eb6
--- /dev/null
+++ b/Examples/test-suite/lua/li_factory_runme.lua
@@ -0,0 +1,16 @@
+require("import")  -- the import fn
+import("li_factory") -- import code
+
+-- moving to global
+for k,v in pairs(li_factory) do _G[k]=v end
+
+-- catch "undefined" global variables
+setmetatable(getfenv(),{__index=function (t,i) error("undefined global variable `"..i.."'",2) end})
+
+circle = Geometry_create(Geometry_CIRCLE)
+r = circle:radius()
+assert(r == 1.5)
+
+point = Geometry_create(Geometry_POINT)
+w = point:width()
+assert(w == 1.0)