From fd12f87712ee22b0a727f33f0c46c22ae968ec83 Mon Sep 17 00:00:00 2001 From: Yukihiro Matz Matsumoto Date: Wed, 12 Dec 2012 18:23:20 +0900 Subject: save lastpc on exception and use it in mruby stack trace --- src/kernel.c | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'src/kernel.c') diff --git a/src/kernel.c b/src/kernel.c index 85eedc7ba..5e8a2f5aa 100644 --- a/src/kernel.c +++ b/src/kernel.c @@ -920,8 +920,9 @@ mrb_obj_public_methods(mrb_state *mrb, mrb_value self) mrb_value mrb_f_raise(mrb_state *mrb, mrb_value self) { - mrb_value a[2]; + mrb_value a[2], exc; int argc; + argc = mrb_get_args(mrb, "|oo", &a[0], &a[1]); switch (argc) { @@ -936,7 +937,9 @@ mrb_f_raise(mrb_state *mrb, mrb_value self) } /* fall through */ default: - mrb_exc_raise(mrb, mrb_make_exception(mrb, argc, a)); + exc = mrb_make_exception(mrb, argc, a); + mrb_obj_iv_set(mrb, mrb_obj_ptr(exc), mrb_intern(mrb, "lastpc"), mrb_voidp_value(mrb->ci->pc)); + mrb_exc_raise(mrb, exc); } return mrb_nil_value(); /* not reached */ } -- cgit v1.2.3