Index: /trunk/ccl/level-0/l0-array.lisp
===================================================================
--- /trunk/ccl/level-0/l0-array.lisp	(revision 380)
+++ /trunk/ccl/level-0/l0-array.lisp	(revision 381)
@@ -64,6 +64,6 @@
     (unsigned-byte 8)
     (signed-byte 8)
-    base-char
     character
+    unused
     (unsigned-byte 16)
     (signed-byte 16)