Up
Module
Send_result
=
Transport_intf.Send_result
Signature
type
message_too_big = {
size
: int
;
max_message_size
: int
;
}
val
sexp_of_message_too_big :
message_too_big
->
Sexplib.Sexp.t
type
'a t =
| Sent
of
'a
| Closed
| Message_too_big
of
message_too_big
val
sexp_of_t : 'a . ('a ->
Sexplib.Sexp.t
) -> 'a
t
->
Sexplib.Sexp.t