1 files changed, 1 insertions, 1 deletions
diff --git a/lib.c b/lib.c
index 951d540e..07f733a7 100644
--- a/lib.c
+++ b/lib.c
@@ -6718,7 +6718,7 @@ val dupl(val fun)
 
 val vector(val length, val initval)
 {
-  int i;
+  unsigned i;
   ucnum len = c_unum(length);
   ucnum alloc_plus = len + 2;
   ucnum size = if3(alloc_plus > len, alloc_plus, -1);