mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-27 07:37:33 +00:00
Code Issues Releases Activity

(Fgarbage_collect): Save echo_area_glyphs_length.

Browse Source
This commit is contained in:
Karl Heuer 1994-02-10 00:35:15 +00:00
parent 7410477aee
commit 51056d11c5
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/alloc.c
View File

@ -1232,6 +1232,7 @@ Garbage collection happens automatically if you cons more than\n\
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 @@ Garbage collection happens automatically if you cons more than\n\
gc_cons_threshold = 10000;
if (omessage || minibuf_level > 0)
message1 (omessage);
message2 (omessage, omessage_length);
else if (!noninteractive)
message1 ("Garbage collecting...done");