-package org.simantics.scl.compiler.elaboration.chr.plan;\r
-\r
-\r
-import org.simantics.scl.compiler.compilation.CompilationContext;\r
-import org.simantics.scl.compiler.elaboration.expressions.Expression;\r
-import org.simantics.scl.compiler.elaboration.expressions.Variable;\r
-import org.simantics.scl.compiler.internal.codegen.references.IVal;\r
-import org.simantics.scl.compiler.internal.codegen.writer.CodeWriter;\r
-\r
-public class IterateListOp extends PlanOp {\r
- public Variable variable;\r
- public Expression list;\r
- \r
- public IterateListOp(long location, Variable variable, Expression list) {\r
- super(location);\r
- this.variable = variable;\r
- this.list = list;\r
- } \r
- \r
- @Override\r
- public void toString(StringBuilder b) {\r
- b.append("ITERATE ").append(variable).append(" <- ").append(list);\r
- }\r
-\r
- @Override\r
- public void generateCode(CompilationContext context, PlanContext planContext, CodeWriter w) {\r
- IVal listValue = list.toVal(context.environment, w);\r
- planContext.iterateList(location, w, variable, listValue);\r
- }\r
-}\r
+package org.simantics.scl.compiler.elaboration.chr.plan;
+
+
+import org.simantics.scl.compiler.compilation.CompilationContext;
+import org.simantics.scl.compiler.elaboration.expressions.Expression;
+import org.simantics.scl.compiler.elaboration.expressions.Variable;
+import org.simantics.scl.compiler.internal.codegen.references.IVal;
+import org.simantics.scl.compiler.internal.codegen.writer.CodeWriter;
+
+public class IterateListOp extends PlanOp {
+ public Variable variable;
+ public Expression list;
+
+ public IterateListOp(long location, Variable variable, Expression list) {
+ super(location);
+ this.variable = variable;
+ this.list = list;
+ }
+
+ @Override
+ public void toString(StringBuilder b) {
+ b.append("ITERATE ").append(variable).append(" <- ").append(list);
+ }
+
+ @Override
+ public void generateCode(CompilationContext context, PlanContext planContext, CodeWriter w) {
+ IVal listValue = list.toVal(context, w);
+ planContext.iterateList(location, w, variable, listValue);
+ }
+}