From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 17 Jun 1987 02:29:11 +0000 (+0000)
Subject: Split files into parts.
X-Git-Tag: 20090517-FFI~13360
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=8b0d84de47ab6a8beca7b82e72f3158fc1e55560;p=mit-scheme.git

Split files into parts.
---

diff --git a/v7/src/compiler/machines/bobcat/decls.scm b/v7/src/compiler/machines/bobcat/decls.scm
index eef2cd0d9..0603bae66 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.10 1987/06/13 21:14:53 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/decls.scm,v 1.11 1987/06/17 02:28:29 cph Exp $
 
 Copyright (c) 1987 Massachusetts Institute of Technology
 
@@ -67,8 +67,9 @@ MIT in each case. |#
 
 (define filenames/dependency-chain/base
   (filename/append "base"
-		   "object" "cfg1" "cfg2" "cfg3" "ctypes" "dtypes" "bblock"
-		   "dfg" "rtltyp" "rtlreg" "rtlcfg" "emodel" "rtypes"))
+		   "object" "cfg1" "cfg2" "cfg3" "ctypes" "dtype1" "dtype2"
+		   "dtype3" "bblock" "dfg" "rtltyp" "rtlreg" "rtlcfg" "emodel"
+		   "rtypes"))
 
 (define filenames/dependency-chain/rcse
   (filename/append "front-end" "rcseht" "rcserq" "rcse1" "rcse2"))
@@ -97,10 +98,10 @@ MIT in each case. |#
 
 (file-dependency/syntax/join
  (append (filename/append "base"
-			  "bblock" "cfg1" "cfg2" "cfg3" "ctypes" "dfg" "dtypes"
-			  "emodel" "linear" "object" "queue" "rtlcfg" "rtlcon"
-			  "rtlexp" "rtlreg" "rtltyp" "rtypes" "sets" "toplev"
-			  "utils")
+			  "bblock" "cfg1" "cfg2" "cfg3" "ctypes" "dfg" "dtype1"
+			  "dtype2" "dtype3" "emodel" "linear" "object" "queue"
+			  "rtlcfg" "rtlcon" "rtlexp" "rtlreg" "rtltyp" "rtypes"
+			  "sets" "toplv1" "toplv2" "toplv3" "utils")
 	 (filename/append "alpha" "dflow1" "dflow2" "dflow3" "dflow4" "dflow5"
 			  "dflow6" "fggen1" "fggen2")
 	 (filename/append "front-end"
diff --git a/v7/src/compiler/machines/bobcat/make.scm-68040 b/v7/src/compiler/machines/bobcat/make.scm-68040
index 56d0d6408..948700af0 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.25 1987/06/13 21:14:34 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/make.scm-68040,v 1.26 1987/06/17 02:29:11 cph Exp $
 
 Copyright (c) 1987 Massachusetts Institute of Technology
 
@@ -46,11 +46,11 @@ MIT in each case. |#
     (make-environment
       (define :name "Liar (Bobcat 68020)")
       (define :version 1)
-      (define :modification 23)
+      (define :modification 26)
       (define :files)
 
 ;      (parse-rcs-header
-;       "$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/make.scm-68040,v 1.25 1987/06/13 21:14:34 cph Exp $"
+;       "$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/make.scm-68040,v 1.26 1987/06/17 02:29:11 cph Exp $"
 ;       (lambda (filename version date time zone author state)
 ;	 (set! :version (car version))
 ;	 (set! :modification (cadr version))))
@@ -71,13 +71,17 @@ MIT in each case. |#
 		 "base/mvalue.bin"	;multiple-value support
 
 		 "machines/bobcat/machin.bin" ;machine dependent stuff
-		 "base/toplev.bin"	;top level
+		 "base/toplv1.bin"	;top level
+		 "base/toplv2.bin"
+		 "base/toplv3.bin"
 		 "base/utils.bin"	;odds and ends
 		 "base/cfg1.bin"	;control flow graph
 		 "base/cfg2.bin"
 		 "base/cfg3.bin"
 		 "base/ctypes.bin"	;CFG datatypes
-		 "base/dtypes.bin"	;DFG datatypes
+		 "base/dtype1.bin"	;DFG datatypes
+		 "base/dtype2.bin"
+		 "base/dtype3.bin"
 		 "base/bblock.bin"	;Basic block datatype
 		 "base/dfg.bin"		;data flow graph
 		 "base/rtltyp.bin"	;RTL: type definitions