flang/test/Semantics/modfile29.f90

   1 ! RUN: %S/test_modfile.sh %s %t %flang_fc1
   2 ! REQUIRES: shell
   3 ! Check that implicitly typed entities get a type in the module file.
   4
   5 module m
   6   public :: a
   7   private :: b
   8   protected :: i
   9   allocatable :: j
  10 end
  11
  12 !Expect: m.mod
  13 !module m
  14 ! real(4)::a
  15 ! real(4),private::b
  16 ! integer(4),protected::i
  17 ! integer(4),allocatable::j
  18 !end