X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/clg/blobdiff_plain/81594ec43a7a4ce2021f6c0f385460d6bc6ac187..b0e796e957e197eebeb51e4776b2638d34a957e3:/glib/gboxed.lisp?ds=sidebyside diff --git a/glib/gboxed.lisp b/glib/gboxed.lisp index 1da0bed..f3a6270 100644 --- a/glib/gboxed.lisp +++ b/glib/gboxed.lisp @@ -15,13 +15,13 @@ ;; License along with this library; if not, write to the Free Software ;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -;; $Id: gboxed.lisp,v 1.8 2002-01-20 14:52:04 espen Exp $ +;; $Id: gboxed.lisp,v 1.10 2004-10-27 14:58:59 espen Exp $ (in-package "GLIB") (eval-when (:compile-toplevel :load-toplevel :execute) - (init-types-in-library "libgobject-1.3.so") + (init-types-in-library "libgobject-2.0.so") (defclass boxed (proxy) () (:metaclass proxy-class) @@ -40,7 +40,8 @@ (defbinding %boxed-free (type location) nil ;;;; Metaclass for boxed classes (eval-when (:compile-toplevel :load-toplevel :execute) - (defclass boxed-class (proxy-class)) + (defclass boxed-class (proxy-class) + ()) (defmethod shared-initialize ((class boxed-class) names