pascalabcnet/TestSuite/errors/err0265.pas

12 lines
217 B
ObjectPascal
Raw Normal View History

2018-09-09 20:10:15 +03:00
type
t0=record end;
t1<T>=class
where T: t0;
end;
t2<T>=class(t1<T>) where T: constructor; end;
begin
//var a := new t2<t0>;//не обязательно чтоб вызвать ошибку
end.