summaryrefslogtreecommitdiff
path: root/gv.c
diff options
context:
space:
mode:
authorAndy Lester <andy@petdance.com>2006-03-31 19:01:32 -0600
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2006-04-02 21:41:28 +0000
commitc9da69fb2cff080fa286bf64ac1d12f81bab3bf6 (patch)
tree536f24bfdceb520953fdd12605e3b002e5103d8e /gv.c
parentf4f44d658c5179458c57c4af43429aac25bf8546 (diff)
downloadperl-c9da69fb2cff080fa286bf64ac1d12f81bab3bf6.tar.gz
Removed unnecessary pointers checks
Message-ID: <20060401070132.GA6616@petdance.com> p4raw-id: //depot/perl@27690
Diffstat (limited to 'gv.c')
-rw-r--r--gv.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/gv.c b/gv.c
index 83f3ed885b..5c1becbec2 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;