PR inline-asm/84742

[official-gcc.git] / gcc / testsuite / gfortran.dg / pr59706.f90

! PR middle-end/59706
! { dg-do compile }

  integer i
  do concurrent (i=1:2)
  end do
contains
  subroutine foo
  end 
end