Index: gcc/gcc/testsuite/gfortran.dg/cray_pointers_1.f90 |
diff --git a/gcc/gcc/testsuite/gfortran.dg/cray_pointers_1.f90 b/gcc/gcc/testsuite/gfortran.dg/cray_pointers_1.f90 |
index b23a300feac01228558f3119bfc7c0aee627bd2b..87ace6848bdabe151a923b05a9761ee212d3862a 100644 |
--- a/gcc/gcc/testsuite/gfortran.dg/cray_pointers_1.f90 |
+++ b/gcc/gcc/testsuite/gfortran.dg/cray_pointers_1.f90 |
@@ -21,7 +21,7 @@ subroutine err3 |
real array(*) |
pointer (ipt, array) |
ipt = loc (target) |
- array = 0 ! { dg-error "Vector assignment" } |
+ array = 0 ! { dg-error "upper bound in the last dimension" } |
end subroutine err3 |
subroutine err4 |