From: Andy Lester Date: Sat, 1 Apr 2006 01:01:32 +0000 (-0600) Subject: Removed unnecessary pointers checks X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c9da69fb2cff080fa286bf64ac1d12f81bab3bf6;p=p5sagit%2Fp5-mst-13.2.git Removed unnecessary pointers checks Message-ID: <20060401070132.GA6616@petdance.com> p4raw-id: //depot/perl@27690 --- diff --git a/gv.c b/gv.c index 83f3ed8..5c1becb 100644 --- a/gv.c +++ b/gv.c @@ -1408,8 +1408,8 @@ Perl_gp_free(pTHX_ GV *gv) return; } - if (gp->gp_sv) SvREFCNT_dec(gp->gp_sv); - if (gp->gp_av) SvREFCNT_dec(gp->gp_av); + SvREFCNT_dec(gp->gp_sv); + SvREFCNT_dec(gp->gp_av); /* FIXME - another reference loop GV -> symtab -> GV ? Somehow gp->gp_hv can end up pointing at freed garbage. */ if (gp->gp_hv && SvTYPE(gp->gp_hv) == SVt_PVHV) { @@ -1419,9 +1419,9 @@ Perl_gp_free(pTHX_ GV *gv) G_DISCARD); SvREFCNT_dec(gp->gp_hv); } - if (gp->gp_io) SvREFCNT_dec(gp->gp_io); - if (gp->gp_cv) SvREFCNT_dec(gp->gp_cv); - if (gp->gp_form) SvREFCNT_dec(gp->gp_form); + SvREFCNT_dec(gp->gp_io); + SvREFCNT_dec(gp->gp_cv); + SvREFCNT_dec(gp->gp_form); Safefree(gp); GvGP(gv) = 0;