[Bug fortran/31218] New: ICE on valid code with gfortran

[jv244 at cam dot ac dot uk]

A recent gfortran ICEs on the following code:

 integer, parameter :: i=1
 real, parameter :: k=TRANSFER(i,1.0)
 integer ::  j=TRANSFER(k,i)
 character(LEN=2), parameter :: a="a "
 real, dimension(2,2), parameter :: r=1.0
 character(LEN=4) :: b=REPEAT(a,2)
 real, dimension(4) :: l=RESHAPE(r,(/4/))
 character(LEN=3) :: c=TRIM("a ")

 IF (b.NE."a a ") CALL ABORT()
 IF (ANY(l.NE.1.0)) CALL ABORT()
 IF (c.NE."a  ") CALL ABORT()
 IF (j.NE.i) CALL ABORT()
 END


-- 
           Summary: ICE on valid code with gfortran
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: jv244 at cam dot ac dot uk


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