From: fxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Tue, 5 Apr 2005 19:45:41 +0000 (+0000)
Subject: 	* gfortran.dg/pr20755.f: Fixed bad format.
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=cce7d16e8c6047c02f61bf8e7ab2a5b4cafd5fa0;p=thirdparty%2Fgcc.git

	* gfortran.dg/pr20755.f: Fixed bad format.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@97650 138bc75d-0d04-0410-961f-82ee72b054a4
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 21becd6e7fde..f5cab7463f33 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2005-04-05  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
+
+	* gfortran.dg/pr20755.f: Fixed bad format.
+
 2005-04-05  Mark Mitchell  <mark@codesourcery.com>
 
 	PR c++/20763
diff --git a/gcc/testsuite/gfortran.dg/pr20755.f b/gcc/testsuite/gfortran.dg/pr20755.f
index 07c72ae4134e..e2bac5a7dccc 100644
--- a/gcc/testsuite/gfortran.dg/pr20755.f
+++ b/gcc/testsuite/gfortran.dg/pr20755.f
@@ -6,5 +6,5 @@
       if (s .ne. "    0.00       2.000E-02") call abort
       write (s,2000) 0.01, 0.02
       if (s .ne. "   1.000E-02   2.000E-02") call abort
- 2000 format (1P2G12.3)
+ 2000 format (1PG12.3,G12.3)
       end