https://gcc.gnu.org/bugzilla/show_bug.cgi?id=77414
Bug ID: 77414 Summary: ICE in create_function_arglist, at fortran/trans-decl.c:2410 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 invalid code, down to at least 4.8, related to pr44348 : $ cat z1.f90 subroutine s(x) character(*) :: x contains subroutine s(x) character(*) :: x end end $ gfortran-7-20160828 z1.f90 z1.f90:4:0: subroutine s(x) internal compiler error: in create_function_arglist, at fortran/trans-decl.c:2410 0x742cf1 create_function_arglist ../../gcc/fortran/trans-decl.c:2410 0x746bb9 gfc_create_function_decl(gfc_namespace*, bool) ../../gcc/fortran/trans-decl.c:2820 0x74f349 gfc_generate_contained_functions ../../gcc/fortran/trans-decl.c:5185 0x74f349 gfc_generate_function_code(gfc_namespace*) ../../gcc/fortran/trans-decl.c:6143 0x6db090 translate_all_program_units ../../gcc/fortran/parse.c:5910 0x6db090 gfc_parse_file() ../../gcc/fortran/parse.c:6116 0x71d3a2 gfc_be_parse_file ../../gcc/fortran/f95-lang.c:198