diff --git a/ChangeLog b/ChangeLog
index b1a94ef947..61cbafa0be 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Wed Jun 27 04:23:47 2007  Koichi Sasada  <ko1@atdot.net>
+
+	* compile.c (iseq_compile_each): fix type error.
+
 Wed Jun 27 03:26:15 2007  Koichi Sasada  <ko1@atdot.net>
 
 	* compile.c (compile_massign), insns.def (expandarray): support 
diff --git a/compile.c b/compile.c
index 43cda0c083..a710f760d9 100644
--- a/compile.c
+++ b/compile.c
@@ -3715,7 +3715,7 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped)
       }
       case NODE_YIELD:{
 	DECL_ANCHOR(args);
-	int argc;
+	VALUE argc;
 	unsigned long flag = 0;
 
 	if (iseq->type == ISEQ_TYPE_TOP || iseq->type == ISEQ_TYPE_CLASS) {
@@ -3726,7 +3726,7 @@ iseq_compile_each(rb_iseq_t *iseq, LINK_ANCHOR *ret, NODE * node, int poped)
 	    argc = setup_args(iseq, args, node->nd_head, &flag);
 	}
 	else {
-	    argc = 0;
+	    argc = INT2FIX(0);
 	}
 
 	ADD_SEQ(ret, args);