Update pfail to empty

This commit is contained in:
Sibi Prabakaran
2021-12-29 23:20:30 +05:30
parent f47ed83462
commit 66fb59e934

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.