Module Graphql_cohttp.Make

Parameters

module Schema : Graphql_intf.Schema
module IO : Cohttp.S.IO with type 'a t = 'a Schema.Io.t
module Body : HttpBody with type +'a io := 'a Schema.Io.t

Signature

type response_action = [
| `Expert of Cohttp.Response.t * (IO.ic -> IO.oc -> unit IO.t)
| `Response of Cohttp.Response.t * Body.t
]
type 'conn callback = 'conn -> Cohttp.Request.t -> Body.t -> response_action IO.t
val execute_request : 'ctx Schema.schema -> 'ctx -> Cohttp.Request.t -> Body.t -> response_action IO.t
val make_callback : (Cohttp.Request.t -> 'ctx) -> 'ctx Schema.schema -> 'conn callback