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
|
internal v4
CreateVNodeColor(syntax_node *Node)
{
switch(Node->Type)
{
case(TokenIdentifier):
return Color_Yellow;
case(TokenIdentifierAssignmentValue):
return Color_Cyan;
case(TokenValue):
return Color_White;
case(TokenString):
return Color_Green;
case(TokenNumber):
return Color_Magenta;
case(TokenDoubleEqual):
return Color_Orange;
case(TokenGreaterEqual):
return Color_Orange;
case(TokenLesserEqual):
return Color_Orange;
case(TokenParam):
return Color_Blue;
case(TokenFunc):
return Color_Cyan;
case(TokenReturn):
return Color_Green;
case(TokenIf):
return Color_Magenta;
case(TokenElse):
return Color_Magenta;
case(TokenFor):
return Color_Magenta;
case(TokenWhile):
return Color_Magenta;
case(TokenBreak):
return Color_Orange;
case(TokenContinue):
return Color_Orange;
case(TokenExpression):
return Color_White;
case(TokenFuncBody):
return Color_BackgroundSecond;
case(TokenUnwantedChild):
return Color_Gray;
case(TokenNewLine):
return Color_Background;
case(TokenRightShift):
return Color_Orange;
case(TokenLeftShift):
return Color_Orange;
case(TokenUndefined):
default:
return Color_Red;
}
}
internal v_node *
CreateVNode(arena *Arena, syntax_node *Node)
{
v_node *VNode = PushStructZero(Arena, v_node);
VNode->Color = CreateVNodeColor(Node);
VNode->Size = {10.f};
VNode->Pos = {0};
// VNode->Label = Node->Token->Lexeme;
VNode->Label = {NULL, 0};
VNode->Parent = &nil_v_node;
VNode->NextVNode = &nil_v_node;
VNode->First = &nil_v_node;
VNode->Last = &nil_v_node;
return VNode;
}
internal void
BuildDebugTreeRecursive(debug_tree *DebugTree, v_node *ParentVNode, syntax_node *Node, arena *Arena)
{
for(syntax_node *Sibling = Node; Sibling && Sibling != &nil_syntax_node; Sibling = Sibling->Next)
{
v_node *VNode = CreateVNode(Arena, Sibling);
VNode->Parent = ParentVNode;
if(ParentVNode->First == &nil_v_node)
{
ParentVNode->First = VNode;
ParentVNode->Last = VNode;
}
else
{
ParentVNode->Last->NextVNode = VNode;
ParentVNode->Last = VNode;
}
if(Sibling->First && Sibling->First != &nil_syntax_node)
{
BuildDebugTreeRecursive(DebugTree, VNode, Sibling->First, Arena);
}
}
}
internal debug_tree *
BuildDebugTree(concrete_syntax_tree *Tree, arena *Arena)
{
debug_tree *DebugTree = PushStructZero(Arena, debug_tree);
if(!Tree->Root || Tree->Root == &nil_syntax_node)
return DebugTree;
v_node *RootVNode = CreateVNode(Arena, Tree->Root);
RootVNode->Parent = &nil_v_node;
DebugTree->Root = RootVNode;
BuildDebugTreeRecursive(DebugTree, RootVNode, Tree->Root->First, Arena);
return DebugTree;
}
internal void
DrawVNode(app_offscreen_buffer *Buffer, v_node *VNode, f32 *X, f32 *Y, f32 NodeSize)
{
if(!VNode || VNode == &nil_v_node)
return;
for(v_node *Child = VNode->First; Child && Child != &nil_v_node; Child = Child->NextVNode)
{
rect Dest = RectFromSize(V2(*X, *Y), V2(NodeSize, NodeSize));
DrawRect(Dest, VNode->Color, 8.f, 0.f, 1.f);
*X += NodeSize + 5.f;
}
*Y += NodeSize + 5.f;
for(v_node *Child = VNode->First; Child && Child != &nil_v_node; Child = Child->NextVNode)
{
DrawVNode(Buffer, Child, X, Y, NodeSize);
}
}
internal void
DebugTree(app_offscreen_buffer *Buffer, debug_tree *DT)
{
f32 Y = 50.f;
f32 X = 50.f;
f32 NodeSize = 40.f;
DrawVNode(Buffer, DT->Root, &X, &Y, NodeSize);
}
|
