summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2014-02-20 10:28:58 -0700
committerKarl Williamson <public@khwilliamson.com>2014-02-20 11:47:05 -0700
commitb9f2b68390014b991c227e8c56d3e813584245b9 (patch)
treecda819a22dfe1ff503439d761b579ba313a4754c /sv.c
parent78ae08632cb098bf2ca76b516ad9ac6d22705ae7 (diff)
downloadperl-b9f2b68390014b991c227e8c56d3e813584245b9.tar.gz
Change av_len calls to av_tindex for clarity
av_tindex is a more clearly named synonym for av_len, available starting in v5.18. This changes the core uses to it, including modules in /ext, which are not dual-lifed.
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/sv.c b/sv.c
index 4c6f9ad1e5..0ebdb3c823 100644
--- a/sv.c
+++ b/sv.c
@@ -13939,7 +13939,7 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags,
/* Call the ->CLONE method, if it exists, for each of the stashes
identified by sv_dup() above.
*/
- while(av_len(param->stashes) != -1) {
+ while(av_tindex(param->stashes) != -1) {
HV* const stash = MUTABLE_HV(av_shift(param->stashes));
GV* const cloner = gv_fetchmethod_autoload(stash, "CLONE", 0);
if (cloner && GvCV(cloner)) {