From e7489043d8bf2a406a910adcb93280e83d6d2faa Mon Sep 17 00:00:00 2001
From: defanor <defanor@uberspace.net>
Date: Wed, 20 Dec 2017 00:22:25 +0300
Subject: 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).
---
 Coalpit.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Coalpit.hs')

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
-- 
cgit v1.2.3