[Bug fortran/114373] [13 Regression] BLOCK construct not correctly analyzed with -fopenmp

[albert at tugraz dot at]

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

--- Comment #4 from Christopher Albert <albert at tugraz dot at> ---
Created attachment 63891
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=63891&action=edit
Proposed testcase: BLOCK not analyzed with -fopenmp

The reproducer in comment 0 compiles cleanly on current trunk (GCC 16). This
appears to have been fixed by an earlier commit. Attaching a testcase to
prevent future regressions. Can this be closed as FIXED?