初期値を指定しないVARを使うとエラーが出た問題を修正

SMILEBASIC/compiler.d

@@ -656,8 +656,11 @@ class Compiler
             {
                 DefineVariable var = cast(DefineVariable)v;
                 defineVarIndex(var.name, sc);
-                compileExpression(var.expression, sc);
+                if (var.expression)
-                genCodePopVar(var.name, sc);
+                {
+                    compileExpression(var.expression, sc);
+                    genCodePopVar(var.name, sc);
+                }
                 continue;
             }
             if(v.type == NodeType.DefineArray)