+ gvalue +gvalue-value-offset+))
+
+(defun gvalue-peek (gvalue)
+ (funcall (reader-function (gvalue-type gvalue) :ref :peek)
+ gvalue +gvalue-value-offset+))
+
+(defun gvalue-take (gvalue)
+ (funcall (reader-function (gvalue-type gvalue) :ref :get)
+ gvalue +gvalue-value-offset+))