diff --git a/ansi-tests/simple-string.lsp b/ansi-tests/simple-string.lsp index 43b99105001ea17d1a83bfe97b57348513a59a02..41cec19e4b562bc0e01481a23f960e3eaf0eee14 100644 --- a/ansi-tests/simple-string.lsp +++ b/ansi-tests/simple-string.lsp @@ -63,23 +63,23 @@ (typep* (make-array '(12) :element-type nil) 'simple-string) t) -(deftest simple-estring.14 +(deftest simple-string.14 (typep* "abc" '(simple-string)) t) -(deftest simple-estring.15 +(deftest simple-string.15 (typep* "abc" '(simple-string *)) t) -(deftest simple-estring.16 +(deftest simple-string.16 (typep* "abc" '(simple-string 3)) t) -(deftest simple-estring.17 +(deftest simple-string.17 (typep* "abc" '(simple-string 2)) nil) -(deftest simple-estring.18 +(deftest simple-string.18 (typep* "abc" '(simple-string 4)) nil)