[Bug fortran/87908] New: ICE in check_interface0, at fortran/interface.c:1841

[gscfq@t-online.de]

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

            Bug ID: 87908
           Summary: ICE in check_interface0, at fortran/interface.c:1841
           Product: gcc
           Version: 9.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

ICE affects versions 8/9 :


$ cat z1.f90
module m
   type t
      character :: c
   contains
      procedure :: g
      generic :: read(formatted) => g
   end type
contains
   subroutine s (unit, x)
      integer, intent(in) :: unit
      integer, intent(in) :: x(:)
      interface read(formatted)
         procedure g
      end interface
   end
   subroutine g (dtv, unit, iotype, v_list, iostat, iomsg)
      class(t), intent(inout) :: dtv
      integer, intent(in) :: unit
      character(*), intent(in) :: iotype
      integer, intent(in) :: v_list(:)
      integer, intent(out) :: iostat
      character(*), intent(inout) :: iomsg
      read (unit, '(a)', iostat=iostat, iomsg=iomsg) dtv%c
   end
end


$ gfortran-9-20181104 -c z1.f90
f951: internal compiler error: Segmentation fault
0xb205df crash_signal
        ../../gcc/toplev.c:325
0x623c67 check_interface0
        ../../gcc/fortran/interface.c:1841
0x627694 check_sym_interfaces
        ../../gcc/fortran/interface.c:1974
0x6a9d12 do_traverse_symtree
        ../../gcc/fortran/symbol.c:4151
0x62a6c0 gfc_check_interfaces(gfc_namespace*)
        ../../gcc/fortran/interface.c:2085
0x68133d resolve_types
        ../../gcc/fortran/resolve.c:16635
0x681310 resolve_types
        ../../gcc/fortran/resolve.c:16630
0x68613c gfc_resolve(gfc_namespace*)
        ../../gcc/fortran/resolve.c:16733
0x673d02 gfc_parse_file()
        ../../gcc/fortran/parse.c:6266
0x6bc03f gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:204