Whileを植えた

SMILEBASIC/node.d

@@ -34,6 +34,7 @@ enum NodeType
     DefineArray,
     ArrayAssign,
     DefineFunction,
+    While,
 }
 abstract class Node
 {
@@ -408,3 +409,14 @@ class CallFunctionStatement : Statement
         outVariable ~= var;
     }
 }
+class While : Statement
+{
+    Expression condExpression;
+    Statements statements;
+    this(Expression condExpression, Statements statements)
+    {
+        this.type = NodeType.While;
+        this.condExpression = condExpression;
+        this.statements = statements;
+    }
+}

SMILEBASIC/token.d

@@ -54,6 +54,8 @@ enum TokenType
     RBracket,//]
     Def,
     Out,
+    While,
+    Wend,
 }
 
 struct Token