From: Alastair Bridgewater Date: Sun, 14 Feb 2010 20:17:36 +0000 (+0000) Subject: 1.0.35.16: Whitespace damage. X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;ds=sidebyside;h=d3a20211cd639081185d5d3de1aa2e3e080042de;p=sbcl.git 1.0.35.16: Whitespace damage. --- diff --git a/contrib/sb-introspect/test-driver.lisp b/contrib/sb-introspect/test-driver.lisp index f1c896b..2d94f11 100644 --- a/contrib/sb-introspect/test-driver.lisp +++ b/contrib/sb-introspect/test-driver.lisp @@ -450,7 +450,7 @@ #+nil (progn - + (defstruct (struct (:predicate our-struct-p) (:copier copy-our-struct)) (a 42 :type fixnum)) diff --git a/src/code/gc.lisp b/src/code/gc.lisp index c76ca43..8839b3e 100644 --- a/src/code/gc.lisp +++ b/src/code/gc.lisp @@ -358,7 +358,7 @@ collection is initiated. This can be set with SETF." (defun ,(symbolicate "GENERATION-" slot) (generation) #!+sb-doc ,doc - #!+gencgc + #!+gencgc (declare (generation-index generation)) #!-gencgc (declare (ignore generation)) @@ -369,7 +369,7 @@ collection is initiated. This can be set with SETF." (slot (deref generations generation) ',slot)) ,@(when setfp `((defun (setf ,(symbolicate "GENERATION-" slot)) (value generation) - #!+gencgc + #!+gencgc (declare (generation-index generation)) #!-gencgc (declare (ignore value generation)) diff --git a/version.lisp-expr b/version.lisp-expr index 21ce819..63e68dd 100644 --- 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".) -"1.0.35.15" +"1.0.35.16"