list-vec: replace int type.

* lib.c (list_vec): use ucnum rather than int
for the index and length variables.

1 files changed, 2 insertions, 2 deletions

diff --git a/lib.c b/lib.c
index a1eb5881..7875c7d2 100644
--- a/lib.c
+++ b/lib.c
@@ -9682,11 +9682,11 @@ val list_vec(val vec)
 {
   val self = lit("list-vec");
   list_collect_decl (list, ptail);
-  int i, len;
+  ucnum i, len;
 
   type_check(self, vec, VEC);
 
-  len = c_num(vec->v.vec[vec_length], self);
+  len = c_unum(vec->v.vec[vec_length], self);
 
   for (i = 0; i < len; i++)
     ptail = list_collect(ptail, vec->v.vec[i]);