Fix warnings for bare struct references in glib/.

[cl-gtk2.git] / glib / gobject.object-function.lisp

diff --git a/glib/gobject.object-function.lisp b/glib/gobject.object-function.lisp
index 7c17faf..a3cf4b9 100644 (file)
--- a/glib/gobject.object-function.lisp
+++ b/glib/gobject.object-function.lisp
@@ -3,6 +3,7 @@
 (defcstruct object-func-ref
   (:object :pointer)
   (:fn-id :int))
+(defctype object-func-ref (:struct object-func-ref))
 
 (defmacro define-cb-methods (name return-type (&rest args))
   (flet ((make-name (control-string) (intern (format nil control-string (symbol-name name)) (symbol-package name))))