blob: 132d5e83b1612b5cf1b9b2d10b54bbc21a8d2ac4 [file] [log] [blame]
! { dg-do compile }
program p
type t
character(1) :: c(1)=[1] ! { dg-error "convert INTEGER.4. to CHARACTER.1." }
end type
end