Index: /branches/ia32/compiler/X86/X8632/x8632-arch.lisp
===================================================================
--- /branches/ia32/compiler/X86/X8632/x8632-arch.lisp	(revision 8254)
+++ /branches/ia32/compiler/X86/X8632/x8632-arch.lisp	(revision 8255)
@@ -294,5 +294,7 @@
 (assert (> min-non-numeric-imm-subtag max-numeric-subtag))
 (define-imm-subtag dead-macptr 4)
-(define-imm-subtag xcode-vector 5)	; for cross-development
+;;(define-imm-subtag unused 5)		;was creole-object
+;;(define-imm-subtag unused 6)		;was code-vector
+(define-imm-subtag xcode-vector 7)
 
 ;;; immediate subtags
