X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=bundles%2Forg.simantics.scl.compiler%2Fsrc%2Forg%2Fsimantics%2Fscl%2Fcompiler%2Felaboration%2Fchr%2Fplan%2FIterateRelationOp.java;h=d4b21ad40848a10d27b6e51e002dec03373d9a15;hb=78f577368ba4c71ad6fb3d9f16c03c634585cf7b;hp=b26598927b9a9a2409e9ae5522822afba1948917;hpb=0ae2b770234dfc3cbb18bd38f324125cf0faca07;p=simantics%2Fplatform.git

diff --git a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/chr/plan/IterateRelationOp.java b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/chr/plan/IterateRelationOp.java
index b26598927..d4b21ad40 100644
--- a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/chr/plan/IterateRelationOp.java
+++ b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/chr/plan/IterateRelationOp.java
@@ -11,14 +11,16 @@ public class IterateRelationOp extends PlanOp {
     public SCLRelation relation;
     public Variable[] variables;
     public Expression[] expressions;
+    public Expression[] typeConstraintEvidenceParameters;
     public int boundMask;
     
     public IterateRelationOp(long location, SCLRelation relation, Variable[] variables, Expression[] expressions,
-            int boundMask) {
+            Expression[] typeConstraintEvidenceParameters, int boundMask) {
         super(location);
         this.relation = relation;
         this.variables = variables;
         this.expressions = expressions;
+        this.typeConstraintEvidenceParameters = typeConstraintEvidenceParameters;
         this.boundMask = boundMask;
         
     }
@@ -37,6 +39,6 @@ public class IterateRelationOp extends PlanOp {
 
     @Override
     public void generateCode(CompilationContext context, PlanContext planContext, CodeWriter w) {
-        relation.generateIterate(planContext, w, location, boundMask, variables, expressions);
+        relation.generateIterate(planContext, w, location, boundMask, variables, expressions, typeConstraintEvidenceParameters);
     }   
 }