This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
6cc408b
)
Fix syntax error wwhen NAN_COMPARE_BROKEN
author
Karl Williamson
<khw@cpan.org>
Mon, 5 Jul 2021 21:47:26 +0000
(15:47 -0600)
committer
Nicholas Clark
<nick@ccl4.org>
Tue, 6 Jul 2021 10:39:51 +0000
(10:39 +0000)
http://nntp.perl.org/group/perl.perl5.porters/26082
sv.c
patch
|
blob
|
blame
|
history
diff --git
a/sv.c
b/sv.c
index
3c69dec
..
e53f68c
100644
(file)
--- a/
sv.c
+++ b/
sv.c
@@
-9147,7
+9147,7
@@
Perl_sv_dec_nomg(pTHX_ SV *const sv)
UNLIKELY(was <= -NV_OVERFLOWS_INTEGERS_AT ||
was > NV_OVERFLOWS_INTEGERS_AT) &&
#if defined(NAN_COMPARE_BROKEN)
- LIKELY(!Perl_isinfnan(was))
)
+ LIKELY(!Perl_isinfnan(was))
#else
LIKELY(!Perl_isinf(was))
#endif