Server.IO
type !'a t = 'a
val (>>=) : 'a t -> ('a -> 'b t) -> 'b t
val return : 'a -> 'a t
type ic
type oc
type conn = Picos_io.Unix.file_descr
val refill : ic -> [ `Eof | `Ok ] t
val with_input_buffer : ic -> f:(string -> pos:int -> len:int -> 'a * int) -> 'a
val read_line : ic -> string option t
val read : ic -> int -> string t
val write : oc -> string -> unit t
val flush : oc -> unit t