diff options
Diffstat (limited to 'libguile/vectors.c')
-rw-r--r-- | libguile/vectors.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/libguile/vectors.c b/libguile/vectors.c index c1dfe840f..bdc943760 100644 --- a/libguile/vectors.c +++ b/libguile/vectors.c @@ -215,8 +215,7 @@ scm_c_make_vector (unsigned long int k, SCM fill) else base = NULL; - v = scm_alloc_cell (SCM_MAKE_VECTOR_TAG (k, scm_tc7_vector), - (scm_t_bits) base); + v = scm_cell (SCM_MAKE_VECTOR_TAG (k, scm_tc7_vector), (scm_t_bits) base); scm_remember_upto_here_1 (fill); return v; |