xref: /llvm-project/flang/test/Semantics/modfile51.f90 (revision dd41453f1b5ee2b393f701c9f7b0619ec1dd8744)
1! RUN: %python %S/test_modfile.py %s %flang_fc1
2! Allow a generic spec that is not a name to be declared on an
3! accessibility control statement
4module m
5  public :: assignment(=)
6  public :: read(unformatted)
7  public :: operator(.eq.)
8  public :: operator(.smooth.)
9end module
10
11!Expect: m.mod
12!module m
13!interface assignment(=)
14!end interface
15!interface read(unformatted)
16!end interface
17!interface operator(.eq.)
18!end interface
19!interface operator(.smooth.)
20!end interface
21!end
22