[Fortran, Patch] PR36476 - Fix ICE with PARAMETER and len=* strings

Jerry DeLisle jvdelisle@verizon.net
Fri Jun 13 12:23:00 GMT 2008


Tobias Burnus wrote:
> Without this patch, gfortran crashes (ICE) for:
> 
>      CHARACTER (len=*) MY_STRING(1:3)
>      PARAMETER ( MY_STRING =  (/ "A" , "B", "C" /) )
> 
> 
> as "my_string" has an initialization but cl.length is not set. If one 
> changes the PARAMETER statement into a PARAMETER attribute or uses len=1 
> or uses a scalar, it works. I copied the cl.length==NULL (i.e. len=*) 
> case from add_init_expr_to_sym, which is used in case of the PARAMETER 
> attribute.
> 
> Bootstrapped and regtested on x86-64-linux. OK for the trunk?
> 
> Tobias
> 
OK, thanks for patch.

Jerry



More information about the Gcc-patches mailing list