diff options
author | James E Keenan <jkeenan@cpan.org> | 2018-11-23 13:45:25 -0500 |
---|---|---|
committer | James E Keenan <jkeenan@cpan.org> | 2018-11-25 20:57:08 -0500 |
commit | 41b654eb4e6464cf37e5ee236d2800e73948778c (patch) | |
tree | e7c7305fdb68e83429c79d32a4dd135504d43ae1 /sv.c | |
parent | 42aeee0b5e6db057f7ff946e41a33da5a0074724 (diff) | |
download | perl-41b654eb4e6464cf37e5ee236d2800e73948778c.tar.gz |
Eliminate empty conditional branch
Per: https://lgtm.com/projects/g/Perl/perl5/alerts/?mode=tree&ruleFocus=2154840803
For: RT 133686 (partial)
Diffstat (limited to 'sv.c')
-rw-r--r-- | sv.c | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -5164,9 +5164,8 @@ S_sv_uncow(pTHX_ SV * const sv, const U32 flags) SvCUR_set(sv, cur); *SvEND(sv) = '\0'; } - if (len) { - } else { - unshare_hek(SvSHARED_HEK_FROM_PV(pvx)); + if (! len) { + unshare_hek(SvSHARED_HEK_FROM_PV(pvx)); } #ifdef DEBUGGING if (DEBUG_C_TEST) |