blob: 29b933e81252cfc37f80b9837e8ec0cad398f28e [file] [log] [blame]
program main
implicit none
interface
subroutine func() bind(C)
end subroutine
end interface
call func()
end program