------- Comment #1 from burnus at gcc dot gnu dot org 2008-01-14 22:38 -------
Jerry, do you have an idea?
Confirm. Reduced test case:
character a(6)
a = transfer("abcdef", a,size(a))
write(*,'(T20,A3, T1,A4, T5,A2, T7,A2, T9,A4, T17,A1)') a
end
Expected:
b c d e f a
Actual:
b c d e f
Using "character(5)" works.
(Don't forget to test also the big test case; ifort for instance passes the
test above, but writes non-printable characters (combined with "a" and " ") for
column > 135 while g95, openg95/sunf95 and NAG f95 work.)
--
burnus at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |jvdelisle at gcc dot gnu dot
| |org
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Keywords| |wrong-code
Last reconfirmed|0000-00-00 00:00:00 |2008-01-14 22:38:04
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34782
