From 715c617b8e06aaa400800fd4442e8ac66cbbc1fb Mon Sep 17 00:00:00 2001
From: otya128 <otya128@users.noreply.github.com>
Date: Thu, 8 Dec 2016 22:48:44 +0900
Subject: [PATCH] Fix STR$*INT

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

diff --git a/SMILEBASIC/VM.d b/SMILEBASIC/VM.d
index e78e4a0..aba8dbf 100644
--- a/SMILEBASIC/VM.d
+++ b/SMILEBASIC/VM.d
@@ -577,6 +577,10 @@ class Operate : Code
                             //mul = (x, y, z) => z > 0 ? x ~ mul(x , y, z - 1) : "";
                             //vm.push(Value(mul(ls, ls, cast(int)rd)));
                             import std.array : replicate;
+                            if (rd < 0)
+                            {
+                                throw new OutOfRange();
+                            }
                             vm.push(Value(replicate(ls, cast(int)rd)));
                         }
                         return;