Update pfail to empty

This commit is contained in:
Sibi Prabakaran 2021-12-29 23:20:30 +05:30
parent f47ed83462
commit 66fb59e934
No known key found for this signature in database
GPG Key ID: D19E3E0EBB557613

View File

@ -139,7 +139,7 @@ runParser (Parser p) = fmap fst . listToMaybe . ReadP.readP_to_S p
-- | Always fails -- | Always fails
pfail :: Parser a pfail :: Parser a
pfail = Parser $ ReadP.pfail pfail = empty
-- | Consume and return the next character. Fails if there is no input -- | Consume and return the next character. Fails if there is no input
-- left. -- left.