diff options
author | Ludovic Courtes <ludovic.courtes@laas.fr> | 2006-12-03 21:59:02 +0000 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2008-09-10 22:19:49 +0200 |
commit | e7bca22779c68b800c75fdad8841440dfeb32f8d (patch) | |
tree | 7f3ed2c38379082723d980d153a323e84bed9ec8 /libguile/inline.h | |
parent | 8e7b3e98072ef30557a0396367ae8b42170e5507 (diff) | |
download | guile-e7bca22779c68b800c75fdad8841440dfeb32f8d.tar.gz |
Use thread-local allocation (significant perf. improvement!); added the `boehm-gc.h' header.
* libguile/Makefile.am (modinclude_HEADERS): Added `boehm-gc.h'.
* libguile/coop-defs.h: Use "libguile/boehm-gc.h" instead of <gc/gc.h>.
* libguile/coop-threads.h: Likewise.
* libguile/coop.c: Likewise.
* libguile/gc.c: Likewise.
(scm_storage_prehistory): Invoke `GC_init ()'.
* libguile/guardians.c: Use "libguile/boehm-gc.h" instead of <gc/gc.h>.
* libguile/inline.h: Likewise.
(scm_double_cell): Use `GC_MALLOC' instead of `GC_malloc'.
* libguile/pthread-threads.h: Use "libguile/boehm-gc.h" instead of
<gc/gc.h>.
* libguile/smob.c: Likewise.
* libguile/smob.h: Likewise.
* libguile/struct.c: Likewise.
* libguile/threads.c: Likewise.
* libguile/weaks.c: Likewise.
git-archimport-id: lcourtes@laas.fr--2005-libre/guile-core--boehm-gc--1.9--patch-51
Diffstat (limited to 'libguile/inline.h')
-rw-r--r-- | libguile/inline.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/inline.h b/libguile/inline.h index 8d6c41717..75a7cc95c 100644 --- a/libguile/inline.h +++ b/libguile/inline.h @@ -38,7 +38,7 @@ #include "libguile/pairs.h" -#include <gc/gc.h> +#include "libguile/boehm-gc.h" SCM_API SCM scm_cell (scm_t_bits car, scm_t_bits cdr); @@ -98,7 +98,7 @@ scm_double_cell (scm_t_bits car, scm_t_bits cbr, { SCM z; - z = SCM_PACK ((scm_t_bits) (GC_malloc (2 * sizeof (scm_t_cell)))); + z = SCM_PACK ((scm_t_bits) (GC_MALLOC (2 * sizeof (scm_t_cell)))); /* Initialize the type slot last so that the cell is ignored by the GC until it is completely initialized. This is only relevant when the GC can actually run during this code, which it can't |