pascalabcnet/TestSuite/errors/err0341_multiple_where.pas

7 lines
126 B
ObjectPascal
Raw Normal View History

2019-10-04 14:37:47 +03:00
procedure p2<T1,T2,T3>(a: T1; b: T2; c: T3); where T1, T2: record; where T3: class;
begin
end;
begin
p2(2, 4, 6);
end.