[Bug fortran/18157] New: ice-on-valid code, pointer to user-defined type, fold-struct.c

["c dot lemmen at fz-juelich dot de" <gcc-bugzilla at gcc dot gnu dot org>]

!*********************************

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