bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/expressions/accessor/ExpressionAccessor.java

   1 package org.simantics.scl.compiler.elaboration.expressions.accessor;
   2
   3 import org.simantics.scl.compiler.elaboration.contexts.SimplificationContext;
   4 import org.simantics.scl.compiler.elaboration.contexts.TranslationContext;
   5 import org.simantics.scl.compiler.elaboration.contexts.TypingContext;
   6 import org.simantics.scl.compiler.elaboration.expressions.Expression;
   7 import org.simantics.scl.compiler.errors.Locations;
   8 import org.simantics.scl.compiler.types.Types;
   9
  10 public class ExpressionAccessor extends FieldAccessor {
  11     public Expression fieldName;
  12
  13     public ExpressionAccessor(char accessSeparator, Expression fieldName) {
  14         super(accessSeparator);
  15         this.fieldName = fieldName;
  16     }
  17
  18     @Override
  19     public void resolve(TranslationContext context) {
  20         fieldName = fieldName.resolve(context);
  21     }
  22
  23     @Override
  24     public void simplify(SimplificationContext context) {
  25         fieldName = fieldName.simplify(context);
  26     }
  27
  28     @Override
  29     public void checkType(TypingContext context) {
  30         fieldName = fieldName.checkType(context, Types.STRING);
  31     }
  32
  33     @Override
  34     public Expression asExpression() {
  35         return fieldName;
  36     }
  37
  38     @Override
  39     public void setLocationDeep(long loc) {
  40         if(location == Locations.NO_LOCATION) {
  41             location = loc;
  42             fieldName.setLocationDeep(loc);
  43         }
  44     }
  45
  46     @Override
  47     public void accept(FieldAccessorVisitor visitor) {
  48         visitor.visit(this);
  49     }
  50 }