{ %FAIL }

unit tgenfunc22;

{$mode delphi}

interface

procedure Test<T: class>;

implementation

procedure Test<T: class>;
begin

end;

end.