xref: /llvm-project/flang/test/Semantics/OpenMP/target-update01.f90 (revision 502bea25bdc07d1811b8bfea1c2e6bfa8617f72f)
1! RUN: %python %S/../test_errors.py %s %flang_fc1 -fopenmp
2
3subroutine foo(x)
4  integer :: x
5  !ERROR: At least one motion-clause (TO/FROM) must be specified on TARGET UPDATE construct.
6  !$omp target update
7
8  !ERROR: At least one motion-clause (TO/FROM) must be specified on TARGET UPDATE construct.
9  !$omp target update nowait
10
11  !$omp target update to(x) nowait
12
13  !ERROR: At most one NOWAIT clause can appear on the TARGET UPDATE directive
14  !$omp target update to(x) nowait nowait
15
16  !ERROR: A list item ('x') can only appear in a TO or FROM clause, but not in both.
17  !BECAUSE: 'x' appears in the TO clause.
18  !BECAUSE: 'x' appears in the FROM clause.
19  !$omp target update to(x) from(x)
20
21end subroutine
22