1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
module type S = sig
type in_channel
type out_channel
type sockaddr =
| Unix of string
| Inet of string * int
val output_char : out_channel -> char -> unit Lwt.t
val output_string : out_channel -> string -> unit Lwt.t
val flush : out_channel -> unit Lwt.t
val input_char : in_channel -> char Lwt.t
val really_input : in_channel -> bytes -> int -> int -> unit Lwt.t
val close_in : in_channel -> unit Lwt.t
val getlogin : unit -> string Lwt.t
val open_connection : sockaddr -> (in_channel * out_channel) Lwt.t
end