anchor.diff:  uses
     DUnitX.Utils.XML,
     SysUtils,
  +  Forms,
     Windows;
   
   const
  
positive.code: begin
     //write the byte order mark
     unicodePreamble := TEncoding.UTF8.GetPreamble;
     if Length(unicodePreamble) > 0 then
        FOutputStream.WriteBuffer(unicodePreamble[0], Length(unicodePreamble));
  
  
negative.code:   sXmlFilename := AFilename;
  
    if sXmlFilename = '' then
      sXmlFilename := ExtractFilePath(Application.ExeName) + DEFAULT_NUNIT_FILE_NAME;
  
    FXMLFileStream := TFileStream.Create(sXmlFilename, fmCreate);
  
  