From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 21 Apr 1987 23:51:35 +0000 (+0000)
Subject: Split `front-end/rtl' into two files to aid compilation.
X-Git-Tag: 20090517-FFI~13593
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=cdec45f0ab9dff53b5263dc709deaeb8ec9904b0;p=mit-scheme.git

Split `front-end/rtl' into two files to aid compilation.
---

diff --git a/v7/src/compiler/machines/bobcat/decls.scm b/v7/src/compiler/machines/bobcat/decls.scm
index 67b138e4e..2ed6a341e 100644
--- a/v7/src/compiler/machines/bobcat/decls.scm
+++ b/v7/src/compiler/machines/bobcat/decls.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/decls.scm,v 1.2 1987/04/17 10:50:59 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/decls.scm,v 1.3 1987/04/21 23:51:09 cph Exp $
 
 Copyright (c) 1987 Massachusetts Institute of Technology
 
@@ -68,7 +68,7 @@ MIT in each case. |#
 (define filenames/dependency-chain/base
   (filename/append "base"
 		   "object" "cfg" "ctypes" "dtypes" "bblock" "dfg" "rtltyp"
-		   "rtlreg" "rtlcfg" "rtl" "emodel" "rtypes"))
+		   "rtlreg" "rtlcfg" "emodel" "rtypes"))
 
 (define filenames/dependency-chain/rcse
   (filename/append "front-end" "rcseht" "rcserq" "rcsesr" "rcseep" "rcse"))
@@ -92,8 +92,8 @@ MIT in each case. |#
 (file-dependency/syntax/join
  (append (filename/append "base"
 			  "bblock" "cfg" "ctypes" "dfg" "dtypes" "emodel"
-			  "linear" "object" "queue" "rtl" "rtlcfg" "rtlreg"
-			  "rtltyp" "rtypes" "sets" "toplev" "utils")
+			  "linear" "object" "queue" "rtlcfg" "rtlcon" "rtlexp"
+			  "rtlreg" "rtltyp" "rtypes" "sets" "toplev" "utils")
 	 (filename/append "alpha" "dflow" "graphc")
 	 (filename/append "front-end"
 			  "ralloc" "rcse" "rcseep" "rcseht" "rcserq" "rcsesa"
diff --git a/v7/src/compiler/machines/bobcat/make.scm-68040 b/v7/src/compiler/machines/bobcat/make.scm-68040
index 39e5aae54..d7aba7eb0 100644
--- a/v7/src/compiler/machines/bobcat/make.scm-68040
+++ b/v7/src/compiler/machines/bobcat/make.scm-68040
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/make.scm-68040,v 1.13 1987/04/17 10:55:42 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/make.scm-68040,v 1.14 1987/04/21 23:51:35 cph Exp $
 
 Copyright (c) 1987 Massachusetts Institute of Technology
 
@@ -67,7 +67,8 @@ MIT in each case. |#
 		"base/bblock"		;Basic block datatype
 		"base/dfg"		;data flow graph
 		"base/rtltyp"		;RTL: type definitions
-		"base/rtl"		;RTL: expression operations
+		"base/rtlexp"		;RTL: expression operations
+		"base/rtlcon"		;RTL: complex constructors
 		"base/rtlreg"		;RTL: registers
 		"base/rtlcfg"		;RTL: CFG types
 		"base/emodel"		;environment model
@@ -139,7 +140,7 @@ MIT in each case. |#
       (define :version)
       (define :modification)
 
-      (parse-rcs-header "$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/make.scm-68040,v 1.13 1987/04/17 10:55:42 cph Exp $"
+      (parse-rcs-header "$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/make.scm-68040,v 1.14 1987/04/21 23:51:35 cph Exp $"
 	(lambda (filename version date time author state)
 	  (set! :version (car version))
 	  (set! :modification (cadr version))))))