re PR libfortran/19363 (List directed write of Infinity and NaN has regressed)

2005-02-01  Paul Thomas <paulthomas2@wanadoo.fr>

	PR libgfortran/19363
	PR libgfortran/19691
	* libgfortran.h (isfinite): Work around broken isfinite(x) in Cygwin.

From-SVN: r94530
This commit is contained in:
Paul Thomas 2005-02-01 10:06:22 +01:00 committed by Steven Bosscher
parent 9c0a30c366
commit e88334a68f
2 changed files with 13 additions and 2 deletions

View File

@ -1,3 +1,9 @@
2005-02-01 Paul Thomas <paulthomas2@wanadoo.fr>
PR libgfortran/19363
PR libgfortran/19691
* libgfortran.h (isfinite): Work around broken isfinite(x) in Cygwin.
2005-01-30 Bud Davis <bdavis@gfortran.org>
PR fortran/19647

View File

@ -171,9 +171,14 @@ typedef off_t gfc_offset;
/* The isfinite macro is only available with C99, but some non-C99
systems still provide fpclassify, and there is a `finite' function
in BSD. When isfinite is not available, try to use one of the
in BSD.
Also, isfinite is broken on Cygwin.
When isfinite is not available, try to use one of the
alternatives, or bail out. */
#if !defined(isfinite)
#if (!defined(isfinite) || defined(__CYGWIN__))
#undef isfinite
static inline int
isfinite (double x)
{