blob: 66bc56405b08c2ee6f7c8846a9e0c6411f83d1d8 [file] [log] [blame]
! { dg-do compile }
! { dg-options "-fmodule-private" }
module bar
implicit none
public :: i
integer :: i
end module bar
module foo
implicit none
integer :: j
end module foo
program main
use bar, only : i
use foo, only : j ! { dg-error "not found in module" }
i = 1
j = 1
print *, i, j
end program main