diff options
-rw-r--r-- | array.c | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -5426,7 +5426,9 @@ rb_ary_any_p(VALUE ary) for (i = 0; i < len; ++i) if (RTEST(ptr[i])) return Qtrue; } else { - for (i = 0; i < len; ++i) if (RTEST(rb_yield(ptr[i]))) return Qtrue; + for (i = 0; i < RARRAY_LEN(ary); ++i) { + if (RTEST(rb_yield(RARRAY_AREF(ary, i)))) return Qtrue; + } } return Qfalse; } |