X-Authentication-Warning: localhost.localdomain: dima owned process doing -bs
Date: Sat, 13 Mar 1999 10:38:51 -0700 (MST)
From: Dmitri A Sergatskov <dima AT coffee DOT phys DOT unm DOT edu>
X-Sender: dima AT localhost DOT localdomain
To: pgcc AT delorie DOT com
cc: pawsa AT ifm DOT liu DOT se
Subject: Re: Bug report
In-Reply-To: <199903130744.IAA00793@a115.lambo.student.liu.se>
Message-ID: <Pine.LNX.4.04.9903131033210.535-100000@localhost.localdomain>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Reply-To: pgcc AT delorie DOT com
X-Mailing-List: pgcc AT delorie DOT com
X-Unsubscribes-To: listserv AT delorie DOT com
Precedence: bulk

On Sat, 13 Mar 1999 pawsa AT ifm DOT liu DOT se wrote:

> Hi,
> 
> the following 6-lines program
>       SUBROUTINE DBLGRP
>       DIMENSION JAPINT(3)
>           WRITE(LUPRI,'(3X,I2,2X,A1,A1,A,2X,I2)')
>      &         ((5-II),'(',CHAR(ICHAR('W')+II),')  -->',JAPINT(II),
>      &          II=1,3)
>       END
> 
> causes following crash of 
> Reading specs from /usr/lib/gcc-lib/i586-linux/pgcc-2.91.57/specs
> gcc version pgcc-2.91.57 19980901 (egcs-1.1 release)
> 
> The crash message is:
> 
> g77  -c buggy.F 
> ../../../gcc/f/com.c:11030: failed assertion `ffeinfo_kindtype (ffebld_info (expr)) == FFEINFO_kindtypeCHARACTER1'
> g77: Internal compiler error: program f771 got fatal signal 6
> 

Same here with:
 
Reading specs from
/opt/pgcc/lib/gcc-lib/i586-pc-linux-gnu/pgcc-2.91.60/specs
gcc version pgcc-2.91.60 19981201 (egcs-1.1.1 release)


[dima AT localhost src]$ /opt/pgcc/bin/f77 -c buggy.f 
com.c:11030: failed assertion `ffeinfo_kindtype (ffebld_info (expr)) ==
FFEINFO_kindtypeCHARACTER1'
f77: Internal compiler error: program f771 got fatal signal 6

It compiles OK with: 

Reading specs from /usr/lib/gcc-lib/i386-redhat-linux/egcs-2.90.29/specs
gcc version egcs-2.90.29 980515 (egcs-1.0.3 release)



> 
> Pawel
> -----
> Pawel Salek, pawsa AT ifm DOT liu DOT se WWW: http://www.ifm.liu.se/~pawsa/
> 

Regards,

Dmitri.