]> code.delx.au - gnu-emacs/commitdiff
(Fgarbage_collect):
authorRichard M. Stallman <rms@gnu.org>
Sun, 21 Dec 1997 02:17:50 +0000 (02:17 +0000)
committerRichard M. Stallman <rms@gnu.org>
Sun, 21 Dec 1997 02:17:50 +0000 (02:17 +0000)
Save message_enable_multibyte and pass it to message2_nolog.

src/alloc.c

index 33c4a1578f342d7f734352847c64de75339670a6..db5ff4b0b5067e2f42da9f8c6f6d19d7012abf9e 100644 (file)
@@ -189,6 +189,8 @@ Lisp_Object Qgc_cons_threshold, Qchar_table_extra_slots;
 static void mark_object (), mark_buffer (), mark_kboards ();
 static void clear_marks (), gc_sweep ();
 static void compact_strings ();
+
+extern int message_enable_multibyte;
 \f
 /* Versions of malloc and realloc that print warnings as memory gets full.  */
 
@@ -1543,6 +1545,7 @@ Garbage collection happens automatically if you cons more than\n\
   register Lisp_Object tem;
   char *omessage = echo_area_glyphs;
   int omessage_length = echo_area_glyphs_length;
+  int oldmultibyte = message_enable_multibyte;
   char stack_top_variable;
   register int i;
 
@@ -1695,7 +1698,7 @@ Garbage collection happens automatically if you cons more than\n\
   if (garbage_collection_messages)
     {
       if (omessage || minibuf_level > 0)
-       message2_nolog (omessage, omessage_length);
+       message2_nolog (omessage, omessage_length, oldmultibyte);
       else
        message1_nolog ("Garbage collecting...done");
     }