flang/test/Semantics/OpenMP/depobj-construct-v51.f90


1
2
3
4
5
6
7
8
9
10
11
12
13

!RUN: %python %S/../test_errors.py %s %flang -fopenmp -fopenmp-version=51

subroutine f04
  integer :: obj
!ERROR: An UPDATE clause on a DEPOBJ construct must not have SINK, SOURCE or DEPOBJ as dependence type
  !$omp depobj(obj) update(source)
end

subroutine f05
  integer :: obj
!ERROR: An UPDATE clause on a DEPOBJ construct must not have SINK, SOURCE or DEPOBJ as dependence type
  !$omp depobj(obj) update(depobj)
end