From a4ef7d75a39821a90d7a872e2b840140adb15216 Mon Sep 17 00:00:00 2001 From: Dmitry Kalyanov Date: Thu, 6 Aug 2009 11:32:44 +0400 Subject: [PATCH] glib: Fix memory overwrite in translate-to-foreign for variant cstructures --- glib/gobject.boxed.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/glib/gobject.boxed.lisp b/glib/gobject.boxed.lisp index 61eacee..301e175 100644 --- a/glib/gobject.boxed.lisp +++ b/glib/gobject.boxed.lisp @@ -453,7 +453,7 @@ (null-pointer) (let* ((type (g-boxed-foreign-info foreign-type)) (cstruct-description (decide-native-type type proxy))) - (with-foreign-object (native-structure (generated-cstruct-name + (with-foreign-object (native-structure (generated-cunion-name (var-structure-name (g-boxed-variant-cstruct-info-root type)))) (copy-slots-to-native proxy native-structure cstruct-description) -- 1.7.10.4