Update to reflect new directories.

diff --git a/v7/src/rcs/mklogs.scm b/v7/src/rcs/mklogs.scm
index b7df1b2cc1dac20dcc24ca0e22e3f048310e84b9..c2b7f8bb3165f207ed938b04fa6c551a4b17f1cf 100644 (file)
--- 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