freepascal.compiler/bugs/bug0166.pp

type
  punknown=^unknown;
  
  t=object
    procedure p(i:unknown);
  end;

begin
end.