This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perl.h: Fix typos in conditional macro names
authorTAKAI Kousuke <62541129+t-a-k@users.noreply.github.com>
Thu, 14 Jan 2021 14:12:26 +0000 (23:12 +0900)
committerKarl Williamson <khw@cpan.org>
Fri, 15 Jan 2021 00:55:57 +0000 (17:55 -0700)
perl.h

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_IEEEFP
 #        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_INFL) && defined(HAS_NANL)
+#    elif defined(HAS_ISINFL) && defined(HAS_ISNANL)
 #        define Perl_isfinitel(x) !(isinfl(x)||isnanl(x))
 #    else
 #        define Perl_isfinitel(x) ((x) * 0 == 0)  /* See Perl_isfinite. */