diff options
author | Andy Wingo <wingo@pobox.com> | 2011-11-18 11:09:48 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2011-11-21 10:56:29 +0100 |
commit | f0d1bacd786147c73862ab3f5ca2155b6f88888e (patch) | |
tree | 68e269e09127b544efe97873d0a5025f57231171 /libguile/gc.c | |
parent | 8071964943e23700cfe1095ba0f5e3c99f590dee (diff) | |
download | guile-f0d1bacd786147c73862ab3f5ca2155b6f88888e.tar.gz |
deprecate direct scm_protects access
* libguile/gc.h:
* libguile/gc.c: Deprecate direct access to scm_protects.
Diffstat (limited to 'libguile/gc.c')
-rw-r--r-- | libguile/gc.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/libguile/gc.c b/libguile/gc.c index c68f295b1..23cc8a383 100644 --- a/libguile/gc.c +++ b/libguile/gc.c @@ -82,11 +82,14 @@ int scm_expensive_debug_cell_accesses_p = 0; */ int scm_debug_cells_gc_interval = 0; +#if SCM_ENABLE_DEPRECATED == 1 /* Hash table that keeps a reference to objects the user wants to protect from garbage collection. It could arguably be private but applications have come to rely on it (e.g., Lilypond 2.13.9). */ SCM scm_protects; - +#else +static SCM scm_protects; +#endif #if (SCM_DEBUG_CELL_ACCESSES == 1) |