[cffi-devel] Trivial GTK/CFFI test

[Luís Oliveira]

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