From eab1b25970c21df7da67bd8f48290a1a1e1bf3d7 Mon Sep 17 00:00:00 2001 From: Han-Wen Nienhuys Date: Thu, 8 Aug 2002 19:47:31 +0000 Subject: * gc.h: add scm_debug_cells_gc_interval to public interface * gc-card.c ("sweep_card"): set scm_gc_running while sweeping. * gc.c (scm_i_expensive_validation_check): separate expensive validation checks from cheap ones. --- libguile/gc-segment.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'libguile/gc-segment.c') diff --git a/libguile/gc-segment.c b/libguile/gc-segment.c index d3a48f2ab..593aa29a2 100644 --- a/libguile/gc-segment.c +++ b/libguile/gc-segment.c @@ -546,6 +546,7 @@ scm_i_get_new_heap_segment (scm_t_cell_type_statistics *freelist, policy_on_erro } + void scm_i_make_initial_segment (size_t init_heap_size, scm_t_cell_type_statistics *freelist) { @@ -568,4 +569,3 @@ scm_i_make_initial_segment (size_t init_heap_size, scm_t_cell_type_statistics *f freelist->min_yield = (freelist->heap_size * freelist->min_yield_fraction / 100); } - -- cgit v1.2.3