blob: bb7266a52f61e9fc4a7d5b820d3f3670718443d4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
! RUN: %python %S/../test_errors.py %s %flang -fopenmp
! OpenMP Version 5.0
! 2.10.3 taskloop simd Construct
program omp_taskloop_simd
integer i , j , k
!$omp taskloop simd reduction(+:k)
do i=1,10000
do j=1,i
k = k + 1
end do
end do
!$omp end taskloop simd
end program omp_taskloop_simd
|