Logs.set_level (Some Debug);
Logs.set_reporter (Logs.format_reporter ());

Lwt_main.run
  (Irc_server.run {
      port = 6667;
      tcp_listen_backlog = 8
    })