From 2ac6efc1edd43c071ac93b9631f23380141b647f Mon Sep 17 00:00:00 2001
From: otya128 <otya128@users.noreply.github.com>
Date: Mon, 19 Dec 2016 22:46:35 +0900
Subject: [PATCH] Fix COPY string array

---
 SMILEBASIC/builtinfunctions.d | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/SMILEBASIC/builtinfunctions.d b/SMILEBASIC/builtinfunctions.d
index 884b886..f86dcf5 100644
--- a/SMILEBASIC/builtinfunctions.d
+++ b/SMILEBASIC/builtinfunctions.d
@@ -1994,17 +1994,19 @@ class BuiltinFunction
                 throw new TypeMismatch("COPY", sourceArrayIndex + 2);
             len = args[sourceArrayIndex + 1].castInteger;
         }
+        if (src.type == ValueType.StringArray && dst.type == ValueType.StringArray)
+        {
+            for(int i = 0; i < len; i++)
+            {
+                dst.stringArray.array[i + dstoffset] = src.stringArray.array[i + srcoffset].dup;
+            }
+        }
         else
         {
             for(int i = 0; i < len; i++)
             {
                 dst[i + dstoffset] = src[i + srcoffset];
             }
-            return;
-        }
-        for(int i = 0; i < len; i++)
-        {
-            dst[i + dstoffset] = src[i + srcoffset];
         }
     }
     @BasicName("LOAD")