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
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
| | /*
* Copyright (C) 2024 olang maintainers
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <https://www.gnu.org/licenses/>.
*/
#ifndef AST_H
#define AST_H
#include <stdint.h>
#include "arena.h"
#include "list.h"
#include "scope.h"
#include "string_view.h"
typedef struct ast_node ast_node_t;
typedef enum
{
AST_NODE_PROGRAM,
AST_NODE_BLOCK,
AST_NODE_FN_DEF,
AST_NODE_VAR_DEF,
AST_NODE_BINARY_OP,
AST_NODE_RETURN_STMT,
AST_NODE_IF_STMT,
AST_NODE_LITERAL,
AST_NODE_REF,
AST_NODE_UNKNOWN
} ast_node_kind_t;
typedef enum
{
TYPE_U32
} type_t;
typedef struct ast_block
{
list_t *nodes;
} ast_block_t;
typedef struct ast_program
{
ast_node_t *fn;
} ast_program_t;
typedef struct ast_fn_definition
{
string_view_t identifier;
type_t return_type;
ast_node_t *block;
} ast_fn_definition_t;
typedef struct ast_var_definition
{
string_view_t identifier;
type_t type;
ast_node_t *value;
scope_t *scope;
} ast_var_definition_t;
typedef enum
{
AST_LITERAL_U32
} ast_literal_kind_t;
typedef struct ast_literal
{
ast_literal_kind_t kind;
union
{
uint32_t as_u32;
};
} ast_literal_t;
typedef struct ast_ref
{
string_view_t identifier;
scope_t *scope;
} ast_ref_t;
typedef enum ast_binary_op_kind
{
AST_BINOP_ADDITION,
AST_BINOP_SUBTRACTION,
AST_BINOP_MULTIPLICATION,
AST_BINOP_DIVISION,
AST_BINOP_REMINDER,
AST_BINOP_BITWISE_LSHIFT,
AST_BINOP_BITWISE_RSHIFT,
AST_BINOP_BITWISE_XOR,
AST_BINOP_BITWISE_AND,
AST_BINOP_BITWISE_OR,
AST_BINOP_CMP_LT,
AST_BINOP_CMP_GT,
AST_BINOP_CMP_LEQ,
AST_BINOP_CMP_GEQ,
AST_BINOP_CMP_EQ,
AST_BINOP_CMP_NEQ,
AST_BINOP_LOGICAL_AND,
AST_BINOP_LOGICAL_OR,
} ast_binary_op_kind_t;
typedef struct ast_binary_op
{
ast_binary_op_kind_t kind;
ast_node_t *lhs;
ast_node_t *rhs;
} ast_binary_op_t;
typedef struct ast_return_stmt
{
// FIXME: rename to a meaningful name like expr
ast_node_t *data;
} ast_return_stmt_t;
typedef struct ast_if_stmt
{
ast_node_t *cond;
ast_node_t *then;
ast_node_t *_else;
} ast_if_stmt_t;
typedef struct ast_node
{
ast_node_kind_t kind;
union
{
ast_program_t as_program;
ast_fn_definition_t as_fn_def;
ast_var_definition_t as_var_def;
ast_binary_op_t as_bin_op;
ast_literal_t as_literal;
ast_ref_t as_ref;
ast_block_t as_block;
ast_return_stmt_t as_return_stmt;
ast_if_stmt_t as_if_stmt;
};
} ast_node_t;
ast_node_t *
ast_new_program(arena_t *arena, ast_node_t *fn_def);
ast_node_t *
ast_new_node_fn_def(arena_t *arena, string_view_t identifier, type_t return_type, ast_node_t *block);
ast_node_t *
ast_new_node_var_def(arena_t *arena, string_view_t identifier, type_t type, ast_node_t *value);
ast_node_t *
ast_new_node_bin_op(arena_t *arena, ast_binary_op_kind_t kind, ast_node_t *lhs, ast_node_t *rhs);
ast_node_t *
ast_new_node_literal_u32(arena_t *arena, uint32_t value);
ast_node_t *
ast_new_node_ref(arena_t *arena, string_view_t identifier);
ast_node_t *
ast_new_node_return_stmt(arena_t *arena);
ast_node_t *
ast_new_node_if_stmt(arena_t *arena, ast_node_t *cond, ast_node_t *then, ast_node_t *_else);
ast_node_t *
ast_new_node_block(arena_t *arena);
#endif /* AST_H */
|