168 |
int init_heap_size_2 |
int init_heap_size_2 |
169 |
= scm_getenv_int ("GUILE_INIT_SEGMENT_SIZE_2", SCM_DEFAULT_INIT_HEAP_SIZE_2); |
= scm_getenv_int ("GUILE_INIT_SEGMENT_SIZE_2", SCM_DEFAULT_INIT_HEAP_SIZE_2); |
170 |
|
|
171 |
scm_i_freelist = SCM_EOL; |
/* These are the thread-local freelists. */ |
172 |
scm_i_freelist2 = SCM_EOL; |
scm_key_create (&scm_i_freelist, free); |
173 |
|
scm_key_create (&scm_i_freelist2, free); |
174 |
|
SCM_FREELIST_CREATE (scm_i_freelist); |
175 |
|
SCM_FREELIST_CREATE (scm_i_freelist2); |
176 |
|
|
177 |
scm_init_freelist (&scm_i_master_freelist2, 2, |
scm_init_freelist (&scm_i_master_freelist2, 2, |
178 |
scm_getenv_int ("GUILE_MIN_YIELD_2", SCM_DEFAULT_MIN_YIELD_2)); |
scm_getenv_int ("GUILE_MIN_YIELD_2", SCM_DEFAULT_MIN_YIELD_2)); |