anchor.diff:  
   function NewBson(const json: UTF8String): IBson; overload;
   function NewBson(const AData: PByte; len: Cardinal): IBson; overload;
  -function NewBson(const ANativeBson: bson_p; AOwnsNativeBson: Boolean): IBson; overload;
  +function NewBson(ANativeBson: bson_p; AOwnsNativeBson: Boolean): IBson; overload;
   function NewBsonCopy(const b: IBson): IBson;
   
   {$IFDEF DELPHIXE2}
  
positive.code: 
  { TBson }
  
  constructor TBson.Create(const ANativeBson: bson_p; AOwnsNativeBson: Boolean);
  begin
    inherited Create;
    FNativeBson := ANativeBson;
  
negative.code:   Result := TBson.Create(AData, len);
  end;
  
  function NewBson(ANativeBson: bson_p; AOwnsNativeBson: Boolean): IBson;
  begin
    Result := TBson.Create(ANativeBson, AOwnsNativeBson);
  end;
  