From 35eea59368decd95880f95a62483056fafe82c5f Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Thu, 30 Jul 1992 06:43:34 +0000
Subject: [PATCH] HPPA needs much larger constant space for student band now
 that stack checks are being performed.

---
 etc/rebuild     | 8 +++++---
 etc/rebuild-7.4 | 8 +++++---
 2 files changed, 10 insertions(+), 6 deletions(-)

diff --git a/etc/rebuild b/etc/rebuild
index ae0425603..953ce0ee2 100755
--- a/etc/rebuild
+++ b/etc/rebuild
@@ -1,6 +1,6 @@
 #!/bin/csh -f
 
-# $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/rebuild,v 1.8 1992/01/29 23:42:50 arthur Exp $
+# $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/rebuild,v 1.9 1992/07/30 06:43:34 cph Exp $
 
 # Arguments: runtimeversion compilerversion edwinversion 6001version
 
@@ -28,10 +28,12 @@
 hp9000s300
 if ("$status" == 0) then
   set root="/scheme/300"
+  set student_constant=""
 endif
 hp9000s800
 if ("$status" == 0) then
   set root="/scheme/700"
+  set student_constant=" -constant 2000"
 endif
 
 
@@ -264,8 +266,8 @@ if ("$student" != "") then
   echo "### cd $root/runtime-check"
   cd $root/runtime-check
   rm -f ../tmp/6001.com
-  echo "### scheme -large -fasl make.com -no-init-file"
-  scheme -large -fasl make.com -no-init-file <<*END*
+  echo "### scheme -large$student_constant -fasl make.com -no-init-file"
+  scheme -large$student_constant -fasl make.com -no-init-file <<*END*
 (begin
   (cd "../edwin")
   (load "make.com")
diff --git a/etc/rebuild-7.4 b/etc/rebuild-7.4
index bf6a28649..db20d9872 100755
--- a/etc/rebuild-7.4
+++ b/etc/rebuild-7.4
@@ -1,6 +1,6 @@
 #!/bin/csh -f
 
-# $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/rebuild-7.4,v 1.8 1992/01/29 23:42:50 arthur Exp $
+# $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/rebuild-7.4,v 1.9 1992/07/30 06:43:34 cph Exp $
 
 # Arguments: runtimeversion compilerversion edwinversion 6001version
 
@@ -28,10 +28,12 @@
 hp9000s300
 if ("$status" == 0) then
   set root="/scheme/300"
+  set student_constant=""
 endif
 hp9000s800
 if ("$status" == 0) then
   set root="/scheme/700"
+  set student_constant=" -constant 2000"
 endif
 
 
@@ -264,8 +266,8 @@ if ("$student" != "") then
   echo "### cd $root/runtime-check"
   cd $root/runtime-check
   rm -f ../tmp/6001.com
-  echo "### scheme -large -fasl make.com -no-init-file"
-  scheme -large -fasl make.com -no-init-file <<*END*
+  echo "### scheme -large$student_constant -fasl make.com -no-init-file"
+  scheme -large$student_constant -fasl make.com -no-init-file <<*END*
 (begin
   (cd "../edwin")
   (load "make.com")
-- 
2.25.1