Graphql_cohttp (graphql-cohttp.Graphql

module type HttpBody = sig ... end

module type S = sig ... end

module Make
  (Schema : Graphql_intf.Schema)
  (IO : Cohttp.S.IO with type 'a t = 'a Schema.Io.t)
  (Body : HttpBody with type +'a io := 'a Schema.Io.t) : 
  S
    with type 'ctx schema := 'ctx Schema.schema
     and module IO := IO
     and type body := Body.t