[ruby-dev:13152] rb_yield_0 should preserve and restore ruby_cref

eval()に対する修正[ruby-list:29556]は、
rb_yield_0()に対しても必要と思います。

class Foo
  C = 100
  $p = lambda {
    def foo; p C; end
  }
end

$p.call
Foo.new.foo   # => in `foo': uninitialized constant C (NameError)


--- eval.c.orig	Tue May  8 17:29:51 2001
+++ eval.c	Wed May  9 14:38:33 2001
@@ -3502,6 +3502,7 @@
 {
     NODE *node;
     volatile VALUE result = Qnil;
+    volatile VALUE old_cref;
     struct BLOCK *block;
     struct SCOPE *old_scope;
     struct FRAME frame;
@@ -3518,6 +3519,8 @@
     frame = block->frame;
     frame.prev = ruby_frame;
     ruby_frame = &(frame);
+    old_cref = (VALUE)ruby_cref;
+    ruby_cref = (NODE*)ruby_frame->cbase;
     old_scope = ruby_scope;
     ruby_scope = block->scope;
     ruby_block = block->prev;
@@ -3635,6 +3638,7 @@
     POP_VARS();
     ruby_block = block;
     ruby_frame = ruby_frame->prev;
+    ruby_cref = (NODE*)old_cref;
     if (ruby_scope->flag & SCOPE_DONT_RECYCLE)
        scope_dup(old_scope);
     ruby_scope = old_scope;
----
小迫＠ソフネック   渋谷区恵比寿1-15-1