From 88f570d9ae5984decc313f10b54d259ff54fa525 Mon Sep 17 00:00:00 2001
From: ko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Mon, 1 Oct 2007 22:02:23 +0000
Subject: * proc.c (proc_dup): proc->block.proc should be self. *
 bootstraptest/test_knownbug.rb, test_method.rb:   move a fixed test.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@13589 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 proc.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'proc.c')

diff --git a/proc.c b/proc.c
index 127a1bd073..ad49d13be6 100644
--- a/proc.c
+++ b/proc.c
@@ -90,10 +90,11 @@ proc_dup(VALUE self)
     GetProcPtr(procval, dst);
 
     dst->block = src->block;
+    dst->block.proc = procval;
     dst->envval = src->envval;
     dst->safe_level = dst->safe_level;
     dst->special_cref_stack = src->special_cref_stack;
-    
+
     return procval;
 }
 
-- 
cgit v1.2.3