diff options
author | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-03-15 14:12:53 +0000 |
---|---|---|
committer | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-03-15 14:12:53 +0000 |
commit | b1d94ab54a39f91d1b6ee9f118c11b8aae9f3ff2 (patch) | |
tree | 9a38bae8ea3435717e1f8d27033378fc87858c08 | |
parent | 3173befe84d53d660533905eb51f86f69a4cd6b2 (diff) | |
download | ruby-b1d94ab54a39f91d1b6ee9f118c11b8aae9f3ff2.tar.gz |
* eval.c (recursive_check, recursive_push): more restrictive check.
fixed: [ruby-dev:25916]
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@8151 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
-rw-r--r-- | ChangeLog | 9 | ||||
-rw-r--r-- | eval.c | 4 |
2 files changed, 9 insertions, 4 deletions
@@ -1,3 +1,8 @@ +Tue Mar 15 23:12:36 2005 Nobuyoshi Nakada <nobu@ruby-lang.org> + + * eval.c (recursive_check, recursive_push): more restrictive check. + fixed: [ruby-dev:25916] + Tue Mar 15 16:38:31 2005 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp> * ext/tk/tkutil/tkutil.c (ary2list): give wrong arguments to hash2kv() @@ -17,9 +22,9 @@ Mon Mar 14 12:21:03 2005 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp> Mon Mar 14 00:13:49 2005 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp> * ext/tk/lib/tk/timer.rb (TkRTTimer): correct calculation of offset - value. get a little better accuracy. + value. get a little better accuracy. - * ext/tk/sample/demos-en/widget: use a binding with no local variables + * ext/tk/sample/demos-en/widget: use a binding with no local variables when eval a sample script. * ext/tk/sample/demos-en/bind.rb: ditto. @@ -13002,7 +13002,7 @@ recursive_check(obj) else { VALUE list = rb_hash_aref(hash, ID2SYM(ruby_frame->this_func)); - if (NIL_P(list)) return Qfalse; + if (NIL_P(list) || TYPE(list) != T_ARRAY) return Qfalse; return rb_ary_includes(list, rb_obj_id(obj)); } } @@ -13023,7 +13023,7 @@ recursive_push(obj) else { list = rb_hash_aref(hash, sym); } - if (NIL_P(list)) { + if (NIL_P(list) || TYPE(list) != T_ARRAY) { list = rb_ary_new(); rb_hash_aset(hash, sym, list); } |