[Bug fortran/98517] gfortran segfault on character array initialization from parameter value since r8-5900-g266404a8d62b99ab

[sgk at troutmask dot apl.washington.edu via Gcc-bugs]

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

--- Comment #4 from Steve Kargl <sgk at troutmask dot apl.washington.edu> ---
On Tue, Jan 05, 2021 at 09:19:51PM +0000, emr-gnu at hev dot psu.edu wrote:
> https://gcc.gnu.org/bugzilla/show_bug.cgi?id=98517
> 
> --- Comment #3 from Eric Reischer <emr-gnu at hev dot psu.edu> ---
> Confirm the attached patch resolves the crash.

Of course, it resolves the ICE.  I wouldn't have posted it, otherwise. :-)

>  I have not checked, however, if the generated code is correct.

Given that the code only contains declaration statements, the
generated code with -fdump-tree-original is correct.

% gfcg -c -fdec -fdump-tree-original a.f90
% cat a.f90.005t.original 
__attribute__((fn spec (". ")))
void test_bug ()
{

}