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: gs...@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
