Mercurial Hosting > luan
view core/src/luan/impl/UnmExpr.java @ 383:4118eb51c816 0.4
minor
author | Franklin Schmidt <fschmidt@gmail.com> |
---|---|
date | Wed, 22 Apr 2015 20:46:59 -0600 |
parents | 3dcb0f9bee82 |
children | d55e873e1f0d |
line wrap: on
line source
package luan.impl; import luan.Luan; import luan.LuanFunction; import luan.LuanException; import luan.LuanSource; import luan.LuanBit; // unary minus final class UnmExpr extends UnaryOpExpr { UnmExpr(LuanSource.Element se,Expr op) { super(se,op); } @Override public Object eval(LuanStateImpl luan) throws LuanException { Object o = op.eval(luan); Number n = Luan.toNumber(o); if( n != null ) return -n.doubleValue(); LuanBit bit = luan.bit(se); LuanFunction fn = bit.getHandlerFunction("__unm",o); if( fn != null ) { return Luan.first(bit.call(fn,"__unm",new Object[]{o})); } throw bit.exception("attempt to perform arithmetic on a "+Luan.type(o)+" value"); } }