https://gcc.gnu.org/bugzilla/show_bug.cgi?id=125059
anlauf at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |anlauf at gcc dot gnu.org
--- Comment #4 from anlauf at gcc dot gnu.org ---
I noted that the "print*,a(1)" can be commented and the bug persists.
Adding an explicit deallocate (a) in subroutine f hides the issue.
Interestingly, the issue depends on the line
generic::write(formatted)=>w
Comparing the tree dumps with this line either active or commented changes
the local allocatable array between static and automatic!
static struct array01_t a = {.data=0B};
vs.
struct array01_t a;
where only the latter does automatic deallocation on exit from f.
