diff options
author | Han-Wen Nienhuys <hanwen@lilypond.org> | 2002-08-23 00:05:58 +0000 |
---|---|---|
committer | Han-Wen Nienhuys <hanwen@lilypond.org> | 2002-08-23 00:05:58 +0000 |
commit | 4a5309c938fac5c5c65db0a8bacd5f7e20d918e5 (patch) | |
tree | 417dfe5e2f0dc2945d2c214d72755e73cfdbe56b /libguile/gc-segment.c | |
parent | 917adc55acec19ba5846179f3824d20f89acb456 (diff) | |
download | guile-4a5309c938fac5c5c65db0a8bacd5f7e20d918e5.tar.gz |
(scm_i_get_new_heap_segment): Oops. We want segment
length *at* least SCM_MIN_HEAP_SEG_SIZE, not at most.
Diffstat (limited to 'libguile/gc-segment.c')
-rw-r--r-- | libguile/gc-segment.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/gc-segment.c b/libguile/gc-segment.c index e459291d3..53c02cd3a 100644 --- a/libguile/gc-segment.c +++ b/libguile/gc-segment.c @@ -512,7 +512,7 @@ scm_i_get_new_heap_segment (scm_t_cell_type_statistics *freelist, policy_on_erro freelist->collected = LONG_MAX; } - if (len > SCM_MIN_HEAP_SEG_SIZE) + if (len < SCM_MIN_HEAP_SEG_SIZE) len = SCM_MIN_HEAP_SEG_SIZE; { |