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

diff --git a/gcc/testsuite/gfortran.dg/complex_write.f90 b/gcc/testsuite/gfortran.dg/complex_write.f90
index 3b73ba3a023b9b99b521412937c3dea2824d0cd3..694c069e368777d7fe07e8ac2f67745ce835003e 100644 (file)
--- a/gcc/testsuite/gfortran.dg/complex_write.f90
+++ b/gcc/testsuite/gfortran.dg/complex_write.f90
@@ -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