File tree Expand file tree Collapse file tree 2 files changed +13
-1
lines changed
flang/test/Semantics/OpenMP Expand file tree Collapse file tree 2 files changed +13
-1
lines changed Original file line number Diff line number Diff line change @@ -30,5 +30,11 @@ program omp_doCollapse
30
30
do
31
31
end do
32
32
end do
33
- end program omp_doCollapse
34
33
34
+ ! ERROR: At most one COLLAPSE clause can appear on the SIMD directive
35
+ ! $omp simd collapse(2) collapse(1)
36
+ do i = 1 , 4
37
+ j = j + i + 1
38
+ end do
39
+ ! $omp end simd
40
+ end program omp_doCollapse
Original file line number Diff line number Diff line change 131
131
! $omp end parallel do simd
132
132
! ERROR: The END PARALLEL DO SIMD directive must follow the DO loop associated with the loop construct
133
133
! $omp end parallel do simd
134
+
135
+ ! ERROR: A DO loop must follow the SIMD directive
136
+ ! $omp simd
137
+ a = i + 1
138
+ ! ERROR: The END SIMD directive must follow the DO loop associated with the loop construct
139
+ ! $omp end simd
134
140
end
You can’t perform that action at this time.
0 commit comments