frg 2.0.2

Compiled programming language with frogs!
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 crate::ast;

use super::{FunctionLiteral, Statement, TreeCursor, expressions, parse_block};

pub fn parse(cursor: &mut TreeCursor, code: &str) -> FunctionLiteral {
    cursor.goto_first_child();
    let params = parameter_names(cursor, code);

    cursor.goto_next_sibling();
    // cursor.goto_first_child();
    let body = parse_block(cursor, code);

    cursor.goto_parent();

    // cursor.goto_parent();
    FunctionLiteral { params, body }
}

pub fn transpile(lit: &FunctionLiteral) -> String {
    let params = expressions::transpile_list(&lit.params);

    let mut body = ast::transpile(&lit.body);
    if let Some(Statement::Expression(_)) = lit.body.last() {
        // remove ";"
        body.pop();
    }
    format!("|{params}| {{\n{body}\n}}")
}

fn parameter_names(cursor: &mut TreeCursor, code: &str) -> Vec<String> {
    cursor.goto_first_child();
    // skip "("
    cursor.goto_next_sibling();

    let mut names = vec![];
    loop {
        match cursor.node().kind() {
            ")" => break,
            "," => (),
            "identifier" => names.push(code[cursor.node().byte_range()].to_string()),
            _ => panic!("unexpected token in param list"),
        }

        if !cursor.goto_next_sibling() {
            break;
        }
    }

    cursor.goto_parent();

    names
}