sig
  exception Error of string
  type t =
      I of int
    | C of char
    | F of float
    | S of string
    | List of Protocol.t list
  val c2s_add :
    string ->
    (Udp.address -> Protocol.t list -> unit) ->
    Udp.socket -> Protocol.t list -> unit
  val s2c_add :
    string ->
    (Protocol.t list -> unit) ->
    Udp.socket -> Udp.address -> Protocol.t list -> unit
  val client_net_check : Udp.socket -> unit
  val server_net_check : Udp.socket -> unit
end