Skip to content

Commit

Permalink
Shared TT_ENV may need to be marked; fix #3550
Browse files Browse the repository at this point in the history
  • Loading branch information
matz committed Apr 11, 2017
1 parent fff4a4e commit 6dd1a57
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/gc.c
Original file line number Diff line number Diff line change
Expand Up @@ -646,7 +646,6 @@ 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]);
Expand Down Expand Up @@ -761,6 +760,7 @@ obj_free(mrb_state *mrb, struct RBasic *obj, int end)
case MRB_TT_FIBER:
{
struct mrb_context *c = ((struct RFiber*)obj)->cxt;

if (!end && c && c != mrb->root_c) {
mrb_callinfo *ci = c->ci;
mrb_callinfo *ce = c->cibase;
Expand Down

0 comments on commit 6dd1a57

Please sign in to comment.