! RUN: %python %S/test_modfile.py %s %flang_fc1 | |
! Allow a generic spec that is not a name to be declared on an | |
! accessibility control statement | |
module m | |
public :: assignment(=) | |
public :: read(unformatted) | |
public :: operator(.eq.) | |
public :: operator(.smooth.) | |
end module | |
!Expect: m.mod | |
!module m | |
!interface assignment(=) | |
!end interface | |
!interface read(unformatted) | |
!end interface | |
!interface operator(.eq.) | |
!end interface | |
!interface operator(.smooth.) | |
!end interface | |
!end |