Cleanup

1 files changed, 1 insertions, 8 deletions

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