From fe7c38c8620cf65461285b8a1b8c9afbbb36e044 Mon Sep 17 00:00:00 2001
From: nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Sat, 13 Dec 2003 08:18:03 +0000
Subject: [PATCH] * eval.c (proc_alloc): cache the created object at first
 time.   [ruby-talk:61288], [ruby-dev:22240]

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@5183 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog | 5 +++++
 eval.c    | 1 +
 2 files changed, 6 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index 7eb6f87ff4..4c68c79883 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Sat Dec 13 17:17:59 2003  Nobuyoshi Nakada  <nobu@ruby-lang.org>
+
+	* eval.c (proc_alloc): cache the created object at first time.
+	  [ruby-talk:61288], [ruby-dev:22240]
+
 Sat Dec 13 09:01:23 2003  Nobuyoshi Nakada  <nobu@ruby-lang.org>
 
 	* configure.in: check ucontext.h.
diff --git a/eval.c b/eval.c
index 8361149bd2..03715c1851 100644
--- a/eval.c
+++ b/eval.c
@@ -7066,6 +7066,7 @@ proc_alloc(klass, proc)
     data->orig_thread = rb_thread_current();
     data->wrapper = ruby_wrapper;
     data->iter = data->prev?Qtrue:Qfalse;
+    data->block_obj = block;
     frame_dup(&data->frame);
     if (data->iter) {
 	blk_copy_prev(data);