Change 27690 by [EMAIL PROTECTED] on 2006/04/02 21:41:28 Subject: [PATCH] Removed unnecessary pointers checks From: [EMAIL PROTECTED] (Andy Lester) Date: Sat, 1 Apr 2006 01:01:32 -0600 Message-ID: <[EMAIL PROTECTED]>
Affected files ... ... //depot/perl/gv.c#315 edit Differences ... ==== //depot/perl/gv.c#315 (text) ==== Index: perl/gv.c --- perl/gv.c#314~27643~ 2006-03-31 05:45:57.000000000 -0800 +++ perl/gv.c 2006-04-02 14:41:28.000000000 -0700 @@ -1408,8 +1408,8 @@ 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 @@ 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; End of Patch.