https://gcc.gnu.org/bugzilla/show_bug.cgi?id=94348
Bug ID: 94348
Summary: gfortran 8/9 reject module procedure definition in
same module as function interface
Product: gcc
Version: 9.2.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: damian at sourceryinstitute dot org
Target Milestone: ---
$ cat foo.f90
module foo_module
implicit none
interface
module function foo() result(bar)
implicit none
integer bar
end function
end interface
contains
module procedure foo
bar = 0
end procedure
end module
localhost:modules rouson$ gfortran -c foo.f90
foo.f90:13:7:
13 | bar = 0
| 1
Error: Symbol 'bar' at (1) has no IMPLICIT type
localhost:modules rouson$ gfortran --version
GNU Fortran (Homebrew GCC 9.2.0_3) 9.2.0
