Perl_clear_defarray - array does not actually need Zeroing

AvREIFY_only() is about to be applied

1 files changed, 1 insertions, 1 deletions

diff --git a/pp_hot.c b/pp_hot.c
index f89dea12fd..642e3f0d42 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -4975,7 +4975,7 @@ Perl_clear_defarray(pTHX_ AV* av, bool abandon)
     else {
         const SSize_t size = AvFILLp(av) + 1;
         /* The ternary gives consistency with av_extend() */
-        AV *newav = newAV_alloc_xz(size < 4 ? 4 : size);
+        AV *newav = newAV_alloc_x(size < 4 ? 4 : size);
         AvREIFY_only(newav);
         PAD_SVl(0) = MUTABLE_SV(newav);
         SvREFCNT_dec_NN(av);