From 2045a3529266e903d0db0c9e16081fe2fa01b9df Mon Sep 17 00:00:00 2001 From: "Yukihiro \"Matz\" Matsumoto" Date: Wed, 22 May 2013 11:05:22 +0900 Subject: garbage collect context (fiber) properly --- mrbgems/mruby-fiber/src/fiber.c | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'mrbgems') diff --git a/mrbgems/mruby-fiber/src/fiber.c b/mrbgems/mruby-fiber/src/fiber.c index e46e3cb02..c338b8b95 100644 --- a/mrbgems/mruby-fiber/src/fiber.c +++ b/mrbgems/mruby-fiber/src/fiber.c @@ -80,9 +80,9 @@ fiber_init(mrb_state *mrb, mrb_value self) f->cxt = (struct mrb_context*)mrb_malloc(mrb, sizeof(struct mrb_context)); *f->cxt = mrb_context_zero; + c = f->cxt; /* initialize VM stack */ - c = f->cxt; c->stbase = (mrb_value *)mrb_calloc(mrb, FIBER_STACK_INIT_SIZE, sizeof(mrb_value)); c->stend = c->stbase + FIBER_STACK_INIT_SIZE; c->stack = c->stbase; @@ -104,6 +104,8 @@ fiber_init(mrb_state *mrb, mrb_value self) ci[1] = ci[0]; c->ci++; /* push dummy callinfo */ + c->fib = f; + return self; } -- cgit v1.2.3