flang/test/Semantics/OpenMP/target-update01.f90

   1 ! RUN: %python %S/../test_errors.py %s %flang_fc1 -fopenmp
   2
   3 subroutine 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
  21 end subroutine