Fix RESTORE...?

2016-12-06 18:47:02 +09:00
parent b2b9779eea
commit 55fc5c169b
2 changed files with 25 additions and 1 deletions
--- a/SMILEBASIC/VM.d
+++ b/SMILEBASIC/VM.d
@@ -1665,6 +1665,22 @@ class RestoreCode : Code
        return "restore " ~ label.to!string;
    }
 }
+class RestoreUndefinedLabelCode : Code
+{
+    wstring label;
+    this(wstring label)
+    {
+        this.label = label;
+    }
+    override void execute(VM vm)
+    {
+        throw new UndefinedLabel();
+    }
+    override string toString(VM vm)
+    {
+        return "restoreundeflabel " ~ label.to!string;
+    }
+}
 class RestoreExprCode : Code
 {
    DataTable datatable;