[cffi-devel] setf in with-foreign-slots cannot work with LispWorks 5.0 (64bit Linux)

Hi, CFFI Developers

I'm using CFFI in my LispWorks 5.0.2 Enterprise Edition (64bit Linux). I found follow code can not compile:

(in-package :cffi)

(defcstruct c-type (c-long :long))

(defvar a (foreign-alloc 'c-type))

(with-foreign-slots ((c-long) a c-type) (setf c-long 0))

;;; Compiling file /home/binghe/src/lisp/cffi-test.lisp ... ;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0 ;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3 ;;; Source level debugging is on ;;; Source file recording is on ;;; Cross referencing is on ; (TOP-LEVEL-FORM 1) ; (TOP-LEVEL-FORM 2) ; (TOP-LEVEL-FORM 3) ; (TOP-LEVEL-FORM 4) ; (DEFVAR CFFI::A)

**++++ Error in (TOP-LEVEL-FORM 5): Type (SIGNED-BYTE 64) not supported by SYSTEM:TYPED-AREF. ; (TOP-LEVEL-FORM 6) ; *** 1 error detected, no fasl file produced. ;;; Compilation finished with 0 warnings, 1 error.

Is it a bug?