https://gcc.gnu.org/bugzilla/show_bug.cgi?id=60357
--- Comment #4 from Dominique d'Humieres <dominiq at lps dot ens.fr> --- Note that while program testerprog use testmod Type(A) :: Me Me%y=2 print *, Me%x, Me%y end program gives at run time 1 2 program testerprog use testmod Type(A) :: Me allocate(Me%y) Me = A(X=1, y=2) print *, Me%y end program gives Program received signal SIGSEGV: Segmentation fault - invalid memory reference.