! 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