2008-01-06 Tobias Burnus <burnus@net-b.de>

        * gfortran.dg/equiv_constraint_9.f90: Fix typo.

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

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 549a007..39188cc 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,5 +1,9 @@
 2008-01-06  Tobias Burnus  <burnus@net-b.de>
 
+       * gfortran.dg/equiv_constraint_9.f90: Fix typo.
+
+2008-01-06  Tobias Burnus  <burnus@net-b.de>
+
        PR fortran/34655
        * gfortran.dg/equiv_constraint_9.f90: New.
 

diff --git a/gcc/testsuite/gfortran.dg/equiv_constraint_9.f90 b/gcc/testsuite/gfortran.dg/equiv_constraint_9.f90
index 3374441..0e4e832 100644 (file)
--- a/gcc/testsuite/gfortran.dg/equiv_constraint_9.f90
+++ b/gcc/testsuite/gfortran.dg/equiv_constraint_9.f90
@@ -20,7 +20,7 @@ end type data_type2
 type(data_type) :: dd, ff
 type(data_type2) :: gg
 integer :: j, k, m
-EQUIVALENCE(dd,J) ! { dg-error "with default initializations cannot be in EQUIVALENCE with a variable in COMMON" }
+EQUIVALENCE(dd,J) ! { dg-error "with default initialization cannot be in EQUIVALENCE with a variable in COMMON" }
 EQUIVALENCE(ff,k)
 EQUIVALENCE(gg,m)
 COMMON /COM/ j