1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
! RUN: %python %S/../test_errors.py %s %flang -fopenmp
! OpenMP Version 5.2
! 13.2 Device clause
subroutine foo
integer :: a
!$omp target device(ancestor:0)
!$omp end target
!$omp target device(device_num:0)
!$omp end target
!ERROR: The ANCESTOR device-modifier must not appear on the DEVICE clause on any directive other than the TARGET construct. Found on TARGET DATA construct.
!$omp target data device(ancestor:0) map(tofrom:a)
!$omp end target data
!$omp target data device(device_num:0) map(tofrom:a)
!$omp end target data
!ERROR: The ANCESTOR device-modifier must not appear on the DEVICE clause on any directive other than the TARGET construct. Found on TARGET ENTER DATA construct.
!$omp target enter data device(ancestor:0) map(to:a)
!$omp target exit data map(from:a)
!$omp target enter data device(device_num:0) map(to:a)
!$omp target exit data map(from:a)
!ERROR: The ANCESTOR device-modifier must not appear on the DEVICE clause on any directive other than the TARGET construct. Found on TARGET UPDATE construct.
!$omp target update device(ancestor:0) to(a)
!$omp target update device(device_num:0) to(a)
end subroutine foo
|
