Update of /cvsroot/bprocessor/bscript/src/net/sourceforge/bprocessor/model/evaluator
In directory sc8-pr-cvs3.sourceforge.net:/tmp/cvs-serv21194/src/net/sourceforge/bprocessor/model/evaluator
Modified Files:
Primitive.java Call.java
Log Message:
List access implemented in bscript
Index: Primitive.java
===================================================================
RCS file: /cvsroot/bprocessor/bscript/src/net/sourceforge/bprocessor/model/evaluator/Primitive.java,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** Primitive.java 17 Sep 2006 17:29:21 -0000 1.4
--- Primitive.java 29 Sep 2006 07:13:16 -0000 1.5
***************
*** 8,11 ****
--- 8,12 ----
package net.sourceforge.bprocessor.model.evaluator;
+ import java.util.List;
import java.util.Stack;
***************
*** 30,33 ****
--- 31,36 ----
/** gt */
public static final int GT = 8;
+ /** get */
+ public static final int GET = 9;
/** opcode */
***************
*** 97,100 ****
--- 100,109 ----
break;
}
+ case GET: {
+ Double op1 = (Double) stack.pop();
+ List op2 = (List) stack.pop();
+ stack.push(op2.get(op1.intValue()));
+ break;
+ }
}
return 1;
Index: Call.java
===================================================================
RCS file: /cvsroot/bprocessor/bscript/src/net/sourceforge/bprocessor/model/evaluator/Call.java,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** Call.java 19 Sep 2006 19:22:42 -0000 1.6
--- Call.java 29 Sep 2006 07:13:16 -0000 1.7
***************
*** 59,62 ****
--- 59,63 ----
locals.put(name, value);
}
+ locals.put("args", arguments);
}
Environment activation = new Environment(env.origin(), locals, arguments);
|
