2009-11-16 Ivan Maidanski <ivmai@mail.ru>

	* alloc.c (min_bytes_allocd): Multiply GC_free_space_divisor by
	two if GC_incremental (instead of TRUE_INCREMENTAL).

diff --git a/ChangeLog b/ChangeLog
index 27b48d2c68bdca06c11a5803e6bd0c879d42d06a..7cc7042570ce898121f740fe1f1fadfd24e3531c 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2009-11-16  Ivan Maidanski <ivmai@mail.ru>
+
+       * alloc.c (min_bytes_allocd): Multiply GC_free_space_divisor by
+       two if GC_incremental (instead of TRUE_INCREMENTAL).
+
 2009-11-10  Ivan Maidanski <ivmai@mail.ru>
 
        * sparc_mach_dep.S (GC_push_regs): Remove the reference.

diff --git a/alloc.c b/alloc.c
index 21f014310b9a204924bfe83bb67f3d4fe37ea8bf..2723d47f4d40247091908ede9a7ebde85f8eaf6f 100644 (file)
--- a/alloc.c
+++ b/alloc.c
@@ -221,7 +221,7 @@ static word min_bytes_allocd(void)
     total_root_size = 2 * stack_size + GC_root_size;
     scan_size = 2 * GC_composite_in_use + GC_atomic_in_use / 4
                 + total_root_size;
-    if (TRUE_INCREMENTAL) {
+    if (GC_incremental) {
         return scan_size / (2 * GC_free_space_divisor);
     } else {
         return scan_size / GC_free_space_divisor;