https://gcc.gnu.org/bugzilla/show_bug.cgi?id=77534
Bug ID: 77534 Summary: ICE in check_dtio_arg_TKR_intent, at fortran/interface.c:4572 Product: gcc Version: 7.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran Assignee: unassigned at gcc dot gnu.org Reporter: gerhard.steinmetz.fort...@t-online.de Target Milestone: --- With a nonpolymorphic dtv : $ cat z1.f90 module m type t end type interface read(unformatted) module procedure s end interface contains subroutine s(dtv) type(t), intent(inout) :: dtv end end $ gfortran-7-20160904 z1.f90 z1.f90:8:19: subroutine s(dtv) 1 Error: DTIO dummy argument at (1) must be of type CLASS f951: internal compiler error: Segmentation fault 0xc2100f crash_signal ../../gcc/toplev.c:336 0x6926db check_dtio_arg_TKR_intent ../../gcc/fortran/interface.c:4572 0x6927f9 check_dtio_interface1 ../../gcc/fortran/interface.c:4662 0x69a2d8 gfc_check_dtio_interfaces(gfc_symbol*) ../../gcc/fortran/interface.c:4741 0x70c87b do_traverse_symtree ../../gcc/fortran/symbol.c:3939 0x6f65c0 resolve_types ../../gcc/fortran/resolve.c:15658 0x6f1d9c gfc_resolve(gfc_namespace*) ../../gcc/fortran/resolve.c:15730 0x6dd3a4 gfc_parse_file() ../../gcc/fortran/parse.c:6056 0x71f602 gfc_be_parse_file ../../gcc/fortran/f95-lang.c:198