Don't continue when clm failed

1 files changed, 2 insertions, 0 deletions

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