From 9de76a71e180afb9803f6c62f86cf452b863157b Mon Sep 17 00:00:00 2001 From: Yukihiro Matz Matsumoto Date: Mon, 17 Dec 2012 17:53:33 +0900 Subject: should not ignore exception on top-level; close #635 --- src/vm.c | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/src/vm.c b/src/vm.c index fc251d3cb..da6700bdf 100644 --- a/src/vm.c +++ b/src/vm.c @@ -1153,8 +1153,11 @@ mrb_run(mrb_state *mrb, struct RProc *proc, mrb_value self) L_RAISE: mrb_obj_iv_ifnone(mrb, mrb->exc, mrb_intern(mrb, "lastpc"), mrb_voidp_value(pc)); ci = mrb->ci; - eidx = mrb->ci->eidx; - if (ci == mrb->cibase) goto L_STOP; + eidx = ci->eidx; + if (ci == mrb->cibase) { + if (ci->ridx == 0) goto L_STOP; + goto L_RESCUE; + } while (ci[0].ridx == ci[-1].ridx) { cipop(mrb); ci = mrb->ci; @@ -1173,6 +1176,7 @@ mrb_run(mrb_state *mrb, struct RProc *proc, mrb_value self) break; } } + L_RESCUE: irep = ci->proc->body.irep; pool = irep->pool; syms = irep->syms; -- cgit v1.2.3