From 6a4c3fe43ce73a7ff6a1e7b6c878213ef3c6799c Mon Sep 17 00:00:00 2001 From: Dmitry Kalyanov Date: Fri, 7 Aug 2009 23:26:00 +0400 Subject: [PATCH] glib: Fixed copying inline slots to proxy --- glib/gobject.boxed.lisp | 1 + 1 file changed, 1 insertion(+) 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)))) -- 1.7.10.4