X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/clg/blobdiff_plain/62420e5df35e5585eff630ae10d5c72f4932dbe4..41a92c0eeadfbbdc7c9e6bb0aca5f9c66820b3f3:/tools/config.lisp diff --git a/tools/config.lisp b/tools/config.lisp index d7f161e..472d02a 100644 --- a/tools/config.lisp +++ b/tools/config.lisp @@ -150,8 +150,7 @@ (defun sbcl-version () ;; We use . and - as delimiters because some Linux ;; distributions tend to patch SBCL and add a distro-specific ;; version tag (like 1.0.19-gentoo). - for part in (split-string (lisp-implementation-version) :delimiter '(#\.\ - #\-)) + for part in (split-string (lisp-implementation-version) :delimiter '(#\. #\-)) while (every #'digit-char-p part) collect (parse-integer part)))) (defun sbcl>= (major minor micro &optional patch)