type bigarray =
(char, Bigarray.int8_unsigned_elt, Bigarray.c_layout)Bigarray.Array1.t
type failure =
| Io_error
| UnixofUnix.error * string * string
| Unknownof exn
| Timeout
val read :
?recursive:bool ->?init:string ->?on_error:((string * failure)-> unit)->?timeout:float ->priority:'a->'ascheduler->socket->marker->((string * string option)-> unit)->
unit
val write :
?exec:(unit -> unit)->?on_error:(failure-> unit)->?bigarray:bigarray->?string:string ->?timeout:float ->priority:'a->'ascheduler->socket->
unit