From 54726befc3eb52bf06640bfb07664dace3721d14 Mon Sep 17 00:00:00 2001 From: ko1 Date: Tue, 30 Oct 2018 03:21:56 +0000 Subject: use RARRAY_AREF() instead of RARRAY_CONST_PTR(). git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@65438 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- array.c | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'array.c') diff --git a/array.c b/array.c index 1dd82ad28e..83a5ff41f5 100644 --- a/array.c +++ b/array.c @@ -5925,7 +5925,6 @@ static VALUE rb_ary_any_p(int argc, VALUE *argv, VALUE ary) { long i, len = RARRAY_LEN(ary); - const VALUE *ptr = RARRAY_CONST_PTR(ary); rb_check_arity(argc, 0, 1); if (!len) return Qfalse; @@ -5938,7 +5937,9 @@ rb_ary_any_p(int argc, VALUE *argv, VALUE ary) } } else if (!rb_block_given_p()) { - for (i = 0; i < len; ++i) if (RTEST(ptr[i])) return Qtrue; + for (i = 0; i < len; ++i) { + if (RTEST(RARRAY_AREF(ary, i))) return Qtrue; + } } else { for (i = 0; i < RARRAY_LEN(ary); ++i) { -- cgit v1.2.3