Up

Module Control

Signature

type 'name t =
| Unauthorized of string
| Duplicate of 'name
| Wrong_mode of 'name
| Too_many_clients of string
| Almost_full of int
| Connect of ('name * [
| `credentials of string
])
| Disconnect of 'name * Import.Sexp.t
| Parse_error of 'name * string
| Protocol_error of string
val t_of_sexp : 'name . (Sexplib.Sexp.t -> 'name) -> Sexplib.Sexp.t -> 'name t
val sexp_of_t : 'name . ('name -> Sexplib.Sexp.t) -> 'name t -> Sexplib.Sexp.t
val bin_size_t : ('a -> int) -> 'a t -> int
val __bin_read_t__ : 'a -> 'b -> pos_ref:Core.Std.Bin_prot.Common.pos Core.Std.ref -> 'c -> 'd
val bin_read_t : (Bin_prot.Common.buf -> pos_ref:Bin_prot.Common.pos_ref -> 'a) -> Bin_prot.Common.buf -> pos_ref:Bin_prot.Common.pos_ref -> 'a t