summaryrefslogtreecommitdiff
path: root/libguile/vectors.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/vectors.c')
-rw-r--r--libguile/vectors.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/vectors.c b/libguile/vectors.c
index ea08b0c2a..08ba6f157 100644
--- a/libguile/vectors.c
+++ b/libguile/vectors.c
@@ -184,7 +184,7 @@ scm_c_make_vector (unsigned long int k, SCM fill)
{
unsigned long int j;
- SCM_ASSERT_RANGE (1, scm_ulong2num (k), k <= SCM_VECTOR_MAX_LENGTH);
+ SCM_ASSERT_RANGE (1, scm_from_ulong (k), k <= SCM_VECTOR_MAX_LENGTH);
base = scm_gc_malloc (k * sizeof (scm_t_bits), "vector");
for (j = 0; j != k; ++j)