gerrit.simantics Code Review - simantics/platform.git/blob

   1 package org.simantics.scl.compiler.elaboration.chr.relations;
   2
   3 import org.simantics.scl.compiler.elaboration.chr.CHRRelation;
   4 import org.simantics.scl.compiler.elaboration.relations.SCLRelation;
   5 import org.simantics.scl.compiler.types.TPred;
   6 import org.simantics.scl.compiler.types.TVar;
   7 import org.simantics.scl.compiler.types.Type;
   8
   9 public class ExternalCHRRelation implements CHRRelation {
  10     public final SCLRelation relation;
  11
  12     public ExternalCHRRelation(SCLRelation relation) {
  13         this.relation = relation;
  14     }
  15
  16     @Override
  17     public TVar[] getTypeVariables() {
  18         return relation.getTypeVariables();
  19     }
  20
  21     @Override
  22     public Type[] getParameterTypes() {
  23         return relation.getParameterTypes();
  24     }
  25
  26     @Override
  27     public TPred[] getTypeConstraints() {
  28         return relation.getTypeConstraints();
  29     }
  30
  31     @Override
  32     public String toString() {
  33         return relation.toString();
  34     }
  35
  36     @Override
  37     public String[] getFieldNames() {
  38         return relation.getFieldNames();
  39     }
  40 }