[Bug fortran/66578] [F2008] Invalid free on allocate(...,source=a(:)) in block

[mikael at gcc dot gnu.org]

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

--- Comment #13 from Mikael Morin <mikael at gcc dot gnu.org> ---
Created attachment 35823
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=35823&action=edit
next attempt