https://gcc.gnu.org/bugzilla/show_bug.cgi?id=104569
Bug ID: 104569 Summary: ICE in generate_coarray_sym_init, at fortran/trans-decl.cc:5537 Product: gcc Version: 12.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran Assignee: unassigned at gcc dot gnu.org Reporter: gs...@t-online.de Target Milestone: --- Affects versions down to r7 : $ cat z1.f90 program p character :: x(2)[*] call s contains subroutine s associate (y => x) y = 'a' end associate end end $ cat z2.f90 program p character(3) :: x(2)[*] call s contains subroutine s associate (y => x) y = 'abc' end associate end end $ cat z3.f90 program p character :: x(2)[*] associate (y => x) y = 'a' end associate end $ gfortran-12-20220213 -c z1.f90 -fcoarray=single $ $ gfortran-12-20220213 -c z1.f90 -fcoarray=lib z1.f90:6:24: 6 | associate (y => x) | 1 internal compiler error: in generate_coarray_sym_init, at fortran/trans-decl.cc:5537 0x7c2f32 generate_coarray_sym_init ../../gcc/fortran/trans-decl.cc:5537 0x78b442 do_traverse_symtree ../../gcc/fortran/symbol.cc:4174 0x7c2185 generate_coarray_init ../../gcc/fortran/trans-decl.cc:5685 0x7c7210 gfc_process_block_locals(gfc_namespace*) ../../gcc/fortran/trans-decl.cc:7943 0x8236b9 gfc_trans_block_construct(gfc_code*) ../../gcc/fortran/trans-stmt.cc:2296 0x7a76e7 trans_code ../../gcc/fortran/trans.cc:2012 0x7d093e gfc_generate_function_code(gfc_namespace*) ../../gcc/fortran/trans-decl.cc:7654 0x7d076c gfc_generate_contained_functions ../../gcc/fortran/trans-decl.cc:5777 0x7d076c gfc_generate_function_code(gfc_namespace*) ../../gcc/fortran/trans-decl.cc:7586 0x75367e translate_all_program_units ../../gcc/fortran/parse.cc:6651 0x75367e gfc_parse_file() ../../gcc/fortran/parse.cc:6938 0x7a066f gfc_be_parse_file ../../gcc/fortran/f95-lang.cc:216