mrkkrp/megaparsec
1
1
Fork 0
mirror of https://github.com/mrkkrp/megaparsec.git synced 2024-11-23 19:38:05 +03:00
Code Issues Projects Releases Wiki Activity

Drop a redundant superclass of ‘MonadParsec’

Browse Source
This commit is contained in:
mrkkrp 2018-04-22 00:28:20 +07:00
parent b81b6f4385
commit 31b3fabd2a
No known key found for this signature in database
GPG Key ID: 8564658B2889FF7C
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Text/Megaparsec/Class.hs
View File

@ -25,7 +25,6 @@ module Text.Megaparsec.Class
( MonadParsec (..) )
where
import Control.Applicative
import Control.Monad
import Control.Monad.Identity
import Control.Monad.Trans
@ -52,8 +51,7 @@ import Control.Monad.Trans.Identity
-- taken advantage of as much as possible if your aim is a fast parser:
-- 'tokens', 'takeWhileP', 'takeWhile1P', and 'takeP'.
class (Stream s, Alternative m, MonadPlus m)
=> MonadParsec e s m | m -> e s where
class (Stream s, MonadPlus m) => MonadParsec e s m | m -> e s where
-- | The most general way to stop parsing and report a trivial
-- 'ParseError'.