packages feed

attoparsec-conduit 0.5.0.3 → 1.0.0

raw patch · 2 files changed

+7/−7 lines, 2 filesdep ~conduitPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: conduit

API changes (from Hackage documentation)

- Data.Conduit.Attoparsec: conduitParser :: (AttoparsecInput a, MonadThrow m) => Parser a b -> GLInfConduit a m (PositionRange, b)
+ Data.Conduit.Attoparsec: conduitParser :: (AttoparsecInput a, MonadThrow m) => Parser a b -> Conduit a m (PositionRange, b)
- Data.Conduit.Attoparsec: sinkParser :: (AttoparsecInput a, MonadThrow m) => Parser a b -> GLSink a m b
+ Data.Conduit.Attoparsec: sinkParser :: (AttoparsecInput a, MonadThrow m) => Parser a b -> Consumer a m b

Files

Data/Conduit/Attoparsec.hs view
@@ -34,7 +34,7 @@ import qualified Data.Attoparsec.ByteString import qualified Data.Attoparsec.Text import qualified Data.Attoparsec.Types as A-import           Data.Conduit hiding (Pipe, Sink, Conduit, Source)+import           Data.Conduit  -- | The context and message from a 'A.Fail' value. data ParseError = ParseError@@ -113,19 +113,19 @@ -- If parsing fails, a 'ParseError' will be thrown with 'monadThrow'. -- -- Since 0.5.0-sinkParser :: (AttoparsecInput a, MonadThrow m) => A.Parser a b -> GLSink a m b+sinkParser :: (AttoparsecInput a, MonadThrow m) => A.Parser a b -> Consumer a m b sinkParser = fmap snd . sinkParserPos (Position 1 1)  -- | Consume a stream of parsed tokens, returning both the token and the -- position it appears at. -- -- Since 0.5.0-conduitParser :: (AttoparsecInput a, MonadThrow m) => A.Parser a b -> GLInfConduit a m (PositionRange, b)+conduitParser :: (AttoparsecInput a, MonadThrow m) => A.Parser a b -> Conduit a m (PositionRange, b) conduitParser parser =     conduit $ Position 1 0   where     conduit pos =-        awaitE >>= either return go+        await >>= maybe (return ()) go       where         go x = do             leftover x@@ -133,7 +133,7 @@             yield (PositionRange pos pos', res)             conduit pos' -sinkParserPos :: (AttoparsecInput a, MonadThrow m) => Position -> A.Parser a b -> GLSink a m (Position, b)+sinkParserPos :: (AttoparsecInput a, MonadThrow m) => Position -> A.Parser a b -> Consumer a m (Position, b) sinkParserPos pos0 =     sink empty pos0 . parseA   where
attoparsec-conduit.cabal view
@@ -1,5 +1,5 @@ Name:                attoparsec-conduit-Version:             0.5.0.3+Version:             1.0.0 Synopsis:            Consume attoparsec parsers via conduit. Description:         Consume attoparsec parsers via conduit. License:             BSD3@@ -19,7 +19,7 @@                      , bytestring               >= 0.9                      , attoparsec               >= 0.10                      , text                     >= 0.11-                     , conduit                  >= 0.5          && < 0.6+                     , conduit                  >= 1.0          && < 1.1   ghc-options:     -Wall  test-suite test