From: Juho Snellman <jsnell@iki.fi>
Date: Wed, 20 Sep 2006 18:18:19 +0000 (+0000)
Subject: 0.9.16.45:
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=60702dcb5f09605c1728397a8961388386bcac70;p=sbcl.git

0.9.16.45:
        Fix building with CMUCL (typo in the name of an IGNOREd variable
        in !DEFSTRUCT-WITH-ALTERNATE-METACLASS).
---

diff --git a/src/code/defstruct.lisp b/src/code/defstruct.lisp
index 995a12f..a3dbf1e 100644
--- a/src/code/defstruct.lisp
+++ b/src/code/defstruct.lisp
@@ -1579,7 +1579,7 @@
                  metaclass-constructor))
   (declare (type symbol predicate))
   (declare (type (member structure funcallable-structure) dd-type))
-  (declare (ignore boa-constructor predicate runtime-type-checks))
+  (declare (ignore boa-constructor predicate runtime-type-checks-p))
 
   (let* ((dd (make-dd-with-alternate-metaclass
               :class-name class-name
diff --git a/version.lisp-expr b/version.lisp-expr
index 69c2d85..8c42600 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".)
-"0.9.16.44"
+"0.9.16.45"