(+g-type-object+ (parse-gvalue-object gvalue))
(+g-type-interface+ (parse-gvalue-object gvalue))
(t (error "Unknown type: ~A (~A)" type (g-type-name type))))))))
(+g-type-object+ (parse-gvalue-object gvalue))
(+g-type-interface+ (parse-gvalue-object gvalue))
(t (error "Unknown type: ~A (~A)" type (g-type-name type))))))))