The previous two commits made it non-recursive on AVs. With that
machinery in place, it's now trivial to extend it to RVs too.
This means that now any depth nesting of AVs and RVs will be freed
in a single call to sv_clear().
if (SvWEAKREF(sv))
sv_del_backref(target, sv);
else
- SvREFCNT_dec(target);
+ next_sv = target;
}
}
#ifdef PERL_OLD_COPY_ON_WRITE