g77: ppc-egcs-20000612/gcc/f/com.c:15198: failed assertion

[Jiri Masik]

Hi,

I can't compile the following code with -fdebug-kludge with the latest
snapshot on PPC. 

------------------------------------------------------------------------
      subroutine bayes(noc, noe, nsteps, mode, er_mode, keep, ier)
      integer noc, noe, nsteps, mode, er_mode, keep, ier
      real pec
      COMMON/BAYESC/ pec(1000,1000)

      return
      end

It triggers fatal signal 6.

masik@pbuk:~/tmp/f$ g77 -v  -g -fno-silent -Wall -ff2c --save-temps -fdebug-kludge -c bayes.f -o decl.f
g77 version 2.96 20000612 (experimental) (from FSF-g77 version 0.5.25 20000612 (experimental))
Reading specs from /usr/local/lib/gcc-lib/powerpc-unknown-linux-gnu/2.96/specs
gcc version 2.96 20000612 (experimental)
 /usr/local/lib/gcc-lib/powerpc-unknown-linux-gnu/2.96/f771 bayes.f -quiet -dumpbase bayes.f -g -Wall -version -fversion -fno-silent -ff2c -fdebug-kludge -o bayes.s
GNU F77 version 2.96 20000612 (experimental) (powerpc-unknown-linux-gnu) compiled by GNU C version 2.95.2 20000313 (Debian GNU/Linux).
GNU Fortran Front End version 0.5.25 20000612 (experimental)
  bayes:
../../../egcs-20000612/gcc/f/com.c:15198: failed assertion `(t == NULL_TREE) || (DECL_CONTEXT (x) == NULL_TREE)'
g77: Internal compiler error: program f771 got fatal signal 6

Thank you in advance for your help.
Cheers,        
        Jiri