[Bug fortran/98490] Unexpected out of bounds in array constructor with implied do loop

[jvdelisle at charter dot net via Gcc-bugs]

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

Jerry DeLisle <jvdelisle at charter dot net> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |jvdelisle at charter dot net

--- Comment #4 from Jerry DeLisle <jvdelisle at charter dot net> ---
With gfortran version 11.0.0 20201227

$ gfc -fbounds-check pr98490.f90 
$ 
$ ./a.out 
At line 15 of file pr98490.f90
Fortran runtime error: Substring out of bounds: lower bound (0) of 'text' is
less than one

After Steves patch:

$ gfc -fbounds-check pr98490.f90 
$ ./a.out 
 Lorem ipsum

Steve would you like me to commit for you? Regression testing now.