! Tests that there no debug-info conflicts arise because of DI attached to nested
! OMP regions arguments.
! RUN: %flang -c -fopenmp -g -mmlir --openmp-enable-delayed-privatization=true \
! RUN: %s -o - 2>&1 | FileCheck %s
subroutine bar (b)
integer :: a, b
!$omp parallel
do a = 1, 10
b = a
end do
!$omp end parallel
end subroutine bar
! CHECK-NOT: conflicting debug info for argument