From c62505b930cbed4b5c3392cf9bd58ba12af33468 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Fri, 15 Nov 2013 19:29:54 +0900
Subject: [PATCH] initialize newly allocated vector with falses

---
 src/vector.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/vector.c b/src/vector.c
index 6bc729db..9e695647 100644
--- a/src/vector.c
+++ b/src/vector.c
@@ -5,10 +5,14 @@ struct pic_vector *
 pic_vec_new(pic_state *pic, size_t len)
 {
   struct pic_vector *vec;
+  int i;
 
   vec = (struct pic_vector *)pic_obj_alloc(pic, sizeof(struct pic_vector), PIC_TT_VECTOR);
   vec->len = len;
   vec->data = (pic_value *)pic_alloc(pic, sizeof(pic_value) * len);
+  for (i = 0; i < len; ++i) {
+    vec->data[i] = pic_false_value();
+  }
   return vec;
 }