attoparsec-conduit 0.5.0.1 → 0.5.0.2

raw patch · 2 files changed

+4/−4 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• Data/Conduit/Attoparsec.hs +3/−3
• attoparsec-conduit.cabal +1/−1

@@ -154,18 +154,18 @@                 y = take' (length' c - length' lo) c                 pos'' = addLinesCols y pos'             unless (isNull lo) $ leftover lo-            return (pos'', x)+            pos'' `seq` return (pos'', x)         go end c (A.Fail rest contexts msg) =             let x = take' (length' c - length' rest) c                 pos'                     | end       = pos                     | otherwise = addLinesCols prev pos                 pos'' = addLinesCols x pos'-             in lift $ monadThrow $ ParseError contexts msg pos''+             in pos'' `seq` lift (monadThrow $ ParseError contexts msg pos'')         go end c (A.Partial parser')             | end       = lift $ monadThrow DivergentParser             | otherwise =-                sink c pos' parser'+                pos' `seq` sink c pos' parser'               where                 pos' = addLinesCols prev pos 

@@ -1,5 +1,5 @@ Name:                attoparsec-conduit-Version:             0.5.0.1+Version:             0.5.0.2 Synopsis:            Consume attoparsec parsers via conduit. Description:         Consume attoparsec parsers via conduit. License:             BSD3