[clisp-list] C function addresses

[Knut A. E. <kn...@ii...>]

Hi,

I'm need to pass a callback function created with DEF-C-CALL-IN as an
argument to a C function (declared with DEF-C-CALL-OUT).  Something like
this:

;; Callback function
(def-c-call-in draw (:return-type nil))
(defun draw ()
  (...))

(defun some-function
  ...
  (glutDisplayFunc #'draw)
  ...)

This doesn't work, of course.  I don't want the lisp function #'DRAW, I
think what I need is the address of the C function draw.  How can I do
that?


For those interested: I am trying to make OpenGL bindings for clisp, more
specifically a port of the Allegro bindings found at
<URL:http://www.neci.nj.nec.com/homepages/mann/software-available.html>.
If OpenGL bindings for clisp already exists, please let me know.

-- 
Knut Arild Erstad

Vacuums are nothings.
We only mention them to let them know we know they're there.