On Wed, 2005-12-28 at 00:59 +0700, JoeSB COE9 wrote: > ;; Lisp side > (cffi:with-foreign-object (argv :pointer 2) > (setf (cffi:mem-ref argv :pointer 0) > (cffi:foreign-string-alloc "Hello")) > (setf (cffi:mem-ref argv :pointer 1) > (cffi:foreign-string-alloc "Hello")) > (cffi:foreign-funcall "expect_charpp" :pointer argv)) > > And I got a memory fault error in SBCL.
You want to use MEM-AREF here, not MEM-REF. The optional third argument to MEM-REF is a byte offset to add to the pointer, whereas the third argument to MEM-AREF is an array index. I admit this is a little confusing---I wonder if MEM-AREF might be better given a more generic name and documented as the default accessor for foreign pointers. I don't think user code will need to use the more primitive features of MEM-REF directly very often... James _______________________________________________ cffi-devel mailing list cffi-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/cffi-devel
