static void
remset_stats (void)
{
RememberedSet *remset;
int size = 0;
SgenThreadInfo *info;
mword *addresses, *bumper, *p, *r;
FOREACH_THREAD (info) {
for (remset = info->remset; remset; remset = remset->next)
size += remset->store_next - remset->data;
} END_FOREACH_THREAD
for (remset = freed_thread_remsets; remset; remset = remset->next)
size += remset->store_next - remset->data;
for (remset = global_remset; remset; remset = remset->next)
size += remset->store_next - remset->data;
bumper = addresses = sgen_alloc_internal_dynamic (sizeof (mword) * size, INTERNAL_MEM_STATISTICS, TRUE);
FOREACH_THREAD (info) {
for (remset = info->remset; remset; remset = remset->next)
bumper = collect_store_remsets (remset, bumper);
} END_FOREACH_THREAD
for (remset = global_remset; remset; remset = remset->next)
bumper = collect_store_remsets (remset, bumper);
for (remset = freed_thread_remsets; remset; remset = remset->next)
bumper = collect_store_remsets (remset, bumper);
g_assert (bumper <= addresses + size);
stat_store_remsets += bumper - addresses;
sgen_sort_addresses ((void**)addresses, bumper - addresses);
p = addresses;
r = addresses + 1;
while (r < bumper) {
if (*r != *p)
*++p = *r;
++r;
}
stat_store_remsets_unique += p - addresses;
sgen_free_internal_dynamic (addresses, sizeof (mword) * size, INTERNAL_MEM_STATISTICS);
}
/* reduce the info in the pin queue, removing duplicate pointers and sorting them */
void
sgen_optimize_pin_queue (int start_slot)
{
void **start, **cur, **end;
/* sort and uniq pin_queue: we just sort and we let the rest discard multiple values */
/* it may be better to keep ranges of pinned memory instead of individually pinning objects */
SGEN_LOG (5, "Sorting pin queue, size: %d", next_pin_slot);
if ((next_pin_slot - start_slot) > 1)
sgen_sort_addresses (pin_queue + start_slot, next_pin_slot - start_slot);
start = cur = pin_queue + start_slot;
end = pin_queue + next_pin_slot;
while (cur < end) {
*start = *cur++;
while (*start == *cur && cur < end)
cur++;
start++;
};
next_pin_slot = start - pin_queue;
SGEN_LOG (5, "Pin queue reduced to size: %d", next_pin_slot);
}
