summaryrefslogtreecommitdiff
path: root/blacklst.c
diff options
context:
space:
mode:
authorIvan Maidanski <ivmai@mail.ru>2011-07-26 13:16:41 +0200
committerIvan Maidanski <ivmai@mail.ru>2011-07-26 13:16:41 +0200
commit7d3768dbd2a1cd4d5c14f773f23aec43bc0651a5 (patch)
tree1cb52688b70322e994f4c2377ad715dbe8edb7d7 /blacklst.c
parentf9b1aa2161e755a5f5b772b5698aab8a63d0bef4 (diff)
gc4.12 tarball importgc4_12
Diffstat (limited to 'blacklst.c')
-rw-r--r--blacklst.c17
1 files changed, 9 insertions, 8 deletions
diff --git a/blacklst.c b/blacklst.c
index 7b27993..5917eb7 100644
--- a/blacklst.c
+++ b/blacklst.c
@@ -46,7 +46,7 @@ word * GC_incomplete_normal_bl;
word * GC_old_stack_bl;
word * GC_incomplete_stack_bl;
-word GC_total_black_listed;
+word GC_total_stack_black_listed;
word GC_black_list_spacing = MINHINCR*HBLKSIZE; /* Initial rough guess */
@@ -89,7 +89,7 @@ word *new, *old;
BCOPY(old, new, sizeof(page_hash_table));
}
-static word total_black_listed();
+static word total_stack_black_listed();
/* Signal the completion of a collection. Turn the incomplete black */
/* lists into new black lists, etc. */
@@ -106,13 +106,14 @@ void GC_promote_black_lists()
GC_clear_bl(very_old_stack_bl);
GC_incomplete_normal_bl = very_old_normal_bl;
GC_incomplete_stack_bl = very_old_stack_bl;
- GC_total_black_listed = total_black_listed();
+ GC_total_stack_black_listed = total_stack_black_listed();
# ifdef PRINTSTATS
- GC_printf1("%ld blacklisted bytes in heap\n",
- (unsigned long)GC_total_black_listed);
+ GC_printf1("%ld bytes in heap blacklisted for interior pointers\n",
+ (unsigned long)GC_total_stack_black_listed);
# endif
- if (GC_total_black_listed != 0) {
- GC_black_list_spacing = HBLKSIZE*(GC_heapsize/GC_total_black_listed);
+ if (GC_total_stack_black_listed != 0) {
+ GC_black_list_spacing =
+ HBLKSIZE*(GC_heapsize/GC_total_stack_black_listed);
}
if (GC_black_list_spacing < 3 * HBLKSIZE) {
GC_black_list_spacing = 3 * HBLKSIZE;
@@ -230,7 +231,7 @@ struct hblk *start, *endp1;
/* Return the total number of (stack) black-listed bytes. */
-static word total_black_listed()
+static word total_stack_black_listed()
{
register unsigned i;
word total = 0;