blob: 7e858a5a26a953f5731bf2e49b095802b0e088e9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
! RUN: %S/test_errors.sh %s %t %f18 -fopenmp
! OpenMP Version 4.5
! 2.7.1 Loop Construct
! The loop iteration variable may not appear in a firstprivate directive.
program omp_do
integer i, j, k
!ERROR: DO iteration variable i is not allowed in FIRSTPRIVATE clause.
!$omp do firstprivate(k,i)
do i = 1, 10
do j = 1, 10
print *, "Hello"
end do
end do
!$omp end do
end program omp_do
|