summaryrefslogtreecommitdiff
path: root/libguile/srfi-4.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/srfi-4.c')
-rw-r--r--libguile/srfi-4.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/srfi-4.c b/libguile/srfi-4.c
index 28e5e7120..be3982aa0 100644
--- a/libguile/srfi-4.c
+++ b/libguile/srfi-4.c
@@ -326,7 +326,8 @@ uvec_fast_set_x (int type, void *base, size_t c_idx, SCM val)
static SCM_C_INLINE SCM
make_uvec (int type, SCM len, SCM fill)
{
- size_t c_len = scm_to_unsigned_integer (len, 0, SIZE_MAX / uvec_sizes[type]);
+ size_t c_len = scm_to_unsigned_integer (len, 0,
+ SCM_I_SIZE_MAX / uvec_sizes[type]);
SCM uvec = alloc_uvec (type, c_len);
if (!SCM_UNBNDP (fill))
{