From: michaelt <what_is_it_to_do_anything@yahoo.com>
Date: Sun, 7 Feb 2016 04:10:05 +0000 (-0500)
Subject: repair remarks
X-Git-Url: https://git.immae.eu/?a=commitdiff_plain;h=5cfcd4996cbc258ba67b20d700d349190e20cb6d;p=github%2Ffretlink%2Ftext-pipes.git

repair remarks
---

diff --git a/Pipes/Prelude/Text.hs b/Pipes/Prelude/Text.hs
index 29ade4d..814da0a 100644
--- a/Pipes/Prelude/Text.hs
+++ b/Pipes/Prelude/Text.hs
@@ -54,12 +54,13 @@ TWO
 THREE
 
    The point of view is very much that of @Pipes.Prelude@. It would still be the same even if
-   we did something more sophisticated, like run an ordinary attoparsec 'Text' parser on 
-   each separate line with @Pipes.Prelude.map ()* , as is frequently reasonable. Here we admit
-   three values from standard input that pass the standard attoparsec @scientific@ number parser,
+   we did something more sophisticated, like run an ordinary attoparsec 'Text' parser on, 
+   as is frequently reasonable. Here we run 
+   the simple attoparsec @scientific@ number parser on lines of standard input, 
    dropping bad parses with @P.concat@:
 
->>> P.toListM $ stdinLn >->  P.map (A.parseOnly A.scientific) >-> P.concat >-> P.take 3
+>>> import qualified Data.Attoparsec.Text as A
+>>> P.toListM $ Text.stdinLn >->  P.map (A.parseOnly A.scientific) >-> P.concat >-> P.take 3
 1<Enter>
 2<Enter>
 bad<Enter>