summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2020-08-19 14:07:06 -0600
committerKarl Williamson <khw@cpan.org>2020-08-19 16:12:19 -0600
commit698ac381136cf42e309f3e28a80ead6e29c77d45 (patch)
treedb6303c4a4af07fb1d3718c119556efa4b2a77e2
parent563e8cf49e450f777ecf7c3d1e063da39f8c69f6 (diff)
downloadperl-698ac381136cf42e309f3e28a80ead6e29c77d45.tar.gz
doio.c: Convert to use av_count()
-rw-r--r--doio.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/doio.c b/doio.c
index bd317e7dcb..b07750960d 100644
--- a/doio.c
+++ b/doio.c
@@ -1312,7 +1312,7 @@ Perl_nextargv(pTHX_ GV *gv, bool nomagicopen)
PL_filemode = 0;
if (!GvAV(gv))
return NULL;
- while (av_tindex(GvAV(gv)) >= 0) {
+ while (av_count(GvAV(gv)) > 0) {
STRLEN oldlen;
SV *const sv = av_shift(GvAV(gv));
SAVEFREESV(sv);