r9839: disable test on lispworks, add note

[uffi.git] / tests / pointers.lisp

diff --git a/tests/pointers.lisp b/tests/pointers.lisp
index 886ea517816b30f03046b659940143b1d48f2b10..716844893801679bbd6b03d59db6dda65209b99e 100644 (file)
--- a/tests/pointers.lisp
+++ b/tests/pointers.lisp
@@ -52,6 +52,10 @@
       (uffi:convert-from-foreign-string fs))
   "a")
 
+;; This produces an array which needs fli:foreign-aref to access
+;; rather than fli:dereference
+
+#-lispworks
 (deftest chptr.6
     (uffi:with-foreign-object (fs '(:array :unsigned-char 128))
       (setf (uffi:deref-array fs '(:array :unsigned-char) 0)