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

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