anchor.diff:      DumpSyntaxTree(log, children[i], newPrefix);
   end;
   
  -procedure TfrmDLMain.DumpUses(log: TStrings; const usesList: IList<string>; const location: TDLCoordinate);
  +procedure TfrmDLMain.DumpUses(log: TStrings; const usesList: TDLUnitList;
  +  const location: TDLCoordinate);
   var
     unitName: string;
   begin
  
positive.code: 
  procedure TfrmDLMain.lbFilesClick(Sender: TObject);
  var
    dlUnitInfo: TDLUnitInfo;
    outSl     : TStringList;
    unitInfo  : TProjectIndexer.TUnitInfo;
  begin
  
negative.code:   end;
  end;
  
  procedure TfrmDLMain.DumpAnalysis(log: TStrings; const unitInfo: IDLUnitInfo);
  var
    isProgram: boolean;
  begin
  