diff options
author | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2008-01-14 18:41:44 +0000 |
---|---|---|
committer | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2008-01-14 18:41:44 +0000 |
commit | 1c5640855fe8527e22572319fcdcc5aa0d89cc2d (patch) | |
tree | 250fddf2384149021e6a8efd2612be8c7abb1479 | |
parent | 45a5455d7af00aa649333071a8f1b3098ce7fa2e (diff) | |
download | ruby-1c5640855fe8527e22572319fcdcc5aa0d89cc2d.tar.gz |
* eval.c (eval): check if backtrace is empty. [ruby-core:15040]
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@15054 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
-rw-r--r-- | ChangeLog | 4 | ||||
-rw-r--r-- | eval.c | 9 |
2 files changed, 9 insertions, 4 deletions
@@ -1,3 +1,7 @@ +Tue Jan 15 03:41:42 2008 Nobuyoshi Nakada <nobu@ruby-lang.org> + + * eval.c (eval): check if backtrace is empty. [ruby-core:15040] + Tue Jan 15 01:28:47 2008 Nobuyoshi Nakada <nobu@ruby-lang.org> * common.mk: simplified dummy objects dependencies. @@ -1757,16 +1757,17 @@ eval(VALUE self, VALUE src, VALUE scope, const char *file, int line) if (state == TAG_RAISE) { VALUE errinfo = th->errinfo; if (strcmp(file, "(eval)") == 0) { - VALUE mesg, errat; + VALUE mesg, errat, bt2; errat = get_backtrace(errinfo); mesg = rb_attr_get(errinfo, rb_intern("mesg")); - if (!NIL_P(errat) && TYPE(errat) == T_ARRAY) { - if (!NIL_P(mesg) && TYPE(mesg) == T_STRING) { + if (!NIL_P(errat) && TYPE(errat) == T_ARRAY && + (bt2 = backtrace(-2), RARRAY_LEN(bt2) > 0)) { + if (!NIL_P(mesg) && TYPE(mesg) == T_STRING && !RSTRING_LEN(mesg)) { rb_str_update(mesg, 0, 0, rb_str_new2(": ")); rb_str_update(mesg, 0, 0, RARRAY_PTR(errat)[0]); } - RARRAY_PTR(errat)[0] = RARRAY_PTR(backtrace(-2))[0]; + RARRAY_PTR(errat)[0] = RARRAY_PTR(bt2)[0]; } } rb_exc_raise(errinfo); |