summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--libguile/gc.c3
-rw-r--r--libguile/private-gc.h2
2 files changed, 2 insertions, 3 deletions
diff --git a/libguile/gc.c b/libguile/gc.c
index dc7f5b0b5..3019a7e92 100644
--- a/libguile/gc.c
+++ b/libguile/gc.c
@@ -237,6 +237,7 @@ SCM_SYMBOL (sym_times, "gc-times");
/* {Scheme Interface to GC}
*/
+static char const * scm_i_tag_name (scm_t_bits tag);
static SCM
tag_table_to_type_alist (void *closure, SCM key, SCM val, SCM acc)
{
@@ -906,7 +907,7 @@ scm_gc_register_allocation (size_t size)
-char const *
+static char const *
scm_i_tag_name (scm_t_bits tag)
{
switch (tag & 0x7f) /* 7 bits */
diff --git a/libguile/private-gc.h b/libguile/private-gc.h
index 4e733851f..18e334162 100644
--- a/libguile/private-gc.h
+++ b/libguile/private-gc.h
@@ -27,6 +27,4 @@
SCM_INTERNAL int scm_getenv_int (const char *var, int def);
-SCM_INTERNAL char const *scm_i_tag_name (scm_t_bits tag); /* MOVEME */
-
#endif