X-Git-Url: https://gerrit.simantics.org/r/gitweb?p=simantics%2Fplatform.git;a=blobdiff_plain;f=bundles%2Forg.simantics.scl.compiler%2Fsrc%2Forg%2Fsimantics%2Fscl%2Fcompiler%2Felaboration%2Fexpressions%2Faccessor%2FFieldAccessor.java;h=21c892ce4697ce2d6e94947b9e83bbd16462e701;hp=a6eeb3f55d0db6573011a10d8000185af8427710;hb=a9f88c57e622d9ecf2732bd0278e0989dc0dfd5a;hpb=eecd74faded034bd067094b42bbac0d286d8d9fa

diff --git a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/expressions/accessor/FieldAccessor.java b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/expressions/accessor/FieldAccessor.java
index a6eeb3f55..21c892ce4 100644
--- a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/expressions/accessor/FieldAccessor.java
+++ b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/expressions/accessor/FieldAccessor.java
@@ -1,53 +1,46 @@
-package org.simantics.scl.compiler.elaboration.expressions.accessor;
-
-import org.simantics.scl.compiler.elaboration.contexts.SimplificationContext;
-import org.simantics.scl.compiler.elaboration.contexts.TranslationContext;
-import org.simantics.scl.compiler.elaboration.contexts.TypingContext;
-import org.simantics.scl.compiler.elaboration.expressions.Expression;
-import org.simantics.scl.compiler.elaboration.expressions.Variable;
-import org.simantics.scl.compiler.elaboration.expressions.VariableProcedure;
-import org.simantics.scl.compiler.internal.elaboration.utils.ExpressionDecorator;
-import org.simantics.scl.compiler.internal.parsing.Symbol;
-
-import gnu.trove.map.hash.TObjectIntHashMap;
-import gnu.trove.set.hash.THashSet;
-import gnu.trove.set.hash.TIntHashSet;
-
-public abstract class FieldAccessor extends Symbol {
-    public char accessSeparator;
-
-    public void collectRefs(TObjectIntHashMap<Object> allRefs,
-            TIntHashSet refs) {
-    }
-
-    public void collectVars(TObjectIntHashMap<Variable> allVars,
-            TIntHashSet vars) {
-    }
-
-    public void collectFreeVariables(THashSet<Variable> vars) {
-    }
-
-    public void simplify(SimplificationContext context) {
-    }
-
-    public void resolve(TranslationContext context) {
-    }
-
-    public void decorate(ExpressionDecorator decorator) {
-    }
-
-    public void checkType(TypingContext context) {        
-    }
-
-    public abstract Expression asExpression();
-
-    public boolean isVariableId() {
-        return false;
-    }
-
-    public abstract void setLocationDeep(long loc);
-
-    public abstract void accept(FieldAccessorVisitor visitor);
-
-    public abstract void forVariables(VariableProcedure procedure);
-}
+package org.simantics.scl.compiler.elaboration.expressions.accessor;
+
+import org.simantics.scl.compiler.elaboration.contexts.SimplificationContext;
+import org.simantics.scl.compiler.elaboration.contexts.TranslationContext;
+import org.simantics.scl.compiler.elaboration.contexts.TypingContext;
+import org.simantics.scl.compiler.elaboration.expressions.Expression;
+import org.simantics.scl.compiler.elaboration.expressions.Variable;
+import org.simantics.scl.compiler.internal.parsing.Symbol;
+
+import gnu.trove.map.hash.TObjectIntHashMap;
+import gnu.trove.set.hash.THashSet;
+import gnu.trove.set.hash.TIntHashSet;
+
+public abstract class FieldAccessor extends Symbol {
+    public char accessSeparator;
+    
+    public FieldAccessor(char accessSeparator) {
+        this.accessSeparator = accessSeparator;
+    }
+
+    public void collectVars(TObjectIntHashMap<Variable> allVars,
+            TIntHashSet vars) {
+    }
+
+    public void collectFreeVariables(THashSet<Variable> vars) {
+    }
+
+    public void simplify(SimplificationContext context) {
+    }
+
+    public void resolve(TranslationContext context) {
+    }
+
+    public void checkType(TypingContext context) {        
+    }
+
+    public abstract Expression asExpression();
+
+    public boolean isVariableId() {
+        return false;
+    }
+
+    public abstract void setLocationDeep(long loc);
+
+    public abstract void accept(FieldAccessorVisitor visitor);
+}