[Bug fortran/121616] Assignment to an unlimited polymorphic variable causes a segmentation fault at runtime

[anlauf at gcc dot gnu.org via Gcc-bugs]

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

anlauf at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
     Ever confirmed|0                           |1
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2025-09-10
                 CC|                            |anlauf at gcc dot gnu.org

--- Comment #4 from anlauf at gcc dot gnu.org ---
(In reply to kargls from comment #3)
> % cat tr.F90
> program foo
> 
>    type general
>       class(*), allocatable :: x
>    end type
> 
> #ifdef WORKS
>    type(general) a
>    a%x = 1
>    call prn(a%x)
> #else
>    type(general) a(1)
>    a(1)%x = 1

  a(1)%x = 1

is translated to a plain

  VIEW_CONVERT_EXPR<integer(kind=4)>(a[0].x) = 1;

This can't be right.