Commit 3593ca90 authored by Raymond Toy's avatar Raymond Toy

Merge branch 'issue-89-unused-var' into 'master'

Address #89: Remove C code to scavenge read-only space

See merge request cmucl/cmucl!66
parents 9c0c857d 22e573f3
......@@ -7722,7 +7722,7 @@ static void
garbage_collect_generation(int generation, int raise)
{
unsigned long i;
unsigned long read_only_space_size, static_space_size;
unsigned long static_space_size;
#if defined(i386) || defined(__x86_64)
invalid_stack_start = (void *) control_stack;
......@@ -7865,17 +7865,6 @@ garbage_collect_generation(int generation, int raise)
printf("Done scavenging the scavenger hooks.\n");
#endif
#if 0
if (SymbolValue(SCAVENGE_READ_ONLY_SPACE) != NIL) {
read_only_space_size =
(lispobj *) SymbolValue(READ_ONLY_SPACE_FREE_POINTER) -
read_only_space;
fprintf(stderr, "Scavenge read only space: %ld bytes\n",
read_only_space_size * sizeof(lispobj));
scavenge(read_only_space, read_only_space_size);
}
#endif
static_space_size = (lispobj *) SymbolValue(STATIC_SPACE_FREE_POINTER)
- static_space;
if (gencgc_verbose > 1)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment