X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=glib%2Fgobject.signals.lisp;fp=glib%2Fgobject.signals.lisp;h=3d6925d9ef8473426a0b9c0cde80ad94468a5256;hb=44b7d0157ee74ec0565821064419b90cf0ab3050;hp=99d77e54e1055a0c683052b2104c0148c8326925;hpb=42a43abcac1e98563cb5719142206b8bd35f42ac;p=cl-gtk2.git

diff --git a/glib/gobject.signals.lisp b/glib/gobject.signals.lisp
index 99d77e5..3d6925d 100644
--- a/glib/gobject.signals.lisp
+++ b/glib/gobject.signals.lisp
@@ -6,6 +6,7 @@
   (:parent-instance g-closure)
   (:object :pointer)
   (:function-id :int))
+(defctype lisp-signal-handler-closure (:struct lisp-signal-handler-closure))
 
 (defun finalize-lisp-signal-handler-closure (closure)
   (let* ((function-id (foreign-slot-value closure 'lisp-signal-handler-closure :function-id))