Changeset 5216

Timestamp:

Sep 19, 2006, 12:34:02 AM (18 years ago)

Author:

Gary Byers

Message:

inline require-[us][8,16,32,64].

File:

• trunk/ccl/compiler/nx1.lisp (modified) (1 diff)

trunk/ccl/compiler/nx1.lisp

@@ -407 +407 @@
 
 (defnx1 nx1-require ((require-simple-vector) (require-simple-string) (require-integer) (require-list)
-                     (require-fixnum) (require-real) (require-character) (require-number) (require-symbol))
+                     (require-fixnum) (require-real) (require-character) (require-number) (require-symbol) (require-s8) (require-u8) (require-s16) (require-u16) (require-s32) (require-u32) (require-s64) (require-u64))
         (arg)
   (make-acode (%nx1-default-operator) (nx1-form arg)))