Mail Archives: pgcc/1999/03/13/12:38:41
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.
- Raw text -