summaryrefslogtreecommitdiff
path: root/numeric.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2014-08-23 08:40:51 -0400
committerJarkko Hietaniemi <jhi@iki.fi>2014-08-23 08:40:51 -0400
commit3585840c77ee62aad99e7cf10028c1b1c8873935 (patch)
tree7a79f54c5c9f7588818122a26d72a53ecf91491e /numeric.c
parent3761cb2c37385299211e45c965fb0d727e13c80b (diff)
downloadperl-3585840c77ee62aad99e7cf10028c1b1c8873935.tar.gz
The less-than-zero branch needs to be the default always.
Diffstat (limited to 'numeric.c')
-rw-r--r--numeric.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/numeric.c b/numeric.c
index 26d795c5d8..daaec06d0e 100644
--- a/numeric.c
+++ b/numeric.c
@@ -1352,9 +1352,8 @@ Perl_signbit(NV x) {
# ifdef Perl_fp_class_nzero
if (x == 0)
return Perl_fp_class_nzero(x);
-# else
- return (x < 0.0) ? 1 : 0;
# endif
+ return (x < 0.0) ? 1 : 0;
}
#endif