X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Finterr.lisp;h=fb16a7727e8aa51a5a7d71a9a293cb303cf26aec;hb=cd1b14acf6f548b28b8a14e554d779f0473122ec;hp=18c571e634de045250a0c9562385551d7d9de478;hpb=cd5a858174d892f876699373dc3ea389cf2c4d40;p=sbcl.git

diff --git a/src/code/interr.lisp b/src/code/interr.lisp
index 18c571e..fb16a77 100644
--- a/src/code/interr.lisp
+++ b/src/code/interr.lisp
@@ -106,11 +106,6 @@
          :datum object
          :expected-type 'fixnum))
 
-(deferr object-not-mod-error (object limit)
-  (error 'type-error
-         :datum object
-         :expected-type `(mod ,(1+ limit))))
-
 (deferr object-not-vector-error (object)
   (error 'type-error
          :datum object