OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

equiv_constraint_9.f90: Fix typo. 

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

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

From-SVN: r131354
This commit is contained in:
Tobias Burnus 2008-01-06 19:11:42 +01:00 committed by Tobias Burnus
parent cddcf0d4ae
commit caa42d865f
2 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/testsuite/ChangeLog
View File

@ -1,3 +1,7 @@
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

2
gcc/testsuite/gfortran.dg/equiv_constraint_9.f90
View File

@ -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