[gfortran, patch] provide isfinite as a macro

[FX Coudert]

>>+#define isfinite(x) (((x) == (x)) && ((2 * (x) != (x)) || ((x) == 0)))
> 
> Isn't ((x) - (x) == 0) a better definition?

Right. New patch attached, now regtested on i686-cygwin and 
sparc-solaris2.7. OK for mainline and 4.0?

FX
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: isfinite.ChangeLog
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20050803/29acec7b/attachment.ksh>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: isfinite.diff
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20050803/29acec7b/attachment-0001.ksh>