summaryrefslogtreecommitdiff
path: root/doop.c
diff options
context:
space:
mode:
Diffstat (limited to 'doop.c')
-rw-r--r--doop.c6
1 files changed, 2 insertions, 4 deletions
diff --git a/doop.c b/doop.c
index d3c49b5d46..c43ecb111c 100644
--- a/doop.c
+++ b/doop.c
@@ -1191,8 +1191,7 @@ Perl_do_chomp(pTHX_ register SV *sv)
}
nope:
- if (svrecode)
- SvREFCNT_dec(svrecode);
+ SvREFCNT_dec(svrecode);
Safefree(temp_buffer);
return count;
@@ -1467,8 +1466,7 @@ Perl_do_kv(pTHX)
}
LvTYPE(TARG) = 'k';
if (LvTARG(TARG) != (const SV *)keys) {
- if (LvTARG(TARG))
- SvREFCNT_dec(LvTARG(TARG));
+ SvREFCNT_dec(LvTARG(TARG));
LvTARG(TARG) = SvREFCNT_inc_simple(keys);
}
PUSHs(TARG);