From acc3afc120dab2bbe703660951da4e047e64f279 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Thu, 20 Feb 2014 17:58:00 +0900
Subject: [PATCH] don't emit debug message into stderr

---
 src/codegen.c | 30 +++++++++++++++---------------
 1 file changed, 15 insertions(+), 15 deletions(-)

diff --git a/src/codegen.c b/src/codegen.c
index 1c30ffa7..d55996c4 100644
--- a/src/codegen.c
+++ b/src/codegen.c
@@ -1367,51 +1367,51 @@ compile(pic_state *pic, pic_value obj)
   int ai = pic_gc_arena_preserve(pic);
 
 #if DEBUG
-  fprintf(stderr, "ai = %d\n", pic_gc_arena_preserve(pic));
+  fprintf(stdout, "ai = %d\n", pic_gc_arena_preserve(pic));
 
-  fprintf(stderr, "# input expression\n");
+  fprintf(stdout, "# input expression\n");
   pic_debug(pic, obj);
-  fprintf(stderr, "\n");
+  fprintf(stdout, "\n");
 
-  fprintf(stderr, "ai = %d\n", pic_gc_arena_preserve(pic));
+  fprintf(stdout, "ai = %d\n", pic_gc_arena_preserve(pic));
 #endif
 
   /* macroexpand */
   obj = pic_macroexpand(pic, obj);
 #if DEBUG
-  fprintf(stderr, "## macroexpand completed\n");
+  fprintf(stdout, "## macroexpand completed\n");
   pic_debug(pic, obj);
-  fprintf(stderr, "\n");
-  fprintf(stderr, "ai = %d\n", pic_gc_arena_preserve(pic));
+  fprintf(stdout, "\n");
+  fprintf(stdout, "ai = %d\n", pic_gc_arena_preserve(pic));
 #endif
 
   /* analyze */
   obj = pic_analyze(pic, obj);
 #if DEBUG
-  fprintf(stderr, "## analyzer completed\n");
+  fprintf(stdout, "## analyzer completed\n");
   pic_debug(pic, obj);
-  fprintf(stderr, "\n");
-  fprintf(stderr, "ai = %d\n", pic_gc_arena_preserve(pic));
+  fprintf(stdout, "\n");
+  fprintf(stdout, "ai = %d\n", pic_gc_arena_preserve(pic));
 #endif
 
   /* resolution */
   obj = pic_resolve(pic, obj);
 #if DEBUG
-  fprintf(stderr, "## resolver completed\n");
+  fprintf(stdout, "## resolver completed\n");
   pic_debug(pic, obj);
-  fprintf(stderr, "\n");
-  fprintf(stderr, "ai = %d\n", pic_gc_arena_preserve(pic));
+  fprintf(stdout, "\n");
+  fprintf(stdout, "ai = %d\n", pic_gc_arena_preserve(pic));
 #endif
 
   /* codegen */
   irep = pic_codegen(pic, obj);
 #if DEBUG
-  fprintf(stderr, "## codegen completed\n");
+  fprintf(stdout, "## codegen completed\n");
   pic_dump_irep(pic, irep);
 #endif
 
 #if DEBUG
-  fprintf(stderr, "# compilation finished\n");
+  fprintf(stdout, "# compilation finished\n");
   puts("");
 #endif