diff --git a/tools/worldload.lisp b/tools/worldload.lisp
index d7d9dba6ee24f2b3a81cc24342a32aa2985f7e49..3b2bad62215a06204994d587adc1ea2ceab0133f 100644
--- a/tools/worldload.lisp
+++ b/tools/worldload.lisp
@@ -7,13 +7,23 @@
 ;;; Scott Fahlman or slisp-group@cs.cmu.edu.
 ;;;
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/worldload.lisp,v 1.29 1991/06/10 16:33:43 chiles Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/worldload.lisp,v 1.30 1991/07/11 14:58:15 ram Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
 ;;; This file loads the parts of the system that aren't cold loaded and saves
 ;;; the resulting core image.  It writes "lisp.core" in the DEFAULT-DIRECTORY.
 ;;;
+;;; ####### NOTE: HACK ALERT!!!!
+;;; 
+;;; This file must be loaded by:
+;;;    (load (open "...worldload.lisp"))
+;;;
+;;; The OPEN call is needed to prevent the stream buffer from the previous
+;;; incarnation (which is no longer valid) from being added to the stream
+;;; buffer freelist.  If you don't do this, you will probably get a memory
+;;; access violation when you first try to do file I/O in the new core.
+;;;
 
 ;;; Define a bunch of search lists relative to lisp:
 ;;;