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 /sv.h | |
| 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 'sv.h')
| -rw-r--r-- | sv.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1762,7 +1762,7 @@ Like sv_utf8_upgrade, but doesn't do magic on C<sv>. ? SvPVXtrue(sv) \ : (SvFLAGS(sv) & (SVf_IOK|SVf_NOK)) \ ? ( (SvIOK(sv) && SvIVX(sv) != 0) \ - || (SvNOK(sv) && NV_ne_nowarn(SvNVX(sv), 0.0))) \ + || (SvNOK(sv) && SvNVX(sv) != 0.0)) \ : (fallback)) #if defined(__GNUC__) && !defined(PERL_GCC_BRACE_GROUPS_FORBIDDEN) |