X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Ffndb.lisp;h=249ff052fdb346e0a37904ee9f72d54a1a9d4c48;hb=1cfea5d9f744f2d10bcf69c3eeb2d99a3c5ad8bc;hp=fb05a7c53b114a53cf153d5ffece34fd9b4a7f7f;hpb=85c34f4d1257df20fe1ab6f0d4d476bb3ec0bc63;p=sbcl.git

diff --git a/src/compiler/fndb.lisp b/src/compiler/fndb.lisp
index fb05a7c..249ff05 100644
--- a/src/compiler/fndb.lisp
+++ b/src/compiler/fndb.lisp
@@ -381,8 +381,6 @@
   (movable foldable flushable))
 (defknown random ((or (float (0.0)) (integer 1)) &optional random-state)
   (or (float 0.0) (integer 0)) ())
-(defknown %inclusive-random-integer (unsigned-byte random-state) unsigned-byte
-  ())
 (defknown make-random-state (&optional (or (member nil t) random-state))
   random-state (flushable))
 (defknown random-state-p (t) boolean (movable foldable flushable))