From cd3917e80e5cb50b350699bc2ae011ca3d5bda91 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Tue, 30 Jun 2015 22:34:11 -0400
Subject: [PATCH] Return value from (exit)

---
 cyclone.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cyclone.scm b/cyclone.scm
index 7eb2748c..1439fb59 100644
--- a/cyclone.scm
+++ b/cyclone.scm
@@ -220,7 +220,7 @@
       (if (not *do-code-gen*)
         (begin
           (trace:error "DEBUG, existing program")
-          (exit)))
+          (exit 0)))
     
       (trace:info "---------------- C code:")
       (mta:code-gen input-program