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
|
/*
*/
#include <hir/expr.hpp>
::HIR::ExprNode::~ExprNode()
{
}
#define DEF_VISIT(nt, n, code) void ::HIR::nt::visit(ExprVisitor& nv) { nv.visit_node(*this); nv.visit(*this); } void ::HIR::ExprVisitorDef::visit(::HIR::nt& n) { code }
void ::HIR::ExprVisitor::visit_node_ptr(::std::unique_ptr< ::HIR::ExprNode>& node_ptr) {
assert(node_ptr);
node_ptr->visit(*this);
}
void ::HIR::ExprVisitor::visit_node(::HIR::ExprNode& node) {
}
DEF_VISIT(ExprNode_Block, node,
for(auto& subnode : node.m_nodes) {
visit_node_ptr(subnode);
}
)
DEF_VISIT(ExprNode_Return, node,
visit_node_ptr(node.m_value);
)
DEF_VISIT(ExprNode_Let, node,
if( node.m_value ) {
visit_node_ptr(node.m_value);
}
)
DEF_VISIT(ExprNode_Loop, node,
visit_node_ptr(node.m_code);
)
DEF_VISIT(ExprNode_LoopControl, , )
DEF_VISIT(ExprNode_Match, node,
visit_node_ptr(node.m_value);
for(auto& arm : node.m_arms)
{
if( arm.m_cond )
visit_node_ptr(arm.m_cond);
visit_node_ptr(arm.m_code);
}
)
DEF_VISIT(ExprNode_If, node,
visit_node_ptr(node.m_cond);
visit_node_ptr(node.m_true);
if( node.m_false )
visit_node_ptr(node.m_false);
)
DEF_VISIT(ExprNode_Assign, node,
visit_node_ptr(node.m_slot);
visit_node_ptr(node.m_value);
)
DEF_VISIT(ExprNode_BinOp, node,
visit_node_ptr(node.m_left);
visit_node_ptr(node.m_right);
)
DEF_VISIT(ExprNode_UniOp, node,
visit_node_ptr(node.m_value);
)
DEF_VISIT(ExprNode_Cast, node,
visit_node_ptr(node.m_value);
)
DEF_VISIT(ExprNode_Unsize, node,
visit_node_ptr(node.m_value);
)
DEF_VISIT(ExprNode_Index, node,
visit_node_ptr(node.m_value);
visit_node_ptr(node.m_index);
)
DEF_VISIT(ExprNode_Deref, node,
visit_node_ptr(node.m_value);
)
DEF_VISIT(ExprNode_TupleVariant, node,
for(auto& arg : node.m_args)
visit_node_ptr(arg);
)
DEF_VISIT(ExprNode_CallPath, node,
for(auto& arg : node.m_args)
visit_node_ptr(arg);
)
DEF_VISIT(ExprNode_CallValue, node,
visit_node_ptr(node.m_value);
for(auto& arg : node.m_args)
visit_node_ptr(arg);
)
DEF_VISIT(ExprNode_CallMethod, node,
visit_node_ptr(node.m_value);
for(auto& arg : node.m_args)
visit_node_ptr(arg);
)
DEF_VISIT(ExprNode_Field, node,
visit_node_ptr(node.m_value);
)
DEF_VISIT(ExprNode_Literal, , )
DEF_VISIT(ExprNode_PathValue, , )
DEF_VISIT(ExprNode_Variable, , )
DEF_VISIT(ExprNode_StructLiteral, node,
if( node.m_base_value )
visit_node_ptr(node.m_base_value);
for(auto& val : node.m_values)
visit_node_ptr(val.second);
)
DEF_VISIT(ExprNode_Tuple, node,
for(auto& val : node.m_vals)
visit_node_ptr(val);
)
DEF_VISIT(ExprNode_ArrayList, node,
for(auto& val : node.m_vals)
visit_node_ptr(val);
)
DEF_VISIT(ExprNode_ArraySized, node,
visit_node_ptr(node.m_val);
visit_node_ptr(node.m_size);
)
DEF_VISIT(ExprNode_Closure, node,
visit_node_ptr(node.m_code);
)
#undef DEF_VISIT
|
