sig
val interface : OBus_name.interface
val m_Introspect : (unit, string) OBus_member.Method.t
type 'a members = {
m_Introspect : 'a OBus_object.t -> unit -> string Lwt.t;
}
val make :
'a OBus_interfaces.Org_freedesktop_DBus_Introspectable.members ->
'a OBus_object.interface
end