diff options
| -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 |