(refs #6923) Explicit export annotation for SCL modules

[simantics/platform.git] / bundles / org.simantics.scl.compiler / src / org / simantics / scl / compiler / elaboration / expressions / annotations / AnnotationUtils.java

diff --git a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/expressions/annotations/AnnotationUtils.java b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/expressions/annotations/AnnotationUtils.java
index 8cc088b955b8ded475ba86d150551f5a5f2ec44c..08ea47297b7363bd8974c24154aa767b8e4d076b 100644 (file)
--- a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/expressions/annotations/AnnotationUtils.java
+++ b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/elaboration/expressions/annotations/AnnotationUtils.java
@@ -1,6 +1,11 @@
 package org.simantics.scl.compiler.elaboration.expressions.annotations;
 
+import java.util.Arrays;
+import java.util.Collections;
+import java.util.List;
+
 import org.simantics.scl.compiler.constants.StringConstant;
+import org.simantics.scl.compiler.elaboration.expressions.EListLiteral;
 import org.simantics.scl.compiler.elaboration.expressions.ELiteral;
 import org.simantics.scl.compiler.elaboration.expressions.EStringLiteral;
 import org.simantics.scl.compiler.elaboration.expressions.EVar;
@@ -46,4 +51,21 @@ public class AnnotationUtils {
         }
         return null;
     }
+    
+    public static List<EVar> extractIdentifierList(Expression expression) {
+        if(expression instanceof EVar || expression instanceof EStringLiteral || expression instanceof ELiteral)
+            return Collections.singletonList(new EVar(expression.location, extractString(expression)));
+        else if(expression instanceof EListLiteral) {
+            Expression[] components = ((EListLiteral)expression).getComponents();
+            EVar[] items = new EVar[components.length];
+            for(int i=0;i<components.length;++i) {
+                String value = extractString(components[i]);
+                if(value == null)
+                    return null;
+                items[i] = new EVar(components[i].location, value);
+            }
+            return Arrays.asList(items);
+        }
+        return null;
+    }
 }