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