valkyrie-parser 0.2.5

The hand write parser of valkyrie language
Documentation 
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

use super::*;

impl ThisParser for CallNode<ClosureCallNode> {
    #[track_caller]
    fn parse(_: ParseState) -> ParseResult<Self> {
        unreachable!()
    }

    fn lispify(&self) -> Lisp {
        Lisp::keyword("call/lambda") + self.base.lispify() + self.rest.lispify()
    }
}

impl ThisParser for ClosureCallNode {
    fn parse(input: ParseState) -> ParseResult<Self> {
        LambdaNode::parse(input).map_inner(|s| s.as_lambda_call())
    }

    fn lispify(&self) -> Lisp {
        let mut lisp = Lisp::new(self.caller.len() + 2);
        for term in &self.caller {
            lisp += term.lispify();
        }
        lisp
    }
}

impl ThisParser for CallNode<LambdaDotNode> {
    #[track_caller]
    fn parse(_: ParseState) -> ParseResult<Self> {
        unreachable!()
    }

    fn lispify(&self) -> Lisp {
        Lisp::keyword("call/lambda-dot") + self.base.lispify() + self.rest.lispify()
    }
}

impl ThisParser for LambdaDotNode {
    fn parse(input: ParseState) -> ParseResult<Self> {
        let (state, _) = input.match_str(".")?;
        state.skip(ignore).match_fn(LambdaNode::parse).map_inner(|s| s.as_lambda_dot())
    }

    fn lispify(&self) -> Lisp {
        let mut lisp = Lisp::new(self.body.len() + 2);
        for term in &self.body {
            lisp += term.lispify();
        }
        lisp
    }
}