From a15ec868bafabdcf2737821160d3bbfe7eac2996 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Tue, 29 Jul 2014 15:44:22 +0900
Subject: [PATCH] -h option should return exit status 1

---
 piclib/picrin/repl.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/piclib/picrin/repl.scm b/piclib/picrin/repl.scm
index 76ee5028..0d3669c7 100644
--- a/piclib/picrin/repl.scm
+++ b/piclib/picrin/repl.scm
@@ -35,7 +35,7 @@
           (case (string->symbol (car args))
             ((-h --help)
              (print-help)
-             (exit 0))
+             (exit 1))
             ((-e)
              (cadr args))
             (else