anchor.diff:          m.DefineStaticParameters(sargs, fun methName parameterValues ->
               match parameterValues with 
               | [| :? string as query |] ->
  -                // Make a first flight to be sure the query is accepted by the server
  -                launchQuery serverUrl query |> Async.Catch |> Async.RunSynchronously |> function
  -                | Choice1Of2 _ -> ()
  -                | Choice2Of2 ex -> failwith ex.Message
  +                let queryName = getQueryName serverUrl query
                   let m2 = ProvidedMethod(methName, [], asyncType, IsStaticMethod = true) 
                   m2.InvokeCode <- fun _ ->
  -                    <@@ launchQuery serverUrl query @@>
  +                    <@@ launchQuery serverUrl query queryName @@>
                   tdef.AddMember m2
                   m2
               | _ -> failwith "unexpected parameter values")
  
positive.code:             let res = JToken.Parse json |> jsonToObject :?> IDictionary<string,obj>
              if res.ContainsKey("errors") then
                  res.["errors"] :?> string[] |> String.concat "\n" |> failwith
              // TODO: Find a more structured way to get the query name
              let queryName = Regex.Match(query, "^.*?(\w+)").Groups.[1].Value
              return (res.["data"] :?> IDictionary<string,obj>).[queryName]
          }
  
      let createStaticMethod (tdef: ProvidedTypeDefinition) (resType: Type) (serverUrl) =
          let asyncType = typeof<Async<obj>>.GetGenericTypeDefinition().MakeGenericType(resType)
  
negative.code: 
  module Util =
      open System.Text.RegularExpressions
      open FSharp.Data.GraphQL
  
      let requestSchema (url: string) =
          async {
  