aboutsummaryrefslogtreecommitdiff
path: root/sil.icl
diff options
context:
space:
mode:
Diffstat (limited to 'sil.icl')
-rw-r--r--sil.icl9
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