diff options
Diffstat (limited to 'gcc-4.9/gcc/testsuite/gfortran.dg/pointer_intent_7.f90')
| -rw-r--r-- | gcc-4.9/gcc/testsuite/gfortran.dg/pointer_intent_7.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc-4.9/gcc/testsuite/gfortran.dg/pointer_intent_7.f90 b/gcc-4.9/gcc/testsuite/gfortran.dg/pointer_intent_7.f90 index c09eb2b5f..5387ace8c 100644 --- a/gcc-4.9/gcc/testsuite/gfortran.dg/pointer_intent_7.f90 +++ b/gcc-4.9/gcc/testsuite/gfortran.dg/pointer_intent_7.f90 @@ -23,7 +23,7 @@ contains call bar2 (c) call bar3 (c) call bar2p (b) ! { dg-error "INTENT\\(IN\\) in pointer association context \\(actual argument to INTENT = OUT/INOUT" } - call bar3p (b) ! { dg-error "INTENT\\(IN\\) in pointer association context \\(actual argument to INTENT = OUT/INOUT" } + call bar3p (b) ! { dg-error "Actual argument to .n. at \\(1\\) must be polymorphic" } call bar2p (c) ! { dg-error "INTENT\\(IN\\) in pointer association context \\(actual argument to INTENT = OUT/INOUT" } call bar3p (c) ! { dg-error "INTENT\\(IN\\) in pointer association context \\(actual argument to INTENT = OUT/INOUT" } end subroutine |