while (index) {
    SV * const sv = ary[--index];
    /* undef the slot before freeing the value, because a
     * destructor might try to modify this array */
    ary[index] = &PL_sv_undef;
    SvREFCNT_dec(sv);
}