$ cat cio.f
program cio
complex a
a = cmplx(1.0, 2.0)
print '(1P,E13.5)',a
end
$ gfortran cio.f
$ ./a.out
1.00000E+00 2.00000E+00
$ g77 cio.f
$ ./a.out
1.00000E+00
2.00000E+00
$ gfortran -v
Reading specs from /home/ig25/lib/gcc/i686-pc-linux-gnu/4.0.0/specs
Configured with: ../gcc/configure --prefix=/home/ig25
--enable-languages=c,c++,f95
Thread model: posix
gcc version 4.0.0 20041218 (experimental)
Possibly related to PR 10964.
--
Summary: complex formatted output has too many items
Product: gcc
Version: 4.0.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: libfortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: Thomas dot Koenig at online dot de
CC: gcc-bugs at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=19071
