From e0337774ed9bef3a491863290bc01476aa5b9743 Mon Sep 17 00:00:00 2001 From: nobu Date: Sat, 27 May 2006 13:45:47 +0000 Subject: [PATCH] * eval.c (proc_invoke): save and restore block in the current frame. fixed: [ruby-core:07833], [ruby-talk:191639] git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@10198 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ChangeLog | 17 +++++++++++------ eval.c | 4 +++- 2 files changed, 14 insertions(+), 7 deletions(-) diff --git a/ChangeLog b/ChangeLog index 3081b54f22..d2abb9aaaf 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,9 +1,14 @@ -Sat May 27 11:29:46 2006 nobuyoshi nakada +Sat May 27 22:46:38 2006 Yukihiro Matsumoto + + * eval.c (proc_invoke): save and restore block in the current frame. + fixed: [ruby-core:07833], [ruby-talk:191639] + +Sat May 27 11:29:46 2006 Nobuyoshi Nakada * ext/extmk.rb (extmake): remove extinit files if no statically linked extensions. -Fri May 26 09:05:11 2006 nobuyoshi nakada +Fri May 26 09:05:11 2006 Nobuyoshi Nakada * ruby.h, lib/mkmf.rb (create_header): clear command line options for macros moved to extconf.h. @@ -18,7 +23,7 @@ Fri May 26 09:05:11 2006 nobuyoshi nakada * lib/mkmf.rb (configuration): add $defs unless extconf.h was created. -Thu May 25 01:52:07 2006 nobuyoshi nakada +Thu May 25 01:52:07 2006 Nobuyoshi Nakada * lib/mkmf.rb (pkg_config): particular config commands support. @@ -32,7 +37,7 @@ Thu May 25 01:52:07 2006 nobuyoshi nakada * win32/setup.mak: suffix OS name by runtime version. -Wed May 24 23:52:11 2006 nobuyoshi nakada +Wed May 24 23:52:11 2006 Nobuyoshi Nakada * configure.in (ac_install_sh): ignore dummy install-sh. [ruby-talk:193876] @@ -86,7 +91,7 @@ Thu May 18 22:37:20 2006 GOTOU Yuuzou * test/webrick/test_utils.rb: test for WEBrick::Utils.timeout. -Thu May 18 00:42:12 2006 nobuyoshi nakada +Thu May 18 00:42:12 2006 Nobuyoshi Nakada * ext/extmk.rb, lib/mkmf.rb: use BUILD_FILE_SEPARATOR in Makefiles. @@ -233,7 +238,7 @@ Sat Apr 1 15:11:27 2006 Masaki Suketa * add test/win32ole -Fri Mar 31 14:24:55 2006 nobuyoshi nakada +Fri Mar 31 14:24:55 2006 Nobuyoshi Nakada * enumerator.c (enumerator_with_index): removed suspicious return statement. diff --git a/eval.c b/eval.c index 284a27102c..7fbf3f2bcb 100644 --- a/eval.c +++ b/eval.c @@ -8264,7 +8264,7 @@ static VALUE proc_invoke(VALUE proc, VALUE args /* OK */, VALUE self, VALUE klass) { struct BLOCK _block; - struct BLOCK *data; + struct BLOCK *data, *volatile old_block; volatile VALUE result = Qundef; int state; volatile int safe = ruby_safe_level; @@ -8302,6 +8302,7 @@ proc_invoke(VALUE proc, VALUE args /* OK */, VALUE self, VALUE klass) _block.scope = scope; } /* modify current frame */ + old_block = ruby_frame->block; ruby_frame->block = &_block; PUSH_TAG((pcall&YIELD_LAMBDA_CALL) ? PROT_LAMBDA : PROT_NONE); state = EXEC_TAG(); @@ -8314,6 +8315,7 @@ proc_invoke(VALUE proc, VALUE args /* OK */, VALUE self, VALUE klass) result = prot_tag->retval; } POP_TAG(); + ruby_frame->block = old_block; ruby_wrapper = old_wrapper; POP_VARS(); if (proc_safe_level_p(proc))