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 7e36ebafc..d55a51cf3 100644 --- a/libguile/vectors.c +++ b/libguile/vectors.c @@ -275,7 +275,7 @@ SCM_DEFINE (scm_make_vector, "make-vector", 1, 1, 0, if (SCM_INUMP (k)) { - SCM_ASSERT_RANGE (1, k, k >= 0); + SCM_ASSERT_RANGE (1, k, SCM_INUM (k) >= 0); return scm_c_make_vector (SCM_INUM (k), fill); } else if (SCM_BIGP (k)) |