summaryrefslogtreecommitdiff
path: root/hv.c
diff options
context:
space:
mode:
authorVincent Pit <vince@profvince.com>2009-11-08 15:48:07 +0100
committerVincent Pit <perl@profvince.com>2009-11-08 15:58:43 +0100
commitef8d46e8143455a8b73aff3ecaa10ca3cf293a4d (patch)
tree9a4235cdaec67a513f0058aa796affae779786cd /hv.c
parentc20642991d8e8afa0a97a45a55f0f04df68e5245 (diff)
downloadperl-ef8d46e8143455a8b73aff3ecaa10ca3cf293a4d.tar.gz
SvREFCNT_dec already checks if the SV is non-NULL (continued)
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 fab9c997fc..cabaac75cf 100644
--- a/hv.c
+++ b/hv.c
@@ -2149,8 +2149,7 @@ Perl_hv_iternext_flags(pTHX_ HV *hv, I32 flags)
HeSVKEY_set(entry, SvREFCNT_inc_simple_NN(key));
return entry; /* beware, hent_val is not set */
}
- if (HeVAL(entry))
- SvREFCNT_dec(HeVAL(entry));
+ SvREFCNT_dec(HeVAL(entry));
Safefree(HeKEY_hek(entry));
del_HE(entry);
iter->xhv_eiter = NULL; /* HvEITER(hv) = NULL */