do no generate lineno info if no filename is specified

This commit is contained in:
Yukihiro Matsumoto
2012-09-03 15:33:35 +09:00
parent 4f7a1a167d
commit 4e8317f5df
2 changed files with 13 additions and 5 deletions
+1 -1
View File
@@ -191,7 +191,7 @@ exc_debug_info(mrb_state *mrb, struct RObject *exc)
if (ci->proc && !MRB_PROC_CFUNC_P(ci->proc)) {
mrb_irep *irep = ci->proc->body.irep;
if (irep->lines && irep->iseq <= pc && pc < irep->iseq + irep->ilen) {
if (irep->filename && irep->lines && irep->iseq <= pc && pc < irep->iseq + irep->ilen) {
mrb_obj_iv_set(mrb, exc, mrb_intern(mrb, "file"), mrb_str_new_cstr(mrb, irep->filename));
mrb_obj_iv_set(mrb, exc, mrb_intern(mrb, "line"), mrb_fixnum_value(irep->lines[pc - irep->iseq - 1]));
return;