X-Git-Url: http://git.kpe.io/?p=kmrcl.git;a=blobdiff_plain;f=strings.lisp;h=0c5ae7c4ec47407e0e77b358a1bf4c713dee89b2;hp=9dbe1babdccd7950172033dc0d5c6d9614ff4921;hb=1b7f506ec98bd5b885203a3250c52603b943cee9;hpb=753fe2d6bbe8e8c8a6fa6154e829c6586b0c2ff3 diff --git a/strings.lisp b/strings.lisp index 9dbe1ba..0c5ae7c 100644 --- a/strings.lisp +++ b/strings.lisp @@ -648,7 +648,6 @@ for characters in a string" word))) - (defun collapse-whitespace (s) "Convert multiple whitespace characters to a single space character." (declare (simple-string s)