Index: /branches/ia32/compiler/X86/X8632/x8632-vinsns.lisp
===================================================================
--- /branches/ia32/compiler/X86/X8632/x8632-vinsns.lisp	(revision 9754)
+++ /branches/ia32/compiler/X86/X8632/x8632-vinsns.lisp	(revision 9755)
@@ -1980,4 +1980,10 @@
   (movb (:$b val) (:@ (:%l ptr) (:%l offset))))
 
+(define-x8632-vinsn misc-set-c-u8  (((val :u8))
+				    ((v :lisp)
+				     (idx :u32const))
+				    ())
+  (movb (:%b val) (:@ (:apply + x8632::misc-data-offset idx) (:%l v))))
+
 (define-x8632-vinsn misc-set-u8  (((val :u8))
 				  ((v :lisp)
@@ -3837,4 +3843,6 @@
   (movss (:%xmm x8632::fpzero) (:@ (:%seg :rcontext) x8632::tcr.save3)))
 
+(define-x8632-subprim-call-vinsn (aset1)  .SPaset1)
+
 (queue-fixup
  (fixup-x86-vinsn-templates