AFTN.Server
val clients : Unix.file_descr list Stdlib.ref
val clients_mutex : Stdlib.Mutex.t
val broadcast_message : Unix.file_descr -> string -> unit
val handle_client : Unix.file_descr -> unit
val start_server : int -> 'a