view core/src/luan/impl/ConcatExpr.java @ 572:f1601a4ce1aa

fix stack when calling meta-methods
author Franklin Schmidt <fschmidt@gmail.com>
date Sun, 12 Jul 2015 21:34:23 -0600
parents e3b0846dc2ef
children 4723d22062ce
line wrap: on
line source

package luan.impl;

import luan.Luan;
import luan.LuanFunction;
import luan.LuanException;
import luan.LuanElement;
import luan.LuanBit;


final class ConcatExpr extends BinaryOpExpr {

	ConcatExpr(LuanElement el,Expr op1,Expr op2) {
		super(el,op1,op2);
	}

	@Override public Object eval(LuanStateImpl luan) throws LuanException {
		Object o1 = op1.eval(luan);
		Object o2 = op2.eval(luan);
		LuanBit bit = luan.bit(el);
		LuanFunction fn = bit.getBinHandler("__concat",o1,o2);
		if( fn != null )
			return Luan.first(bit.call(fn,"__concat",new Object[]{o1,o2}));
		String s1 = luan.bit(op1.el()).toString(o1);
		String s2 = luan.bit(op2.el()).toString(o2);
		return s1 + s2;
	}
}