mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-17 14:51:20 -08:00
Code Issues Projects Releases Packages Wiki Activity

Enable incremental garbage collection

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2008-05-30 10:01:12 +02:00
parent cc5aa95191
commit 39cfaeff24
1 changed files with 13 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

14
src/c/alloc_2.d
View file

@ -188,10 +188,22 @@ init_alloc(void)
int i;
if (alloc_initialized) return;
alloc_initialized = TRUE;
/*
* Garbage collector restrictions: we set up the garbage collector
* library to work as follows
*
* 1) The garbage collector shall not scan shared libraries
* explicitely.
* 2) We only detect objects that are referenced by a pointer to
* the begining or to the first byte.
* 3) Out of the incremental garbage collector, we only use the
* generational component.
*/
GC_no_dls = 1;
GC_all_interior_pointers = 0;
GC_time_limit = GC_TIME_UNLIMITED;
GC_init();
GC_enable_incremental();
GC_register_displacement(1);
#if 0
GC_init_explicit_typing();