sig val block : DBus.pending_call -> unit val cancel : DBus.pending_call -> unit val get_completed : DBus.pending_call -> bool val steal_reply : DBus.pending_call -> DBus.message end