fpc/tests/tbs/tbs0256.pp

{$mode tp}

{$undef dummy }

{$ifdef dummy}
    procedure test;
      begin
         foreach({$ifndef TP}@{$endif}add_to_browserlog);
      end;
{$endif BrowserLog}

begin
end.