1 package org.simantics.scl.compiler.internal.parsing.types;
3 import java.util.ArrayList;
5 import org.simantics.scl.compiler.elaboration.contexts.TypeTranslationContext;
6 import org.simantics.scl.compiler.internal.types.TypeElaborationContext;
7 import org.simantics.scl.compiler.types.Type;
8 import org.simantics.scl.compiler.types.kinds.Kind;
10 import gnu.trove.map.hash.TObjectIntHashMap;
11 import gnu.trove.set.hash.TIntHashSet;
15 public class TPlainEffectAst extends TypeAst {
16 public final TypeAst[] effects;
18 public TPlainEffectAst(TypeAst[] effects) {
19 this.effects = effects;
22 public TPlainEffectAst(ArrayList<TypeAst> effects) {
23 this(effects.toArray(new TypeAst[effects.size()]));
27 public void toString(StringBuilder b) {
30 for(TypeAst effect : effects) {
41 public Type toType(TypeTranslationContext context, Kind expectedKind) {
42 return TFunctionAst.toEffect(context, effects);
46 public Type toType(TypeElaborationContext context) {
47 return TFunctionAst.toEffect(context, effects);
51 public int getPrecedence() {
56 public void collectReferences(TObjectIntHashMap<String> typeNameMap,
58 for(TypeAst effect : effects)
59 effect.collectReferences(typeNameMap, set);