summaryrefslogtreecommitdiff
path: root/doop.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 /doop.c
parentc20642991d8e8afa0a97a45a55f0f04df68e5245 (diff)
downloadperl-ef8d46e8143455a8b73aff3ecaa10ca3cf293a4d.tar.gz
SvREFCNT_dec already checks if the SV is non-NULL (continued)
Diffstat (limited to 'doop.c')
-rw-r--r--doop.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/doop.c b/doop.c
index 3a5967d6dd..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;