summaryrefslogtreecommitdiff
path: root/libguile/vectors.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/vectors.c')
-rw-r--r--libguile/vectors.c3
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;