sig
  val process : bool -> bool
  val init : (int -> bool -> bool -> unit) -> unit
  val add_broadcast :
    'a Serialize.t -> (int -> 'a -> unit) -> int -> 'a -> unit
  val add_client_to_server :
    'a Serialize.t -> (int -> 'a -> unit) -> int -> 'a -> unit
  val add_server_to_client :
    'a Serialize.t -> ('a -> unit) -> int list -> 'a -> unit
  val add_server_broadcast : 'a Serialize.t -> ('a -> unit) -> 'a -> unit
  val check_privileged : unit -> bool
  val add_var :
    string -> 'a Parser.t -> 'a -> 'a Pervasives.ref * (string -> unit)
  val get_local_players : unit -> int list
  val add_synchronizer : (int -> unit) -> unit
end