flang/test/Semantics/OpenMP/requires09.f90

! RUN: %python %S/../test_errors.py %s %flang -fopenmp
! OpenMP Version 5.0
! 2.4 Requires directive
! All atomic_default_mem_order clauses in 'requires' directives found within a
! compilation unit must specify the same ordering.

subroutine f
  !$omp requires atomic_default_mem_order(seq_cst)
end subroutine f

!ERROR: Conflicting 'ATOMIC_DEFAULT_MEM_ORDER' REQUIRES clauses found in compilation unit
subroutine g
  !$omp requires atomic_default_mem_order(relaxed)
end subroutine g