From 98034b5038693e1ab7855fc9802359f71829f752 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Wed, 26 Aug 2015 17:50:28 +0900
Subject: [PATCH] suppress warnings

---
 extlib/benz/string.c | 3 ++-
 src/main.c           | 4 +++-
 2 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/extlib/benz/string.c b/extlib/benz/string.c
index ac1b2449..5d862977 100644
--- a/extlib/benz/string.c
+++ b/extlib/benz/string.c
@@ -641,7 +641,7 @@ pic_str_list_to_string(pic_state *pic)
 {
   pic_str *str;
   pic_value list, e, it;
-  size_t i = 0;
+  size_t i;
   char *buf;
 
   pic_get_args(pic, "o", &list);
@@ -653,6 +653,7 @@ pic_str_list_to_string(pic_state *pic)
   buf = pic_malloc(pic, pic_length(pic, list));
 
   pic_try {
+    i = 0;
     pic_for_each (e, list, it) {
       pic_assert_type(pic, e, char);
 
diff --git a/src/main.c b/src/main.c
index a20c52fe..6eb5498f 100644
--- a/src/main.c
+++ b/src/main.c
@@ -39,7 +39,7 @@ main(int argc, char *argv[], char **envp)
 {
   pic_state *pic;
   struct pic_lib *PICRIN_MAIN;
-  int status = 0;
+  int status;
 
   pic = pic_open(pic_default_allocf, NULL);
   pic_set_argv(pic, argc, argv, envp);
@@ -50,6 +50,8 @@ main(int argc, char *argv[], char **envp)
     PICRIN_MAIN = pic_find_library(pic, pic_read_cstr(pic, "(picrin main)"));
 
     pic_funcall(pic, PICRIN_MAIN, "main", pic_nil_value());
+
+    status = 0;
   }
   pic_catch {
     pic_print_backtrace(pic, xstderr);