Mercurial Hosting > luan
diff src/luan/interp/EqExpr.java @ 35:e51906de0f11
implement metatables
git-svn-id: https://luan-java.googlecode.com/svn/trunk@36 21e917c8-12df-6dd8-5cb6-c86387c605b9
author | fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> |
---|---|
date | Tue, 18 Dec 2012 07:05:58 +0000 |
parents | 5cf15507d77e |
children | 8a57ebfdfd78 |
line wrap: on
line diff
--- a/src/luan/interp/EqExpr.java Sun Dec 16 09:23:56 2012 +0000 +++ b/src/luan/interp/EqExpr.java Tue Dec 18 07:05:58 2012 +0000 @@ -2,6 +2,8 @@ import luan.Lua; import luan.LuaNumber; +import luan.LuaFunction; +import luan.LuaTable; import luan.LuaException; @@ -12,8 +14,20 @@ } @Override public Object eval(LuaStateImpl lua) throws LuaException { - Object v1 = op1.eval(lua); - Object v2 = op2.eval(lua); - return v1 == v2 || v1 != null && v1.equals(v2); + Object o1 = op1.eval(lua); + Object o2 = op2.eval(lua); + if( o1 == o2 || o1 != null && o1.equals(o2) ) + return true; + if( !o1.getClass().equals(o2.getClass()) ) + return false; + LuaTable mt1 = Lua.getMetatable(o1); + LuaTable mt2 = Lua.getMetatable(o2); + if( mt1==null || mt2==null ) + return false; + Object f = mt1.get("__eq"); + if( f == null || !f.equals(mt2.get("__eq")) ) + return null; + LuaFunction fn = Lua.checkFunction(f); + return Lua.toBoolean( Utils.first(fn.call(lua,o1,o2)) ); } }