diff --git a/lisp/gencgc.c b/lisp/gencgc.c
index de109aaf55ca869e59052890412097c2903dee90..0a648979e6a08a2b1a18ec8e9aff7c2a9e6ea28d 100644
--- a/lisp/gencgc.c
+++ b/lisp/gencgc.c
@@ -7,7 +7,7 @@
  *
  * Douglas Crosher, 1996, 1997, 1998, 1999.
  *
- * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/gencgc.c,v 1.50 2004/01/09 23:05:32 toy Exp $
+ * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/gencgc.c,v 1.51 2004/05/03 14:17:20 rtoy Exp $
  *
  */
 
@@ -589,8 +589,10 @@ void print_generation_stats(int  verbose)
     gens = NUM_GENERATIONS;
 
   /* Print the heap stats */
-  fprintf(stderr, "   Generation Boxed Unboxed LB   LUB    Alloc  Waste   Trig    WP  GCs Mem-age\n");
-
+  fprintf(stderr, "          Page count (%d KB)\n", PAGE_SIZE / 1024);
+  fprintf(stderr, "   Gen  Boxed Unboxed  LB   LUB    Alloc    Waste    Trigger   WP  GCs Mem-age
+\n");
+  
   for (i = 0; i < gens; i++) {
     int j;
     int boxed_cnt = 0;
@@ -621,7 +623,7 @@ void print_generation_stats(int  verbose)
     }
 
     gc_assert(generations[i].bytes_allocated == generation_bytes_allocated(i));
-    fprintf(stderr, "   %8d: %5d %5d %5d %5d %8d %5d %8d %4d %3d %7.4f\n",
+    fprintf(stderr, " %5d: %5d %5d %5d %5d %10d %6d %10d %4d %3d %7.4f\n",
 	    i, boxed_cnt, unboxed_cnt, large_boxed_cnt, large_unboxed_cnt,
 	    generations[i].bytes_allocated,
 	    PAGE_SIZE * count_generation_pages(i) -