12 lines
253 B
Fortran
12 lines
253 B
Fortran
|
! { dg-do compile }
|
||
|
! PR 20363
|
||
|
module snafu
|
||
|
interface foo
|
||
|
subroutine really_snafu (foo)
|
||
|
integer, intent (inout) :: foo
|
||
|
end subroutine really_snafu
|
||
|
end interface foo
|
||
|
end module snafu
|
||
|
|
||
|
! { dg-final { cleanup-modules "snafu" } }
|