freepascal.compiler/tests/tbf/tb0088.pp

{ %FAIL }
{$mode objfpc}
label l;

begin
   try
   finally
   l:
   end;
   goto l;
end.