pascalabcnet/TestSuite/errors/err0304.pas

18 lines
317 B
ObjectPascal
Raw Permalink Normal View History

2022-09-27 17:43:17 +03:00
//!Предописание I2<T> не может быть использовано в качестве базового типа
type
2018-12-16 21:45:55 +03:00
I1<T> = interface;
I2<T> = interface;
I1<T> = interface(I2<T>)
end;
I2<T> = interface(I1<T>)
end;
type t1=class(I1<byte>) end;
begin
new t1;
end.