from Data.Functor import class Functor
from Control.Monad import class Monad
from Control.Applicative import class Applicative, class Alternative
+import Data.Void
:: Error = ParseError | LexError String | Unexpected String Int
:: Parser a b = Parser ([a] -> (Either Error b, [a]))
check :: (a -> Bool) -> Parser a a
item :: a -> Parser a a | Eq a
list :: [a] -> Parser a [a] | Eq a
+eof :: Parser a Void