From 88831a0ff337dd19783e60e7ca74ad9b50fee66e Mon Sep 17 00:00:00 2001
From: Matt Birkholz <puck@birchwood-abbey.net>
Date: Wed, 25 Nov 2015 22:37:00 -0700
Subject: [PATCH] svm: finish-cross-compilation of everything using a large
 heap.

---
 src/etc/compile-svm.sh | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/etc/compile-svm.sh b/src/etc/compile-svm.sh
index 197138c64..6bb0542ad 100755
--- a/src/etc/compile-svm.sh
+++ b/src/etc/compile-svm.sh
@@ -130,9 +130,10 @@ EOF
 EOF
 
     echo "# `mydate`:     Finish-cross-compilation of everything."
+    # Use a large heap for all that s-code!
     run_cmd_in_dir runtime \
 	../microcode/scheme --batch-mode --library ../lib \
-			    --fasl make.bin <<EOF
+			    --fasl make.bin --heap ${HEAP} <<EOF
 (begin
   (load "../compiler/base/crsend")
   (finish-cross-compilation:directory ".."))
-- 
2.25.1