Fix warnings for bare struct references in gtk/.

[cl-gtk2.git] / gtk / gtk.object.lisp

diff --git a/gtk/gtk.object.lisp b/gtk/gtk.object.lisp
index fca168c..ed41dd7 100644 (file)
--- a/gtk/gtk.object.lisp
+++ b/gtk/gtk.object.lisp
@@ -3,6 +3,7 @@
 (defcstruct %gtk-object
   (parent-instance gobject::%g-initially-unowned)
   (flags :uint32))
+(defctype %gtk-object (:struct %gtk-object))
 
 (defun gtk-object-flags-as-integer (object)
   (foreign-slot-value (pointer object) '%gtk-object 'flags))