A git-only SBCL workflow

[sbcl.git] / src / code / misc.lisp

diff --git a/src/code/misc.lisp b/src/code/misc.lisp
index 59f5f56..8a32863 100644 (file)
--- a/src/code/misc.lisp
+++ b/src/code/misc.lisp
@@ -16,8 +16,4 @@
   "SBCL")
 
 (defun sb!xc:lisp-implementation-version ()
-  #.(format nil "~A~@[.~A~]"
-            (sb-cold:read-from-file "version.lisp-expr")
-            (let ((pathname "branch-version.lisp-expr"))
-              (when (probe-file pathname)
-                (sb-cold:read-from-file pathname)))))
+  #.(sb-cold:read-from-file "version.lisp-expr"))