diff options
author | Ludovic Courtes <ludovic.courtes@laas.fr> | 2006-05-02 21:30:37 +0000 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2008-09-05 00:48:01 +0200 |
commit | d525e4f9a21d1c483bc23fb047cb35edae2997ae (patch) | |
tree | 0a9b347b13ad55a82c8694c6c1ec291ae7c20752 /libguile/vectors.h | |
parent | 4650cdd20dd8b4931bed910e299e766f391546aa (diff) | |
download | guile-d525e4f9a21d1c483bc23fb047cb35edae2997ae.tar.gz |
Fixed `list->weak-vector'.
* libguile/vectors.c (scm_i_allocate_weak_vector): Removed.
(MAKE_WEAK_VECTOR): New macro.
(allocate_weak_vector): New.
(scm_i_make_weak_vector): New.
(scm_i_make_weak_vector_from_list): New.
* libguile/vectors.h: Updated.
* libguile/weaks.c (scm_make_weak_vector): Use `scm_i_make_weak_vector ()'.
(scm_weak_vector): Use `scm_i_make_weak_vector_from_list ()'.
git-archimport-id: lcourtes@laas.fr--2005-libre/guile-core--boehm-gc--1.9--patch-13
Diffstat (limited to 'libguile/vectors.h')
-rw-r--r-- | libguile/vectors.h | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/vectors.h b/libguile/vectors.h index b1def0689..db43a86d0 100644 --- a/libguile/vectors.h +++ b/libguile/vectors.h @@ -99,7 +99,8 @@ SCM_API SCM scm_i_vector_equal_p (SCM x, SCM y); #define SCM_I_WVECT_GC_CHAIN(x) (SCM_CELL_OBJECT_3 (x)) #define SCM_I_SET_WVECT_GC_CHAIN(x, o) (SCM_SET_CELL_OBJECT_3 ((x), (o))) -SCM_API SCM scm_i_allocate_weak_vector (scm_t_bits type, SCM size, SCM fill); +SCM_API SCM scm_i_make_weak_vector (scm_t_bits type, SCM size, SCM fill); +SCM_API SCM scm_i_make_weak_vector_from_list (scm_t_bits type, SCM lst); SCM_API void scm_init_vectors (void); |