1! { dg-do assemble } 2module n 3private u 4contains 5 subroutine u 6 end subroutine u 7end module n 8module m 9 private :: u 10contains 11 subroutine u 12 end subroutine u 13end module m 14