This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug libfortran/41711] Z format does not support writing KIND=10 reals
- From: "jvdelisle at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 16 Oct 2009 01:58:33 -0000
- Subject: [Bug libfortran/41711] Z format does not support writing KIND=10 reals
- References: <bug-41711-10743@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #8 from jvdelisle at gcc dot gnu dot org 2009-10-16 01:58 -------
This seems to work. (Although I thought I saw **** once for the z4 value.)
program z
implicit none
real(10) e
integer i
integer(8), dimension(2) :: it
call random_seed()
do i=1,100
call random_number(e)
it = transfer(e, it)
write(*,'(E24.17,3X,Z4,Z16))') e, it(2), it(1)
end do
end program z
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41711