mrkkrp/megaparsec
1
1
Fork 0
mirror of https://github.com/mrkkrp/megaparsec.git synced 2025-01-05 15:17:53 +03:00
Code Issues Projects Releases Wiki Activity

a minor correction in doc-string of ‘setErrorMessage’

Browse Source
This commit is contained in:
mrkkrp 2015-08-08 15:53:40 +06:00
parent ebc1fae39c
commit fcf1b972e8
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Text/Megaparsec/Error.hs
View File

@ -139,8 +139,8 @@ addErrorMessage m (ParseError pos ms) = ParseError pos (pre ++ [m] ++ post)
post = filter (> m) ms
-- | @setErrorMessage m err@ returns @err@ with message @m@ added. This
-- function also deletes all already existing error messages that were
-- created with the same constructor of @m@.
-- function also deletes all existing error messages that were created with
-- the same constructor as @m@.
setErrorMessage :: Message -> ParseError -> ParseError
setErrorMessage m (ParseError pos ms) = ParseError pos (m:xs)