1! RUN: %S/test_errors.sh %s %t %flang -fopenmp 2! XFAIL: * 3 4! OpenMP Version 4.5 5! 2.7.1 Loop Construct 6! Exit statement terminating !$OMP DO loop 7 8program omp_do 9 integer i, j, k 10 11 !$omp do 12 do i = 1, 10 13 do j = 1, 10 14 print *, "Hello" 15 end do 16 !ERROR: EXIT statement terminating !$OMP DO loop 17 exit 18 end do 19 !$omp end do 20 21end program omp_do 22