Compile this test case with -fno-automatic:
MacOSX:~ ed$ /Users/ed/bin-4.1.1/bin/gfortran -fno-automatic ARRAY_BADNESS.FOR
ARRAY_BADNESS.FOR: In function 'bad':
ARRAY_BADNESS.FOR:8: internal compiler error: in
gfc_trans_auto_array_allocation, at fortran/trans-array.c:3321
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
MacOSX:~ ed$
Here is the reduced testcase:
=========================================================
SUBROUTINE BAD ( NPRFL, HPRFL, XPRFL )
IMPLICIT NONE
INTEGER NPRFL, I
REAL HPRFL( NPRFL ), XPRFL( NPRFL )
DOUBLE PRECISION
* DHPRFL( NPRFL ), DXPRFL( NPRFL )
C ------------------------------
C CONVERT SINGLE PRECISION REAL
C INPUT TO DOUBLE PRECISION
C ------------------------------
DO I = 1, NPRFL
DXPRFL(I) = DBLE( XPRFL(I) )
DHPRFL(I) = DBLE( HPRFL(I) )
END DO
RETURN
END SUBROUTINE
=========================================================
--
Summary: ICE compiling array variables with input size.
Product: gcc
Version: 4.1.1
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: 3dw4rd at verizon dot net
GCC build triplet: powerpc-apple-darwin7.9.0
GCC host triplet: powerpc-apple-darwin7.9.0
GCC target triplet: powerpc-apple-darwin7.9.0
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=28091
