freepascal.compiler/tests/tbf/tb0023.pp

{ %FAIL }
{ Old file: tbf0136.pp }
{ No types necessary in the procedure header            OK 0.99.6 (PFV) }

{
  No type declaration necessary ????
}
procedure p(handle1,handle2);
begin
end;

begin
end.