regression in list directed write

[Steve Kargl]

On Tue, Jan 11, 2005 at 02:47:49PM -0500, Andrew Pinski wrote:
> > 
> > Andrew,
> > 
> > isfinite (real) is broken in all the Cygwin implementations of gcc but
> > isnan(real)works correctly.
> > 
> > Happily, finite( float or double ) works perfectly.  I have tested it in
> > ~/libgfortran/io/write.c and it corrects the problem with gfortran on both
> > i686 and Athlon.  On Tru64, I do not seem able to stop the floating
> > exceptions that produce the output in question!  Equally, I have been unable
> > to link C programmes to finite or infinite, so I do not know what the gcc
> > build is doing.
> > 
> > Perhaps a conditional modification is in order?
> > 
> > Could you please do the necessary incantations with your system?
> 
> Well I would file a bug with cygwin, then, there are reasons why it is
> isfinite but I cannot remember.
> 

http://gcc.gnu.org/ml/fortran/2004-11/msg00157

2004-11-22  Steven Bosscher  <stevenb@suse.de>

        PR libfortran/15960
        * configure.ac: Check for finite in libm.
        * libgfortran.h: Define isfinite macro if not defined.
        * intrinsics/c99_functions.c: Use defined(fpclassify) instead of
        HAVE_FPCLASSIFY.
        * io/write.c (write_float): Use isfinite instead of finite.
        * configure, config.h.in: Rebuilt.


-- 
Steve