[Bug fortran/64757] [5 Regression] ICE in fold_convert_loc, at fold-const.c:2353

["pault at gcc dot gnu.org" <gcc-bugzilla@gcc.gnu.org>]

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

--- Comment #8 from Paul Thomas <pault at gcc dot gnu.org> ---
(In reply to Dominique d'Humieres from comment #4)
> > It it certainly related, but I'm not sure it is an exact duplicate.
> > In particular the above PR has quite a history and includes several
> > test cases. Let's keep it separate for now.
> 
> I disagree. AFACT this PR gives the same ICE as the test in pr49213 comment
> 8 or the following variant of the original code
> 
> program main
> 
>   type :: S
>     integer :: n
>   end type
>   type(S) :: Sobj
> 
>   type, extends(S) :: S2
>     integer :: m
>   end type
>   type(S2) :: S2obj
> 
>   type :: T
>     class(S), allocatable :: x
>   end type
>   type(T) :: Tobj
> 
>   Sobj = S(1)
>   Tobj = T(Sobj)
> 
>   S2obj = S2(1,2)
>   print *, S2obj%n, S2obj%m
> 
> end program
> 
> Actually pr49213 is a collection of different bugs, one being this PR. IMO
> pr49213 should be split along the different bugs.

The patch of comment #7 fixes the above as well.

Cheers

Paul