[slime-cvs] CVS update: slime/swank-loader.lisp

[Luke Gorrie]

Update of /project/slime/cvsroot/slime
In directory common-lisp.net:/tmp/cvs-serv27195

Modified Files:
	swank-loader.lisp 
Log Message:
(*lisp-name*): Include the version number in ACL.

Date: Wed Jul  7 05:11:24 2004
Author: lgorrie

Index: slime/swank-loader.lisp
diff -u slime/swank-loader.lisp:1.29 slime/swank-loader.lisp:1.30
--- slime/swank-loader.lisp:1.29	Sun Jun 20 23:13:33 2004
+++ slime/swank-loader.lisp	Wed Jul  7 05:11:24 2004
@@ -45,7 +45,7 @@
   #+sbcl      (format nil "sbcl-~A" (lisp-implementation-version))
   #+openmcl   "openmcl"
   #+lispworks (format nil "lispworks-~A" (lisp-implementation-version))
-  #+allegro   "allegro"
+  #+allegro   (format nil "allegro-~A" excl::*common-lisp-version-number*)
   #+clisp     (format nil "clisp-~A" (let ((s (lisp-implementation-version)))
                                        (subseq s 0 (position #\space s))))
   #+armedbear "abcl"