1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
#[macro_use]
use corollary_support::*;
use parser::parser_monad::P;
pub mod builtin;
pub mod lexer;
pub mod parser_monad;
pub mod parser;
pub mod tokens;
use parser::parser_monad::execParser;
use parser::builtin::*;
use data::name::*;
use parser::parser_monad::ParseError;
use data::position::Position;
use data::input_stream::InputStream;
pub fn execParser_<a: 'static>(parser: P<a>, input: InputStream, pos: Position) -> Either<ParseError, a> {
match execParser(parser, input, pos, builtinTypeNames(), newNameSupply()) {
Left(s) => Left(s),
Right((v, _)) => Right(v)
}
}