]> gerrit.simantics Code Review - simantics/platform.git/blob
c531b854745540fb0f87930b2a25706820a9a6d0
[simantics/platform.git] /
1 package org.simantics.scl.compiler.elaboration.expressions;
2
3 import java.util.ArrayList;
4
5 import org.simantics.scl.compiler.common.exceptions.InternalCompilerError;
6 import org.simantics.scl.compiler.compilation.CompilationContext;
7 import org.simantics.scl.compiler.elaboration.contexts.SimplificationContext;
8 import org.simantics.scl.compiler.elaboration.contexts.TranslationContext;
9 import org.simantics.scl.compiler.elaboration.contexts.TypingContext;
10 import org.simantics.scl.compiler.elaboration.errors.NotPatternException;
11 import org.simantics.scl.compiler.elaboration.expressions.lhstype.LhsType;
12 import org.simantics.scl.compiler.errors.Locations;
13 import org.simantics.scl.compiler.internal.codegen.references.IVal;
14 import org.simantics.scl.compiler.internal.codegen.writer.CodeWriter;
15 import org.simantics.scl.compiler.types.Type;
16 import org.simantics.scl.compiler.types.exceptions.MatchException;
17
18 import gnu.trove.map.hash.TObjectIntHashMap;
19 import gnu.trove.set.hash.TIntHashSet;
20
21 public abstract class DecoratingExpression extends SimplifiableExpression {
22     public Expression expression;
23     
24     public DecoratingExpression(long loc, Expression expression) {
25         super(loc);
26         this.expression = expression;
27     }
28     
29     @Override
30     public void collectVars(TObjectIntHashMap<Variable> allVars,
31             TIntHashSet vars) {
32         expression.collectVars(allVars, vars);
33     }
34
35     @Override
36     protected void updateType() throws MatchException {
37         setType(expression.getType());        
38     }
39     
40     @Override
41     public Expression simplify(SimplificationContext context) {
42         expression = expression.simplify(context);
43         return this;
44     }
45
46     @Override
47     public Expression resolve(TranslationContext context) {
48         expression = expression.resolve(context);
49         return this;
50     }
51     
52     @Override
53     public Expression resolveAsPattern(TranslationContext context) {
54         expression = expression.resolveAsPattern(context);
55         return this;
56     }
57     
58     @Override
59     public EVar getPatternHead() throws NotPatternException {
60         return expression.getPatternHead();
61     }
62     
63     @Override
64     public LhsType getLhsType() throws NotPatternException {
65         return expression.getLhsType();
66     }
67     
68     @Override
69     public void getParameters(TranslationContext translationContext,
70             ArrayList<Expression> parameters) {
71         expression.getParameters(translationContext, parameters);
72     }
73
74     @Override
75     public int getFunctionDefinitionPatternArity() throws NotPatternException {
76         return expression.getFunctionDefinitionPatternArity();
77     }
78     
79     @Override
80     public void setLocationDeep(long loc) {
81         if(location == Locations.NO_LOCATION) {
82             location = loc;
83             expression.setLocationDeep(loc);
84         }
85     }
86
87     @Override
88     public IVal toVal(CompilationContext context, CodeWriter w) {
89         throw new InternalCompilerError("Cannot generate code for " + getClass().getSimpleName() + ".");
90     }
91     
92     @Override
93     public Expression inferType(TypingContext context) {
94         expression = expression.inferType(context);
95         return this;
96     }
97     
98     @Override
99     public Expression checkBasicType(TypingContext context, Type requiredType) {
100         expression = expression.checkBasicType(context, requiredType);
101         return this;
102     }
103     
104     @Override
105     public Expression checkIgnoredType(TypingContext context) {
106         expression = expression.checkIgnoredType(context);
107         return this;
108     }
109     
110     @Override
111     public int getSyntacticFunctionArity() {
112         return expression.getSyntacticFunctionArity();
113     }
114 }