https://gcc.gnu.org/bugzilla/show_bug.cgi?id=69955
--- Comment #3 from Dominique d'Humieres <dominiq at lps dot ens.fr> --- > Compile time or runtime? (Can't test right now). My check was for run time: running the test grabs my 16Gb of memory. My guess is that the temporary for write(*,*) size( (/( var(i)%ts , i=1,size(var) )/) ) is not released.