From: Tobias Burnus Date: Sun, 6 Jan 2008 18:11:42 +0000 (+0100) Subject: equiv_constraint_9.f90: Fix typo. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=caa42d865f3ad3bd6986145a5e2e6597cacbcb48;p=gcc.git equiv_constraint_9.f90: Fix typo. 2008-01-06 Tobias Burnus * gfortran.dg/equiv_constraint_9.f90: Fix typo. From-SVN: r131354 --- diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 549a0074f6b..39188cc8f9c 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 33744414011..0e4e832c4b0 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