[gfortran] I/O of large integer and real kinds, round 2.1
Steve Kargl
sgk@troutmask.apl.washington.edu
Tue Jun 21 19:04:00 GMT 2005
On Mon, Jun 20, 2005 at 11:31:46PM +0200, FX Coudert wrote:
> >>Built, tested and regtested on:
> >> - i686-linux, which has real(10)
> >> - i386-freebsd
> >> - sparc-solaris, which has real(16)
> >> - x86_64-linux, which has real(10) and integer(16)
> >> - alpha-linux, which has integer(16)
>
> Well, the patch doesn't apply cleanly on CVS anymore (due to another of
> my patches), so here is the new diff (well, I didn't do all the
> regtesting again; i686-linux is under way, though).
>
> OK for mainline? (and should it be backported to 4.0, too?)
>
> FX
I sprinkled some debugging printfs into write.c around line 385.
There is some type of problem with the implementation of log10l()
narrow HUGE() and TINY() for REAL*10 on amd64-*-freebsd.
abslog = inf
edigits = -2147483647
buffer = +1.189731e+4932
ndigits = -2147483622
--
steve
More information about the Fortran
mailing list