1 files changed, 1 insertions, 1 deletions
diff --git a/src/eval.c b/src/eval.c
index 407b164..cc3da50 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -53,7 +53,7 @@ gamma_safe_exec(SCM (*handler) (void *data), void *data, SCM *result)
 	struct scheme_exec_data ed;
 	
 	if (setjmp(jmp_env))
-		return 1;
+		exit(70); /* EX_SOFTWARE */
 	ed.handler = handler;
 	ed.data = data;
 	scm_internal_lazy_catch(SCM_BOOL_T,