~starkingdoms/starkingdoms

ref: 314f853748aebff9fd637ad97fb0d46d0e19f25e starkingdoms/kabel/src/macros.rs -rw-r--r-- 4.0 KiB
314f8537 — ghostly_zsh move kabel_test over 1 year, 4 months ago 
                                                                                
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
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149

#[macro_export]
macro_rules! token {
    ($self:expr, $token:expr) => {
        crate::lexer::Token {
            token_type: $token,
            start_column: $self.start,
            end_column: $self.line_current,
            line: $self.line,
        }
    };
}

#[macro_export]
macro_rules! token_display {
    ( $match_to:expr, $f:expr, $( $name:tt),*) => {
        match $match_to {
            $( $name => { $f.write_str(stringify!($name))?; } ),*
            _ => ()
        }
    }
}

#[macro_export]
macro_rules! lit {
    ($type:ident, $data:expr, $token:expr) => {
        $crate::parser::AST {
            ast_type: $crate::parser::ASTType::Lit($crate::parser::Lit::$type($data)),
            start_line: $token.line,
            end_line: $token.line,
            start_column: $token.start_column,
            end_column: $token.end_column,
        }
    };
}

#[macro_export]
macro_rules! ast_from_token {
    ($ast_type:expr, $start:expr, $end:expr) => {
        AST {
            ast_type: $ast_type,
            start_line: $start.line,
            end_line: $end.line,
            start_column: $start.start_column,
            end_column: $end.end_column,
        }
    };
}
#[macro_export]
macro_rules! ast_from_token_ast {
    ($ast_type:expr, $start:expr, $end:expr) => {
        AST {
            ast_type: $ast_type,
            start_line: $start.line,
            end_line: $end.end_line,
            start_column: $start.start_column,
            end_column: $end.end_column,
        }
    };
}
#[macro_export]
macro_rules! ast_from_ast {
    ($ast_type:expr, $start:expr, $end:expr) => {
        AST {
            ast_type: $ast_type,
            start_line: $start.start_line,
            end_line: $end.end_line,
            start_column: $start.start_column,
            end_column: $end.end_column,
        }
    };
}
#[macro_export]
macro_rules! ast_from_ast_token {
    ($ast_type:expr, $start:expr, $end:expr) => {
        AST {
            ast_type: $ast_type,
            start_line: $start.start_line,
            end_line: $end.line,
            start_column: $start.start_column,
            end_column: $end.end_column,
        }
    };
}

#[macro_export]
macro_rules! name {
    ($name:expr, $token:expr) => {
        Name {
            name: $name,
            start_column: $token.start_column,
            end_column: $token.end_column,
            line: $token.line,
        }
    };
}

#[macro_export]
macro_rules! push_output {
    ( $match_to:expr, $output:expr, $( $name:tt),*) => {
        match $match_to {
            $( $name => { $output += stringify!($name); } ),*
        }
    }
}

#[macro_export]
macro_rules! unexpected_token {
    ($self:expr, $message:expr, $token:expr) => {
        $crate::error::KabelError::new(
            $crate::error::ErrorKind::UnexpectedToken,
            format!($message, $self.text[$token.line][$token.start_column..$token.end_column].to_string()),
            $token.line,
            $token.start_column,
            $self.text[$token.line].to_string(),
        )
    };
}

#[macro_export]
macro_rules! out_of_scope {
    ($self:expr, $message:expr, $name:expr, $expr:expr) => {
        $crate::error::KabelError::new(
            $crate::error::ErrorKind::OutOfScope,
            format!($message, $name),
            $expr.start_line,
            $expr.start_column,
            $crate::collect_lines!($self.text[$expr.start_line..$expr.end_line+1]),
        )
    };
}
#[macro_export]
macro_rules! out_of_scope_var {
    ($self:expr, $message:expr, $name:expr, $expr:expr) => {
        $crate::error::KabelError::new(
            $crate::error::ErrorKind::OutOfScope,
            format!($message, $name.name),
            $expr.start_line,
            $name.start_column,
            $crate::collect_lines!($self.text[$expr.start_line..$expr.end_line+1]),
        )
    };
}

#[macro_export]
macro_rules! collect_lines {
    ($string:expr) => {
        $string.iter().fold("".to_string(), |acc, string| acc + string + "\n").trim_end().to_string()
    };
}