sig
  val interface : OBus_name.interface
  val m_AcquireInterfaceLock : (string * bool, unit) OBus_member.Method.t
  val m_AddCapability : (string, unit) OBus_member.Method.t
  val m_AddonIsReady : (unit, bool) OBus_member.Method.t
  val m_ClaimInterface : (string * string, bool) OBus_member.Method.t
  val m_EmitCondition : (string * string, bool) OBus_member.Method.t
  val m_GetAllProperties :
    (unit, (string * OBus_value.V.single) list) OBus_member.Method.t
  val m_GetProperty : (string, OBus_value.V.single) OBus_member.Method.t
  val m_GetPropertyBoolean : (string, bool) OBus_member.Method.t
  val m_GetPropertyDouble : (string, float) OBus_member.Method.t
  val m_GetPropertyInteger : (string, int32) OBus_member.Method.t
  val m_GetPropertyString : (string, string) OBus_member.Method.t
  val m_GetPropertyStringList : (string, string list) OBus_member.Method.t
  val m_GetPropertyType : (string, int32) OBus_member.Method.t
  val m_IsCallerLockedOut : (string * string, bool) OBus_member.Method.t
  val m_IsCallerPrivileged : (string * string, string) OBus_member.Method.t
  val m_IsLockedByOthers : (string, bool) OBus_member.Method.t
  val m_Lock : (string, bool) OBus_member.Method.t
  val m_PropertyExists : (string, bool) OBus_member.Method.t
  val m_QueryCapability : (string, bool) OBus_member.Method.t
  val m_ReleaseInterfaceLock : (string, unit) OBus_member.Method.t
  val m_RemoveProperty : (string, unit) OBus_member.Method.t
  val m_Reprobe : (unit, bool) OBus_member.Method.t
  val m_Rescan : (unit, bool) OBus_member.Method.t
  val m_SetMultipleProperties :
    ((string * OBus_value.V.single) list, unit) OBus_member.Method.t
  val m_SetProperty :
    (string * OBus_value.V.single, unit) OBus_member.Method.t
  val m_SetPropertyBoolean : (string * bool, unit) OBus_member.Method.t
  val m_SetPropertyDouble : (string * float, unit) OBus_member.Method.t
  val m_SetPropertyInteger : (string * int32, unit) OBus_member.Method.t
  val m_SetPropertyString : (string * string, unit) OBus_member.Method.t
  val m_SetPropertyStringList :
    (string * string list, unit) OBus_member.Method.t
  val m_StringListAppend : (string * string, unit) OBus_member.Method.t
  val m_StringListPrepend : (string * string, unit) OBus_member.Method.t
  val m_StringListRemove : (string * string, unit) OBus_member.Method.t
  val m_Unlock : (unit, bool) OBus_member.Method.t
  val s_Condition : (string * string) OBus_member.Signal.t
  val s_InterfaceLockAcquired :
    (string * string * int32) OBus_member.Signal.t
  val s_InterfaceLockReleased :
    (string * string * int32) OBus_member.Signal.t
  val s_PropertyModified :
    (int32 * (string * bool * bool) list) OBus_member.Signal.t
  type 'a members = {
    m_AcquireInterfaceLock : 'a OBus_object.t -> string * bool -> unit Lwt.t;
    m_AddCapability : 'a OBus_object.t -> string -> unit Lwt.t;
    m_AddonIsReady : 'a OBus_object.t -> unit -> bool Lwt.t;
    m_ClaimInterface : 'a OBus_object.t -> string * string -> bool Lwt.t;
    m_EmitCondition : 'a OBus_object.t -> string * string -> bool Lwt.t;
    m_GetAllProperties :
      'a OBus_object.t -> unit -> (string * OBus_value.V.single) list Lwt.t;
    m_GetProperty : 'a OBus_object.t -> string -> OBus_value.V.single Lwt.t;
    m_GetPropertyBoolean : 'a OBus_object.t -> string -> bool Lwt.t;
    m_GetPropertyDouble : 'a OBus_object.t -> string -> float Lwt.t;
    m_GetPropertyInteger : 'a OBus_object.t -> string -> int32 Lwt.t;
    m_GetPropertyString : 'a OBus_object.t -> string -> string Lwt.t;
    m_GetPropertyStringList : 'a OBus_object.t -> string -> string list Lwt.t;
    m_GetPropertyType : 'a OBus_object.t -> string -> int32 Lwt.t;
    m_IsCallerLockedOut : 'a OBus_object.t -> string * string -> bool Lwt.t;
    m_IsCallerPrivileged :
      'a OBus_object.t -> string * string -> string Lwt.t;
    m_IsLockedByOthers : 'a OBus_object.t -> string -> bool Lwt.t;
    m_Lock : 'a OBus_object.t -> string -> bool Lwt.t;
    m_PropertyExists : 'a OBus_object.t -> string -> bool Lwt.t;
    m_QueryCapability : 'a OBus_object.t -> string -> bool Lwt.t;
    m_ReleaseInterfaceLock : 'a OBus_object.t -> string -> unit Lwt.t;
    m_RemoveProperty : 'a OBus_object.t -> string -> unit Lwt.t;
    m_Reprobe : 'a OBus_object.t -> unit -> bool Lwt.t;
    m_Rescan : 'a OBus_object.t -> unit -> bool Lwt.t;
    m_SetMultipleProperties :
      'a OBus_object.t -> (string * OBus_value.V.single) list -> unit Lwt.t;
    m_SetProperty :
      'a OBus_object.t -> string * OBus_value.V.single -> unit Lwt.t;
    m_SetPropertyBoolean : 'a OBus_object.t -> string * bool -> unit Lwt.t;
    m_SetPropertyDouble : 'a OBus_object.t -> string * float -> unit Lwt.t;
    m_SetPropertyInteger : 'a OBus_object.t -> string * int32 -> unit Lwt.t;
    m_SetPropertyString : 'a OBus_object.t -> string * string -> unit Lwt.t;
    m_SetPropertyStringList :
      'a OBus_object.t -> string * string list -> unit Lwt.t;
    m_StringListAppend : 'a OBus_object.t -> string * string -> unit Lwt.t;
    m_StringListPrepend : 'a OBus_object.t -> string * string -> unit Lwt.t;
    m_StringListRemove : 'a OBus_object.t -> string * string -> unit Lwt.t;
    m_Unlock : 'a OBus_object.t -> unit -> bool Lwt.t;
  }
  val make :
    'a Hal_interfaces.Org_freedesktop_Hal_Device.members ->
    'a OBus_object.interface
end