X-Git-Url: https://gerrit.simantics.org/r/gitweb?p=simantics%2Fplatform.git;a=blobdiff_plain;f=bundles%2Forg.simantics.scl.compiler%2Fsrc%2Forg%2Fsimantics%2Fscl%2Fcompiler%2Felaboration%2Fchr%2FCHRRule.java;h=f714497c4212c76c1ccef6e217a06c40f2d71a39;hp=b30021c1c514b1e9f7542973f8ec25c96560bfdc;hb=f5c5f79bf2a62515c8c81103a4c8932fc0dcf79d;hpb=fad36d463b75c3a9944d875fc627c3533f6da74d diff --git a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/chr/CHRRule.java b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/chr/CHRRule.java index b30021c1c..f714497c4 100644 --- a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/chr/CHRRule.java +++ b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/chr/CHRRule.java @@ -2,7 +2,6 @@ package org.simantics.scl.compiler.elaboration.chr; import java.util.ArrayList; -import org.junit.runners.ParentRunner; import org.simantics.scl.compiler.compilation.CompilationContext; import org.simantics.scl.compiler.elaboration.chr.plan.CHRSearchPlan; import org.simantics.scl.compiler.elaboration.chr.planning.QueryPlanningContext; @@ -24,6 +23,7 @@ import gnu.trove.set.hash.THashSet; import gnu.trove.set.hash.TIntHashSet; public class CHRRule extends Symbol { + public CHRRuleset parentRuleset; public int priority; public CHRQuery head; public CHRQuery body; @@ -49,6 +49,7 @@ public class CHRRule extends Symbol { public void resolve(TranslationContext context) { context.pushExistentialFrame(); head.resolve(context); + context.disallowNewExistentials(); body.resolve(context); existentialVariables = context.popExistentialFrame(); } @@ -94,7 +95,7 @@ public class CHRRule extends Symbol { } public void compile(CompilationContext compilationContext, CHRConstraint initConstraint) { - boolean hasActiveLiteral = false; + boolean hasLocalActiveLiteral = false; for(int i=0;i