Migrated source code from Simantics SVN

[simantics/platform.git] / bundles / org.simantics.scl.compiler / src / org / simantics / scl / compiler / internal / parsing / declarations / DValueTypeAst.java

diff --git a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/internal/parsing/declarations/DValueTypeAst.java b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/internal/parsing/declarations/DValueTypeAst.java
new file mode 100644 (file)
index 0000000..b13cf81
--- /dev/null
+++ b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/internal/parsing/declarations/DValueTypeAst.java
@@ -0,0 +1,26 @@
+package org.simantics.scl.compiler.internal.parsing.declarations;\r
+\r
+import org.simantics.scl.compiler.elaboration.expressions.EVar;\r
+import org.simantics.scl.compiler.internal.parsing.types.TypeAst;\r
+\r
+public class DValueTypeAst extends DeclarationAst {\r
+    public final EVar[] names;\r
+    public final TypeAst type;\r
+    \r
+    public DValueTypeAst(EVar[] names, TypeAst type) {\r
+        this.names = names;\r
+        this.type = type;\r
+    }\r
+    \r
+    @Override\r
+    public void toString(int indentation, StringBuilder b) {\r
+        for(int i=0;i<indentation;++i) b.append("    ");\r
+        for(int i=0;i<names.length;++i) {\r
+            if(i > 0)\r
+                b.append(", ");\r
+            b.append(names[i]);\r
+        }\r
+        b.append(" :: ");\r
+        type.toString(b);\r
+    }\r
+}\r