This is an automated email from the git hooks/post-receive script. wingo pushed a commit to branch master in repository guile.
The following commit(s) were added to refs/heads/master by this push: new fdea77d Bump DEFAULT_INITIAL_HEAP_SIZE fdea77d is described below commit fdea77d01cab48a371606c7d8db6146cb17e25e5 Author: Andy Wingo <wi...@pobox.com> AuthorDate: Thu Aug 27 14:07:01 2020 +0200 Bump DEFAULT_INITIAL_HEAP_SIZE * libguile/gc.c (DEFAULT_INITIAL_HEAP_SIZE): Bump to 1.6 MB on 64-bit targets, or 800 kB on 32-bit targets, to account for increased footprint. Prevents useless early GC. (scm_storage_prehistory): Remove unused code to dynamically change the free space divisor. --- libguile/gc.c | 13 ++----------- 1 file changed, 2 insertions(+), 11 deletions(-) diff --git a/libguile/gc.c b/libguile/gc.c index 5bbe1d9..0fcce32 100644 --- a/libguile/gc.c +++ b/libguile/gc.c @@ -1,4 +1,4 @@ -/* Copyright 1995-2003,2006,2008-2014,2016-2018 +/* Copyright 1995-2003,2006,2008-2014,2016-2018,2020 Free Software Foundation, Inc. This file is part of Guile. @@ -68,7 +68,7 @@ result of 'guile -c "(display (assq-ref (gc-stats) 'heap-total-allocated))"'. */ -#define DEFAULT_INITIAL_HEAP_SIZE (128 * 1024 * SIZEOF_UINTPTR_T) +#define DEFAULT_INITIAL_HEAP_SIZE (200 * 1024 * SIZEOF_UINTPTR_T) /* Set this to != 0 if every cell that is accessed shall be checked: */ @@ -145,10 +145,6 @@ unsigned long scm_gc_ports_collected = 0; static long gc_time_taken = 0; static long gc_start_time = 0; -static unsigned long free_space_divisor; -static unsigned long minimum_free_space_divisor; -static double target_free_space_divisor; - static unsigned long protected_obj_count = 0; @@ -450,11 +446,6 @@ void scm_storage_prehistory () { GC_set_all_interior_pointers (0); - - free_space_divisor = scm_getenv_int ("GC_FREE_SPACE_DIVISOR", 3); - minimum_free_space_divisor = free_space_divisor; - target_free_space_divisor = free_space_divisor; - GC_set_free_space_divisor (free_space_divisor); GC_set_finalize_on_demand (1); #if (GC_VERSION_MAJOR == 7 && GC_VERSION_MINOR == 4 \