[gfortran,ping] support for large kinds in front-end and library

[Steve Kargl]

On Mon, Sep 12, 2005 at 10:58:41PM +0100, Paul Brook wrote:
> > Or, we could provide degraded functions that use the double type ones:
> >
> > #ifndef HAVE_ATAN2L
> > long double atan2l (long double x) { return (long double) atan2 ((double)
> > x); }
> > #endif 
> 
> IMHO this is sufficient.

Yes, this is sufficient to allow FX to commit his patch.
However, we need a HUGE DISCLAIMER in the documentation
that states gfortran may have unacceptably poor REAL(10)
intrinsics procedures.  Of course, we can hide behind the
"result has a value equal to a processor-dependent approximation
to ... " language found throughout 13.14.

   real(10) :: x = 1.e1000
   print*, log10(x)
   end

I suppose that "+Inf" is a good "processor-dependent approximation
to" 1000.

> If users want full support they should get their 
> system vendor to provide a libm that doesn't suck quite so much.

Thanks for the potshot.  Implementing C99 math functions isn't
easy unless you violate Copyright (as in glibc's roundl()).

-- 
Steve