Module Vif_core.ResponseSource

Sourceval src : Logs.src
Sourcetype empty =
  1. | Empty
Sourceand filled =
  1. | Filled
Sourceand sent =
  1. | Sent
Sourcetype 'a state =
  1. | Empty : empty state
  2. | Filled : string Flux.stream -> filled state
  3. | Sent : sent state
Sourceval _empty : empty state
Sourceval filled : string Flux.stream -> filled state
Sourceval sent : sent state
Sourcetype ('p, 'q, 'a) t =
  1. | Add_header : string * string -> ('p, 'p, unit) t
  2. | Add_unless_exists : string * string -> ('p, 'p, bool) t
  3. | Set_header : string * string -> ('p, 'p, unit) t
  4. | Rem_header : string -> ('p, 'p, unit) t
  5. | Return : 'a -> ('p, 'p, 'a) t
  6. | Bind : ('p, 'q, 'a) t * ('a -> ('q, 'r, 'b) t) -> ('p, 'r, 'b) t
  7. | Source : string Flux.source -> (empty, filled, unit) t
  8. | Stream : string Flux.stream -> (empty, filled, unit) t
  9. | String : string -> (empty, filled, unit) t
  10. | Websocket : (empty, sent, unit) t
  11. | Respond : [ Vif_core__.Vif_status.standard | `Code of int ] -> (filled, sent, unit) t
Sourceval bind : ('a, 'b, 'c) t -> ('c -> ('b, 'd, 'e) t) -> ('a, 'd, 'e) t
Sourceval respond : [ Vif_core__.Vif_status.standard | `Code of int ] -> (filled, sent, unit) t
Sourceval return : 'a -> ('b, 'b, 'a) t
Sourceval add : field:string -> string -> ('a, 'a, unit) t
Sourceval add_unless_exists : field:string -> string -> ('a, 'a, bool) t
Sourceval set : field:string -> string -> ('a, 'a, unit) t
Sourceval rem : field:string -> ('a, 'a, unit) t
Sourceval (let*) : ('a, 'b, 'c) t -> ('c -> ('b, 'd, 'e) t) -> ('a, 'd, 'e) t
Sourceval strf : ('a, Format.formatter, unit, string) format4 -> 'a
Sourceval redirect_to : ?with_get:bool -> ('a, 'b, 'c) Vif_core__.Vif_request.t -> (Tyre.evaluable, 'd, (filled, sent, unit) t) Vif_core__.Vif_uri.t -> 'd
Sourcemodule Hdrs : sig ... end
Sourceval can_compress : string -> ('a, 'b, 'c) Vif_core__.Vif_request.t -> bool
Sourceval compression : [> `DEFLATE | `Gzip ] -> ('a, 'b, 'c) Vif_core__.Vif_request.t -> ('d, 'd, bool) t
Sourceval with_source : ?compression:[> `DEFLATE | `Gzip ] -> ('a, 'b, 'c) Vif_core__.Vif_request.t -> string Flux.source -> (empty, filled, unit) t
Sourceval with_stream : ?compression:[> `DEFLATE | `Gzip ] -> ('a, 'b, 'c) Vif_core__.Vif_request.t -> string Flux.stream -> (empty, filled, unit) t
Sourceval connection_close : ('a, 'b, 'c) Vif_core__.Vif_request.t -> ('d, 'd, bool) t
Sourceval content_length : int -> ('a, 'a, bool) t
Sourceval with_string : ?compression:[> `DEFLATE | `Gzip ] -> ('a, 'b, 'c) Vif_core__.Vif_request.t -> string -> (empty, filled, unit) t
Sourceval with_text : ?utf_8:bool -> ?compression:[> `DEFLATE | `Gzip ] -> ('a, 'b, 'c) Vif_core__.Vif_request.t -> string -> (empty, filled, unit) t
Sourceval with_tyxml : ?compression:[> `DEFLATE | `Gzip ] -> ('a, 'b, 'c) Vif_core__.Vif_request.t -> Tyxml.Html.doc -> (empty, filled, unit) t
Sourceval with_json : ?compression:[> `DEFLATE | `Gzip ] -> ('a, 'b, 'c) Vif_core__.Vif_request.t -> ?format:Jsont.format -> ?number_format:Jsont.number_format -> 'd Jsont.t -> 'd -> (empty, filled, unit) t
Sourceval empty : (empty, filled, unit) t
Sourceval websocket : (empty, sent, unit) t
Sourceval response : ?headers:(H2.Headers.name * H2.Headers.value) list -> H2.Status.t -> 'a Vif_core__.Vif_request0.t -> (string, unit) Flux.sink
Sourceval upgrade : ?headers:(H1.Headers.name * H1.Headers.value) list -> 'a Vif_core__.Vif_request0.t -> unit
Sourceval sha1 : String.t -> string
Sourceval get_nonce : 'a Vif_core__.Vif_request0.t -> string option
Sourceval run : 'a 'p 'q. now:(unit -> int32) -> 'socket Vif_core__.Vif_request0.t -> 'p state -> ('p, 'q, 'a) t -> 'q state * 'a