From 50724c1d6a0cb68dd69bc544595ccd0a83603803 Mon Sep 17 00:00:00 2001
From: dtc <dtc>
Date: Wed, 9 Aug 2000 13:23:19 +0000
Subject: [PATCH] Declare the use of the new variable *delayed-transforms* as
 special in ir1-phases, avoiding bootstrapping issues.

---
 compiler/main.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/main.lisp b/compiler/main.lisp
index 002153f7f..5d67d5666 100644
--- a/compiler/main.lisp
+++ b/compiler/main.lisp
@@ -5,7 +5,7 @@
 ;;; Carnegie Mellon University, and has been placed in the public domain.
 ;;;
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/main.lisp,v 1.118 2000/08/09 12:56:40 dtc Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/main.lisp,v 1.119 2000/08/09 13:23:19 dtc Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -231,7 +231,7 @@
   (let ((*constraint-number* 0)
 	(loop-count 1)
 	(*delayed-transforms* nil))
-    (declare (special *constraint-number*))
+    (declare (special *constraint-number* *delayed-transforms*))
     (loop
      (ir1-optimize-until-done component)
      (when (or (component-new-functions component)
-- 
GitLab