diff options
| author | David Mitchell <davem@iabyn.com> | 2013-11-16 00:01:32 +0000 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2013-11-16 00:01:32 +0000 |
| commit | 659c4b9601a634cd50919970684ee46143183238 (patch) | |
| tree | eb876c46404f7b1e190a307d6831e0bc6d651921 /numeric.c | |
| parent | 16f3356ebb78fba83c909d19134ee12e98557f24 (diff) | |
| download | perl-659c4b9601a634cd50919970684ee46143183238.tar.gz | |
Revert "make perl core quiet under -Wfloat-equal"
A suggested way of avoiding the the warning on nv1 != nv2
by replacing it with (nv1 < nv2 || nv1 > nv2), has too many issues
with NaN. [perl #120538].
I haven't found any other way of selectively disabling the warning,
so for now I'm just reverting the whole commit.
This reverts commit c279c4550ce59702722d0921739b1a1b92701b0d.
Diffstat (limited to 'numeric.c')
| -rw-r--r-- | numeric.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -780,8 +780,8 @@ S_mulexp10(NV value, I32 exponent) if (exponent == 0) return value; - if (NV_eq_nowarn(value, 0.0)) - return (NV)0.0; + if (value == 0) + return (NV)0; /* On OpenVMS VAX we by default use the D_FLOAT double format, * and that format does not have *easy* capabilities [1] for |