[Emacs-diffs] /srv/bzr/emacs/trunk r106062: * alloc.c (Fgc_status): Do not access beyond zombies array

[Paul Eggert]

------------------------------------------------------------
revno: 106062
author: Dmitry Antipov <address@hidden>
committer: Paul Eggert <address@hidden>
branch nick: trunk
timestamp: Tue 2011-10-11 23:09:40 -0700
message:
  * alloc.c (Fgc_status): Do not access beyond zombies array
  
  boundary if nzombies > MAX_ZOMBIES.
  * alloc.c (dump_zombies): Add missing format specifier.
modified:
  src/ChangeLog
  src/alloc.c

=== modified file 'src/ChangeLog'
--- a/src/ChangeLog     2011-10-12 05:50:15 +0000
+++ b/src/ChangeLog     2011-10-12 06:09:40 +0000
@@ -1,3 +1,9 @@
+2011-10-12  Dmitry Antipov  <address@hidden>
+
+       * alloc.c (Fgc_status): Do not access beyond zombies array
+       boundary if nzombies > MAX_ZOMBIES.
+       * alloc.c (dump_zombies): Add missing format specifier.
+
 2011-10-12  Paul Eggert  <address@hidden>
 
        * xdisp.c (set_cursor_from_row): Simplify conditionals,

=== modified file 'src/alloc.c'
--- a/src/alloc.c       2011-10-07 16:42:32 +0000
+++ b/src/alloc.c       2011-10-12 06:09:40 +0000
@@ -4071,7 +4071,7 @@
 {
   Lisp_Object args[8], zombie_list = Qnil;
   EMACS_INT i;
-  for (i = 0; i < nzombies; i++)
+  for (i = 0; i < min (MAX_ZOMBIES, nzombies); i++)
     zombie_list = Fcons (zombies[i], zombie_list);
   args[0] = build_string ("%d GCs, avg live/zombies = %.2f/%.2f (%f%%), max 
%d/%d\nzombies: %S");
   args[1] = make_number (ngcs);
@@ -4410,7 +4410,7 @@
 {
   int i;
 
-  fprintf (stderr, "\nZombies kept alive = %"pI":\n", nzombies);
+  fprintf (stderr, "\nZombies kept alive = %"pI"d:\n", nzombies);
   for (i = 0; i < min (MAX_ZOMBIES, nzombies); ++i)
     {
       fprintf (stderr, "  %d = ", i);