summaryrefslogtreecommitdiff
path: root/sv.h
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-01-20 08:40:13 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-01-20 08:40:13 +0000
commitc2f1de04b50c19c25c9b2a25f30fea50533c143c (patch)
tree9a0b3bbdadd0968558836bf5115d4a24ca2f2e53 /sv.h
parent3635cd84fed55c19340154dd67365b31f440d029 (diff)
downloadperl-c2f1de04b50c19c25c9b2a25f30fea50533c143c.tar.gz
sv_true() has a superfluous test
p4raw-id: //depot/perl@4823
Diffstat (limited to 'sv.h')
-rw-r--r--sv.h6
1 files changed, 2 insertions, 4 deletions
diff --git a/sv.h b/sv.h
index 4505d60cca..eea984a570 100644
--- a/sv.h
+++ b/sv.h
@@ -676,8 +676,7 @@ struct xpvio {
: SvPOK(sv) \
? (({XPV *nxpv = (XPV*)SvANY(sv); \
nxpv && \
- (*nxpv->xpv_pv > '0' || \
- nxpv->xpv_cur > 1 || \
+ (nxpv->xpv_cur > 1 || \
(nxpv->xpv_cur && *nxpv->xpv_pv != '0')); }) \
? 1 \
: 0) \
@@ -712,8 +711,7 @@ struct xpvio {
? 0 \
: SvPOK(sv) \
? ((PL_Xpv = (XPV*)SvANY(sv)) && \
- (*PL_Xpv->xpv_pv > '0' || \
- PL_Xpv->xpv_cur > 1 || \
+ (PL_Xpv->xpv_cur > 1 || \
(PL_Xpv->xpv_cur && *PL_Xpv->xpv_pv != '0')) \
? 1 \
: 0) \