pascalabcnet/TestSuite/usesunits/use_abstract2.pas
Ivan Bondarev 9acb0d71a8 #2853
2023-05-14 11:36:08 +02:00

10 lines
109 B
ObjectPascal

uses u_abstract2;
type
t2 = abstract class(t1<t2>) end;
t3 = class(t2)
end;
begin
new t3;
end.