Module Resto_directory.Answer

type ('o, 'e) t = [
  1. | `Ok of 'o
  2. | `OkStream of 'o stream
  3. | `Created of string option
  4. | `No_content
  5. | `Unauthorized of 'e option
  6. | `Forbidden of 'e option
  7. | `Not_found of 'e option
  8. | `Conflict of 'e option
  9. | `Error of 'e option
]

Return type for service handler

and 'a stream = {
  1. next : unit -> 'a option Lwt.t;
  2. shutdown : unit -> unit;
}
val return : 'o -> ('o, 'e) t Lwt.t
val return_stream : 'o stream -> ('o, 'e) t Lwt.t