Commits

Bryan O'Sullivan committed 14961a4 Merge

Merge with kolmodin

Comments (0)

Files changed (2)

Data/Attoparsec/Internal.hs

 (<?>) :: Parser a
       -> String                 -- ^ the name to use if parsing fails
       -> Parser a
-p <?> _msg = p
+p <?> msg = Parser $ \s kf ks -> runParser p s (\s' strs m -> kf s' (msg:strs) m) ks
 {-# INLINE (<?>) #-}
 infix 0 <?>
 
 name:            attoparsec
-version:         0.8.2.0
+version:         0.8.2.1
 license:         BSD3
 license-file:    LICENSE
 category:        Text, Parsing