pascalabcnet/TestSuite/generics59.pas
Ivan Bondarev 6b3169b799 #2569
2021-12-14 20:42:39 +01:00

11 lines
164 B
ObjectPascal

procedure p1<T>(params a: array of T);
begin
assert(typeof(T) = typeof(integer));
end;
function f1: array of integer := nil;
begin
p1(f1);
p1(f1());
end.