anchor.diff:  var
     srcFname, itm: string;
     tempSrc: TStringList;
  -  i: Integer;
  +  i, j: Integer;
   begin
     if fDoc = nil then exit;
     if fDoc.Lines.Count = 0 then exit;
  
positive.code:   fDmdProc.Parameters.Add(srcFname);
  
    // other project sources, -I, -J
    if fProj <> nil then begin
      fDmdProc.CurrentDirectory := extractFilePath(fProj.fileName);
      for i := 0 to fProj.Sources.Count-1 do begin
        itm := fProj.getAbsoluteSourceName(i);
  
negative.code:       fDmdProc.Parameters.Add('-I' + symbolExpander.get(itm));
      for itm in fProj.currentConfiguration.pathsOptions.Imports do
        fDmdProc.Parameters.Add('-J' + symbolExpander.get(itm));
      break;
    end;
  
    //adds the libman entries
  