summaryrefslogtreecommitdiff
path: root/Coalpit.hs
diff options
context:
space:
mode:
authordefanor <defanor@uberspace.net>2017-12-20 00:22:25 +0300
committerdefanor <defanor@uberspace.net>2017-12-20 00:22:25 +0300
commite7489043d8bf2a406a910adcb93280e83d6d2faa (patch)
treeb080cab07394cc02ffd3ebbcd815813e5dc2de69 /Coalpit.hs
parent62aa7bb8ba54c2a0f480e122c46d967f2102dac5 (diff)
Prepare for IO
DSV functions operate on individual lines now, unit type gets printed/parsed as nothing (handier for argument parsing to set '()' when there's none, and that's what it should be anyway).
Diffstat (limited to 'Coalpit.hs')
-rw-r--r--Coalpit.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Coalpit.hs b/Coalpit.hs
index 27df1bb..6eb7f06 100644
--- a/Coalpit.hs
+++ b/Coalpit.hs
@@ -43,12 +43,12 @@ Then, in a shell:
> Foo {bar = Nothing, baz = "a string"}
> ["a string"]
> "a string"
-> [Right (Foo {bar = Nothing, baz = "a string"})]
+> Right (Foo {bar = Nothing, baz = "a string"})
> $ ./Example --bar 42 'a string'
> Foo {bar = Just 42, baz = "a string"}
> ["--bar","42","a string"]
> --bar 42 "a string"
-> [Right (Foo {bar = Just 42, baz = "a string"})]
+> Right (Foo {bar = Just 42, baz = "a string"})
> $ ./Example --bar foo
> arguments:1:3:
> Failed to read: foo