From 8acde64249def1878208d279a72a0dd10882f017 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Fri, 22 Jun 2007 02:29:24 +0000
Subject: [PATCH] Force the use of mit-scheme-c when configuring for
 liarc-to-native compilation.

---
 v7/src/etc/create-makefiles.sh | 8 +++++---
 v7/src/etc/make-native.sh      | 4 ++--
 2 files changed, 7 insertions(+), 5 deletions(-)

diff --git a/v7/src/etc/create-makefiles.sh b/v7/src/etc/create-makefiles.sh
index 058430e7c..6d454586a 100755
--- a/v7/src/etc/create-makefiles.sh
+++ b/v7/src/etc/create-makefiles.sh
@@ -1,6 +1,6 @@
 #!/bin/sh
 
-# $Id: create-makefiles.sh,v 1.3 2007/06/16 02:14:44 cph Exp $
+# $Id: create-makefiles.sh,v 1.4 2007/06/22 02:29:23 cph Exp $
 #
 # Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
 #     1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
@@ -36,7 +36,7 @@ fi
 
 MDIR=`compiler/choose-machine.sh "${NATIVE_CODE}"`
 
-if test -f makefiles_created; then
+if [ -f makefiles_created ]; then
     CODE_TYPE=`cat makefiles_created`
     if test "${CODE_TYPE}" = "${MDIR}"; then
 	echo "Makefiles already created."
@@ -50,7 +50,9 @@ run_cmd ln -s machine/compiler.pkg compiler/.
 
 BUNDLES="6001 compiler cref edwin imail sf sos ssp star-parser xdoc xml"
 
-run_cmd mit-scheme --heap 4000 <<EOF
+: ${MIT_SCHEME_EXE='mit-scheme'}
+
+run_cmd ${MIT_SCHEME_EXE} --heap 4000 <<EOF
 (begin
   (load "etc/utilities")
   (generate-c-bundles (quote (${BUNDLES})) "${MDIR}"))
diff --git a/v7/src/etc/make-native.sh b/v7/src/etc/make-native.sh
index 0b035a7f6..7c955a7bb 100755
--- a/v7/src/etc/make-native.sh
+++ b/v7/src/etc/make-native.sh
@@ -1,6 +1,6 @@
 #!/bin/sh
 #
-# $Id: make-native.sh,v 1.2 2007/06/15 18:09:15 cph Exp $
+# $Id: make-native.sh,v 1.3 2007/06/22 02:29:24 cph Exp $
 #
 # Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
 #     1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
@@ -41,7 +41,7 @@ if [ ${FASTP} = yes ]; then
 fi
 
 run_cmd ./Setup.sh
-run_configure --prefix=`pwd`/boot-root
+MIT_SCHEME_EXE=mit-scheme-c run_configure --prefix=`pwd`/boot-root
 run_cmd etc/compile-boot-compiler.sh mit-scheme-c
 run_cmd_in_dir compiler run_make compile-liarc-bundle
 run_cmd etc/native-prepare.sh mit-scheme-c
-- 
2.25.1