* Removed unused identifier MIN_GC_YIELD.

diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index dd39000..582d974 100644 (file)
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,7 @@
+2000-06-28  Dirk Herrmann  <D.Herrmann@tu-bs.de>
+
+       * gc.c (MIN_GC_YIELD):  Removed.
+
 2000-06-28  Michael Livshin  <mlivshin@bigfoot.com>
 
        * 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 c9ccca6..aca9fd9 100644 (file)
--- a/libguile/gc.c
+++ b/libguile/gc.c
@@ -47,6 +47,7 @@
 \f
 #include <stdio.h>
 #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.
  */