g77 data.c:987: failed assertion

[Jean Zaidan]

Hi,

I encountered troubles when running g77 on Redhat 6.1 PC version.

The following is an output of my attempt of compiling fortan code (try.f
listed below) using 
g77 try.f :

data.c:987: failed assertion `ffeinfo_kindtype (ffebld_info (subscript)) ==
FFEINFO_kindtypeINTEGER1'
f77: Internal compiler error: program f771 got fatal signal 6

----------------------------------------------------------------------------
----------------------------------------------
Fortran Code ( try.f ):
===============

C
C
      INTEGER*4 FUNCTION TESTING()
      IMPLICIT NONE
C
C
      LOGICAL*1 T,F
C
      PARAMETER (
     .          T = .TRUE.,         ! true constant
     .          F = .FALSE.         ! false constant
     .          )
C
C
      INTEGER*1 DF_DEC, NUM_DFS
C
      PARAMETER (
     .          DF_DEC    = 1,  
     .          NUM_DFS   = 43  
     .          )
      LOGICAL*1
     .          VTB(4,NUM_DFS)    
C
      DATA   
     .     VTB(1,DF_DEC)   /T/ ,   VTB(2,DF_DEC)   /T/ 
      RETURN
      END
----------------------------------------------------------------------------
----------------------------------------------
It compiles when I replace "DF_DEC" by its value :
  
	DATA   
     .     VTB(1,1)   /T/ ,   VTB(2,1)   /T/ 
----------------------------------------------------------------------------
----------------------------------------------

g77 -v
======

g77 version 2.95.1 19990816 (release) (from FSF-g77 version 0.5.25 19990816
(release))
Driving: f77 -v -c -xf77-version /dev/null -xnone
Reading specs from /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.1/specs
gcc version 2.95.1 19990816 (release)
 /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.1/cpp -lang-c -v -D__GNUC__=2
-D__GNUC_MINOR__=95 -D__ELF__ -D__unix__ -D__i386__ -D__linux__ -D__unix
-D__linux -Asystem(posix) -D_LANGUAGE_FORTRAN -traditional -Acpu(i386)
-Amachine(i386) -Di386 -D__i386 -D__i386__ -Di686 -Dpentiumpro -D__i686
-D__i686__ -D__pentiumpro -D__pentiumpro__ /dev/null /dev/null
GNU CPP version 2.95.1 19990816 (release) (i386 Linux/ELF)
#include "..." search starts here:
#include <...> search starts here:
 /usr/local/include
 
/usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.1/../../../../i686-pc-linux-gn
u/include
 /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.1/include
 /usr/include
End of search list.
The following default directories have been omitted from the search path:
 /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.1/../../../../include/g++-3
End of omitted list.
 /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.1/f771 -fnull-version -quiet
-dumpbase g77-version.f -version -fversion -o /tmp/ccFLoSgt.s /dev/null
GNU F77 version 2.95.1 19990816 (release) (i686-pc-linux-gnu) compiled by
GNU C version 2.95.1 19990816 (release).
GNU Fortran Front End version 0.5.25 19990816 (release)
 as -V -Qy -o /tmp/ccipa0RN.o /tmp/ccFLoSgt.s
GNU assembler version 2.9.1 (i386-redhat-linux), using BFD version
2.9.1.0.24
 ld -m elf_i386 -dynamic-linker /lib/ld-linux.so.2 -o /tmp/ccNkvg79
/tmp/ccipa0RN.o /usr/lib/crt1.o /usr/lib/crti.o
/usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.1/crtbegin.o
-L/usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.1 -L/usr/local/lib -lg2c -lm
-lgcc -lc -lgcc /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.1/crtend.o
/usr/lib/crtn.o
 /tmp/ccNkvg79
__G77_LIBF77_VERSION__: 0.5.25 19990816 (release)
@(#)LIBF77 VERSION 19990503
__G77_LIBI77_VERSION__: 0.5.25 19990816 (release)
@(#) LIBI77 VERSION pjw,dmg-mods 19990503
__G77_LIBU77_VERSION__: 0.5.25 19990816 (release)
@(#) LIBU77 VERSION 19980709

----------------------------------------------------------------------------
----------------------------------------------

Can anyone help?
Thanks.
Jean.