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