diff --git a/tools/worldload.lisp b/tools/worldload.lisp
index 3a2e677e40914216612721116ccf312aca7c539e..1de8bdf8ecc0b78ad2977e22cbf5c787bdd3d286 100644
--- a/tools/worldload.lisp
+++ b/tools/worldload.lisp
@@ -6,7 +6,7 @@
 ;;; If you want to use this code or any part of CMU Common Lisp, please contact
 ;;; Scott Fahlman or slisp-group@cs.cmu.edu.
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/worldload.lisp,v 1.82 1997/11/25 18:33:32 dtc Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/worldload.lisp,v 1.83 1997/11/25 18:58:24 dtc Exp $
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -18,8 +18,9 @@
 
 (in-package "LISP")
 
-#+gencgc (setf *load-x86-tlf-to-dynamic-space* t)  ; potentially dangerous.
-#+gencgc (setf cl::*enable-dynamic-space-code* t)
+;;; Uncomment for GENCGC.
+;(setf *load-x86-tlf-to-dynamic-space* t)  ; potentially dangerous.
+;(setf cl::*enable-dynamic-space-code* t)
 
 ;;; Get some data on this core.
 ;;;