1! RUN: %python %S/../test_errors.py %s %flang -fopenmp 2! OpenMP Version 5.0 3! 2.4 Requires directive 4! Target-related clauses in 'requires' directives must come strictly before any 5! device constructs, such as target teams distribute parallel do loops. 6 7subroutine f 8 !$omp target teams distribute parallel do 9 do i=1, 10 10 end do 11 !$omp end target teams distribute parallel do 12end subroutine f 13 14subroutine g 15 !ERROR: REQUIRES directive with 'DYNAMIC_ALLOCATORS' clause found lexically after device construct 16 !$omp requires dynamic_allocators 17 !ERROR: REQUIRES directive with 'REVERSE_OFFLOAD' clause found lexically after device construct 18 !$omp requires reverse_offload 19 !ERROR: REQUIRES directive with 'UNIFIED_ADDRESS' clause found lexically after device construct 20 !$omp requires unified_address 21 !ERROR: REQUIRES directive with 'UNIFIED_SHARED_MEMORY' clause found lexically after device construct 22 !$omp requires unified_shared_memory 23end subroutine g 24