From ecee8c51b0ad8cddd9e422a3e5105f902d7e2781 Mon Sep 17 00:00:00 2001
From: "Yukihiro \"Matz\" Matsumoto" <matz@ruby-lang.org>
Date: Sat, 4 Mar 2017 18:53:36 +0900
Subject: Avoid tracing shared TT_ENV object.

---
 src/gc.c | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src')

diff --git a/src/gc.c b/src/gc.c
index 63eab8e00..5003f4b91 100644
--- a/src/gc.c
+++ b/src/gc.c
@@ -639,6 +639,7 @@ gc_mark_children(mrb_state *mrb, mrb_gc *gc, struct RBasic *obj)
       struct REnv *e = (struct REnv*)obj;
       mrb_int i, len;
 
+      if MRB_ENV_STACK_SHARED_P(e) break;
       len = MRB_ENV_STACK_LEN(e);
       for (i=0; i<len; i++) {
         mrb_gc_mark_value(mrb, e->stack[i]);
-- 
cgit v1.2.3