From: Taylor R Campbell <campbell@mumble.net>
Date: Mon, 9 May 2011 21:30:19 +0000 (+0000)
Subject: Permit `--constant 0'.
X-Git-Tag: 20110609-Gtk~5^2~7
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=eaf6b20b32f2d50b9860fd50f12d971a13f621f3;p=mit-scheme.git

Permit `--constant 0'.

The band loader figures out the size of the constant space anyway.
Is there ever any reason to use the `--constant' option at all?
---

diff --git a/src/microcode/memmag.c b/src/microcode/memmag.c
index 5f7628d4e..45580386f 100644
--- a/src/microcode/memmag.c
+++ b/src/microcode/memmag.c
@@ -114,7 +114,7 @@ setup_memory (unsigned long heap_size,
   ALLOCATE_REGISTERS ();
 
   /* Consistency check 1 */
-  if ((heap_size == 0) || (stack_size == 0) || (constant_size == 0))
+  if ((heap_size == 0) || (stack_size == 0))
     {
       outf_fatal ("Configuration won't hold initial data.\n");
       outf_flush_fatal ();