diff options
Diffstat (limited to 'libguile/vectors.c')
-rw-r--r-- | libguile/vectors.c | 2 |
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) |