sig
  val send : DBus.bus -> DBus.message -> int32
  val send_with_reply : DBus.bus -> DBus.message -> int -> DBus.pending_call
  val send_with_reply_and_block :
    DBus.bus -> DBus.message -> int -> DBus.error -> DBus.message
  val add_filter : DBus.bus -> (DBus.bus -> DBus.message -> bool) -> unit
  val flush : DBus.bus -> unit
  val read_write : DBus.bus -> int -> bool
  val read_write_dispatch : DBus.bus -> int -> bool
  val pop_message : DBus.bus -> DBus.message option
  val get_fd : DBus.bus -> Unix.file_descr
end