1 files changed, 1 insertions, 1 deletions

diff --git a/str.lisp b/str.lisp
index cbd6fe3..a8b2a7f 100644
--- a/str.lisp
+++ b/str.lisp
@@ -20,7 +20,7 @@
         (queue:add result (subseq input start next)))))
   (queue:to-list (split-rec (queue:new) 0)))
 
-(declaim (ftype (function ((cons char)) (values simple-string) &optional)) from-list)
+(declaim (ftype (function ((cons character)) (values simple-string &optional)) from-list))
 (defun from-list (lst)
   (let ((str (make-string (length lst)))
         (i 0))