[Bug fortran/18379] New: gfortran : array assignation gives internal compiler error

[mimo2 at free dot fr]

while the code
      PROGRAM TEST
      IMPLICIT NONE
      INTEGER :: I(3)
      REAL(8) :: XTEST(5)
      I = (/ 1, 3, 5 /)
      XTEST(I) = 5.
      WRITE(*,*) XTEST
      END
 works, the slightly modified one
      PROGRAM TEST
      IMPLICIT NONE
      REAL(8) :: XTEST(5)
      XTEST((/ 1, 3, 5 /)) = 5.
      WRITE(*,*) XTEST
      END
 gives the error test.f:4: internal compiler error: in gfc_conv_ss_descriptor,
at fortran/trans-array.c:1264

-- 
           Summary: gfortran : array assignation gives internal compiler
                    error
           Product: gcc
           Version: unknown
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: mimo2 at free dot fr
                CC: gcc-bugs at gcc dot gnu dot org


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