Index: /branches/ia32/compiler/X86/X8632/x8632-vinsns.lisp
===================================================================
--- /branches/ia32/compiler/X86/X8632/x8632-vinsns.lisp	(revision 9544)
+++ /branches/ia32/compiler/X86/X8632/x8632-vinsns.lisp	(revision 9545)
@@ -886,4 +886,9 @@
   :done)
 
+(define-x8632-vinsn %unbox-u32 (((dest :u32))
+				((src :lisp)))
+  (movl (:%l src) (:%l dest))
+  (shrl (:$ub x8632::fixnumshift) (:%l dest)))
+
 ;;; xxx -- review this again later
 (define-x8632-vinsn unbox-s32 (((dest :s32))