anchor.diff:                  | ex -> mapper (acc + " " + ex.Message) tail
           failwithf "Failure calling GraphQL server. %s" (mapper "" exns)
   
  +    let private ensureSuccessCode (response : Async<HttpResponseMessage>) =
  +        async {
  +            let! response = response
  +            return response.EnsureSuccessStatusCode()
  +        }
  +
       let private addHeaders (httpHeaders : seq<string * string>) (requestMessage : HttpRequestMessage) =
           if not (isNull httpHeaders)
           then httpHeaders |> Seq.iter (fun (name, value) -> requestMessage.Headers.Add(name, value))
  
positive.code:             use requestMessage = new HttpRequestMessage(HttpMethod.Post, serverUrl)
              requestMessage.Content <- content
              addHeaders httpHeaders requestMessage
              let! response = client.SendAsync(requestMessage) |> Async.AwaitTask
              let! content = response.Content.ReadAsStringAsync() |> Async.AwaitTask
              if response.IsSuccessStatusCode
              then return content
              else return raise <| GraphQLRequestException(response.StatusCode, content)
          }
  
      let private getAsync (client : HttpClient) (serverUrl : string) =
          async {
              let! response = client.GetAsync(serverUrl) |> Async.AwaitTask
              let! content = response.Content.ReadAsStringAsync() |> Async.AwaitTask
              if response.IsSuccessStatusCode
              then return content
              else return raise <| GraphQLRequestException(response.StatusCode, content)
          }
  
      /// Sends a request to a GraphQL server asynchronously.
  
negative.code: open FSharp.Data.GraphQL
  open FSharp.Data.GraphQL.Client
  open System.Text
  
  /// The base type for all GraphQLProvider upload types.
  /// Upload types are used in GraphQL multipart request spec, mostly for file uploading features.
  