Commit c1c42f20 by Bud Davis

complex_write.f90: removed extraneous comma.

2004-12-23  Bud Davis  <bdavis9659@comcast.net>

	* gfortran.dg/complex_write.f90: removed extraneous comma.

From-SVN: r92584
parent 3c028f65
......@@ -7,7 +7,7 @@
real r1,r2
a = cmplx(1.0, 2.0)
open(unit=74,status='scratch')
write(74,'(1P,E13.5)'),a
write(74,'(1P,E13.5)')a
rewind(74)
! can read the complex in as two reals, one on each line
read(74,'(E13.5)')r1,r2
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment