https://gcc.gnu.org/bugzilla/show_bug.cgi?id=53653
G. Steinmetz <gs...@t-online.de> changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |gs...@t-online.de --- Comment #3 from G. Steinmetz <gs...@t-online.de> --- Very similar : $ cat zz1.f90 program p type t end type class(t), allocatable :: a, b(:) allocate (b, source=[a]) end $ gfortran-12-20210606 -c zz1.f90 zz1.f90:5:27: 5 | allocate (b, source=[a]) | 1 internal compiler error: in gfc_get_element_type, at fortran/trans-types.c:1249 0x81cbea gfc_get_element_type(tree_node*) ../../gcc/fortran/trans-types.c:1249 0x7a1f4c gfc_trans_create_temp_array(stmtblock_t*, stmtblock_t*, gfc_ss*, tree_node*, tree_node*, bool, bool, bool, locus*) ../../gcc/fortran/trans-array.c:1329 0x7ac382 gfc_conv_loop_setup(gfc_loopinfo*, locus*) ../../gcc/fortran/trans-array.c:5319 0x7ac615 gfc_conv_expr_descriptor(gfc_se*, gfc_expr*) ../../gcc/fortran/trans-array.c:7555 0x815fff gfc_trans_allocate(gfc_code*) ../../gcc/fortran/trans-stmt.c:6289 0x79e617 trans_code ../../gcc/fortran/trans.c:2090 0x7c4bc4 gfc_generate_function_code(gfc_namespace*) ../../gcc/fortran/trans-decl.c:6893 0x74b3f6 translate_all_program_units ../../gcc/fortran/parse.c:6461 0x74b3f6 gfc_parse_file() ../../gcc/fortran/parse.c:6730 0x79772f gfc_be_parse_file ../../gcc/fortran/f95-lang.c:212