HaXml-1.13.3: Utilities for manipulating XML documents

Text.ParserCombinators.HuttonMeijerWallace

Contents

Description

This library of monadic parser combinators is based on the ones defined by Graham Hutton and Erik Meijer. It has been extended by Malcolm Wallace to use an abstract token type (no longer just a string) as input, and to incorporate a State Transformer monad, useful for symbol tables, macros, and so on. Basic facilities for error reporting have also been added, and later extended by Graham Klyne to return the errors through an Either type, rather than just calling error.

Synopsis

The parser monad

newtype Parser s t e a Source

Constructors

P (s -> [Either e t] -> ParseResult s t e a)

The parser type is parametrised on the types of the state s, the input tokens t, error-type e, and the result value a. The state and remaining input are threaded through the monad.

Instances

Monad (Parser s t e) 
Functor (Parser s t e) 
MonadPlus (Parser s t e) 

Primitive parser combinators

item :: Parser s t e tSource

Deliver the first remaining token.

eof :: Show p => Parser s (p, t) String ()Source

Fail if end of input is not reached

papply :: Parser s t String a -> s -> [Either String t] -> [(a, s, [Either String t])]Source

Apply the parser to some real input, given an initial state value. If the parser fails, raise error to halt the program. (This is the original exported behaviour - to allow the caller to deal with the error differently, see papply'.)

papply' :: Parser s t e a -> s -> [Either e t] -> Either e [(a, s, [Either e t])]Source

Apply the parser to some real input, given an initial state value. If the parser fails, return a diagnostic message to the caller.

Derived combinators

(+++) :: Parser s t e a -> Parser s t e a -> Parser s t e aSource

A choice between parsers. Keep only the first success.

tok :: Eq t => t -> Parser s (p, t) e tSource

Deliver the first token if it equals the argument.

nottok :: Eq t => [t] -> Parser s (p, t) e tSource

Deliver the first token if it does not equal the argument.

many :: Parser s t e a -> Parser s t e [a]Source

Deliver zero or more values of a.

many1 :: Parser s t e a -> Parser s t e [a]Source

Deliver one or more values of a.

sepby :: Parser s t e a -> Parser s t e b -> Parser s t e [a]Source

Deliver zero or more values of a separated by b's.

sepby1 :: Parser s t e a -> Parser s t e b -> Parser s t e [a]Source

Deliver one or more values of a separated by b's.

chainl :: Parser s t e a -> Parser s t e (a -> a -> a) -> a -> Parser s t e aSource

chainl1 :: Parser s t e a -> Parser s t e (a -> a -> a) -> Parser s t e aSource

chainr :: Parser s t e a -> Parser s t e (a -> a -> a) -> a -> Parser s t e aSource

chainr1 :: Parser s t e a -> Parser s t e (a -> a -> a) -> Parser s t e aSource

ops :: [(Parser s t e a, b)] -> Parser s t e bSource

bracket :: (Show p, Show t) => Parser s (p, t) e a -> Parser s (p, t) e b -> Parser s (p, t) e c -> Parser s (p, t) e bSource

toEOF :: Show p => Parser s (p, t) String a -> Parser s (p, t) String aSource

Accept a complete parse of the input only, no partial parses.

Error handling

elserror :: (Show p, Show t) => Parser s (p, t) String a -> String -> Parser s (p, t) String aSource

If the parser fails, generate an error message.

State handling

stupd :: (s -> s) -> Parser s t e ()Source

Update the internal state.

stquery :: (s -> a) -> Parser s t e aSource

Query the internal state.

stget :: Parser s t e sSource

Deliver the entire internal state.

Re-parsing

reparse :: [Either e t] -> Parser s t e ()Source

This is useful for recursively expanding macros. When the user-parser recognises a macro use, it can lookup the macro expansion from the parse state, lex it, and then stuff the lexed expansion back down into the parser.