diff -ur cmucl.orig/src/code/misc.lisp cmucl/src/code/misc.lisp --- cmucl.orig/src/code/misc.lisp 2011-10-25 05:31:39.000000000 +0200 +++ cmucl/src/code/misc.lisp 2012-01-31 21:46:49.441273068 +0100 @@ -187,8 +187,10 @@ (defun lisp-implementation-version () "Returns a string describing the implementation version." - (format nil "~A (~X~A)" *lisp-implementation-version* c:byte-fasl-file-version - #+unicode _" Unicode" #-unicode "")) + (format nil "~X~A~A" + c:byte-fasl-file-version + #+unicode "-unicode" #-unicode "" + *lisp-implementation-version*)) (defun machine-instance () "Returns a string giving the name of the local machine."