sig
  type name = OBus_name.error
  type message = string
  exception DBus of OBus_error.name * OBus_error.message
  val ocaml : OBus_error.name
  val name : exn -> OBus_error.name
  val make : OBus_error.name -> OBus_error.message -> exn
  val cast : exn -> OBus_error.name * OBus_error.message
  module type Error =
    sig exception E of string val name : OBus_error.name end
  module Register : functor (Error : Error-> sig  end
  exception Failed of OBus_error.message
  exception Invalid_args of OBus_error.message
  exception Unknown_method of OBus_error.message
  exception Unknown_object of OBus_error.message
  exception Unknown_interface of OBus_error.message
  exception Unknown_property of OBus_error.message
  exception Property_read_only of OBus_error.message
  exception No_memory of OBus_error.message
  exception No_reply of OBus_error.message
end