diff --git a/ChangeLog b/ChangeLog
index dd95354806..e44f57a1cd 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Fri Apr  2 14:35:26 2004  Yukihiro Matsumoto  <matz@ruby-lang.org>
+
+	* eval.c (block_pass): should increment unique identifier of the
+	  block.  [ruby-talk:96363]
+
 Fri Apr  2 11:36:20 2004  Minero Aoki  <aamine@loveruby.net>
 
 	* eval.c (Init_load): make $LOADED_FEATURES built-in.
diff --git a/eval.c b/eval.c
index d4f9cb8b38..25a15b3c30 100644
--- a/eval.c
+++ b/eval.c
@@ -8374,6 +8374,7 @@ block_pass(self, node)
     old_block = ruby_block;
     _block = *data;
     _block.outer = ruby_block;
+    _block.uniq = block_unique++;
     ruby_block = &_block;
     PUSH_ITER(ITER_PRE);
     if (ruby_frame->iter == ITER_NOT)