[Bug fortran/69397] New: ICE on missing subprogram in generic interface

[gerhard.steinmetz.fortran@t-online.de]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=69397

            Bug ID: 69397
           Summary: ICE on missing subprogram in generic interface
           Product: gcc
           Version: 6.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gerhard.steinmetz.fortran@t-online.de
  Target Milestone: ---

$ cat z1.f90
program p
   interface f
      procedure f1
      !... more
   end interface
   integer, allocatable :: z
   print *, f(z)
contains
   integer function f2 (x)
      integer, allocatable :: x
      f2 = 1
   end
end


$ gfortran-6.0.0 -c z1.f90
z1.f90:3:18:

       procedure f1
                  1

Error: Procedure 'f1' in generic interface 'f' at (1) is neither function nor
subroutine
f951: internal compiler error: in gfc_arglist_matches_symbol, at
fortran/interface.c:3509

---

$ gfortran-5.3.1 -c z1.f90
...
(null):0: confused by earlier errors, bailing out


$ gfortran-4.9.0 -c z1.f90
...
f951: internal compiler error: in gfc_arglist_matches_symbol, at
fortran/interface.c:3406