From 0a7a74453eab4e18fa59c6c9abb32836ec483359 Mon Sep 17 00:00:00 2001 From: Dirk Herrmann Date: Thu, 29 Jun 2000 08:27:40 +0000 Subject: [PATCH] * Removed unused identifier MIN_GC_YIELD. --- libguile/ChangeLog | 4 ++++ libguile/gc.c | 7 +------ 2 files changed, 5 insertions(+), 6 deletions(-) diff --git a/libguile/ChangeLog b/libguile/ChangeLog index dd390003d..582d97431 100644 --- a/libguile/ChangeLog +++ b/libguile/ChangeLog @@ -1,3 +1,7 @@ +2000-06-28 Dirk Herrmann + + * gc.c (MIN_GC_YIELD): Removed. + 2000-06-28 Michael Livshin * gc.c (scm_gc_for_newcell): don't try to do GC if it's blocked, diff --git a/libguile/gc.c b/libguile/gc.c index c9ccca65c..aca9fd907 100644 --- a/libguile/gc.c +++ b/libguile/gc.c @@ -47,6 +47,7 @@ #include #include "libguile/_scm.h" +#include "libguile/eval.h" #include "libguile/stime.h" #include "libguile/stackchk.h" #include "libguile/struct.h" @@ -239,14 +240,8 @@ int scm_gc_heap_lock = 0; * Don't pause for collection if this is set -- just * expand the heap. */ - int scm_block_gc = 1; -/* If fewer than MIN_GC_YIELD cells are recovered during a garbage - * collection (GC) more space is allocated for the heap. - */ -#define MIN_GC_YIELD(freelist) (freelist->heap_size / 4) - /* During collection, this accumulates objects holding * weak references. */ -- 2.20.1