diff options
author | Juan Manuel Tomás <jtomas1815@gmail.com> | 2022-11-04 00:42:08 -0300 |
---|---|---|
committer | Juan Manuel Tomás <jtomas1815@gmail.com> | 2022-11-04 00:43:40 -0300 |
commit | 5b47a21cf818608883c875d0819bb40099d8e4f8 (patch) | |
tree | 14fae73e30b8b7f92411b00d5946e776d7721a3c /str.lisp | |
parent | a0bcb57cbcfbfa8070ee617056983b03e8e64c29 (diff) | |
download | utils-5b47a21cf818608883c875d0819bb40099d8e4f8.tar.gz utils-5b47a21cf818608883c875d0819bb40099d8e4f8.zip |
Fix bugged type decl
Diffstat (limited to 'str.lisp')
-rw-r--r-- | str.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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)) |