From 7647aa7dfa17eaf77b7b0eea5099648f1b687737 Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Tue, 25 Jul 2017 12:56:22 +0200
Subject: Don't continue when clm failed

---
 sil.icl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/sil.icl b/sil.icl
index 789db86..29636e2 100644
--- a/sil.icl
+++ b/sil.icl
@@ -101,6 +101,8 @@ Start w
 | isError p
 	# err = err <<< snd (fromError p) <<< "\r\n"
 	= finish 1 io err w
+| fromOk p <> 0
+	= finish (fromOk p) io err w
 | not args.run
 	= finish 0 io err w
 # (p,w) = callProcess "./sil_compiled" [] Nothing w
-- 
cgit v1.2.3