attoparsec-parsec 0.1.1 → 0.1.2

raw patch · 2 files changed

+5/−1 lines, 2 files

Files

• attoparsec-parsec.cabal +1/−1
• src/Data/Attoparsec/Text/Parsec.hs +4/−0

@@ -1,5 +1,5 @@ name:             attoparsec-parsec-version:          0.1.1+version:          0.1.2 license:          MIT license-file:     LICENSE copyright:        (c) 2011, 2012 Simon Hengel

@@ -69,6 +69,7 @@ , satisfy -- , satisfyWith -- , skip+, peekChar  -- ** Special character parsers , digit@@ -171,6 +172,9 @@ -- >    where isDigit c = c >= '0' && c <= '9' satisfy :: (Char -> Bool) -> Parser Char satisfy = Parsec.satisfy++peekChar :: Parser (Maybe Char)+peekChar = Just <$> try (Parsec.lookAhead anyChar) <|> return Nothing  -- | Parse a single digit, as recognised by 'isDigit'. digit :: Parser Char