0.9.6.22:

        Comment fixes from sbcl-devel
        * "Some minor corrections to comments", Lutz Euler 2005-10-16
        * "[PATCH] trivial patch to better describe current state of
          affairs in base-target-feautres.lisp-expr", Cyrus Harmon 2005-11-03

diff --git a/NEWS b/NEWS
index deda9d1..ca8d410 100644 (file)
--- a/NEWS
+++ b/NEWS
@@ -787,7 +787,7 @@ changes in sbcl-0.8.16 relative to sbcl-0.8.15:
     (thanks to Richard Kreuter)
   * bug fix: defining classes whose accessors are methods on existing
     generic functions in other (locked) packages no longer signals
-    bogus package lock violations. (reported by François-René Rideau)
+    bogus package lock violations. (reported by François-René Rideau)
   * bug fix: special variables as DEFMETHOD parameters no longer have
     associated bogus type declarations. (reported by David Wragg and
     Bruno Haible)

diff --git a/base-target-features.lisp-expr b/base-target-features.lisp-expr
index e7b6406..a760984 100644 (file)
--- a/base-target-features.lisp-expr
+++ b/base-target-features.lisp-expr
@@ -244,6 +244,8 @@
  ;; machine architecture features:
  ;;   :x86
  ;;      any Intel 386 or better, or compatibles like the AMD K6 or K7
+ ;;   :x86-64
+ ;;      any x86-64 CPU running in 64-bit mode
  ;;   :alpha
  ;;      DEC/Compaq Alpha CPU
  ;;   :sparc
@@ -285,12 +287,13 @@
  ;;   :freebsd = We're intended to run under FreeBSD.
  ;;   :openbsd = We're intended to run under OpenBSD.
  ;;   :netbsd  = We're intended to run under NetBSD.
+ ;;   :darwin  = We're intended to run under Darwin (including MacOS X).
  ;;   :sunos   = We're intended to run under Solaris user environment
  ;;              with the SunOS kernel.
  ;;   :osf1    = We're intended to run under Tru64 (aka Digital Unix
  ;;              aka OSF/1).
- ;; (No others are supported by SBCL as of 0.7.5, but :hpux or :irix
+ ;; (No others are supported by SBCL as of 0.9.6, but :hpux or :irix
  ;; support could be ported from CMU CL if anyone is sufficiently
  ;; motivated to do so, and it'd even be possible, though harder, to
- ;; port the system to Microsoft Windows or MacOS X.)
+ ;; port the system to Microsoft Windows.)
  )

diff --git a/src/compiler/assem.lisp b/src/compiler/assem.lisp
index abaa89d..4b90328 100644 (file)
--- a/src/compiler/assem.lisp
+++ b/src/compiler/assem.lisp
@@ -1087,7 +1087,7 @@
 ;;; This holds the current segment while assembling. Use ASSEMBLE to
 ;;; change it.
 ;;;
-;;; The double parens in the name are intended to suggest that this
+;;; The double asterisks in the name are intended to suggest that this
 ;;; isn't just any old special variable, it's an extra-special
 ;;; variable, because sometimes MACROLET is used to bind it. So be
 ;;; careful out there..

diff --git a/src/compiler/target-disassem.lisp b/src/compiler/target-disassem.lisp
index 24ad018..01fd03b 100644 (file)
--- a/src/compiler/target-disassem.lisp
+++ b/src/compiler/target-disassem.lisp
@@ -1190,10 +1190,9 @@
       (setf (dstate-output-state dstate)
             :block-boundary))))
 
-;;; Add hooks to track to track the source code in SEGMENT during
-;;; disassembly. SFCACHE can be either NIL or it can be a
-;;; SOURCE-FORM-CACHE structure, in which case it is used to cache
-;;; forms from files.
+;;; Add hooks to track the source code in SEGMENT during disassembly.
+;;; SFCACHE can be either NIL or it can be a SOURCE-FORM-CACHE
+;;; structure, in which case it is used to cache forms from files.
 (defun add-source-tracking-hooks (segment debug-fun &optional sfcache)
   (declare (type segment segment)
            (type (or null sb!di:debug-fun) debug-fun)

diff --git a/src/compiler/x86-64/insts.lisp b/src/compiler/x86-64/insts.lisp
index 4e94ca9..68dbf7f 100644 (file)
--- a/src/compiler/x86-64/insts.lisp
+++ b/src/compiler/x86-64/insts.lisp
@@ -2116,7 +2116,7 @@
    (maybe-emit-operand-size-prefix segment :dword)
    (emit-byte segment #b10011000)))
 
-;;; CDQE -- Convert Word To Double Word Extended. RAX <- sign_xtnd(EAX)
+;;; CDQE -- Convert Double Word To Quad Word Extended. RAX <- sign_xtnd(EAX)
 (define-instruction cdqe (segment)
   (:printer rex-byte ((op #b10011000)))
   (:emitter

diff --git a/version.lisp-expr b/version.lisp-expr
index 31d5338..c998555 100644 (file)
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -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".)
-"0.9.6.21"
+"0.9.6.22"