anchor.diff:    Result := appendVariant(Name, Value);
   end;
   {$ENDIF}
  +
  +function TBsonBuffer.append(const Value: IBson): Boolean;
  +begin
  +  Result := bson_concat(GetCurrNativeBson, Value.NativeBson);
  +end;
   
   function TBsonBuffer.appendVariant(const Name: UTF8String; const Value:
       Variant): Boolean;
  
positive.code:     function append(const Name: UTF8String; const Value: Variant): Boolean;
          overload;
      {$ENDIF}
      function appendVariant(const Name: UTF8String; const Value: Variant): Boolean;
      { append an array of Integers }
      function appendArray(const Name: UTF8String; const Value: TIntegerArray):
  
negative.code:     function append(const Name: UTF8String; const Value: Variant): Boolean;
          overload;
      {$ENDIF}
      function append(const Value: IBson): Boolean; overload;
      function appendVariant(const Name: UTF8String; const Value: Variant): Boolean;
      function appendArray(const Name: UTF8String; const Value: TIntegerArray):
          Boolean; overload;
  