diff options
author | Tobias Burnus <burnus@net-b.de> | 2008-11-12 23:27:10 +0100 |
---|---|---|
committer | Tobias Burnus <burnus@gcc.gnu.org> | 2008-11-12 23:27:10 +0100 |
commit | 63b0fc00a45321c84bb4dcad97dcfdb43b74db63 (patch) | |
tree | 4822977b0555359396450bb5ef4a59408ae7fa4c | |
parent | 084eb83032ac2d343ac2e7d2b355ac0b12a02659 (diff) | |
download | gcc-63b0fc00a45321c84bb4dcad97dcfdb43b74db63.zip gcc-63b0fc00a45321c84bb4dcad97dcfdb43b74db63.tar.gz gcc-63b0fc00a45321c84bb4dcad97dcfdb43b74db63.tar.bz2 |
re PR fortran/38094 (gfortran.dg/private_type_4.f90 -O doesn't work)
2008-11-12 Tobias Burnus <burnus@net-b.de>
PR fortran/38094
* gfortran.dg/private_type_4.f90: Fix dg-error pattern.
From-SVN: r141811
-rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/private_type_4.f90 | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 74c5006..432b55e 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2008-11-12 Tobias Burnus <burnus@net-b.de> + + PR fortran/38094 + * gfortran.dg/private_type_4.f90: Fix dg-error pattern. + 2008-11-12 Jakub Jelinek <jakub@redhat.com> PR c++/36478 diff --git a/gcc/testsuite/gfortran.dg/private_type_4.f90 b/gcc/testsuite/gfortran.dg/private_type_4.f90 index 2980278..42303ca 100644 --- a/gcc/testsuite/gfortran.dg/private_type_4.f90 +++ b/gcc/testsuite/gfortran.dg/private_type_4.f90 @@ -14,7 +14,7 @@ module m1 contains - type(t1) function f1() ! { dg-error "cannot be of PRIVATE type" } + type(t1) function f1() ! { dg-error "of PRIVATE derived type" } end function end module |