[Bug fortran/93263] [9/10 Regression] -fno-automatic and RECURSIVE

[markeggleston at gcc dot gnu.org]

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

--- Comment #8 from markeggleston at gcc dot gnu.org ---
The change to:

if (ns->save_all || (!flag_automatic && !recursive))

Now allows the second example program to produce:

 Hello           1
 Hello           2
 Hello           3
 Hello           4
 Hello           5

instead of:

 Hello           1
 Hello       32766
STOP 1

I'll add the second program as a test case.