fpc/tests/test/tgenfunc26.pp

25 lines
181 B
ObjectPascal

{ %FAIL }
unit tgenfunc26;
{$mode objfpc}{$H+}
interface
generic procedure Test<T>;
type
Test = record
end;
implementation
generic procedure Test<T>;
begin
end;
end.