additional table tests

Author: tomblind

tests/tables/main.lua

@@ -20,12 +20,19 @@ local mt =
     __len = function() return 42 end,
     __add = function(self, other) return make() end,
     __tostring = function() return "foobar" end,
+    __metatable = "hidden"
 }
 
 make = function()
     return setmetatable({}, mt)
 end
 
+local empty = {}
+local emptyWithMt = setmetatable({}, {__index = {foo = "FOO"}})
+local emptyWithLenMt = setmetatable({}, {__len = function() return 42 end})
+local emptyWithBadLenMt = setmetatable({}, {__len = function() error("FUBAR") end})
+local emptyWithBadIndexMt = setmetatable({}, {__index = function(s, k) error("FUBAR") end})
+
 local a = make()
 local b = make()
 print(#a) --0 in 5.1/jit, 42 in 5.2+