Module Static.HTTP

Parameters

module FS : Mirage_kv.RO
module S : Cohttp_lwt.S.Server

Signature

val start : http_port:int -> ?⁠request_fn:(Uri.t -> Cohttp.Header.t -> Cohttp.Header.t) -> FS.t -> ([> `TCP of int ] -> S.t -> 'a) -> 'a