Fix basic class processing via metatables. Make print output more closely match that produces by C interpreter

src/test/res/test6.lua

@@ -1,8 +1,11 @@
+
 t = { 11, 22, 33, you='one', me='two' }
 
+print( "---------" )
 for a,b in pairs(t) do
 	print( a, b )
 end
+print( "----" )
 print( "t[2]", t[2] )
 print( "t.me", t.me )
 print( "t.fred", t.fred )
@@ -24,9 +27,11 @@ d = t.you
 t[4] = 'rat'
 t[1] = 'pipe'
 print( a, b, c, d )
+print( "---------" )
 for a,b in pairs(t) do
 	print( a, b )
 end
+print( "----" )
 
 -- delegate to actual metatable
 s = { }
@@ -38,6 +43,52 @@ print( t.x )
 me = 'here'
 print( t.me )
 t[5] = 99
+print( "---------" )
 for a,b in pairs(s) do
 	print( a, b )
 end
+print( "----" )
+
+Vector = {}
+Vector_mt = { __index = Vector }
+
+function Vector:new(x,y)
+   return setmetatable( {x=x, y=y}, Vector_mt)
+end
+ 
+function Vector:mag()
+   return math.sqrt(self:dot(self))
+ end
+ 
+function Vector:dot(v)
+   return self.x * v.x + self.y * v.y
+end
+ 
+v1 = Vector:new(3,4)
+print( "--------" )
+for a,b in pairs(v1) do
+	print( a, b )
+end
+print( "----" )
+
+v2 = Vector:new(2,1)
+print( v2:dot(v1) )
+
+print( Vector )
+
+print( "---------" )
+for a,b in pairs(Vector) do
+	print( a, b )
+end
+print( "----" )
+
+print( v1, v2 )
+
+print( Vector_mt, getmetatable(v1), getmetatable(v2) )
+
+print( "---------" )
+for a,b in pairs(Vector_mt) do
+	print( a, b )
+end
+print( "----" )
+