11 Dec
2005
11 Dec
'05
7:56 a.m.
On 2005-dec-11, at 07:00, ssmith wrote:
http://people.vislab.usyd.edu.au/~ssmith/lisp/cffi-gtk-test.lisp
Also, another small suggestion. You could define the gboolean type and make the callback a little more lispy:
(defctype gboolean :boolean)
(defcallback delete-event gboolean ((widget :pointer) (event :pointer) (data :pointer)) (format t "Got delete event, quitting~%") (gtk-main-quit) nil)
--
Luís Oliveira
http://student.dei.uc.pt/~lmoliv/
Equipa Portuguesa do Translation Project
http://www.iro.umontreal.ca/translation/registry.cgi?team=pt