From 069f5e289f67cbe0507724db002497d4472f926f Mon Sep 17 00:00:00 2001
From: "Kevin M. Rosenberg" <kevin@rosenberg.net>
Date: Tue, 3 Aug 2004 14:45:58 +0000
Subject: [PATCH] r9839: disable test on lispworks, add note

---
 tests/pointers.lisp | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/tests/pointers.lisp b/tests/pointers.lisp
index 886ea51..7168448 100644
--- 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)
-- 
2.34.1