From caa42d865f3ad3bd6986145a5e2e6597cacbcb48 Mon Sep 17 00:00:00 2001 From: Tobias Burnus Date: Sun, 6 Jan 2008 19:11:42 +0100 Subject: [PATCH] equiv_constraint_9.f90: Fix typo. 2008-01-06 Tobias Burnus * gfortran.dg/equiv_constraint_9.f90: Fix typo. From-SVN: r131354 --- gcc/testsuite/ChangeLog | 4 ++++ gcc/testsuite/gfortran.dg/equiv_constraint_9.f90 | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 549a0074f6b9..39188cc8f9c2 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2008-01-06 Tobias Burnus + + * gfortran.dg/equiv_constraint_9.f90: Fix typo. + 2008-01-06 Tobias Burnus PR fortran/34655 diff --git a/gcc/testsuite/gfortran.dg/equiv_constraint_9.f90 b/gcc/testsuite/gfortran.dg/equiv_constraint_9.f90 index 337444140111..0e4e832c4b0b 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 -- 2.47.2