Index: /trunk/ccl/level-0/PPC/ppc-array.lisp
===================================================================
--- /trunk/ccl/level-0/PPC/ppc-array.lisp	(revision 5107)
+++ /trunk/ccl/level-0/PPC/ppc-array.lisp	(revision 5108)
@@ -344,8 +344,8 @@
   (b @bad)
   @8
-  #-target-8-bit-chars
+  #+target-8-bit-chars
   (cmpdi cr2 imm2 ppc64::subtag-simple-base-string)
   (cmpdi cr0 imm2 ppc64::subtag-s8-vector)
-  #-target-8-bit-chars
+  #+target-8-bit-chars
   (beq cr2 @char8)
   (beq cr0 @s8)