You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
18 lines
305 B
18 lines
305 B
4 months ago
|
! RUN: %S/test_modfile.sh %s %t %f18
|
||
|
|
! Check that implicitly typed entities get a type in the module file.
|
||
|
|
|
||
|
|
module m
|
||
|
|
public :: a
|
||
|
|
private :: b
|
||
|
|
protected :: i
|
||
|
|
allocatable :: j
|
||
|
|
end
|
||
|
|
|
||
|
|
!Expect: m.mod
|
||
|
|
!module m
|
||
|
|
! real(4)::a
|
||
|
|
! real(4),private::b
|
||
|
|
! integer(4),protected::i
|
||
|
|
! integer(4),allocatable::j
|
||
|
|
!end
|