Index: /trunk/ccl/lisp-kernel/ppc-spentry.s
===================================================================
--- /trunk/ccl/lisp-kernel/ppc-spentry.s	(revision 5060)
+++ /trunk/ccl/lisp-kernel/ppc-spentry.s	(revision 5061)
@@ -4334,5 +4334,5 @@
 local_label(misc_set_single_float_vector):
          __(extract_lisptag(imm2,arg_z))
-         __(cmpwi cr7,imm0,tag_misc)
+         __(cmpwi cr7,imm2,tag_misc)
          __(la imm0,misc_data_offset(arg_y))
 	 __(bne- cr7,local_label(set_bad))