nu met gratis de library waar de borige commit over ging
[cc1516.git] / yard.dcl
1 definition module yard
2
3 from Data.Either import :: Either
4 from StdClass import class Eq
5 from Data.Functor import class Functor
6 from Control.Monad import class Monad
7 from Control.Applicative import class Applicative, class Alternative
8
9 :: Parser a b = Parser ([a] -> (Either Error b, [a]))
10 :: Error = ParseException
11
12 runParser :: (Parser a b) [a] -> (Either Error b, [a])
13
14 instance Functor (Parser a)
15 instance Applicative (Parser a)
16 instance Monad (Parser a)
17 instance Alternative (Parser a)
18
19 fail :: Parser a b
20 top :: Parser a a
21 satisfy :: (a -> Bool) -> Parser a a
22 item :: a -> Parser a a | Eq a
23 list :: [a] -> Parser a [a] | Eq a