[Bug fortran/84155] [8.0 Regression] program hangs on valid code

[juergen.reuter at desy dot de]

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

--- Comment #1 from Jürgen Reuter <juergen.reuter at desy dot de> ---
Created attachment 43313
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=43313&action=edit
Reproducer, 48 lines