The following code fails to compile when derived data types with two-dim arrays
are used.
The error message is:
Richard-Leightons-Computer:/volumes/data/wave3d/gcc_test Richard$ gfortran -v
bug_test.f -o
bug_test
Driving: gfortran -v bug_test.f -o bug_test -lgfortranbegin -lgfortran
Reading specs from /usr/local/lib/gcc/powerpc-apple-darwin7.5.0/4.0.0/specs
Configured with: ../gcc/configure --enable-threads=posix --enable-languages=f95
--enable-
static --disable-shared
Thread model: posix
gcc version 4.0.0 20041009 (experimental)
/usr/local/libexec/gcc/powerpc-apple-darwin7.5.0/4.0.0/f951 bug_test.f
-ffixed-form -fPIC -
quiet -dumpbase bug_test.f -auxbase bug_test -version -o /var/tmp//ccdrmwK5.s
GNU F95 version 4.0.0 20041009 (experimental) (powerpc-apple-darwin7.5.0)
compiled by GNU C version 4.0.0 20041009 (experimental).
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
bug_test.f: In function 'MAIN__':
bug_test.f:30: internal compiler error: Bus error
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
The source is:
!
! -------------------------------------------------------------
!
program bug_test
!
implicit none
!
! -- 1-d derived data
!
type data_1
real*8, dimension(10) :: xn
end type data_1
!
! -- 2-d derived data
!
type data_2
real*8, dimension(10,2) :: yn
end type data_2
type(data_1) data_1d
type(data_2) data_2d
!
! -- compiles ok with 1-d derived data type
!
read(40) data_1d
!
! -- compile fails when following is uncommented
!
read(40) data_2d
!
! --
!
stop
end
!
! -------------------------------------------------------------------
!
--
Summary: Internal Compiler Error while using derived data type's
Product: gcc
Version: 4.0.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: strdleighton at comcast dot net
CC: gcc-bugs at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18711
