[Bug fortran/124208] [16 Regression] ice in gfc_resolve_forall, at fortran/resolve.cc:12703

[albert at tugraz dot at via Gcc-bugs]

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

--- Comment #6 from Christopher Albert <albert at tugraz dot at> ---
Created attachment 63770
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=63770&action=edit
Fix iterator counting in nested block scopes

Count FORALL/DO CONCURRENT iterators in EXEC_BLOCK namespace code chains
while sizing VAR_EXPR in gfc_resolve_forall. This prevents undersized
allocation and an ICE for nested FORALL/DO CONCURRENT inside ASSOCIATE/BLOCK
constructs.