0.pre7.31:

[sbcl.git] / src / code / defboot.lisp

diff --git a/src/code/defboot.lisp b/src/code/defboot.lisp
index 0f3af74..5809413 100644 (file)
--- a/src/code/defboot.lisp
+++ b/src/code/defboot.lisp
@@ -166,7 +166,7 @@
   ;; Similarly, other things like FDEFINITION or DOCUMENTATION either
   ;; aren't ours to mess with or are meaningless to mess with. Thus,
   ;; we punt.
-  #+sb-xc-host (declare (ignore def))
+  #+sb-xc-host (declare (ignore def doc))
   #-sb-xc-host 
   (progn
     (when (fboundp name)