sig val interface : OBus_name.interface val s_PropertiesChanged : (string * OBus_value.V.single) list OBus_member.Signal.t val make : unit -> 'a OBus_object.interface end