This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug libfortran/22436] print *,tiny(1._10) yields asterisks
- From: "tkoenig at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 14 Jul 2005 07:12:47 -0000
- Subject: [Bug libfortran/22436] print *,tiny(1._10) yields asterisks
- References: <20050712112120.22436.tkoenig@gcc.gnu.org>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- 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