diff options
Diffstat (limited to 'array.c')
-rw-r--r-- | array.c | 9 |
1 files changed, 4 insertions, 5 deletions
@@ -4174,10 +4174,9 @@ rb_ary_compact(VALUE ary) static VALUE rb_ary_count(int argc, VALUE *argv, VALUE ary) { - long n = 0; + long i, n = 0; if (argc == 0) { - long i; VALUE v; if (!rb_block_given_p()) @@ -4189,14 +4188,14 @@ rb_ary_count(int argc, VALUE *argv, VALUE ary) } } else { - VALUE obj, *p, *pend; + VALUE obj; rb_scan_args(argc, argv, "1", &obj); if (rb_block_given_p()) { rb_warn("given block not used"); } - for (p = RARRAY_PTR(ary), pend = p + RARRAY_LEN(ary); p < pend; p++) { - if (rb_equal(*p, obj)) n++; + for (i = 0; i < RARRAY_LEN(ary); i++) { + if (rb_equal(RARRAY_AREF(ary, i), obj)) n++; } } |