From: Chris Hanson <org/chris-hanson/cph>
Date: Sat, 20 Nov 1993 07:41:08 +0000 (+0000)
Subject: Update to reflect new directories.
X-Git-Tag: 20090517-FFI~7466
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=41a096634f97f3e8b96bbd6864504f52f3fe39b4;p=mit-scheme.git

Update to reflect new directories.
---

diff --git a/v7/src/rcs/mklogs.scm b/v7/src/rcs/mklogs.scm
index b7df1b2cc..c2b7f8bb3 100644
--- a/v7/src/rcs/mklogs.scm
+++ b/v7/src/rcs/mklogs.scm
@@ -10,13 +10,16 @@
 			    (string-append subdirectory "/RCS"))
 			  subdirectories))))))
   (make-log "/scheme/src/6001")
-  (make-log "/scheme/src/compiler" "back" "base" "fggen" "fgopt"
-	    "rtlbase" "rtlgen" "rtlopt" "machines/bobcat" "machines/i386"
-	    "machines/mips" "machines/spectrum" "machines/vax")
+  (make-log "/scheme/src/compiler" "back" "base" "documentation" "etc" "fggen"
+	    "fgopt" "machines/C" "machines/alpha" "machines/bobcat"
+	    "machines/i386" "machines/mips" "machines/sparc"
+	    "machines/spectrum" "machines/vax" "rtlbase" "rtlgen" "rtlopt")
   (make-log "/scheme/src/cref")
   (make-log "/scheme/src/edwin")
-  (make-log "/scheme/src/microcode" "m" "s")
+  (make-log "/scheme/src/microcode" "cmpauxmd" "cmpintmd" "dosutl" "m" "ntutl"
+	    "s" "unxutl")
   (make-log "/scheme/src/rcs")
   (make-log "/scheme/src/runtime")
   (make-log "/scheme/src/sf")
-  (make-log "/scheme/src/sicp"))
\ No newline at end of file
+  (make-log "/scheme/src/sicp")
+  (make-log "/scheme/src/win32" "dibutils"))
\ No newline at end of file