[Bug fortran/98573] Dynamic type lost on assignment

[davidhneill at gmail dot com via Gcc-bugs]

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

--- Comment #4 from David Neill Asanza <davidhneill at gmail dot com> ---
Created attachment 49906
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=49906&action=edit
Reproducer for 0-length case.