[Bug fortran/63352] problem with fmt_g0_1.f08 on i386-pc-solaris2.11

[richard at netbsd dot org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=63352

--- Comment #7 from Richard PALO <richard at netbsd dot org> ---
$ cat test.f08
    character(25) :: string = "(g0,g0,g0)" 
    character(50) :: buffer
    write(buffer, string) ':',1.0_8/3.0_8,':'
    print *, "'", buffer, "'"
    print *, "'", " :.33333333333333331:", "'"
    write(buffer, '(1x,a,g0,a)') ':',1.0_8/3.0_8,':'
    print *, "'", buffer, "'"
    print *, "'", " :.33333333333333331:", "'"
end
$ gfortran  test.f08 -o test
$ ./test
 ':.33333333333333332:                              '
 ' :.33333333333333331:'
 ' :.33333333333333332:                             '
 ' :.33333333333333331:'

Output the same with/without
attached is the .s