From a45bf04dfade7d4fa48d84134770d309af301d5d Mon Sep 17 00:00:00 2001
From: otya128 <otya128@users.noreply.github.com>
Date: Sat, 17 Dec 2016 15:35:04 +0900
Subject: [PATCH] Fix OUT STR$[N]

---
 SMILEBASIC/VM.d | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/SMILEBASIC/VM.d b/SMILEBASIC/VM.d
index efbba88..ddfe1c0 100644
--- a/SMILEBASIC/VM.d
+++ b/SMILEBASIC/VM.d
@@ -1248,8 +1248,8 @@ class PopArray : Code
                 throw new TypeMismatch();
             }
             //TODO:文字列の挙動
-            throw new TypeMismatch();
-            //array.stringValue[index[0]] = assign.stringValue[0];
+            array.stringValue[index[0]] = assign.stringValue;
+            return;
         }
         throw new TypeMismatch();
     }