[Bug fortran/89069] ICE in select type with function returning class array pointer

[antony at cosmologist dot info]

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

--- Comment #3 from Antony Lewis <antony at cosmologist dot info> ---
This bug is still valid as of  gcc 11.2.1 20220114


  15 | end module test
      |               1
internal compiler error: Segmentation fault
0x160a5b7 internal_error(char const*, ...)
        ???:0
0x764849 gfc_class_data_get(tree_node*)
        ???:0
0x7b0111 gfc_trans_block_construct(gfc_code*)
        ???:0
0x762224 gfc_generate_function_code(gfc_namespace*)
        ???:0
0x73c1d1 gfc_generate_module_code(gfc_namespace*)
        ???:0
0x6dd185 gfc_parse_file()
        ???:0