X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fdescribe.lisp;h=7762f8e97db9a580c3e865ad6dcfbfd8686c1d43;hb=d442c23da9851beac541b8bddfc2c0837cb87309;hp=6b73804840c2f371aa8e721b6746b4a072cc861a;hpb=e36adf21322abc31b1b61e20e93516f995b70c36;p=sbcl.git

diff --git a/src/code/describe.lisp b/src/code/describe.lisp
index 6b73804..7762f8e 100644
--- a/src/code/describe.lisp
+++ b/src/code/describe.lisp
@@ -167,7 +167,6 @@
     (base-char "base-char")
     (t "character")))
 
-(declaim (ftype (function (t stream)) describe-object))
 (defgeneric describe-object (x stream))
 
 (defvar *in-describe* nil)