anchor.diff:    finally
       RS.Free;
     end;
  +
  +  Log.LeaveMethod(TFIToolkit, @TFIToolkit.PrintHelp);
   end;
   
   class procedure TFIToolkit.PrintHelpSuggestion(const FullExePath : TFileName);
   begin
  +  Log.EnterMethod(TFIToolkit, @TFIToolkit.PrintHelpSuggestion, [FullExePath]);
  +
     PrintLn(Format(RSHelpSuggestion,
       [TPath.GetFileName(FullExePath) + STR_CLI_OPTIONS_DELIMITER + STR_CLI_OPTION_PREFIX + STR_CLI_OPTION_HELP]));
  +
  +  Log.LeaveMethod(TFIToolkit, @TFIToolkit.PrintHelpSuggestion);
   end;
   
   procedure TFIToolkit.PrintVersion;
   begin
  +  Log.EnterMethod(TFIToolkit, @TFIToolkit.PrintVersion, []);
  +
     PrintLn(GetAppVersionInfo);
  +
  +  Log.LeaveMethod(TFIToolkit, @TFIToolkit.PrintVersion);
   end;
   
   procedure TFIToolkit.ProcessOptions;
   var
  -  O : TCLIOption;
  -  C : TApplicationCommand;
  -begin
  +  Opt : TCLIOption;
  +  Cmd : TApplicationCommand;
  +begin
  +  Log.EnterMethod(TFIToolkit, @TFIToolkit.ProcessOptions, []);
  +
     FOptions.Sort(TComparer<TCLIOption>.Construct(
       function (const Left, Right : TCLIOption) : Integer
       begin
  
positive.code:     .AddTransitions(ARR_INITIAL_APPSTATES, asConfigGenerated, acGenerateConfig,
        procedure (const PreviousState, CurrentState : TApplicationState; const UsedCommand : TApplicationCommand)
        begin
          InitConfig(True);
          PrintLn(RSConfigWasGenerated);
          PrintLn(RSEditConfigManually);
        end
      )
      .AddTransitions(ARR_INITIAL_APPSTATES, asConfigSet, acSetConfig,
        procedure (const PreviousState, CurrentState : TApplicationState; const UsedCommand : TApplicationCommand)
        begin
          InitConfig(False);
        end
      );
  
negative.code: 
  type
  
    TFIToolkit = class sealed (TLoggable)
      private
        type
          //TODO: replace when "F2084 Internal Error: URW1175" fixed
  