summaryrefslogtreecommitdiff
path: root/hv.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2000-12-30 00:45:14 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2000-12-30 00:45:14 +0000
commit9b3a60d0fb2593e545e11e903448e260e944fca6 (patch)
treec2d7e8b7eb903967a4702beb9f0f9bbcfa22ffa0 /hv.c
parent9692f7e7da6d0e69b8995374e7ea7d5f6bd54236 (diff)
downloadperl-9b3a60d0fb2593e545e11e903448e260e944fca6.tar.gz
Retract #8261.
p4raw-id: //depot/perl@8262
Diffstat (limited to 'hv.c')
-rw-r--r--hv.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/hv.c b/hv.c
index 867c0b2627..f5aa4a8d7f 100644
--- a/hv.c
+++ b/hv.c
@@ -1225,8 +1225,7 @@ Perl_hv_undef(pTHX_ HV *hv)
return;
xhv = (XPVHV*)SvANY(hv);
hfreeentries(hv);
- if (xhv->xhv_array)
- Safefree(xhv->xhv_array);
+ Safefree(xhv->xhv_array);
if (HvNAME(hv)) {
Safefree(HvNAME(hv));
HvNAME(hv) = 0;