[Bug fortran/97589] Segementation fault when allocating coarrays.

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

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

--- Comment #13 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
(In reply to Thomas Koenig from comment #12)
> Reduced test case:
> 
> program main
>   type global_model_state
>      real, allocatable :: ps(:)  [:]
>   end type global_model_state
>   type (global_model_state) :: ms_full
>   allocate (ms_full % ps(100) [*])
>   ms_full %ps = 42.
> end program main

That one is now fixed, but the original test case still segfaults.