Fritz, Thanks for the quick fix, IMO on the obvious side. Two minor nits: (1) you don’t need the lines (as in "please don’t use them")
+ +! { dg-final { cleanup-modules "pr80668" } } (2) I don’t understand the comments after 'INTEGER,DIMENSION(:),POINTER :: dist’. TIA Dominique PS The failures for gfortran.dg/coarray_lock_7.f90 should be fixed now.