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