[cffi-devel] cffi-uffi-compat, cl-gd, and openmcl

bryan d.o'connor bryan-lisp at lunch.org
Sat Oct 1 18:25:27 UTC 2005


i'm trying to get cl-gd up and running on openmcl 1.0-rc1
(darwin32) using cffi-uffi-compat (cffi-luis branch).

some of the cl-gd tests crash my lisp, i think i've boiled
it down to this (hopefully valid) test case which does work
in uffi:

(def-struct a (x :int) (y :int))

(let ((array (allocate-foreign-object 'a 3)))
   (loop for i below 3
         do (setf (get-slot-value (deref-array array '(:array a) i)  
'a 'x) 1))
   (get-slot-value (deref-array array '(:array a) 2) 'a 'x))

the (setf ...) SIGSEGVs in %mem-set.

i see similar results with sbcl 0.9.5.2.

thanks,

       ...bryan





More information about the cffi-devel mailing list