unit u_partial1; interface type t0 = class end; t1 = partial class(t0) end; implementation type t1 = partial class(t0) end; end.