[slime-devel] patch for 64-bit OpenMCL

[Gary King]

RCS file: /project/slime/cvsroot/slime/swank-loader.lisp,v
retrieving revision 1.61
diff -u -w -r1.61 swank-loader.lisp
--- swank-loader.lisp	8 Oct 2006 12:48:12 -0000	1.61
+++ swank-loader.lisp	9 Oct 2006 23:36:42 -0000
@@ -66,9 +66,11 @@
    #+scl       (lisp-implementation-version)
    #+sbcl      (lisp-implementation-version)
    #+ecl       (lisp-implementation-version)
-  #+openmcl   (format nil "~d.~d"
+  #+openmcl   (format nil "~d.~d~@[-~d~]"
                        ccl::*openmcl-major-version*
-                      ccl::*openmcl-minor-version*)
+                      ccl::*openmcl-minor-version*
+                      #+ppc64-target 64
+                      #-ppc64-target nil)
    #+lispworks (lisp-implementation-version)
    #+allegro   (format nil
                        "~A~A~A"

--
Gary Warren King, metabang.com
Cell: (413) 885 9127
Fax: (206) 338-4052
gwkkwg on Skype * garethsan on AIM