3 (defcfun g-value-init (:pointer g-value)
4 (value (:pointer g-value))
7 (defun g-value-zero (g-value)
9 for i from 0 below (foreign-type-size 'g-value)
10 do (setf (mem-ref g-value :uchar i) 0)))
12 (defcfun g-value-copy :void
13 (src-value (:pointer g-value))
14 (dst-value (:pointer g-value)))
16 (defcfun g-value-reset (:pointer g-value)
17 (value (:pointer g-value)))
19 (defcfun g-value-unset (:pointer g-value)
20 (value (:pointer g-value)))
22 (defcfun g-value-set-instance :void
23 (value (:pointer g-value))
26 (defcfun g-strdup-value-contents :string
27 (value (:pointer g-value)))