From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 6 Dec 2000 05:11:59 +0000 (+0000)
Subject: Move compiler configuration to a file in the compiler directory.
X-Git-Tag: 20090517-FFI~3135
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=443c9a01339f9e837aace8b89c0fcaf1c8d5120b;p=mit-scheme.git

Move compiler configuration to a file in the compiler directory.
---

diff --git a/v7/src/compiler/configure b/v7/src/compiler/configure
new file mode 100755
index 000000000..3265eae4b
--- /dev/null
+++ b/v7/src/compiler/configure
@@ -0,0 +1,53 @@
+#!/bin/sh
+
+# $Id: configure,v 1.1 2000/12/06 05:11:59 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.
+
+if test ! -f machine; then
+    case `./config.guess` in
+    alpha-* | alphaev[56]-* | alphaev56-* | alphapca56-* )
+	MACHINE=alpha
+	;;
+    m68k-* )
+	MACHINE=bobcat
+	;;
+    i[3456]86-* )
+	MACHINE=i386
+	;;
+    mips-* | mipsel-* )
+	MACHINE=mips
+	;;
+    sparc-* )
+	MACHINE=sparc
+	;;
+    hppa-* | hppa1.[01]-* | hppa2.?-* )
+	MACHINE=spectrum
+	;;
+    vax-* )
+	MACHINE=vax
+	;;
+    * )
+	echo "Unable to determine machine type."
+	exit 1
+	;;
+    esac
+    ln -s machines/${MACHINE} compiler/machine
+fi
+for FN in compiler.cbf compiler.pkg compiler.sf make.com; do \
+    test -f compiler/$${FN} || ln -s machine/$${FN} compiler/.; \
+done