anchor.diff:  unit DUnitX.Tests.Utils;
  -{$I ..\Source\DUnitX.inc}
  +
  +{$I DUnitX.inc}
   
   interface
   
  
positive.code: 
  procedure TValueHelperTests.revertFormatSettings();
  begin
  	System.SysUtils.FormatSettings := originalFormatSettings;
  end;
  
  procedure TValueHelperTests.setFormatSettings(const locale: String);
  
negative.code:   System.DateUtils,
    System.Rtti,
    WinApi.Windows,
    {$ELSE}
    DateUtils,
    Rtti,
    Windows,
    {$ENDIF}
    DUnitX.Utils;
  
  { TMyExampleTests }
  
  constructor TValueHelperTests.Create();
  begin
  	inherited;
  	originalFormatSettings := {$IFDEF USE_NS}System.{$ENDIF}SysUtils.FormatSettings;
  	expectedDate := EncodeDate(2020, 06, 22);
  	expectedTime := EncodeTime(18, 36, 00, 000);
  end;
  