https://gcc.gnu.org/bugzilla/show_bug.cgi?id=102900
Tobias Burnus <burnus at gcc dot gnu.org> changed:
What |Removed |Added
----------------------------------------------------------------------------
Summary|ICE via gfc_class_data_get |ICE via gfc_class_data_get
|in alloc_comp_class_4.f03 |with alloc_comp_class_4.f03
|with -fcheck=all |or proc_ptr_52.f90 using
| |-fcheck=all
--- Comment #1 from Tobias Burnus <burnus at gcc dot gnu.org> ---
Similar but slightly different ICE for proc_ptr_52.f90 with -fcheck=all:
65 | y = apply (f, x) ! Fixed by first chunk in patch
| 1
internal compiler error: tree check: expected record_type or union_type or
qual_union_type, have function_type in gfc_class_data_get, at
fortran/trans-expr.c:232
0x7c1370 tree_check_failed(tree_node const*, char const*, int, char const*,
...)
../../repos/gcc/gcc/tree.c:8689
0x662539 tree_check3(tree_node*, char const*, int, char const*, tree_code,
tree_code, tree_code)
../../repos/gcc/gcc/tree.h:3473
0x662539 gfc_class_data_get(tree_node*)
../../repos/gcc/gcc/fortran/trans-expr.c:232
0xa0f97f gfc_conv_procedure_call(gfc_se*, gfc_symbol*, gfc_actual_arglist*,
gfc_expr*, vec<tree_node*, va_gc, vl_embed>*)
../../repos/gcc/gcc/fortran/trans-expr.c:7211
