diff options
author | Andy Wingo <wingo@pobox.com> | 2011-11-18 11:10:54 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2011-11-24 11:47:36 +0100 |
commit | fbe1cb7f64a6af5c3dd6b94a9b176a28124f5c9b (patch) | |
tree | 8d2b7e1a77be830b2efdd0801d8d43b3806e3145 | |
parent | 2ec8da2e4501f96a228ec64430f07c3f0e409d29 (diff) | |
download | guile-fbe1cb7f64a6af5c3dd6b94a9b176a28124f5c9b.tar.gz |
remove public scm_protects export
* libguile/gc.h:
* libguile/gc.c: Remove scm_protects from the API. It is deprecated on
stable-2.0.
-rw-r--r-- | libguile/gc.c | 5 | ||||
-rw-r--r-- | libguile/gc.h | 1 |
2 files changed, 2 insertions, 4 deletions
diff --git a/libguile/gc.c b/libguile/gc.c index 696e32148..2680dd6f9 100644 --- a/libguile/gc.c +++ b/libguile/gc.c @@ -82,9 +82,8 @@ int scm_expensive_debug_cell_accesses_p = 0; int scm_debug_cells_gc_interval = 0; /* 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; + garbage collection. */ +static SCM scm_protects; #if (SCM_DEBUG_CELL_ACCESSES == 1) diff --git a/libguile/gc.h b/libguile/gc.h index a7f3b7343..08d2c15b5 100644 --- a/libguile/gc.h +++ b/libguile/gc.h @@ -325,7 +325,6 @@ SCM_API void scm_gc_register_root (SCM *p); SCM_API void scm_gc_unregister_root (SCM *p); SCM_API void scm_gc_register_roots (SCM *b, unsigned long n); SCM_API void scm_gc_unregister_roots (SCM *b, unsigned long n); -SCM_API SCM scm_protects; SCM_INTERNAL void scm_storage_prehistory (void); SCM_INTERNAL void scm_init_gc_protect_object (void); SCM_INTERNAL void scm_init_gc (void); |