From e8732845b5fabfaa6404e11fb45274b19450d24c Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 6 Feb 2004 09:32:24 +0000
Subject: * backport proc equality patch [ruby-dev:22809]

git-svn-id: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8@5632 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 eval.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/eval.c b/eval.c
index 4a4c199c3..381f0cf78 100644
--- a/eval.c
+++ b/eval.c
@@ -8215,6 +8215,7 @@ proc_eq(self, other)
     if (CLASS_OF(self) != CLASS_OF(other)) return Qfalse;
     Data_Get_Struct(self, struct BLOCK, data);
     Data_Get_Struct(other, struct BLOCK, data2);
+    if (data->dyna_vars != data2->dyna_vars) return Qfalse;
     if (data->body == data2->body) return Qtrue;
     return Qfalse;
 }
-- 
cgit