From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 25092 invoked by alias); 25 Jun 2010 05:49:38 -0000 Received: (qmail 25056 invoked by alias); 25 Jun 2010 05:49:23 -0000 Date: Fri, 25 Jun 2010 05:49:00 -0000 Message-ID: <20100625054923.25055.qmail@sourceware.org> X-Bugzilla-Reason: CC References: Subject: [Bug fortran/44660] [regression 4.4/4.5/4.6] ICE in resolve_equivalence() In-Reply-To: Reply-To: gcc-bugzilla@gcc.gnu.org To: gcc-bugs@gcc.gnu.org From: "sebpop at gmail dot com" Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Archive: List-Post: List-Help: Sender: gcc-bugs-owner@gcc.gnu.org X-SW-Source: 2010-06/txt/msg02421.txt.bz2 ------- Comment #5 from sebpop at gmail dot com 2010-06-25 05:49 ------- Subject: Re: [regression 4.4/4.5/4.6] ICE in resolve_equivalence() On Thu, Jun 24, 2010 at 23:02, kargl at gcc dot gnu dot org wrote: > > > ------- Comment #1 from kargl at gcc dot gnu dot org  2010-06-25 04:02 ------- > Index: resolve.c > =================================================================== > --- resolve.c   (revision 161047) > +++ resolve.c   (working copy) > @@ -12506,6 +12506,9 @@ resolve_equivalence (gfc_equiv *eq) >   int object, cnt_protected; >   const char *msg; > > +  if (eq->expr->symtree->n.sym == NULL) > +    return; > + >   last_ts = &eq->expr->symtree->n.sym->ts; > >   first_sym = eq->expr->symtree->n.sym; > > This patch doesn't fix the problem I am seeing. If I'm testing this in the loop before taking the value of e->symtree->n.sym->ts, then it passes without ICE: diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index 48bb618..7f66be4 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -12360,6 +12360,9 @@ resolve_equivalence (gfc_equiv *eq) { e = eq->expr; + if (eq->expr->symtree->n.sym == NULL) + return; + e->ts = e->symtree->n.sym->ts; /* match_varspec might not know yet if it is seeing array reference or substring reference, as it doesn't -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44660