1! RUN: %python %S/test_modfile.py %s %flang_fc1 2! Check modfile generation for external declarations 3module m 4 real, external :: a 5 logical b 6 external c 7 complex c 8 external b, d 9 procedure() :: e 10 procedure(real) :: f 11 procedure(s) :: g 12 type t 13 procedure(), pointer, nopass :: e 14 procedure(real), nopass, pointer :: f 15 procedure(s), private, pointer :: g 16 end type 17contains 18 subroutine s(x) 19 class(t) :: x 20 end 21end 22 23!Expect: m.mod 24!module m 25! procedure(real(4))::a 26! procedure(logical(4))::b 27! procedure(complex(4))::c 28! procedure()::d 29! procedure()::e 30! procedure(real(4))::f 31! procedure(s)::g 32! type::t 33! procedure(),nopass,pointer::e 34! procedure(real(4)),nopass,pointer::f 35! procedure(s),pointer,private::g 36! end type 37!contains 38! subroutine s(x) 39! class(t)::x 40! end 41!end 42