freepascal.compiler/bugs/bug0294.pp

function test(test:longint):longint;
begin
  test:=1;
end;

begin
end.