this started failing with today's trunk

  SUBROUTINE get_r_val()
    INTEGER, PARAMETER :: default_string_length=128
    CHARACTER(len=default_string_length) :: c_val
    LOGICAL                              :: check 
    check = c_val(LEN_TRIM(c_val):LEN_TRIM(c_val))=="]"
  END SUBROUTINE get_r_val

           Summary: [4.6 Regression] ICE on character stuff
           Product: gcc
           Version: 4.6.0
            Status: UNCONFIRMED
          Keywords: ice-on-valid-code
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: jv244 at cam dot ac dot uk

Reply via email to