From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 29 Jan 2002 05:16:57 +0000 (+0000)
Subject: Add shell script with environment variable that can be used to
X-Git-Tag: 20090517-FFI~2284
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=bdd70c4c99a4872c683811e77d1e099b69d43c74;p=mit-scheme.git

Add shell script with environment variable that can be used to
override the default Scheme compiler.
---

diff --git a/v7/src/Makefile.in b/v7/src/Makefile.in
index c196fb6be..369d72123 100644
--- a/v7/src/Makefile.in
+++ b/v7/src/Makefile.in
@@ -1,6 +1,6 @@
-# $Id: Makefile.in,v 1.18 2001/10/04 17:06:59 cph Exp $
+# $Id: Makefile.in,v 1.19 2002/01/29 05:16:57 cph Exp $
 #
-# Copyright (c) 2000, 2001 Massachusetts Institute of Technology
+# Copyright (c) 2000-2002 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
@@ -65,7 +65,7 @@ EDETC = $(AUXDIR)/edwin/etc
 
 all:
 	( cd microcode && $(MAKE) all )
-	scheme -compiler -heap 4000 < $(srcdir)/etc/compile.scm
+	$(srcdir)/etc/compile.sh $(srcdir)
 	$(srcdir)/etc/build-bands.sh
 
 mostlyclean clean distclean maintainer-clean:
diff --git a/v7/src/etc/compile.sh b/v7/src/etc/compile.sh
new file mode 100755
index 000000000..ea5c9d9dd
--- /dev/null
+++ b/v7/src/etc/compile.sh
@@ -0,0 +1,25 @@
+#!/bin/sh
+#
+# $Id: compile.sh,v 1.2 2002/01/29 05:16:50 cph Exp $
+#
+# Copyright (c) 2002 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307
+# USA.
+
+if [ -z "${SCHEME_COMPILER}" ]; then
+    SCHEME_COMPILER="scheme -compiler -heap 4000"
+fi
+${SCHEME_COMPILER} < "${1}/etc/compile.scm"