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

--- Comment #4 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
(In reply to Thomas Koenig from comment #3)
> Simplified test case:
> 
> program main
>   type foo
>      real, allocatable, dimension(:) :: a[:]
>   end type foo
>   type (foo) :: x
>   sync all
>   allocate (x%a(10)[*])
> end program main

Correction: That does not always segfault.

Reply via email to