mirror of
https://github.com/autc04/Retro68.git
synced 2024-09-28 18:56:06 +00:00
10 lines
209 B
Fortran
10 lines
209 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
|