From 2645d5a14759dd10c3ada4a570b608ae867bd9cf Mon Sep 17 00:00:00 2001
From: pw <pw>
Date: Tue, 13 Mar 2001 14:14:50 +0000
Subject: [PATCH] Change a defvar to proclaim as defvar now requires the
 compiler be loaded. This enables the "runtime" system to be built again.

---
 tools/worldload.lisp | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/tools/worldload.lisp b/tools/worldload.lisp
index b2f817efd..2d70cb3c6 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.89 2001/02/11 14:22:08 dtc Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/tools/worldload.lisp,v 1.90 2001/03/13 14:14:50 pw Exp $
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -167,7 +167,8 @@
 #-(or no-clm runtime)
 (maybe-byte-load "target:interface/clm-library")
 
-(defvar *target-sl*)
+#+no-compiler (proclaim '(special *target-sl*))
+#-no-compiler (defvar *target-sl*)
 (setq *target-sl* (search-list "target:"))
 
 ;;; Don't include the search lists used for loading in the resultant core.
-- 
GitLab