21 lines · plain
1! RUN: %python %S/../test_errors.py %s %flang_fc1 -fopenmp2 3program main4 implicit none5 integer, parameter :: n = 1006 integer, parameter :: expected = n+27 integer :: i8 integer :: counter9 10 counter = 011 !ERROR: TARGET construct with nested TEAMS region contains statements or directives outside of the TEAMS construct12 !$omp target map(tofrom:counter)13 counter = counter+114 !$omp teams distribute reduction(+:counter)15 do i=1, n16 counter = counter+117 end do18 counter = counter+119 !$omp end target20 end program21