Index: dbus.scm =================================================================== --- dbus.scm (revision 25842) +++ dbus.scm (working copy) @@ -89,6 +89,7 @@ (define dbus:type-signature-string (foreign-value DBUS_TYPE_SIGNATURE_AS_STRING int)) (define dbus:type-array (foreign-value DBUS_TYPE_ARRAY int)) (define dbus:type-array-string (foreign-value DBUS_TYPE_ARRAY_AS_STRING int)) +(define dbus:type-dict (foreign-value DBUS_TYPE_DICT_ENTRY int)) (define dbus:make-context) (define dbus:send) @@ -387,6 +388,8 @@ C_return (ret);") iter)] [(eq? type dbus:type-array) (iter->vector (make-sub-iter iter))] + [(eq? type dbus:type-dict) + (iter->list (make-sub-iter iter))] ;; unsupported so far (not understood well enough): ;; dbus:type-object-path and dbus:type-signature ;; dbus:type-invalid is returned as #f (could be (void) but that