Paf (p.paf.0.7.0.doc.paf.Paf)

Sourcemodule type RUNTIME = sig ... end

Sourcetype 'conn runtime = (module RUNTIME with type t = 'conn)

Sourcetype impl =

| Runtime : 'conn runtime * 'conn -> impl

Sourceexception Flow of string

Sourceexception Flow_write of string

Sourceval server : 'conn runtime -> 'conn -> Mimic.flow -> unit Lwt.t

Sourceval run : 'conn runtime -> 'conn -> Mimic.flow -> unit Lwt.t

Sourcetype 't service

Source

val service : 
  ('connected_flow -> (Mimic.flow * impl, 'error) result Lwt.t) ->
  ('flow -> ('connected_flow, 'error) result Lwt.t) ->
  ('t -> ('flow, [> `Closed ] as 'error) result Lwt.t) ->
  ('t -> unit Lwt.t) ->
  't service

Source

val serve : 
  ?stop:Lwt_switch.t ->
  't service ->
  't ->
  [ `Initialized of unit Lwt.t ]