From 87ac6a500a79d67ce4ef3cd0980eedf195ad33d0 Mon Sep 17 00:00:00 2001
From: Francois-Xavier Coudert <coudert@clipper.ens.fr>
Date: Tue, 5 Apr 2005 21:45:41 +0200
Subject: [PATCH] * gfortran.dg/pr20755.f: Fixed bad format.
From-SVN: r97650
---
gcc/testsuite/ChangeLog | 4 ++++
gcc/testsuite/gfortran.dg/pr20755.f | 2 +-
2 files changed, 5 insertions(+), 1 deletion(-)
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
--
GitLab