1 package org.simantics.scl.compiler.module;
3 import java.util.Collection;
4 import java.util.Collections;
5 import java.util.HashMap;
9 import org.simantics.scl.compiler.constants.Constant;
10 import org.simantics.scl.compiler.elaboration.chr.CHRRuleset;
11 import org.simantics.scl.compiler.elaboration.modules.Documentation;
12 import org.simantics.scl.compiler.elaboration.modules.SCLValue;
13 import org.simantics.scl.compiler.elaboration.modules.TypeClass;
14 import org.simantics.scl.compiler.elaboration.modules.TypeClassInstance;
15 import org.simantics.scl.compiler.elaboration.modules.TypeDescriptor;
16 import org.simantics.scl.compiler.elaboration.relations.SCLEntityType;
17 import org.simantics.scl.compiler.elaboration.relations.SCLRelation;
18 import org.simantics.scl.compiler.elaboration.rules.MappingRelation;
19 import org.simantics.scl.compiler.elaboration.rules.TransformationRule;
20 import org.simantics.scl.compiler.errors.CompilationError;
21 import org.simantics.scl.compiler.internal.codegen.effects.EffectConstructor;
22 import org.simantics.scl.compiler.top.ModuleInitializer;
23 import org.simantics.scl.compiler.types.TCon;
24 import org.simantics.scl.runtime.profiling.BranchPoint;
26 import gnu.trove.map.hash.THashMap;
28 public abstract class LazyModule implements Module {
30 private final String moduleName;
31 private final Map<String, SCLValue> values = Collections.synchronizedMap(new HashMap<String, SCLValue>());
32 private final Map<String, SCLRelation> relations = Collections.synchronizedMap(new HashMap<String, SCLRelation>());
33 private final Map<String, SCLEntityType> entityTypes = Collections.synchronizedMap(new HashMap<String, SCLEntityType>());
35 protected abstract SCLValue createValue(String name);
37 protected SCLRelation createRelation(String name) {
41 protected SCLEntityType createEntityType(String name) {
46 public MappingRelation getMappingRelation(String name) {
51 public TransformationRule getRule(String name) {
55 public LazyModule(String moduleName) {
56 this.moduleName = moduleName;
60 public String getName() {
64 public void findValuesForPrefix(final Collection<SCLValue> values, final String prefix) {
68 public SCLValue getValue(String name) {
69 if(values.containsKey(name))
70 return values.get(name);
72 SCLValue value = createValue(name);
73 values.put(name, value);
79 public List<Constant> getFieldAccessors(String name) {
83 public SCLRelation getRelation(String name) {
84 if(relations.containsKey(name))
85 return relations.get(name);
87 SCLRelation relation = createRelation(name);
88 relations.put(name, relation);
93 public SCLEntityType getEntityType(String name) {
94 if(entityTypes.containsKey(name))
95 return entityTypes.get(name);
97 SCLEntityType entityType = createEntityType(name);
98 entityTypes.put(name, entityType);
104 public TypeClass getTypeClass(String name) {
109 public Collection<TypeClassInstance> getInstances(TCon typeClass) {
110 return Collections.emptyList();
114 public TypeDescriptor getTypeDescriptor(String name) {
119 public Documentation getDocumentation() {
124 public byte[] getClass(String name) {
129 public ModuleInitializer getModuleInitializer() {
134 public EffectConstructor getEffectConstructor(String name) {
139 public Collection<TransformationRule> getRules() {
140 return Collections.emptyList();
144 public THashMap<String, BranchPoint[]> getBranchPoints() {
149 public CompilationError[] getWarnings() {
150 return CompilationError.EMPTY_ARRAY;
154 public CHRRuleset getRuleset(String name) {
159 public String getDeprecation() {