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 (file)
--- 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 (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.5.25"
+"0.9.5.26"