!*********************************
program testcase_fold
type :: struct
real :: var ! its julian sec
end type struct
type(struct), dimension(:), pointer :: mystruct
mystruct(:)%var = mystruct(:)%var
END Program testcase_fold
******************************************************
> gfortran -v -c testcase_fold.f90
Lese Spezifikationen von ./configure --prefix=/private/icg126/opt
--enable-languages=c,c++,f95 --enable-checking : (reconfigured) ./configure
--prefix=/private/icg126/opt --enable-languages=c,c++,f95 --enable-checking
Thread-Modell: posix
gcc-Version 4.0.0 20041025 (experimental)
/private/icg126/opt/libexec/gcc/i686-pc-linux-gnu/4.0.0/f951 testcase_fold.f90
-quiet -dumpbase testcase_fold.f90 -mtune=pentiumpro -auxbase testcase_fold
-version -o /tmp/ccYDXDnu.s
GNU F95 version 4.0.0 20041025 (experimental) (i686-pc-linux-gnu)
compiled by GNU C version 4.0.0 20041022 (experimental).
GGC-Heuristik: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
testcase_fold.f90: In function 'MAIN__':
testcase_fold.f90:32: interner Compiler-Fehler: in fold_convert, bei
fold-const.c:1972
*****************************************
This looks (to me) very similar to PR 17584, however, a different ice is produced.
--
Summary: ice-on-valid code, pointer to user-defined type, fold-
struct.c
Product: gcc
Version: 4.0.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: c dot lemmen at fz-juelich dot de
CC: gcc-bugs at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18157
