(get-g-object-for-pointer (g-value-get-object gvalue)))
(defun set-gvalue-object (gvalue value)
(g-value-set-object gvalue (if value (pointer value) (null-pointer))))
(get-g-object-for-pointer (g-value-get-object gvalue)))
(defun set-gvalue-object (gvalue value)
(g-value-set-object gvalue (if value (pointer value) (null-pointer))))