Dead
[official-gcc.git] / gomp-20050608-branch / gcc / testsuite / gfortran.fortran-torture / compile / module_proc.f90
blob17386d4b8e006687782b46eea37c0dc29f718369
1 ! Check module procedures with arguments
2 module module_proc
3 contains
4 subroutine s(p)
5 integer p
6 end subroutine
7 end module
9 program test
10 use module_proc
11 integer i
12 call s(i)
13 end program