Mercurial Hosting > luan
view src/luan/interp/GenericForStmt.java @ 48:64ecb7a3aad7
rename Lua to Luan
git-svn-id: https://luan-java.googlecode.com/svn/trunk@49 21e917c8-12df-6dd8-5cb6-c86387c605b9
author | fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> |
---|---|
date | Fri, 28 Dec 2012 03:29:12 +0000 |
parents | e3624b7cd603 |
children | 8ede219cd111 |
line wrap: on
line source
package luan.interp; import luan.Luan; import luan.LuanException; import luan.LuanFunction; import luan.LuanSource; final class GenericForStmt extends CodeImpl implements Stmt { private final int iVars; private final int nVars; private final Expr iterExpr; private final Stmt block; GenericForStmt(LuanSource.Element se,int iVars,int nVars,Expr iterExpr,Stmt block) { super(se); this.iVars = iVars; this.nVars = nVars; this.iterExpr = iterExpr; this.block = block; } @Override public void eval(LuanStateImpl lua) throws LuanException { LuanFunction iter = lua.checkFunction( se, iterExpr.eval(lua) ); try { while(true) { Object[] vals = lua.call(iter,iterExpr.se(),iterExpr.se().text()); if( vals.length==0 || vals[0]==null ) break; for( int i=0; i<nVars; i++ ) { lua.stackSet( iVars+i, i < vals.length ? vals[i] : null ); } block.eval(lua); } } catch(BreakException e) { } finally { lua.stackClear(iVars,iVars+nVars); } } }