diff options
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/equiv_constraint_9.f90 | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 549a007..39188cc 100644 --- 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 --- 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 |