blob: 4c50be4acbbb288ffecbcbb760e16d73c33f207f [file] [log] [blame]
! { dg-do compile }
! { dg-options "-Wconversion -std=legacy" }
!
! Test case contributed by Mark Eggleston <mark.eggleston@codethink.com>
program test
character(*), parameter :: h = 5hABCDE ! { dg-warning "HOLLERITH to CHARACTER\\(\\*\\)" }
write(*,*) h
end program