temporary protection not to access out of stack

1 files changed, 1 insertions, 0 deletions

diff --git a/src/gc.c b/src/gc.c
index 819fb94c6..c0d4e1599 100644
--- a/src/gc.c
+++ b/src/gc.c
@@ -563,6 +563,7 @@ root_scan_phase(mrb_state *mrb)
   /* mark stack */
   e = mrb->stack - mrb->stbase;
   if (mrb->ci) e += mrb->ci->nregs;
+  if (mrb->stbase + e > mrb->stend) e = mrb->stend - mrb->stbase;
   for (i=0; i<e; i++) {
     mrb_gc_mark_value(mrb, mrb->stbase[i]);
   }