9 lines
100 B
Fortran
9 lines
100 B
Fortran
|
submodule(m:s1) s2
|
||
|
|
integer s2_x
|
||
|
|
end
|
||
|
|
|
||
|
|
!Expect: m-s2.mod
|
||
|
|
!submodule(m:s1) s2
|
||
|
|
!integer(4)::s2_x
|
||
|
|
!end
|