From 4e84bdb507885bd37b4b0fa6b6359ac8c8b7b886 Mon Sep 17 00:00:00 2001 From: "Yukihiro \"Matz\" Matsumoto" Date: Wed, 12 Apr 2017 11:01:23 +0900 Subject: Let 'mrb_vm_run()` to restore the calling fiber; ref #3537 --- src/vm.c | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) (limited to 'src') diff --git a/src/vm.c b/src/vm.c index a9c72cec5..331ea3c3c 100644 --- a/src/vm.c +++ b/src/vm.c @@ -816,15 +816,19 @@ MRB_API mrb_value mrb_vm_run(mrb_state *mrb, struct RProc *proc, mrb_value self, unsigned int stack_keep) { mrb_irep *irep = proc->body.irep; + mrb_value result; + struct mrb_context *c = mrb->c; - if (!mrb->c->stack) { + if (!c->stack) { stack_init(mrb); } if (stack_keep < irep->nregs) stack_keep = irep->nregs; stack_extend(mrb, stack_keep); - mrb->c->stack[0] = self; - return mrb_vm_exec(mrb, proc, irep->iseq); + c->stack[0] = self; + result = mrb_vm_exec(mrb, proc, irep->iseq); + mrb->c = c; + return result; } MRB_API mrb_value -- cgit v1.2.3