anchor.diff:      procedure LoadFromFile(FileName: string);
     end;
   
  +  { TmXmlElement }
  +
     TmXmlElement = class
     private
       FImpl : TImpl_mXmlElement;
  
positive.code:   Result := FImpl._GetDateTimeAttribute(Name);
  end;
  
  function TmXmlElement.GetDateTimeAttribute(Name: TmXmlString; Default: TDateTime): TDateTime;
  begin
    Result := FImpl._GetDateTimeAttribute(Name, Default);
  end;
  
  function TmXmlElement.GetIntegerAttribute(Name: TmXmlString): integer;
  
negative.code:   inherited;
  end;
  
  function TmXmlElement.GetAttribute(Name: TmXmlString; DefaultValue: TmXmlString
    ): TmXmlString;
  begin
    Result := FImpl._GetAttribute(Name, DefaultValue);
  end;
  
  function TmXmlElement.GetDateTimeAttribute(Name: TmXmlString): TDateTime;
  