From: Dmitry Kalyanov Date: Fri, 7 Aug 2009 19:26:00 +0000 (+0400) Subject: glib: Fixed copying inline slots to proxy X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=6a4c3fe43ce73a7ff6a1e7b6c878213ef3c6799c;p=cl-gtk2.git glib: Fixed copying inline slots to proxy --- diff --git a/glib/gobject.boxed.lisp b/glib/gobject.boxed.lisp index fc60d4f..661aa6c 100644 --- a/glib/gobject.boxed.lisp +++ b/glib/gobject.boxed.lisp @@ -168,6 +168,7 @@ (mem-aref ptr (cstruct-slot-description-type slot) i)))) ((cstruct-slot-description-inline-p slot) (let ((info (get-g-boxed-foreign-info (cstruct-inline-slot-description-boxed-type-name slot)))) + (setf (slot-value proxy slot-name) (make-instance (cstruct-inline-slot-description-boxed-type-name slot))) (copy-slots-to-proxy (slot-value proxy slot-name) (foreign-slot-pointer native cstruct-type slot-name) (g-boxed-cstruct-wrapper-info-cstruct-description info))))