anchor.diff:  
   uses
     Classes, SysUtils,
  -  xmlDoc, xmlIntf,
  +  xmlDoc, xmlIntf, xmlDom,
     James.Data,
     James.Data.Clss,
     Xavier.Core;
  
positive.code: 
  function TXMLNodes.Count: Integer;
  begin
    Result := FNode.ChildNodes.Count;
  end;
  
  { TXMLPack }
  
negative.code: 
  function TXMLNode.Value: XMLString;
  begin
    Result := FNode.nodeValue;
  end;
  
  function TXMLNode.Value(const AValue: XMLString): IXMLNode;
  begin
    Result := Self;
    FNode.nodeValue := AValue;
  end;
  
  function TXMLNode.Attrs: IXMLAttributes;
  