From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 14 Mar 1989 19:49:07 +0000 (+0000)
Subject: Changes to repackage the environment optimizer.
X-Git-Tag: 20090517-FFI~12227
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=6fd9268fbb75ab4cc4b5b00735f30c230cdff939;p=mit-scheme.git

Changes to repackage the environment optimizer.
---

diff --git a/v7/src/compiler/machines/bobcat/compiler.pkg b/v7/src/compiler/machines/bobcat/compiler.pkg
index b8776c6cb..ca30b80e6 100644
--- a/v7/src/compiler/machines/bobcat/compiler.pkg
+++ b/v7/src/compiler/machines/bobcat/compiler.pkg
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/compiler.pkg,v 1.18 1989/01/21 09:22:17 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/compiler.pkg,v 1.19 1989/03/14 19:49:07 cph Exp $
 
 Copyright (c) 1988, 1989 Massachusetts Institute of Technology
 
@@ -294,7 +294,6 @@ MIT in each case. |#
 (define-package (compiler fg-optimizer)
   (files "fgopt/outer"			;outer analysis
 	 "fgopt/operan"			;operator analysis
-	 "fgopt/envopt"			;environment optimization
 	 "fgopt/sideff"			;side effect analysis
 	 "fgopt/desenv"			;environment design
 	 )
@@ -305,7 +304,6 @@ MIT in each case. |#
 	  design-environment-frames!
 	  operator-analysis
 	  outer-analysis
-	  optimize-environments!
 	  side-effect-analysis))
 
 (define-package (compiler fg-optimizer fold-constants)
@@ -313,6 +311,11 @@ MIT in each case. |#
   (parent (compiler fg-optimizer))
   (export (compiler top-level) fold-constants))
 
+(define-package (compiler fg-optimizer environment-optimization)
+  (files "fgopt/envopt")
+  (parent (compiler fg-optimizer))
+  (export (compiler top-level) optimize-environments!))
+
 (define-package (compiler fg-optimizer closure-analysis)
   (files "fgopt/closan")
   (parent (compiler fg-optimizer))