From 4ea5de7c3cf71cb104d7e137221ae77b1f9ce6fc Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 8 Oct 2008 07:14:15 +0000
Subject: [PATCH] Explicitly specify the band to use when cross compiling.  The
 recent change of the default band violated the assumptions used here.

---
 v7/src/etc/c-prepare.sh             | 4 ++--
 v7/src/etc/compile-boot-compiler.sh | 6 +++---
 v7/src/etc/native-prepare.sh        | 4 ++--
 3 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/v7/src/etc/c-prepare.sh b/v7/src/etc/c-prepare.sh
index e6904cf57..1807309f9 100755
--- a/v7/src/etc/c-prepare.sh
+++ b/v7/src/etc/c-prepare.sh
@@ -1,6 +1,6 @@
 #!/bin/sh
 #
-# $Id: c-prepare.sh,v 1.11 2008/01/30 20:02:08 cph Exp $
+# $Id: c-prepare.sh,v 1.12 2008/10/08 07:14:09 cph Exp $
 #
 # Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
 #     1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
@@ -34,7 +34,7 @@ else
     exit 1
 fi
 
-run_cmd "${EXE}" --heap 6000 --stack 200 <<EOF
+run_cmd "${EXE}" --band runtime.com --heap 6000 --stack 200 <<EOF
 (begin
   (load "etc/compile.scm")
   (c-prepare))
diff --git a/v7/src/etc/compile-boot-compiler.sh b/v7/src/etc/compile-boot-compiler.sh
index 2852d040b..f0bfd2dfc 100755
--- a/v7/src/etc/compile-boot-compiler.sh
+++ b/v7/src/etc/compile-boot-compiler.sh
@@ -1,6 +1,6 @@
 #!/bin/sh
 #
-# $Id: compile-boot-compiler.sh,v 1.3 2008/01/30 20:02:08 cph Exp $
+# $Id: compile-boot-compiler.sh,v 1.4 2008/10/08 07:14:12 cph Exp $
 #
 # Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
 #     1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
@@ -34,13 +34,13 @@ else
     exit 1
 fi
 
-run_cmd "${EXE}" --heap 6000 <<EOF
+run_cmd "${EXE}" --band runtime.com --heap 6000 <<EOF
 (begin
   (load "etc/compile.scm")
   (compile-bootstrap-1))
 EOF
 
-run_cmd "${EXE}" --heap 6000 --compiler <<EOF
+run_cmd "${EXE}" --band all.com --heap 6000 <<EOF
 (begin
   (load "etc/compile.scm")
   (compile-bootstrap-2))
diff --git a/v7/src/etc/native-prepare.sh b/v7/src/etc/native-prepare.sh
index 4ad571927..7028967f1 100755
--- a/v7/src/etc/native-prepare.sh
+++ b/v7/src/etc/native-prepare.sh
@@ -1,6 +1,6 @@
 #!/bin/sh
 #
-# $Id: native-prepare.sh,v 1.4 2008/01/30 20:02:08 cph Exp $
+# $Id: native-prepare.sh,v 1.5 2008/10/08 07:14:15 cph Exp $
 #
 # Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
 #     1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
@@ -34,7 +34,7 @@ else
     exit 1
 fi
 
-run_cmd "${EXE}" --heap 6000 --stack 200 <<EOF
+run_cmd "${EXE}" --band runtime.com --heap 6000 --stack 200 <<EOF
 (begin
   (load "etc/compile.scm")
   (native-prepare))
-- 
2.25.1