anchor.diff:  uses
     Classes, 
     SysUtils,
  -  xmlDoc, 
  -  xmlIntf,
  -  xmlDom,
  +  MSXML2_TLB,
     SynCommons,
     JamesDataBase,
     JamesDataCore,
  +  JamesDataAdapters,
     XavierBase,
     XavierCore,
     XavierAdapters;
  
positive.code: end;
  
  function TXMLPack.Nodes(const XPath: TXavierString): IXMLNodes;
  begin
    raise EXMLError.Create('Not implemented yet');
  end;
  
  function TXMLPack.Node(const XPath: TXavierString): IXMLNode;
  
negative.code: end;
  
  function TXMLChilds.Item(const aName: TXavierString): IXMLNode;
  var
    n: IXMLDOMNode;
  begin
    n := fNode.selectSingleNode(aName);
    if not assigned(n) then
      raise EXMLError.CreateFmt('Node "%s" not found.', [aName]);
    result := TXMLNode.Create(n);
  end;
  
  function TXMLChilds.Count: Integer;
  