From: Matt Birkholz <matt@birchwood-abbey.net>
Date: Wed, 15 Feb 2017 20:46:09 +0000 (-0700)
Subject: Punt warning about "copying large block"s (e.g. Edwin buffers).
X-Git-Tag: mit-scheme-pucked-9.2.12~220^2~97
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=f0c792d8d21c917cab66cf6d0c70567693aa7cdc;p=mit-scheme.git

Punt warning about "copying large block"s (e.g. Edwin buffers).
---

diff --git a/src/microcode/gcloop.c b/src/microcode/gcloop.c
index 42a859ed9..4d50a606e 100644
--- a/src/microcode/gcloop.c
+++ b/src/microcode/gcloop.c
@@ -542,8 +542,10 @@ DEFINE_GC_TRANSPORT_WORDS (gc_transport_words)
   }
   if (n_words == 0)
     std_gc_death ("gc_transport_words: attempt to transfer zero words.");
+#if 0
   if (n_words > 0x10000)
       outf_error_line ("\nWarning: copying large block: %lu", n_words);
+#endif
 #endif
   new_address = newspace_next;
   while (from < from_end)