Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Fix non-exhaustive lambda

  • Loading branch information...
commit e0df8fcee1ae21d468dd071a5a64ecf947cb2220 1 parent a7fdc05
@ozataman authored
Showing with 6 additions and 2 deletions.
  1. +1 −1  csv-enumerator.cabal
  2. +5 −1 src/Data/CSV/Enumerator.hs
View
2  csv-enumerator.cabal
@@ -1,5 +1,5 @@
Name: csv-enumerator
-Version: 0.10.1.1
+Version: 0.10.1.2
Synopsis: A flexible, fast, enumerator-based CSV parser library for Haskell.
Homepage: http://github.com/ozataman/csv-enumerator
License: BSD3
View
6 src/Data/CSV/Enumerator.hs
@@ -211,7 +211,11 @@ instance CSVeable MapRow where
loop (headers, a)
-- Fill headers if not yet filled
- procRow [] !acc' = rowParser csvs >>= (\(Just hs) -> loop (hs, acc'))
+ procRow [] !acc' = do
+ r <- rowParser csvs
+ case r of
+ Nothing -> loop ([], acc')
+ Just hs -> loop (hs, acc')
-- Process starting w/ the second row
procRow !headers !acc' = rowParser csvs >>=
Please sign in to comment.
Something went wrong with that request. Please try again.