From 6e0c48d7584d27883d8fb7e5c6fe8eb6f1db0a91 Mon Sep 17 00:00:00 2001 From: Takeshi Watanabe Date: Mon, 14 Apr 2014 20:34:49 +0900 Subject: Fix and add test to Proc#inspect . --- mrbgems/mruby-proc-ext/src/proc.c | 15 +++++++-------- 1 file changed, 7 insertions(+), 8 deletions(-) (limited to 'mrbgems/mruby-proc-ext/src') diff --git a/mrbgems/mruby-proc-ext/src/proc.c b/mrbgems/mruby-proc-ext/src/proc.c index 8b6ee4740..b105c95d7 100644 --- a/mrbgems/mruby-proc-ext/src/proc.c +++ b/mrbgems/mruby-proc-ext/src/proc.c @@ -84,18 +84,17 @@ mrb_proc_inspect(mrb_state *mrb, mrb_value self) if (!MRB_PROC_CFUNC_P(p)) { mrb_irep *irep = p->body.irep; + const char *filename; + int32_t line; mrb_str_cat_lit(mrb, str, "@"); - if (irep->filename) { - mrb_str_cat_cstr(mrb, str, irep->filename); - } - else { - mrb_str_cat_lit(mrb, str, "-"); - } + filename = mrb_debug_get_filename(irep, 0); + mrb_str_cat_cstr(mrb, str, filename ? filename : "-"); mrb_str_cat_lit(mrb, str, ":"); - if (irep->lines) { - mrb_str_append(mrb, str, mrb_fixnum_value(*irep->lines)); + line = mrb_debug_get_line(irep, 0); + if (line != -1) { + mrb_str_append(mrb, str, mrb_fixnum_value(line)); } else { mrb_str_cat_lit(mrb, str, "-"); -- cgit v1.2.3