unit u_partial2; interface type t1 = partial class public constructor := exit; end; implementation type t1 = partial class end; end.