From 7322cf9089bdbbc6cc2b4a3280bbf90a9ee22f0d Mon Sep 17 00:00:00 2001 From: pfdietz <pfdietz@localhost> Date: Wed, 3 Sep 2003 10:58:29 +0000 Subject: [PATCH] Annotated four additional tests for :nil-vectors-are-strings. --- ansi-tests/string.lsp | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/ansi-tests/string.lsp b/ansi-tests/string.lsp index 06f69f35..4e88671b 100644 --- a/ansi-tests/string.lsp +++ b/ansi-tests/string.lsp @@ -89,6 +89,7 @@ nil t) (deftest base-string.6 + :notes (:nil-vectors-are-strings) (subtypep* 'string 'base-string) nil t) @@ -123,14 +124,17 @@ t t) (deftest simple-string.8 + :notes (:nil-vectors-are-strings) (subtypep* 'simple-string '(simple-array character (*))) nil t) (deftest simple-string.9 + :notes (:nil-vectors-are-strings) (subtypep* 'simple-string '(simple-array base-char (*))) nil t) (deftest simple-string.10 + :notes (:nil-vectors-are-strings) (subtypep* 'simple-string 'simple-base-string) nil t) -- GitLab