------- Additional Comments From tkoenig at gcc dot gnu dot org 2005-07-14 07:12 ------- We are assuming at most three digits for the exponent, which isn't true for a kind=10 real. This is both in unformatted and formatted output.
$ cat tiny2.f90 program main real(kind=10) a a = tiny(a) print '(G20.10)',a print '(G20.10E4)',a end program main $ gfortran tiny2.f90 $ ./a.out ******************** 0.3362103143E-4931 -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=22436
