From: Nathan Froyd <froydnj@cs.rice.edu>
Date: Thu, 6 Oct 2005 18:11:46 +0000 (+0000)
Subject: 0.9.5.26:
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=5be53bd5a87605b076891aafb2d74caac1357506;p=sbcl.git

0.9.5.26:
	Oops.  It's (INST CLRLWI ...), not (CLRLWI ...).
---

diff --git a/src/compiler/ppc/array.lisp b/src/compiler/ppc/array.lisp
index da3d649..456a546 100644
--- a/src/compiler/ppc/array.lisp
+++ b/src/compiler/ppc/array.lisp
@@ -258,7 +258,7 @@
                (unless (and (sc-is value immediate)
                             (= (tn-value value) ,(1- (ash 1 bits))))
                  (cond ((zerop extra)
-                        (clrlwi old old ,bits))
+                        (inst clrlwi old old ,bits))
                        (t
                         (inst lr temp
                               (lognot (ash ,(1- (ash 1 bits))
diff --git a/version.lisp-expr b/version.lisp-expr
index 43fb72e..d20751a 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.5.25"
+"0.9.5.26"