src/yard.dcl

   1 definition module yard
   2
   3 from StdString import class toString
   4 from Data.Either import :: Either
   5 from StdClass import class Eq
   6 from Data.Functor import class Functor
   7 from Control.Monad import class Monad
   8 from Control.Applicative import class Applicative, class Alternative
   9 import Data.Void
  10
  11 :: Error = ParseError | LexError String | Unexpected String Int
  12 :: Parser a b = Parser ([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 instance toString Error
  20
  21 //(`until`) infix 1
  22
  23 runParser :: (Parser a b) [a] -> (Either Error b, [a])
  24 (<?>) :: (Parser a b) (String, Int) -> Parser a b
  25 fail :: Parser a b
  26 top :: Parser a a
  27 peek :: Parser a a
  28 satisfy :: (a -> Bool) -> Parser a a
  29 check :: (a -> Bool) -> Parser a a
  30 until :: (Parser a b) (Parser a c) -> Parser a [b]
  31 item :: a -> Parser a a | Eq a
  32 list :: [a] -> Parser a [a] | Eq a
  33 eof :: Parser a Void