1subroutine bar
2!$omp requires atomic_default_mem_order(seq_cst)
3!$omp requires unified_shared_memory
4end
5
6subroutine foo
7!$omp requires unified_shared_memory
8!$omp requires unified_shared_memory
9!$omp requires atomic_default_mem_order(relaxed)
10!$omp requires atomic_default_mem_order(relaxed)
11!$omp requires atomic_default_mem_order(seq_cst) ! { dg-error "overrides a previous 'atomic_default_mem_order\\(seq_cst\\)'" }
12  !$omp target
13  !$omp end target
14end
15
16! { dg-prune-output "not yet supported" }
17