2 files changed, 12 insertions, 16 deletions
diff --git a/ChangeLog b/ChangeLog
index 81f30b2c18..460564b5f7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Sun May 11 23:19:39 2008  Nobuyoshi Nakada  <nobu@ruby-lang.org>
+
+	* enum.c (all_iter_i, any_iter_i): reduced duplicated code.
+
 Sun May 11 22:54:02 2008  Nobuyoshi Nakada  <nobu@ruby-lang.org>
 
 	* bootstraptest/runner.rb (main): leave -I options for purelib.rb
diff --git a/enum.c b/enum.c
index d567c1c388..73c1a24734 100644
--- a/enum.c
+++ b/enum.c
@@ -762,9 +762,9 @@ enum_sort_by(VALUE obj)
 }
 
 static VALUE
-all_iter_i(VALUE i, VALUE *memo)
+all_i(VALUE i, VALUE *memo)
 {
-    if (!RTEST(rb_yield(i))) {
+    if (!RTEST(i)) {
 	*memo = Qfalse;
 	rb_iter_break();
     }
@@ -772,13 +772,9 @@ all_iter_i(VALUE i, VALUE *memo)
 }
 
 static VALUE
-all_i(VALUE i, VALUE *memo)
+all_iter_i(VALUE i, VALUE *memo)
 {
-    if (!RTEST(i)) {
-	*memo = Qfalse;
-	rb_iter_break();
-    }
-    return Qnil;
+    return all_i(rb_yield(i), memo);
 }
 
 /*
@@ -808,9 +804,9 @@ enum_all(VALUE obj)
 }
 
 static VALUE
-any_iter_i(VALUE i, VALUE *memo)
+any_i(VALUE i, VALUE *memo)
 {
-    if (RTEST(rb_yield(i))) {
+    if (RTEST(i)) {
 	*memo = Qtrue;
 	rb_iter_break();
     }
@@ -818,13 +814,9 @@ any_iter_i(VALUE i, VALUE *memo)
 }
 
 static VALUE
-any_i(VALUE i, VALUE *memo)
+any_iter_i(VALUE i, VALUE *memo)
 {
-    if (RTEST(i)) {
-	*memo = Qtrue;
-	rb_iter_break();
-    }
-    return Qnil;
+    return any_i(rb_yield(i), memo);
 }
 
 /*