[Bug fortran/66493] ICE on alternate return argument for typebound procedure

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

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

--- Comment #9 from Gerhard Steinmetz <gerhard.steinmetz.fortran@t-online.de> ---
Update, backtraces added :


$ gfortran-7-20160828 pr66493.f90
f951: internal compiler error: in resolve_typebound_procedure, at
fortran/resolve.c:12603
0x6e31ac resolve_typebound_procedure
        ../../gcc/fortran/resolve.c:12603
0x70a691 do_traverse_symtree
        ../../gcc/fortran/symbol.c:3936
0x6f5ef7 resolve_typebound_procedures
        ../../gcc/fortran/resolve.c:12708
0x6f5ef7 resolve_fl_derived
        ../../gcc/fortran/resolve.c:13417
0x6f0f36 resolve_symbol
        ../../gcc/fortran/resolve.c:13692
0x70a62b do_traverse_symtree
        ../../gcc/fortran/symbol.c:3930
0x6f3eea resolve_types
        ../../gcc/fortran/resolve.c:15489
0x6efb8c gfc_resolve(gfc_namespace*)
        ../../gcc/fortran/resolve.c:15600
0x6db3e4 gfc_parse_file()
        ../../gcc/fortran/parse.c:6055
0x71d3a2 gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:198

---


$ gfortran-7-20160828 zarc1_1.f90
f951: internal compiler error: Segmentation fault
0xc1e32f crash_signal
        ../../gcc/toplev.c:335
0x6e280f check_generic_tbp_ambiguity
        ../../gcc/fortran/resolve.c:12179
0x6e29e1 resolve_tb_generic_targets
        ../../gcc/fortran/resolve.c:12279
0x6e2ef7 resolve_typebound_generic
        ../../gcc/fortran/resolve.c:12336
0x6e2ef7 resolve_typebound_procedure
        ../../gcc/fortran/resolve.c:12510
0x70a691 do_traverse_symtree
        ../../gcc/fortran/symbol.c:3936
0x6f5ef7 resolve_typebound_procedures
        ../../gcc/fortran/resolve.c:12708
0x6f5ef7 resolve_fl_derived
        ../../gcc/fortran/resolve.c:13417
0x6f0f36 resolve_symbol
        ../../gcc/fortran/resolve.c:13692
0x70a62b do_traverse_symtree
        ../../gcc/fortran/symbol.c:3930
0x6f3eea resolve_types
        ../../gcc/fortran/resolve.c:15489
0x6efb8c gfc_resolve(gfc_namespace*)
        ../../gcc/fortran/resolve.c:15600
0x6db3e4 gfc_parse_file()
        ../../gcc/fortran/parse.c:6055
0x71d3a2 gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:198

---


$ gfortran-7-20160828 zarcg_1.f90
f951: internal compiler error: Segmentation fault
0xc1e32f crash_signal
        ../../gcc/toplev.c:335
0x692268 count_types_test
        ../../gcc/fortran/interface.c:1071
0x6932b4 gfc_compare_interfaces(gfc_symbol*, gfc_symbol*, char const*, int,
int, char*, int, char const*, char const*)
        ../../gcc/fortran/interface.c:1612
0x6e2794 check_generic_tbp_ambiguity
        ../../gcc/fortran/resolve.c:12197
0x6e29e1 resolve_tb_generic_targets
        ../../gcc/fortran/resolve.c:12279
0x6e2ef7 resolve_typebound_generic
        ../../gcc/fortran/resolve.c:12336
0x6e2ef7 resolve_typebound_procedure
        ../../gcc/fortran/resolve.c:12510
0x70a691 do_traverse_symtree
        ../../gcc/fortran/symbol.c:3936
0x6f5ef7 resolve_typebound_procedures
        ../../gcc/fortran/resolve.c:12708
0x6f5ef7 resolve_fl_derived
        ../../gcc/fortran/resolve.c:13417
0x6f0f36 resolve_symbol
        ../../gcc/fortran/resolve.c:13692
0x70a62b do_traverse_symtree
        ../../gcc/fortran/symbol.c:3930
0x6f3eea resolve_types
        ../../gcc/fortran/resolve.c:15489
0x6efb8c gfc_resolve(gfc_namespace*)
        ../../gcc/fortran/resolve.c:15600
0x6db3e4 gfc_parse_file()
        ../../gcc/fortran/parse.c:6055
0x71d3a2 gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:198