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
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
#[macro_export]
macro_rules! allow {
($parser:ident, $p:pat => $eval:expr) => {
match $parser.lexer.token {
$p => {
$parser.lexer.consume();
$eval;
},
_ => {}
}
}
}
#[macro_export]
macro_rules! expect {
($parser:ident, $p:pat) => {
match $parser.lexer.token {
$p => $parser.lexer.consume(),
_ => $parser.error()
}
}
}
#[macro_export]
macro_rules! parameter_key {
($parser:ident) => {
match $parser.lexer.token {
ParenClose => {
$parser.lexer.consume();
break;
},
Identifier => {
let ident = $parser.lexer.token_as_str();
$parser.lexer.consume();
ParameterKey::Identifier(ident)
},
_ => return $parser.error()
}
}
}
#[cfg(test)]
#[macro_export]
macro_rules! assert_expr {
($src:expr, $expr:expr) => ({
let mut body = parse($src).unwrap().body().iter();
match body.next().map(|s| s.item).unwrap() {
Statement::Expression(ref expression) => assert_eq!(expression.item, Expression::from($expr)),
_ => panic!("Statement isn't an expression!")
}
assert_eq!(body.next(), None);
})
}