httpcats.core
Httpcats_core.Server
httpcats
httpcats.runtime
type error = [
| `V1 of H1.Server_connection.error
| `V2 of H2.Server_connection.error
| `Protocol of string
]
type request = {
meth : Method.t;
target : string;
scheme : string;
headers : Headers.t;
}
type response = {
status : Status.t;
type body = [
| `V1 of H1.Body.Writer.t
| `V2 of H2.Body.Writer.t
type reqd = [
| `V1 of H1.Reqd.t
| `V2 of H2.Reqd.t
type error_handler = [ `V1 | `V2 ] -> ?request:request -> error -> (Headers.t -> body) -> unit
type 'a handler = 'a -> reqd -> unit