Speedups and shrinkages of SvREFCNT_inc

[p5sagit/p5-mst-13.2.git] / av.c

diff --git a/av.c b/av.c
index ede01a7..423d006 100644 (file)
--- a/av.c
+++ b/av.c
@@ -42,7 +42,7 @@ Perl_av_reify(pTHX_ AV *av)
        SV * const sv = AvARRAY(av)[--key];
        assert(sv);
        if (sv != &PL_sv_undef)
-           (void)SvREFCNT_inc(sv);
+           SvREFCNT_inc_void_NN(sv);
     }
     key = AvARRAY(av) - AvALLOC(av);
     while (key)