mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-09 21:40:33 +02:00
Code Activity

* __scm.h (GC_FREE_SEGMENTS): Disable this until we have made

Browse source 
freeing of segment work with the new GC scheme.  (Thanks to
Michael Livshin.)
This commit is contained in:
Mikael Djurfeldt 2000-03-16 18:22:50 +00:00
parent a8cffa9f69
commit d2f51eaf14
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/__scm.h
View file

@ -49,7 +49,7 @@
*/ */
/* New scheme for garbage collection */ /* New scheme for garbage collection */
/* #define GUILE_NEW_GC_SCHEME */ #define GUILE_NEW_GC_SCHEME
/* #define GUILE_DEBUG_FREELIST */ /* #define GUILE_DEBUG_FREELIST */
@ -76,7 +76,9 @@
/* GC should relinquish empty cons-pair arenas. /* GC should relinquish empty cons-pair arenas.
*/ */
#ifndef GUILE_NEW_GC_SCHEME
#define GC_FREE_SEGMENTS #define GC_FREE_SEGMENTS
#endif
/* Provide a scheme-accessible count-down timer that /* Provide a scheme-accessible count-down timer that
* generates a pseudo-interrupt. * generates a pseudo-interrupt.