1! { dg-do compile } 2! PR fortran/65173 3program p 4 type t 5 end type 6 type, extends(t) :: t2 7 character x = ! { dg-error "error in data declaration" } 8 end type 9end 10