[Bug fortran/60128] [4.8/4.9 Regression] Wrong ouput using en edit descriptor
ro at CeBiTec dot Uni-Bielefeld.DE
gcc-bugzilla@gcc.gnu.org
Wed Mar 19 09:30:00 GMT 2014
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60128
--- Comment #26 from ro at CeBiTec dot Uni-Bielefeld.DE <ro at CeBiTec dot Uni-Bielefeld.DE> ---
> --- Comment #24 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
> Rainer,
>
> can you test the following patch?
>
> --- _clean/gcc/testsuite/gfortran.dg/fmt_en.f90 2014-03-04
> 17:51:04.000000000 +0100
> +++ work/gcc/testsuite/gfortran.dg/fmt_en.f90 2014-03-18 18:08:22.000000000
> +0100
> @@ -128,6 +128,9 @@ contains
> else if (i == 3) then
> write(s, fmt) real(x,kind=j(3))
> else if (i == 4) then
> + ! skip if real(16) are not rounded to nearest (Solaris 9/x86)
> + write(s, '(F3.1)') real(9.49999905,kind=j(4))
> + if (s /= '9.5') exit
> write(s, fmt) real(x,kind=j(4))
> end if
> n_tst = n_tst + 1
This passes on both i386-pc-solaris2.9 and i386-pc-solaris2.11.
Rainer
More information about the Gcc-bugs
mailing list