fpc/tests/webtbs/tw38012.pp

15 lines
147 B
ObjectPascal

{$mode objfpc}
program test;
generic procedure DoThis<T>(msg: T);
begin
end;
generic procedure DoThis<T>(a: array of T);
begin
end;
begin
end.