[Bug fortran/20829] New: Internal compiler error with valid code

[federico dot carminati at cern dot ch]

The following code causes an internal compiler error. I could not obtain any further reduction of the 
case

      SUBROUTINE BUG
      DIMENSION IR(10), A(10,10)
#include "fact.inc"
      RETURN
      END

file fact.inc

      DO 144    J  =  1, N
         DO 143   K  =  JP1, N
            DO 141  I  =  1, JM1
 141        CONTINUE
 142        A(J,K)    =  -S11 * A(J,J)
 143     CONTINUE
 144  CONTINUE
      IR(N)  =  NXCH

[/Users/fca] /opt/gcc-4_0/bin/gfortran -g -O -I ./ -c bugf000000.F
bugf000000.F: In function 'bug':
bugf000000.F:-1: internal compiler error: in final_scan_insn, at final.c:1801
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.

-- 
           Summary: Internal compiler error with valid code
           Product: gcc
           Version: 4.1.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: federico dot carminati at cern dot ch
                CC: gcc-bugs at gcc dot gnu dot org
  GCC host triplet: powerpc-apple-darwin7.8.0


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=20829