# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 760840515 0
# Node ID fbda87c8ad546648001586346cff313d17b384c3
# Parent  fa8b769ef56474da8a1e99ee9cdf4c073d6bd5b3
(Fgarbage_collect): Save echo_area_glyphs_length.

diff -r fa8b769ef564 -r fbda87c8ad54 src/alloc.c
--- a/src/alloc.c	Wed Feb 09 23:47:09 1994 +0000
+++ b/src/alloc.c	Thu Feb 10 00:35:15 1994 +0000
@@ -1232,6 +1232,7 @@
   register struct backtrace *backlist;
   register Lisp_Object tem;
   char *omessage = echo_area_glyphs;
+  int omessage_length = echo_area_glyphs_length;
   char stack_top_variable;
   register int i;
 
@@ -1374,7 +1375,7 @@
     gc_cons_threshold = 10000;
 
   if (omessage || minibuf_level > 0)
-    message1 (omessage);
+    message2 (omessage, omessage_length);
   else if (!noninteractive)
     message1 ("Garbage collecting...done");