Fix non-exhaustive lambda

Author: ozataman

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

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 >>=