Logs.set_level (Some Debug);
Logs.set_reporter (Logs.format_reporter ());
Lwt_main.run
(Server.run {
port = 6667;
tcp_listen_backlog = 8
})