fpc/tests/test/tgenfunc16.pp

22 lines
201 B
ObjectPascal

{ %OPT=-vw -Sew }
unit tgenfunc16;
interface
generic procedure Test<T>;
generic procedure Foo<T>;
implementation
generic procedure Test<T>;
begin
end;
generic procedure Foo<T>;
begin
end;
end.