X-Git-Url: https://git.distorted.org.uk/~mdw/clg/blobdiff_plain/19b56e9315dc07e533f668c74fe0866ae7dcc702..2647e0609cee56dcbd47eb127e87999654b6ebeb:/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 @@ ;; 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)