https://gcc.gnu.org/bugzilla/show_bug.cgi?id=24878
Thomas Koenig <tkoenig at gcc dot gnu.org> changed: What |Removed |Added ---------------------------------------------------------------------------- Last reconfirmed|2018-01-05 00:00:00 |2019-11-24 --- Comment #6 from Thomas Koenig <tkoenig at gcc dot gnu.org> --- Just taking a look at this again. There are two points where an error could be issued. First, INTEGER X, Y, SUBA EXTERNAL SUBA clashes with SUBROUTINE SUBA(X) so we could flag this going through the global list of symbols. Second, EXTERNAL SUBA CALL ANY (FNC, X, Y) INTEGER FNC should also clash with SUBROUTINE SUBA(X) but that is much harder, because we would then have to check for the argument that is passed to ANY.