gcc/testsuite/gfortran.fortran-torture/compile/contained_1.f90


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

! Obscure failure that disappeared when the parameter was removed.
! Works OK now.
module mymod
implicit none
contains
   subroutine test(i)
      implicit none
      integer i
   end subroutine
end module mymod

program error
   use mymod
end program