From 30d5e5d886858ff692349d68c6337473a22a386a Mon Sep 17 00:00:00 2001
From: camm <camm@localhost>
Date: Fri, 4 Oct 2002 03:30:33 +0000
Subject: [PATCH] ansi-test corrections; extra-libs option to LINK function;
 LINK doc change; subtypep and string changes to pass more tests

---
 ansi-tests/char-schar.lsp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ansi-tests/char-schar.lsp b/ansi-tests/char-schar.lsp
index fc07c31c..a66ed60e 100644
--- a/ansi-tests/char-schar.lsp
+++ b/ansi-tests/char-schar.lsp
@@ -62,7 +62,7 @@
     (setf (char s 5) #\X)
     (setf (fill-pointer s) 6)
     s)
-  "abcXef")
+  "abcdeX")
 
 (deftest char.9
   (let ((s (make-string 5 :initial-element #\a
-- 
GitLab