Commit ea930e24 authored by pfdietz's avatar pfdietz
Browse files

Fixed typo in test names

parent baf3c8a2
...@@ -63,23 +63,23 @@ ...@@ -63,23 +63,23 @@
(typep* (make-array '(12) :element-type nil) 'simple-string) (typep* (make-array '(12) :element-type nil) 'simple-string)
t) t)
(deftest simple-estring.14 (deftest simple-string.14
(typep* "abc" '(simple-string)) (typep* "abc" '(simple-string))
t) t)
(deftest simple-estring.15 (deftest simple-string.15
(typep* "abc" '(simple-string *)) (typep* "abc" '(simple-string *))
t) t)
(deftest simple-estring.16 (deftest simple-string.16
(typep* "abc" '(simple-string 3)) (typep* "abc" '(simple-string 3))
t) t)
(deftest simple-estring.17 (deftest simple-string.17
(typep* "abc" '(simple-string 2)) (typep* "abc" '(simple-string 2))
nil) nil)
(deftest simple-estring.18 (deftest simple-string.18
(typep* "abc" '(simple-string 4)) (typep* "abc" '(simple-string 4))
nil) nil)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment