anchor.diff:  uses
     System.TypInfo, Xml.XMLIntf, System.JSON
   , MARS.Core.JSON, MARS.Core.Utils, MARS.Rtti.Utils
  -, CodeSiteLogging
  +//, CodeSiteLogging
   ;
   
   { TObjectWriter }
  
positive.code:     end
    );
  
    TMARSMessageBodyWriter.WriteWith<TArrayOfObjectWriter>(TValue.From<TArray<TObject>>(LArray)
    , AMediaType, AOutputStream, AActivation
    );
  
  end;
  
  procedure RegisterWriters;
  
negative.code: procedure TObjectListOfTWriter.WriteTo(const AValue: TValue;
    const AMediaType: TMediaType; AOutputStream: TStream;
    const AActivation: IMARSActivation);
  var
    LArray : TArray<TObject>;
  begin
    LArray := [];
  
    TRttiHelper.EnumerateObjectList(AValue.AsObject
    , procedure (Item: TValue)
      begin
  