RelationDescriptor relation;
boolean inverse;
+ public Set getfunctions() {
+ HashSet functions=new HashSet();
+ Set exprfunctions=expr.getfunctions();
+ if (exprfunctions!=null)
+ functions.addAll(exprfunctions);
+ functions.add(new ConstraintDependence.Function(relation,expr.getSet(),inverse));
+
+ return functions;
+ }
+
+ public SetDescriptor getSet() {
+ if (inverse)
+ return relation.domain;
+ else
+ return relation.range;
+ }
+
public RelationExpr(Expr expr, RelationDescriptor relation, boolean inverse) {
this.expr = expr;
this.relation = relation;
this.inverse = inverse;
}
+ public Set freeVars() {
+ return expr.freeVars();
+ }
+
+ public String name() {
+ String name=expr.name()+".";
+ if (inverse)
+ name+="~";
+ name+=relation.toString();
+ return name;
+ }
+
+ public Expr getExpr() {
+ return expr;
+ }
+
+ public boolean equals(Map remap, Expr e) {
+ if (e==null||!(e instanceof RelationExpr))
+ return false;
+ RelationExpr re=(RelationExpr)e;
+ if (re.relation!=relation)
+ return false;
+ if (!expr.equals(remap,re.expr))
+ return false;
+ if (inverse!=re.inverse)
+ return false;
+ return true;
+ }
+
+ public boolean usesDescriptor(Descriptor rd) {
+ if (rd==relation)
+ return true;
+ else
+ return expr.usesDescriptor(rd);
+ }
+
+ public Set useDescriptor(Descriptor rd) {
+ HashSet newset=new HashSet();
+ if (rd==relation)
+ newset.add(this);
+ newset.addAll(expr.useDescriptor(rd));
+ return newset;
+ }
+
+ public RelationDescriptor getRelation() {
+ return relation;
+ }
+
+ public Descriptor getDescriptor() {
+ return relation;
+ }
+
+ public boolean inverted() {
+ return inverse;
+ }
+
+ public Set getInversedRelations() {
+ Set set = expr.getInversedRelations();
+ if (inverse) {
+ set.add(relation);
+ }
+ return set;
+ }
+
public Set getRequiredDescriptors() {
Set v = expr.getRequiredDescriptors();
v.add(relation);
public void generate(CodeWriter writer, VarDescriptor dest) {
VarDescriptor domain = VarDescriptor.makeNew("domain");
+ String strinverse = inverse ? "inv" : "";
+ String found = (VarDescriptor.makeNew("found")).getSafeSymbol();
expr.generate(writer, domain);
- writer.outputline(relation.getRange().getType().getSafeSymbol() + " " + dest.getSymbol() + " = " + relation.getSafeSymbol() + "_hash->get(" + domain.getSafeSymbol() + ");");
+ writer.outputline(relation.getRange().getType().getGenerateType().getSafeSymbol() + " " + dest.getSafeSymbol() + ";");
+ writer.outputline("int " + found + " = " + relation.getSafeSymbol() + "_hash" + strinverse + "->get(" + domain.getSafeSymbol() + ", " + dest.getSafeSymbol() + ");");
+ writer.outputline("if (!" + found + ") { maybe = 1; }");
}
- public void generate_set(CodeWriter writer, VarDescriptor dest) {
- VarDescriptor domain = VarDescriptor.makeNew("domain");
- expr.generate(writer, domain);
- writer.outputline(relation.getRange().getType().getSafeSymbol() + " " + dest.getSymbol() + " = " + relation.getSafeSymbol() + "_hash->get(" + domain.getSafeSymbol() + ");");
- }
+ // #TBD#: don't think this method is needed (or even called/referenced)
+ /*
+ public void generate_set(CodeWriter writer, VarDescriptor dest) {
+ VarDescriptor domain = VarDescriptor.makeNew("domain");
+ expr.generate(writer, domain);
+ writer.outputline(relation.getRange().getType().getGenerateType().getSafeSymbol() + " " + dest.getSafeSymbol() + " = " + relation.getSafeSymbol() + "_hash->get(" + domain.getSafeSymbol() + ");");
+ }
+ */
public void prettyPrint(PrettyPrinter pp) {
expr.prettyPrint(pp);
if (rangetype != type) {
sa.getErrorReporter().report(null, "Type of left side of relation operator '.' is '" + type.getSymbol() +
- "' but must be the '" + rangetype.getSymbol() +
+ "' but must be '" + rangetype.getSymbol() +
"', the type of the range of the relation '" + relation.getSymbol() + "'");
return null;
}
if (domaintype != type) {
sa.getErrorReporter().report(null, "Type of left side of relation operator '.' is '" + type.getSymbol() +
- "' but must be the '" + domaintype.getSymbol() +
- "', the type of the range of the relation '" + relation.getSymbol() + "'");
+ "' but must be '" + domaintype.getSymbol() +
+ "', the type of the domain of the relation '" + relation.getSymbol() + "'");
return null;
}