* dir.c (dir_s_chdir): block form of Dir.chdir. (RCR#U016).

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@1256 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 1 insertions, 2 deletions

diff --git a/eval.c b/eval.c
index 5d2f0016fe..93881002de 100644
--- a/eval.c
+++ b/eval.c
@@ -775,7 +775,6 @@ static struct tag *prot_tag;
     _tag.frame = ruby_frame;		\
     _tag.iter = ruby_iter;		\
     _tag.prev = prot_tag;		\
-    _tag.retval = Qnil;			\
     _tag.scope = ruby_scope;		\
     _tag.tag = ptag;			\
     _tag.dst = 0;			\
@@ -6332,7 +6331,7 @@ proc_eq(self, other)
     struct BLOCK *data, *data2;
 
     if (TYPE(other) != T_DATA) return Qfalse;
-    if (RDATA(other)->dmark != blk_mark) Qfalse;
+    if (RDATA(other)->dmark != (RUBY_DATA_FUNC)blk_mark) Qfalse;
     Data_Get_Struct(self, struct BLOCK, data);
     Data_Get_Struct(other, struct BLOCK, data2);
     if (data->tag == data2->tag) return Qtrue;