関数内ラベル実装と引数なし関数を正常に呼べるようにした

SMILEBASIC/node.d

@@ -36,6 +36,9 @@ enum NodeType
     DefineFunction,
     While,
     Inc,
+    Data,
+    Read,
+    Restore,
 }
 abstract class Node
 {
@@ -432,3 +435,16 @@ class Inc : Statement
         this.expression = expr;
     }
 }
+class Data : Statement
+{
+    Value[] data;
+    this()
+    {
+        this.type = NodeType.Data;
+        this.data = new Value[0];
+    }
+    void addData(Value v)
+    {
+        data ~= v;
+    }
+}