Index: /trunk/source/compiler/nx0.lisp
===================================================================
--- /trunk/source/compiler/nx0.lisp	(revision 15419)
+++ /trunk/source/compiler/nx0.lisp	(revision 15420)
@@ -144,8 +144,8 @@
     (#.(%nx1-operator %double-float*-2) . double-float)
     (#.(%nx1-operator %double-float*-2!) . double-float)
-    (#.(%nx1-operator %short-float/-2) . double-float)
-    (#.(%nx1-operator %short-float+-2) . double-float)
-    (#.(%nx1-operator %short-float--2) . double-float)
-    (#.(%nx1-operator %short-float*-2) . double-float)
+    (#.(%nx1-operator %short-float/-2) . single-float)
+    (#.(%nx1-operator %short-float+-2) . single-float)
+    (#.(%nx1-operator %short-float--2) . single-float)
+    (#.(%nx1-operator %short-float*-2) . single-float)
     (#.(%nx1-operator %double-to-single) . single-float)
     (#.(%nx1-operator %single-to-double) . double-float)