diff options
author | defanor <defanor@uberspace.net> | 2017-12-24 04:06:06 +0300 |
---|---|---|
committer | defanor <defanor@uberspace.net> | 2017-12-24 04:06:06 +0300 |
commit | 1d68da2eb258a1f426184989832208c75cac1f50 (patch) | |
tree | a7a82ed34c71d5132f8899ada757138b6503878b /Coalpit.hs | |
parent | b2435e1e37b9def481761a00c704d280ef2deb96 (diff) |
Update the example
Diffstat (limited to 'Coalpit.hs')
-rw-r--r-- | Coalpit.hs | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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: |