diff options
-rw-r--r-- | libguile/hashtab.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/hashtab.c b/libguile/hashtab.c index 6141e4fd2..c4f2b5eb0 100644 --- a/libguile/hashtab.c +++ b/libguile/hashtab.c @@ -274,7 +274,7 @@ make_hash_table (int flags, unsigned long k, const char *func_name) SCM vector; scm_t_hashtable *t; int i = 0, n = k ? k : 31; - while (i < HASHTABLE_SIZE_N && n > hashtable_size[i]) + while (i + 1 < HASHTABLE_SIZE_N && n > hashtable_size[i]) ++i; n = hashtable_size[i]; |