32 lines · plain
1! RUN: %python %S/../test_errors.py %s %flang -fopenmp2! OpenMP Version 5.23! 13.2 Device clause4 5subroutine foo6 7 integer :: a8 9 !$omp target device(ancestor:0)10 !$omp end target11 !$omp target device(device_num:0)12 !$omp end target13 14 !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.15 !$omp target data device(ancestor:0) map(tofrom:a)16 !$omp end target data17 !$omp target data device(device_num:0) map(tofrom:a)18 !$omp end target data19 20 21 !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.22 !$omp target enter data device(ancestor:0) map(to:a)23 !$omp target exit data map(from:a)24 !$omp target enter data device(device_num:0) map(to:a)25 !$omp target exit data map(from:a)26 27 !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.28 !$omp target update device(ancestor:0) to(a)29 !$omp target update device(device_num:0) to(a)30 31end subroutine foo32