[Bug fortran/79426] [5/6/7 Regression] fortran - internal compiler error: in fold_convert_loc, at fold-const.c:2251

[janus at gcc dot gnu.org]

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

--- Comment #3 from janus at gcc dot gnu.org ---
Reduced test case ...


subroutine gruppe

  implicit none

  type :: CGruppe
      class(*), dimension(:), pointer :: el
  end type

  type(CGruppe) :: group

  select type ( p => group%el(1) )
  end select

end subroutine


... with a slightly different ICE:

internal compiler error: in gfc_advance_chain, at fortran/trans.c:58