diff --git a/sequences.lisp b/sequences.lisp index 4895d1dabaa07237fafdef91e7ad21420c52b887..d79830bc27253a076ae5ae2fb948db36a9a28bfa 100644 --- a/sequences.lisp +++ b/sequences.lisp @@ -138,7 +138,7 @@ that are not lists." (defun emptyp (sequence) "Returns true if SEQUENCE is an empty sequence. Signals an error if SEQUENCE -is not a sequence" +is not a sequence." (etypecase sequence (list (null sequence)) (sequence (zerop (length sequence)))))