Tests/RunCMake/try_run/main.f90


1
2
3
4
5
6
7
8
9
10
11
12

program main

implicit none

interface
subroutine func() bind(C)
end subroutine
end interface

call func()

end program