Fix some compilation warnings

[cl-gtk2.git] / glib / gobject.meta.lisp

diff --git a/glib/gobject.meta.lisp b/glib/gobject.meta.lisp
index f987ad0..aaa54b2 100755 (executable)
--- a/glib/gobject.meta.lisp
+++ b/glib/gobject.meta.lisp
@@ -265,4 +265,5 @@
   (slot-boundp object 'pointer))
 
 (defmethod slot-makunbound-using-class ((class gobject-class) object (slot gobject-effective-slot-definition))
+  (declare (ignore object))
   nil)