Module Server.Make_ext

Parameters

module S : Irmin.S
module Remote : sig ... end
module T : Irmin_graphql.Server.CUSTOM_TYPES with type key := S.key and type metadata := S.metadata and type contents := S.contents and type hash := S.hash and type branch := S.branch

Signature

module IO : Cohttp_lwt.S.IO
type repo = S.repo
type server = Cohttp_lwt_unix.Server.t
type response_action = [
| `Expert of Cohttp.Response.t * (IO.ic -> IO.oc -> unit Lwt.t)
| `Response of Cohttp.Response.t * Cohttp_lwt.Body.t
]
val schema : repo -> unit Irmin_graphql.Server.Schema.schema
val execute_request : unit Irmin_graphql.Server.Schema.schema -> Cohttp_lwt.Request.t -> Cohttp_lwt.Body.t -> response_action Lwt.t
val v : repo -> server