Index: /trunk/ccl/compiler/nxenv.lisp
===================================================================
--- /trunk/ccl/compiler/nxenv.lisp	(revision 5214)
+++ /trunk/ccl/compiler/nxenv.lisp	(revision 5215)
@@ -400,5 +400,12 @@
      (%fixnum-to-single  . #.(logior operator-assignment-free-mask operator-single-valued-mask operator-acode-subforms-mask operator-side-effect-free-mask))
      (%fixnum-to-double .  #.(logior operator-assignment-free-mask operator-single-valued-mask operator-acode-subforms-mask operator-side-effect-free-mask))
-     )))
+     (require-s8 . #.(logior operator-single-valued-mask operator-acode-subforms-mask))
+     (require-u8 . #.(logior operator-single-valued-mask operator-acode-subforms-mask))
+     (require-s16 . #.(logior operator-single-valued-mask operator-acode-subforms-mask))
+     (require-u16 . #.(logior operator-single-valued-mask operator-acode-subforms-mask))
+     (require-s32 . #.(logior operator-single-valued-mask operator-acode-subforms-mask))
+     (require-u32 . #.(logior operator-single-valued-mask operator-acode-subforms-mask))
+     (require-s64 . #.(logior operator-single-valued-mask operator-acode-subforms-mask))
+     (require-u64 . #.(logior operator-single-valued-mask operator-acode-subforms-mask)))))
 
 (defmacro %nx1-operator (sym)