anchor.diff:  var
     LJSON: TJSONValue;
   begin
  -  LJSON :=  StreamToJSONValue(Response);
  +  LJSON :=  ResponseAsJSON;
     try
       Result := (LJSON as TJSONObject).ToRecord<T>;
     finally
  
positive.code: var
    LJSON: TJSONValue;
  begin
    LJSON := StreamToJSONValue(Response);
    try
      Result := (LJSON as TJSONArray).ToArrayOfRecord<T>;
    finally
      LJSON.Free;
    end;
  end;
  
  procedure TMARSClientResourceFormData.PUT(
  
negative.code: implementation
  
  uses
    MARS.Core.MediaType
  ;
  
  { TMARSClientResourceFormData }
  