Marking from terminated fibers are not needed; ref #4143

The old condition marks the top-level callinfo even after the
fiber is terminated.
This commit is contained in:
Yukihiro "Matz" Matsumoto
2018-10-29 11:58:10 +09:00
parent 34872e90d4
commit 3dc3643e34
+3 -3
View File
@@ -801,10 +801,10 @@ obj_free(mrb_state *mrb, struct RBasic *obj, int end)
struct mrb_context *c = ((struct RFiber*)obj)->cxt;
if (c && c != mrb->root_c) {
mrb_callinfo *ci = c->ci;
mrb_callinfo *ce = c->cibase;
if (!end && c->status != MRB_FIBER_TERMINATED) {
mrb_callinfo *ci = c->ci;
mrb_callinfo *ce = c->cibase;
if (!end) {
while (ce <= ci) {
struct REnv *e = ci->env;
if (e && !is_dead(&mrb->gc, e) &&