X-Git-Url: http://git.kpe.io/?p=kmrcl.git;a=blobdiff_plain;f=strings.lisp;h=0c5ae7c4ec47407e0e77b358a1bf4c713dee89b2;hp=9dbe1babdccd7950172033dc0d5c6d9614ff4921;hb=26d4fb77a1630200f6101d7adc0b2914c825090a;hpb=e9927af19ebf762b2311f296643c00e3aa9cbb00 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)