package luan.impl;

import luan.LuanException;
import luan.LuanTable;
import luan.Luan;
import luan.LuanFunction;
import luan.LuanMeta;
import luan.modules.JavaLuan;


final class SetTableEntry extends CodeImpl implements Settable {
	private final Expr tableExpr;
	private final Expr keyExpr;

	SetTableEntry(Expr tableExpr,Expr keyExpr) {
		this.tableExpr = tableExpr;
		this.keyExpr = keyExpr;
	}

	@Override public void set(LuanStateImpl luan,Object value) throws LuanException {
		newIndex( luan, tableExpr.eval(luan), keyExpr.eval(luan), value );
	}

	private void newIndex(LuanStateImpl luan,Object t,Object key,Object value) throws LuanException {
		if( t instanceof LuanTable ) {
			LuanTable tbl = (LuanTable)t;
			tbl.put(luan,key,value);
			return;
		}
		if( t != null && luan.hasJava() )
			JavaLuan.__new_index(luan,t,key,value);
		else
			throw new LuanException(luan, "attempt to index a " + Luan.type(t) + " value" );
	}

}