summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordefanor <defanor@uberspace.net>2017-12-24 04:06:06 +0300
committerdefanor <defanor@uberspace.net>2017-12-24 04:06:06 +0300
commit1d68da2eb258a1f426184989832208c75cac1f50 (patch)
treea7a82ed34c71d5132f8899ada757138b6503878b
parentb2435e1e37b9def481761a00c704d280ef2deb96 (diff)
downloadcoalpit-1d68da2eb258a1f426184989832208c75cac1f50.zip
coalpit-1d68da2eb258a1f426184989832208c75cac1f50.tar.gz
coalpit-1d68da2eb258a1f426184989832208c75cac1f50.tar.bz2
Update the example
-rw-r--r--Coalpit.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Coalpit.hs b/Coalpit.hs
index 6eb7f06..78be85e 100644
--- a/Coalpit.hs
+++ b/Coalpit.hs
@@ -33,8 +33,8 @@ main = do
Right x -> do
print (x :: Foo)
print $ 'toArgs' 'defOpt' x
- putStr $ 'showDSV' 'defOpt' [x]
- print ('readDSV' 'defOpt' $ 'showDSV' 'defOpt' [x] :: [Either String Foo])
+ putStrLn $ showDSV defOpt x
+ print ('readDSV' 'defOpt' $ 'showDSV' 'defOpt' x :: Either String Foo)
@
Then, in a shell: