1 package org.simantics.scl.compiler.elaboration.expressions.accessor;
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;
10 public class ExpressionAccessor extends FieldAccessor {
11 public Expression fieldName;
13 public ExpressionAccessor(char accessSeparator, Expression fieldName) {
14 super(accessSeparator);
15 this.fieldName = fieldName;
19 public void resolve(TranslationContext context) {
20 fieldName = fieldName.resolve(context);
24 public void simplify(SimplificationContext context) {
25 fieldName = fieldName.simplify(context);
29 public void checkType(TypingContext context) {
30 fieldName = fieldName.checkType(context, Types.STRING);
34 public Expression asExpression() {
39 public void setLocationDeep(long loc) {
40 if(location == Locations.NO_LOCATION) {
42 fieldName.setLocationDeep(loc);
47 public void accept(FieldAccessorVisitor visitor) {