1.0.13.26:
authorKevin Rosenberg <kevin@rosenberg.net>
Sun, 13 Jan 2008 03:59:54 +0000 (03:59 +0000)
committerKevin Rosenberg <kevin@rosenberg.net>
Sun, 13 Jan 2008 03:59:54 +0000 (03:59 +0000)
        * sb-aclrepl: Display single-floats in IEEE-756 format for 64-bit
        platforms for consistency with 32-bit platforms.

contrib/sb-aclrepl/inspect.lisp
version.lisp-expr

index 8ded127..071411a 100644 (file)
@@ -665,7 +665,7 @@ cons cells and LIST-TYPE is :normal, :dotted, or :cyclic"
      ;; on 64-bit platform, single-floats are not boxed
      (description-maybe-internals "single-float ~W" (list object)
                                   "[#x~8,'0X]"
-                                  (sb-kernel:get-lisp-obj-address object)))))
+                                  (ash (sb-kernel:get-lisp-obj-address object) -32)))))
 
 (defmethod inspected-description ((object fixnum))
   (description-maybe-internals
index 83f0d21..18880e0 100644 (file)
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"1.0.13.25"
+"1.0.13.26"