| Index: gcc/gcc/testsuite/gfortran.dg/interface_21.f90
|
| diff --git a/gcc/gcc/testsuite/gfortran.dg/interface_21.f90 b/gcc/gcc/testsuite/gfortran.dg/interface_21.f90
|
| index fea6507b05d5ab618372e7e70ee68fe4c1817214..566a9ef37075d7273595bd47f668d26a2e352403 100644
|
| --- a/gcc/gcc/testsuite/gfortran.dg/interface_21.f90
|
| +++ b/gcc/gcc/testsuite/gfortran.dg/interface_21.f90
|
| @@ -18,5 +18,8 @@ end module m
|
| use m
|
| implicit none
|
| EXTERNAL foo ! implicit interface is undefined
|
| -call sub(foo) ! { dg-error "Type/rank mismatch in argument" }
|
| +call sub(foo) ! { dg-error "is not a function" }
|
| end
|
| +
|
| +! { dg-final { cleanup-modules "m" } }
|
| +
|
|
|