freepascal.compiler/tests/webtbf/tw6686.pp

{ %FAIL }
program test;

{$mode delphi}

function test;
begin
end;

begin
end.