view src/luan/interp/SetStmt.java @ 154:c2e5101682ae

Expr extends Expressions git-svn-id: https://luan-java.googlecode.com/svn/trunk@155 21e917c8-12df-6dd8-5cb6-c86387c605b9
author fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
date Tue, 17 Jun 2014 09:55:43 +0000
parents 2428ecfed375
children
line wrap: on
line source

package luan.interp;

import luan.Luan;
import luan.LuanException;


final class SetStmt implements Stmt {
	private final Settable[] vars;
	private final Expressions expressions;

	SetStmt(Settable var,Expr expr) {
		this( new Settable[]{var}, expr );
	}

	SetStmt(Settable[] vars,Expressions expressions) {
		this.vars = vars;
		this.expressions = expressions;
	}

	@Override public void eval(LuanStateImpl luan) throws LuanException {
		final Object obj = expressions.eval(luan);
		if( obj instanceof Object[] ) {
			Object[] vals = (Object[])obj;
			for( int i=0; i<vars.length; i++ ) {
				Object val = i < vals.length ? vals[i] : null;
				vars[i].set(luan,val);
			}
		} else {
			vars[0].set(luan,obj);
			for( int i=1; i<vars.length; i++ ) {
				vars[i].set(luan,null);
			}
		}
	}

}