summaryrefslogtreecommitdiff
path: root/flang/test/Semantics/OpenMP/do-collapse.f90
diff options
context:
space:
mode:
Diffstat (limited to 'flang/test/Semantics/OpenMP/do-collapse.f90')
-rw-r--r--flang/test/Semantics/OpenMP/do-collapse.f901
1 files changed, 1 insertions, 0 deletions
diff --git a/flang/test/Semantics/OpenMP/do-collapse.f90 b/flang/test/Semantics/OpenMP/do-collapse.f90
index 480bd45b79b8..ec6a3bdad368 100644
--- a/flang/test/Semantics/OpenMP/do-collapse.f90
+++ b/flang/test/Semantics/OpenMP/do-collapse.f90
@@ -31,6 +31,7 @@ program omp_doCollapse
end do
end do
+ !ERROR: The value of the parameter in the COLLAPSE or ORDERED clause must not be larger than the number of nested loops following the construct.
!ERROR: At most one COLLAPSE clause can appear on the SIMD directive
!$omp simd collapse(2) collapse(1)
do i = 1, 4