This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.

Index Nav:	[Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav:	[Date Prev] [Date Next]	[Thread Prev] [Thread Next]
Other format:	[Raw text]

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

From: Jerry DeLisle <jvdelisle at verizon dot net>
To: Tobias Burnus <burnus at net-b dot de>
Cc: "'fortran at gcc dot gnu dot org'" <fortran at gcc dot gnu dot org>, gcc-patches <gcc-patches at gcc dot gnu dot org>
Date: Fri, 13 Jun 2008 05:22:41 -0700
Subject: Re: [Fortran, Patch] PR36476 - Fix ICE with PARAMETER and len=* strings
References: <48524388.10309@net-b.de>

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

Follow-Ups:
- Re: [Fortran, Patch] PR36476 - Fix ICE with PARAMETER and len=* strings
  - From: Tobias Burnus

References:
- [Fortran, Patch] PR36476 - Fix ICE with PARAMETER and len=* strings
  - From: Tobias Burnus

Index Nav:	[Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav:	[Date Prev] [Date Next]	[Thread Prev] [Thread Next]