Mercurial Hosting > luan
view src/luan/interp/NumericForStmt.java @ 31:5cf15507d77e
separate interpreter from interface
git-svn-id: https://luan-java.googlecode.com/svn/trunk@32 21e917c8-12df-6dd8-5cb6-c86387c605b9
author | fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9> |
---|---|
date | Thu, 13 Dec 2012 02:50:04 +0000 |
parents | d85510d92eee |
children | c3eab5a3ce3c |
line wrap: on
line source
package luan.interp; import luan.Lua; import luan.LuaNumber; import luan.LuaException; final class NumericForStmt implements Stmt { private final int iVar; private final Expr fromExpr; private final Expr toExpr; private final Expr stepExpr; private final Stmt block; NumericForStmt(int iVar,Expr fromExpr,Expr toExpr,Expr stepExpr,Stmt block) { this.iVar = iVar; this.fromExpr = fromExpr; this.toExpr = toExpr; this.stepExpr = stepExpr; this.block = block; } @Override public void eval(LuaStateImpl lua) throws LuaException { double v = Lua.checkNumber( fromExpr.eval(lua) ).value(); double limit = Lua.checkNumber( toExpr.eval(lua) ).value(); double step = Lua.checkNumber( stepExpr.eval(lua) ).value(); Object[] stack = lua.stack(); try { while( step > 0.0 && v <= limit || step < 0.0 && v >= limit ) { stack[iVar] = new LuaNumber(v); block.eval(lua); v += step; } } catch(BreakException e) { } finally { stack[iVar] = null; } } }