xref: /llvm-project/flang/test/Semantics/modfile29.f90 (revision dc453dcf760e6d558da3a4d7fff301baa5f37aba)
1*dc453dcfSIvan Zhechev! RUN: %python %S/test_modfile.py %s %flang_fc1
264ab3302SCarolineConcatto! Check that implicitly typed entities get a type in the module file.
364ab3302SCarolineConcatto
464ab3302SCarolineConcattomodule m
564ab3302SCarolineConcatto  public :: a
664ab3302SCarolineConcatto  private :: b
764ab3302SCarolineConcatto  protected :: i
864ab3302SCarolineConcatto  allocatable :: j
964ab3302SCarolineConcattoend
1064ab3302SCarolineConcatto
1164ab3302SCarolineConcatto!Expect: m.mod
1264ab3302SCarolineConcatto!module m
1364ab3302SCarolineConcatto! real(4)::a
1464ab3302SCarolineConcatto! real(4),private::b
1564ab3302SCarolineConcatto! integer(4),protected::i
1664ab3302SCarolineConcatto! integer(4),allocatable::j
1764ab3302SCarolineConcatto!end
18