Update of /project/cells-gtk/cvsroot/root/gtk-ffi In directory common-lisp.net:/tmp/cvs-serv29363/gtk-ffi
Modified Files: gtk-utilities.lisp Log Message: us pointer void in button-press-event-handler arglist Date: Fri Dec 24 16:35:11 2004 Author: ktilton
Index: root/gtk-ffi/gtk-utilities.lisp diff -u root/gtk-ffi/gtk-utilities.lisp:1.6 root/gtk-ffi/gtk-utilities.lisp:1.7 --- root/gtk-ffi/gtk-utilities.lisp:1.6 Thu Dec 23 17:34:51 2004 +++ root/gtk-ffi/gtk-utilities.lisp Fri Dec 24 16:35:10 2004 @@ -74,7 +74,7 @@ (gdk-threads-leave)))
(ffx:ff-defun-callable :cdecl :int button-press-event-handler - ((widget (* :void)) (signal (* gdk-event-button)) (data (* :void))) + ((widget :pointer-void) (signal (* gdk-event-button)) (data :pointer-void)) (declare (ignorable data)) (let ((event (gdk-event-button-type signal))) (when (eql (event-type event) :button_press)