Compilation of SCL expressions from SCL

[simantics/platform.git] / bundles / org.simantics.scl.compiler / src / org / simantics / scl / compiler / environment / specification / EnvironmentSpecification.java

diff --git a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/environment/specification/EnvironmentSpecification.java b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/environment/specification/EnvironmentSpecification.java
index c6dc8db4ec7d418af344f5107e9afde4a26c7ae8..d247685f5d7b56acdc20c7107ce2441bc89294c4 100644 (file)
--- a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/environment/specification/EnvironmentSpecification.java
+++ b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/environment/specification/EnvironmentSpecification.java
@@ -1,8 +1,10 @@
 package org.simantics.scl.compiler.environment.specification;
 
 import java.util.ArrayList;
+import java.util.List;
 
 import org.simantics.scl.compiler.module.ImportDeclaration;
+import org.simantics.scl.runtime.tuple.Tuple2;
 
 public class EnvironmentSpecification {
     public final ArrayList<ImportDeclaration> imports = new ArrayList<ImportDeclaration>();
@@ -19,6 +21,13 @@ public class EnvironmentSpecification {
             spec.importModule(strings[i], strings[i+1]);
         return spec;
     }
+    
+    public static EnvironmentSpecification fromList(List<Tuple2> imports) {
+        EnvironmentSpecification spec = new EnvironmentSpecification();
+        for(Tuple2 tuple : imports)
+            spec.importModule((String)tuple.c0, (String)tuple.c1);
+        return spec;
+    }
 
     @Override
     public int hashCode() {