Follow up to PR 33455.

"13.7.75 MERGE (TSOURCE, FSOURCE, MASK)"
"FSOURCE shall be of the same type and type parameters as TSOURCE."


In the following program, the string length is different. If the string length
were known at compile time, an error would have been printed, but there is no
run-time check

subroutine foo(a)
implicit none
character(len=*) :: a
character(len=3) :: b
print *, merge(a,b,.true.)  ! Unequal character lengths
end subroutine foo

call foo("ab")
end


-- 
           Summary: MERGE: -fbounds-check runtime check for same string
                    length
           Product: gcc
           Version: 4.4.0
            Status: UNCONFIRMED
          Keywords: diagnostic
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: burnus at gcc dot gnu dot org


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

Reply via email to