From 3e21c67505edf6441d7561b2d52359468861b549 Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Thu, 27 Jul 2017 23:46:04 +0200
Subject: Cleanup

---
 sil.icl | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

(limited to 'sil.icl')

diff --git a/sil.icl b/sil.icl
index 0483084..01eca9e 100644
--- a/sil.icl
+++ b/sil.icl
@@ -91,7 +91,7 @@ Start w
 	= finish 1 io err w
 # prog = 'SC'.compile prog
 | isError prog
-	# err = err <<< fromError prog <<< "\r\n"
+	# err = err <<< fromError prog
 	= finish 1 io err w
 # f = f <<< fromOk prog
 # (_,w) = fclose f w
@@ -136,10 +136,3 @@ where
 	sleep i w = code inline {
 		ccall sleep "I:I:A"
 	}
-
-instance <<< (MaybeError e a) | <<< e & <<< a
-where
-	<<< f (Ok a) = f <<< a
-	<<< f (Error e) = f <<< e
-
-instance <<< Error where <<< f e = f <<< toString e
-- 
cgit v1.2.3