[Bug fortran/16206] New: Internal error on initialization expression

["anlauf at hep dot tu-darmstadt dot de" <gcc-bugzilla at gcc dot gnu dot org>]

File: gfortran-bug1.f90

program gfortran_bug1
  !
  real, parameter :: x(2) = (/ 1.0, 2.0 /)
  !
  ! gfortran dies at the following, which AFAICT is legal:
  !
  real, parameter :: y(4) = (/ x(1:2), x(1:2) /)

end program gfortran_bug1

Compiling this little program leads to:

% gfortran -c gfortran-bug1.f90
 In file gfortran-bug1.f90:7

  real, parameter :: y(4) = (/ x(1:2), x(1:2) /)
                                               1
 Internal Error at (1):
 In file gfortran-bug1.f90:7

  real, parameter :: y(4) = (/ x(1:2), x(1:2) /)
                                               1
 Initialization expression didn't reduce (1)

-- 
           Summary: Internal error on initialization expression
           Product: gcc
           Version: 3.5.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: anlauf at hep dot tu-darmstadt dot de
                CC: gcc-bugs at gcc dot gnu dot org
  GCC host triplet: i686-pc-linux-gnu


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=16206