1 package org.simantics.scl.compiler.elaboration.expressions.block;
3 import org.simantics.scl.compiler.elaboration.chr.ast.CHRAstQuery;
4 import org.simantics.scl.compiler.elaboration.contexts.EnvironmentalContext;
5 import org.simantics.scl.compiler.elaboration.contexts.TranslationContext;
6 import org.simantics.scl.compiler.elaboration.expressions.Expression;
7 import org.simantics.scl.compiler.errors.Locations;
9 public class CHRStatement extends Statement {
11 public CHRAstQuery head;
12 public CHRAstQuery body;
14 public CHRStatement(CHRAstQuery head, CHRAstQuery body) {
20 public Expression toExpression(EnvironmentalContext context, boolean monadic, Expression in) {
21 throw new UnsupportedOperationException();
25 public void setLocationDeep(long loc) {
26 if(location == Locations.NO_LOCATION)
31 public void resolvePattern(TranslationContext context) {
32 throw new UnsupportedOperationException();
36 public boolean mayBeRecursive() {
41 public void accept(StatementVisitor visitor) {
46 public StatementGroup getStatementGroup() {
47 return StatementGroup.CHR;