* src/sheap.c (report_sheap_usage): Prefer message1_nolog.

diff --git a/src/ChangeLog b/src/ChangeLog
index 9423484..d39336f 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,7 @@
 2013-02-20  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+       * sheap.c (report_sheap_usage): Prefer message1_nolog.
+
        * keyboard.c (Qcommand_execute): New var.
        (command_loop_1, read_char): Use it.
        (Fcommand_execute): Remove, replace by an Elisp implementation.

diff --git a/src/sheap.c b/src/sheap.c
index 9e6b7fb..28597ec 100644 (file)
--- a/src/sheap.c
+++ b/src/sheap.c
@@ -91,8 +91,7 @@ report_sheap_usage (int die_if_pure_storage_exceeded)
   char buf[200];
   sprintf (buf, "Static heap usage: %d of %d bytes",
           bss_sbrk_ptr - bss_sbrk_buffer, STATIC_HEAP_SIZE);
-  /* Don't change this call to message1! message1 can log
-     messages, and at this point, we're not allowed to create
+  /* Don't log messages, cause at this point, we're not allowed to create
      buffers.  */
-  message ("%s", buf);
+  message1_nolog ("%s", buf);
 }