X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcode%2Fcold-init.lisp;h=72d26fc7b8c54b29ce6d2ca113de5829e8e76772;hb=2c6b90e36a7c0377cd79625eb6c94d580f98cb93;hp=a891dbd0c5b101d62963864b7a74f6c0fe6e86c1;hpb=ce02ab2ecd9c6ae2e570abd8c93ebf3be55bbdad;p=sbcl.git

diff --git a/src/code/cold-init.lisp b/src/code/cold-init.lisp
index a891dbd..72d26fc 100644
--- a/src/code/cold-init.lisp
+++ b/src/code/cold-init.lisp
@@ -42,7 +42,7 @@
 ;;; a list of toplevel things set by GENESIS
 (defvar *!reversed-cold-toplevels*)
 
-;;; a SIMPLE-VECTOR set by genesis
+;;; a SIMPLE-VECTOR set by GENESIS
 (defvar *!load-time-values*)
 
 (defun !cold-lose (msg)
@@ -90,7 +90,6 @@
   ;; !UNIX-COLD-INIT. And *TYPE-SYSTEM-INITIALIZED* could be changed to
   ;; *TYPE-SYSTEM-INITIALIZED-WHEN-BOUND* so that it doesn't need to
   ;; be explicitly set in order to be meaningful.
-  (setf *gc-verbose* nil)
   (setf *gc-notify-stream* nil)
   (setf *before-gc-hooks* nil)
   (setf *after-gc-hooks* nil)