Index: /trunk/source/compiler/X86/x862.lisp
===================================================================
--- /trunk/source/compiler/X86/x862.lisp	(revision 15308)
+++ /trunk/source/compiler/X86/x862.lisp	(revision 15309)
@@ -10727,5 +10727,5 @@
                     (make-wired-lreg (hard-regspec-value vreg)
                                      :class hard-reg-class-fpr
-                                     :mode hard-reg-class-fpr-mode-double))))
+                                     :mode hard-reg-class-fpr-mode-single))))
         (! single-to-double vreg sreg)
         (^))