From: Chris Hanson <org/chris-hanson/cph>
Date: Fri, 8 Dec 2000 06:12:52 +0000 (+0000)
Subject: Redesign the structure for setup and clean rules.  New structure uses
X-Git-Tag: 20090517-FFI~3093
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=a0cb290d37c54867c652ffee026973e33ec84b25;p=mit-scheme.git

Redesign the structure for setup and clean rules.  New structure uses
shell scripts in each directory, which the makefiles refer to.  This
greatly simplifies the configuration code because it was getting too
painful to put complex shell scripts inside the makefiles.
---

diff --git a/v7/src/compiler/Clean.sh b/v7/src/compiler/Clean.sh
index 8e113ca7f..80cf1b818 100755
--- a/v7/src/compiler/Clean.sh
+++ b/v7/src/compiler/Clean.sh
@@ -1,6 +1,6 @@
 #!/bin/sh
 #
-# $Id: Clean.sh,v 1.1 2000/12/08 05:53:17 cph Exp $
+# $Id: Clean.sh,v 1.2 2000/12/08 06:12:52 cph Exp $
 #
 # Copyright (c) 2000 Massachusetts Institute of Technology
 #
@@ -38,6 +38,7 @@ done
 case "${1}" in
 distclean | maintainer-clean)
     rm -f machine compiler.cbf compiler.pkg compiler.sf make.com
+    rm -f machines/vax/dinstr[123].scm
     ;;
 esac
 
diff --git a/v7/src/compiler/Setup.sh b/v7/src/compiler/Setup.sh
index 72da3bb3b..982cee953 100755
--- a/v7/src/compiler/Setup.sh
+++ b/v7/src/compiler/Setup.sh
@@ -1,6 +1,6 @@
 #!/bin/sh
 #
-# $Id: Setup.sh,v 1.1 2000/12/08 05:34:01 cph Exp $
+# $Id: Setup.sh,v 1.2 2000/12/08 06:09:03 cph Exp $
 #
 # Copyright (c) 2000 Massachusetts Institute of Technology
 #
@@ -37,7 +37,7 @@ maybe_link ()
 }
 
 for N in 1 2 3; do
-    maybe_link machines/vax/dinstr$${N}.scm instr$${N}.scm
+    maybe_link machines/vax/dinstr${N}.scm instr${N}.scm
 done
 
 exit 0
diff --git a/v7/src/etc/Clean.sh b/v7/src/etc/Clean.sh
index 74782380c..b48db6c27 100755
--- a/v7/src/etc/Clean.sh
+++ b/v7/src/etc/Clean.sh
@@ -1,6 +1,6 @@
 #!/bin/sh
 #
-# $Id: Clean.sh,v 1.3 2000/12/08 06:04:32 cph Exp $
+# $Id: Clean.sh,v 1.4 2000/12/08 06:07:23 cph Exp $
 #
 # Copyright (c) 2000 Massachusetts Institute of Technology
 #
@@ -33,7 +33,7 @@ else
     exit 1
 fi
 
-case "${1}" in
+case "${COMMAND}" in
 mostlyclean | clean | distclean)
     ;;
 maintainer-clean)
diff --git a/v7/src/etc/Tags.sh b/v7/src/etc/Tags.sh
new file mode 100755
index 000000000..c733bc2c0
--- /dev/null
+++ b/v7/src/etc/Tags.sh
@@ -0,0 +1,24 @@
+#!/bin/sh
+#
+# $Id: Tags.sh,v 1.1 2000/12/08 06:04:32 cph Exp $
+#
+# Copyright (c) 2000 Massachusetts Institute of Technology
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or (at
+# your option) any later version.
+#
+# This program is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+
+# Utility to make TAGS file for an MIT Scheme build directory.
+# The working directory must be the build directory.
+
+etags *.scm