Optimize (mod FIXNUM) type-checks on x86oids.

[sbcl.git] / package-data-list.lisp-expr

diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr
index 4638b51..9dad11f 100644 (file)
--- a/package-data-list.lisp-expr
+++ b/package-data-list.lisp-expr
@@ -242,6 +242,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "CHECK-SYMBOL"
                ;; FIXME: 32/64-bit issues
                "CHECK-UNSIGNED-BYTE-32" "CHECK-UNSIGNED-BYTE-64"
+               "CHECK-MOD-FIXNUM"
                "CLOSURE-INIT" "CLOSURE-REF" "CLOSURE-INIT-FROM-FP"
                "CODE-CONSTANT-REF" "CODE-CONSTANT-SET"
                "*CODE-COVERAGE-INFO*"
@@ -1650,7 +1651,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "OBJECT-NOT-DOUBLE-FLOAT-ERROR" "OBJECT-NOT-FIXNUM-ERROR"
                "OBJECT-NOT-FLOAT-ERROR" "OBJECT-NOT-FUN-ERROR"
                "OBJECT-NOT-INSTANCE-ERROR" "OBJECT-NOT-INTEGER-ERROR"
-               "OBJECT-NOT-LIST-ERROR"
+               "OBJECT-NOT-LIST-ERROR" "OBJECT-NOT-MOD-ERROR"
                #!+long-float "OBJECT-NOT-LONG-FLOAT-ERROR"
                "OBJECT-NOT-NUMBER-ERROR" "OBJECT-NOT-RATIO-ERROR"
                "OBJECT-NOT-RATIONAL-ERROR" "OBJECT-NOT-REAL-ERROR"