pascalabcnet/TestSuite/genericrecords4.pas
Ivan Bondarev 1e7163e211 #2599
2022-01-01 14:04:50 +01:00

13 lines
295 B
ObjectPascal

type
t1<T> = class end;
i1<T> = interface end;
//Ошибка: Could not load type '0.t1' from assembly '0, Version=1.0.0.0, Culture=neutral, PublicKeyToken=null'.
t2<T> = record(i1<t1<T>>)
end;
t3 = record(i1<t1<integer>>)
end;
begin
var r: t2<integer>;
var r2: t3;
end.