summaryrefslogtreecommitdiff
path: root/libguile/procs.c
diff options
context:
space:
mode:
authorLudovic Courtes <ludovic.courtes@laas.fr>2006-05-14 18:44:09 +0000
committerLudovic Courtès <ludo@gnu.org>2008-09-05 00:48:31 +0200
commitce6660664198cc05a30ab5f342f8f95d491dbb41 (patch)
tree5648c4b8596d44db8980820eb13ee4b3d46bb65d /libguile/procs.c
parent59cac9e3d8fb0097aba43dd3351274593ec552d7 (diff)
downloadguile-ce6660664198cc05a30ab5f342f8f95d491dbb41.tar.gz
procs/weaks/hashtab: Removed a bit of useless mark/free code.
* libguile/hashtab.c (UNMARKED_CELL_P): Removed. (scm_i_scan_weak_hashtables): Removed. * libguile/hashtab.h (scm_i_scan_weak_hashtables): Removed. * libguile/procs.c (scm_mark_subr_table): Removed. * libguile/procs.h (scm_mark_subr_table): Removed. * libguile/weaks.c (UNMARKED_CELL_P): Removed. (scm_i_remove_weaks): Removed. (scm_i_remove_weaks_from_weak_vectors): Removed. git-archimport-id: lcourtes@laas.fr--2005-libre/guile-core--boehm-gc--1.9--patch-18
Diffstat (limited to 'libguile/procs.c')
-rw-r--r--libguile/procs.c14
1 files changed, 0 insertions, 14 deletions
diff --git a/libguile/procs.c b/libguile/procs.c
index 2359eae1f..8bf46649b 100644
--- a/libguile/procs.c
+++ b/libguile/procs.c
@@ -109,20 +109,6 @@ scm_c_define_subr_with_generic (const char *name,
return subr;
}
-void
-scm_mark_subr_table ()
-{
- long i;
- for (i = 0; i < scm_subr_table_size; ++i)
- {
- scm_gc_mark (scm_subr_table[i].name);
- if (scm_subr_table[i].generic && *scm_subr_table[i].generic)
- scm_gc_mark (*scm_subr_table[i].generic);
- if (SCM_NIMP (scm_subr_table[i].properties))
- scm_gc_mark (scm_subr_table[i].properties);
- }
-}
-
#ifdef CCLO
SCM