https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68318
--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de>
---
Somehow similar for functions :
$ cat z3.f90
module m
contains
real function f1()
entry e()
end
real function f2()
entry e()
end
end module
$ gfortran -g -O0 -Wall -fcheck=all -c z3.f90
z3.f90:7.10:
entry e()
1
z3.f90:4.10:
entry e()
2
Error: Procedure 'e' at (1) is already defined at (2)
f951: internal compiler error: in gfc_release_symbol, at fortran/symbol.c:2591
---
And interestingly, detected with explicit declaration of e :
$ cat z4.f90
module m
implicit none
contains
real function f1()
real :: e
entry e()
end
real function f2()
real :: e
entry e()
end
end module
$ gfortran -g -O0 -Wall -fcheck=all -c z4.f90
z4.f90:10.10:
entry e()
1
z4.f90:5.15:
real :: e
2
Error: Procedure 'e' at (1) is already defined at (2)
