blob: 99b022bdfc4679d4265c00bce35e7306a0c4e67e [file] [log] [blame]
! { dg-do compile }
! PR fortran/65173
program p
type t
end type
type, extends(t) :: t2
character x(:) ! { dg-error "must have an explicit shape" }
end type
end