Index: /branches/ia32/compiler/X86/X8632/x8632-vinsns.lisp
===================================================================
--- /branches/ia32/compiler/X86/X8632/x8632-vinsns.lisp	(revision 8210)
+++ /branches/ia32/compiler/X86/X8632/x8632-vinsns.lisp	(revision 8211)
@@ -444,8 +444,8 @@
 (define-x8632-vinsn trap-unless-list (()
 				      ((object :lisp))
-				      ((tag :u16)))
-  (movw (:%w object) (:%w tag))
-  (andw (:$w x8632::fulltagmask) (:%w tag))
-  (cmpw (:$w x8632::fulltag-cons) (:%w tag))
+				      ((tag :u8)))
+  (movl (:% object) (:% tag))
+  (andl (:$b x8632::fulltagmask) (:% tag))
+  (cmpl (:$b x8632::fulltag-cons) (:% tag))
   (je.pt :ok)
   (uuo-error-reg-not-list (:%l object))