From f181f50e9179cf8b8af1f75ba6a4bd03b491a726 Mon Sep 17 00:00:00 2001
From: otya128 <otya128@users.noreply.github.com>
Date: Sun, 4 Dec 2016 13:53:11 +0900
Subject: [PATCH] support Local GotoExpr

---
 SMILEBASIC/VM.d | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/SMILEBASIC/VM.d b/SMILEBASIC/VM.d
index 0fb55a4..b475c45 100644
--- a/SMILEBASIC/VM.d
+++ b/SMILEBASIC/VM.d
@@ -838,8 +838,13 @@ class GotoExpr : Code
     {
         Value label;
         vm.pop(label);
-        if(!label.isString)
+        if(label.isString)
         {
+            if (sc && sc.func)
+            {
+                vm.pc = sc.func.label[label.castString] - 1;
+                return;
+            }
             vm.pc = vm.currentSlot.globalLabel[label.castString] - 1;
         }
         else