type ttype error = [ | `Bad_request |
| `Bad_gateway |
| `Internal_server_error |
| `Exn of exn |
]
val request : t -> Request.tval request_body : t -> [ `read ] Body.tval response : t -> Response.t optionval response_exn : t -> Response.t
val respond_with_string : t -> Response.t -> string -> unitval respond_with_bigstring : t -> Response.t -> Bigstringaf.t -> unitval respond_with_streaming : ?flush_headers_immediately:bool -> t -> Response.t -> [ `write ] Body.tval respond_with_upgrade : t -> Headers.t -> (unit -> unit) -> unit
val error_code : t -> error optionval report_exn : t -> exn -> unitval try_with : t -> (unit -> unit) -> (unit, exn) Result.result