(require 'asdf)
(asdf:operate 'asdf:load-op 'verrazano)

(verrazano:create-binding 
 (verrazano:setup-build "gccxml" 
                        (make-pathname :device "/" :directory "tmp"))
  "testsuite/ftgl-unix/ftgl.binding"
  "testsuite/ftgl-unix/ftgl-library.lisp"
  :cffi-backend)
(quit)