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.

Reply via email to