22 lines · plain
1! RUN: %python %S/test_modfile.py %s %flang_fc12! Allow a generic spec that is not a name to be declared on an3! accessibility control statement4module m5 public :: assignment(=)6 public :: read(unformatted)7 public :: operator(.eq.)8 public :: operator(.smooth.)9end module10 11!Expect: m.mod12!module m13!interface assignment(=)14!end interface15!interface read(unformatted)16!end interface17!interface operator(.eq.)18!end interface19!interface operator(.smooth.)20!end interface21!end22