[Bug fortran/57697] Segfault with defined assignment for components during intrinsic assignment

[burnus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=57697

--- Comment #1 from Tobias Burnus <burnus at gcc dot gnu.org> ---
Created attachment 30353
  --> http://gcc.gnu.org/bugzilla/attachment.cgi?id=30353&action=edit
Test case