anchor.diff:  type
     TXMLAttribute = class(TInterfacedObject, IXMLAttribute)
     private
  -    fNode: IDOMNode;
  -  public
  -    constructor Create(ANode: IDOMNode);
  +    fNode: IXMLDomNode;                                 
  +  public
  +    constructor Create(ANode: IXMLDomNode);
       function Ref: IXMLAttribute;
       function Name: TXavierString;
       function Text: TXavierString; overload;
  
positive.code: 
    TXMLPack = class(TInterfacedObject, IXMLPack)
    private
      fDocument: IXMLDocument;
    public
      constructor Create(aStream: TStream); reintroduce; overload;
      constructor Create(const aRootName: RawUTF8); overload;
  
negative.code: 
    TXMLAttributes = class(TInterfacedObject, IXMLAttributes)
    private
      fNode: IXMLDomNode;
    public
      constructor Create(aNode: IXMLDomNode);
      function Ref: IXMLAttributes;
      function Add(const aName, aText: TXavierString): IXMLAttribute;
      function Item(aIndex: Integer): IXMLAttribute; overload;
  