cassava 0.2.1.0 → 0.2.1.1

raw patch · 2 files changed

+8/−6 lines, 2 files

Files

• Data/Csv/Incremental.hs +7/−5
• cassava.cabal +1/−1

@@ -216,7 +216,7 @@           deriving (Eq, Show)  -- | Efficiently deserialize CSV in an incremental fashion. Equivalent--- to @'decodeByNameWith' 'defaultDecodeOptions'@.+-- to @'decodeWith' 'defaultDecodeOptions'@. decode :: FromRecord a        => Bool          -- ^ Data contains header that should be                         -- skipped@@ -285,11 +285,13 @@     go m acc (A.Done rest r)         | B.null rest = case m of             Complete   -> Done (reverse acc')-            Incomplete -> Partial cont+            Incomplete+                | null acc' -> Partial (cont acc')+                | otherwise -> Some (reverse acc') (cont [])         | otherwise   = go m acc' (parser rest)-      where cont s-                | B.null s  = Done (reverse acc')-                | otherwise = go Incomplete acc' (parser s)+      where cont acc'' s+                | B.null s  = Done (reverse acc'')+                | otherwise = go Incomplete acc'' (parser s)             acc' | blankLine r = acc                  | otherwise   = convert r : acc 

@@ -1,5 +1,5 @@ Name:                cassava-Version:             0.2.1.0+Version:             0.2.1.1 Synopsis:            A CSV parsing and encoding library Description:   A CSV parsing and encoding library optimized for ease of use and high