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:
b1b78d7
)
perl.h: Fix typos in conditional macro names
author
TAKAI Kousuke
<62541129+t-a-k@users.noreply.github.com>
Thu, 14 Jan 2021 14:12:26 +0000
(23:12 +0900)
committer
Karl Williamson
<khw@cpan.org>
Fri, 15 Jan 2021 00:55:57 +0000
(17:55 -0700)
perl.h
patch
|
blob
|
blame
|
history
diff --git
a/perl.h
b/perl.h
index
0ca6f89
..
93cc6b9
100644
(file)
--- a/
perl.h
+++ b/
perl.h
@@
-2483,7
+2483,7
@@
extern long double Perl_my_frexpl(long double x, int *e);
# define FP_QNAN FP_QNAN
# endif
# include <math.h>
-# ifdef I_IEEFP
+# ifdef I_IEE
E
FP
# include <ieeefp.h>
# endif
# ifdef I_FP
@@
-2692,7
+2692,7
@@
extern long double Perl_my_frexpl(long double x, int *e);
# define Perl_isfinitel(x) isfinitel(x)
# elif defined(HAS_FINITEL)
# define Perl_isfinitel(x) finitel(x)
-# elif defined(HAS_I
NFL) && defined(HAS_
NANL)
+# elif defined(HAS_I
SINFL) && defined(HAS_IS
NANL)
# define Perl_isfinitel(x) !(isinfl(x)||isnanl(x))
# else
# define Perl_isfinitel(x) ((x) * 0 == 0) /* See Perl_isfinite. */