Should not unshare env stack repeatedly; fix #3601

This commit is contained in:
Yukihiro "Matz" Matsumoto
2017-04-12 10:41:06 +09:00
parent 2a4db1a4be
commit 0fb05eb55f
+1
View File
@@ -260,6 +260,7 @@ mrb_env_unshare(mrb_state *mrb, struct REnv *e)
mrb_value *p = (mrb_value *)mrb_malloc(mrb, sizeof(mrb_value)*len);
ptrdiff_t cioff = e->cioff;
if (!MRB_ENV_STACK_SHARED_P(e)) return;
MRB_ENV_UNSHARE_STACK(e);
if (!e->c) {
/* save block argument position (negated) */