0.8.19.30: less COMPILE-FILE verbosity
[sbcl.git] / src / compiler / globaldb.lisp
index 18c0ebb..c73acaa 100644 (file)
 ;;; the current environment, allowing any inherited info to become
 ;;; visible. We return true if there was any info.
 (defun clear-info (class type name)
-  #!+sb-doc
   (let ((info (type-info-or-lose class type)))
     (clear-info-value name (type-info-number info))))
 #!-sb-fluid