vyre-libs 0.6.3

vyre Category A library ecosystem - pure-IR compositions over vyre-ops hardware primitives
Documentation
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
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
use super::*;

pub(super) fn extend(
    out: &mut Vec<Node>,
    vast_nodes: &str,
    _out_typed_vast_nodes: &str,
    num_nodes: Expr,
    t: Expr,
    base: Expr,
) {
    out.extend(vec![
        Node::let_bind(
            "prev_sibling_first_child_typedef_flags",
            Expr::select(
                Expr::var("prev_sibling_first_child_valid"),
                Expr::load(
                    vast_nodes,
                    Expr::add(
                        Expr::var("prev_sibling_first_child_base"),
                        Expr::u32(VAST_TYPEDEF_FLAGS_FIELD),
                    ),
                ),
                Expr::u32(0),
            ),
        ),
        Node::let_bind(
            "prev_sibling_first_child_symbol_hash",
            Expr::select(
                Expr::var("prev_sibling_first_child_valid"),
                Expr::load(
                    vast_nodes,
                    Expr::add(
                        Expr::var("prev_sibling_first_child_base"),
                        Expr::u32(VAST_TYPEDEF_SYMBOL_FIELD),
                    ),
                ),
                Expr::u32(0),
            ),
        ),
        Node::let_bind(
            "cur_parent_valid",
            Expr::lt(Expr::var("cur_parent"), num_nodes.clone()),
        ),
        Node::let_bind(
            "safe_cur_parent_idx",
            Expr::select(
                Expr::var("cur_parent_valid"),
                Expr::var("cur_parent"),
                t.clone(),
            ),
        ),
        Node::let_bind(
            "cur_parent_base",
            Expr::mul(
                Expr::var("safe_cur_parent_idx"),
                Expr::u32(VAST_NODE_STRIDE_U32),
            ),
        ),
        Node::let_bind(
            "cur_parent_kind",
            Expr::select(
                Expr::var("cur_parent_valid"),
                Expr::load(vast_nodes, Expr::var("cur_parent_base")),
                Expr::u32(0),
            ),
        ),
        Node::let_bind(
            "cur_parent_parent",
            Expr::select(
                Expr::var("cur_parent_valid"),
                Expr::load(
                    vast_nodes,
                    Expr::add(Expr::var("cur_parent_base"), Expr::u32(1)),
                ),
                Expr::u32(SENTINEL),
            ),
        ),
        Node::let_bind(
            "cur_parent_parent_valid",
            Expr::lt(Expr::var("cur_parent_parent"), num_nodes.clone()),
        ),
        Node::let_bind(
            "cur_parent_parent_base",
            Expr::mul(
                Expr::select(
                    Expr::var("cur_parent_parent_valid"),
                    Expr::var("cur_parent_parent"),
                    t.clone(),
                ),
                Expr::u32(VAST_NODE_STRIDE_U32),
            ),
        ),
        Node::let_bind(
            "cur_parent_parent_kind",
            Expr::select(
                Expr::var("cur_parent_parent_valid"),
                Expr::load(vast_nodes, Expr::var("cur_parent_parent_base")),
                Expr::u32(0),
            ),
        ),
        Node::let_bind(
            "cur_parent_parent_symbol_hash",
            Expr::select(
                Expr::var("cur_parent_parent_valid"),
                Expr::load(
                    vast_nodes,
                    Expr::add(
                        Expr::var("cur_parent_parent_base"),
                        Expr::u32(VAST_TYPEDEF_SYMBOL_FIELD),
                    ),
                ),
                Expr::u32(0),
            ),
        ),
        Node::let_bind(
            "cur_parent_parent_parent",
            Expr::select(
                Expr::var("cur_parent_parent_valid"),
                Expr::load(
                    vast_nodes,
                    Expr::add(Expr::var("cur_parent_parent_base"), Expr::u32(1)),
                ),
                Expr::u32(SENTINEL),
            ),
        ),
        Node::let_bind(
            "cur_parent_prev_sibling_idx",
            Expr::select(
                Expr::var("cur_parent_valid"),
                Expr::load(
                    vast_nodes,
                    Expr::add(
                        Expr::var("cur_parent_base"),
                        Expr::u32(VAST_PREVIOUS_SIBLING_FIELD),
                    ),
                ),
                Expr::u32(SENTINEL),
            ),
        ),
        Node::let_bind(
            "cur_parent_prev_sibling_valid",
            Expr::lt(Expr::var("cur_parent_prev_sibling_idx"), num_nodes.clone()),
        ),
        Node::let_bind(
            "cur_parent_prev_sibling_base",
            Expr::mul(
                Expr::select(
                    Expr::var("cur_parent_prev_sibling_valid"),
                    Expr::var("cur_parent_prev_sibling_idx"),
                    t.clone(),
                ),
                Expr::u32(VAST_NODE_STRIDE_U32),
            ),
        ),
        Node::let_bind(
            "cur_parent_prev_sibling_kind",
            Expr::select(
                Expr::var("cur_parent_prev_sibling_valid"),
                Expr::load(vast_nodes, Expr::var("cur_parent_prev_sibling_base")),
                Expr::u32(SENTINEL),
            ),
        ),
        Node::let_bind(
            "cur_parent_prev_prev_sibling_idx",
            Expr::select(
                Expr::var("cur_parent_prev_sibling_valid"),
                Expr::load(
                    vast_nodes,
                    Expr::add(
                        Expr::var("cur_parent_prev_sibling_base"),
                        Expr::u32(VAST_PREVIOUS_SIBLING_FIELD),
                    ),
                ),
                Expr::u32(SENTINEL),
            ),
        ),
        Node::let_bind(
            "cur_parent_prev_prev_sibling_valid",
            Expr::lt(
                Expr::var("cur_parent_prev_prev_sibling_idx"),
                num_nodes.clone(),
            ),
        ),
        Node::let_bind(
            "cur_parent_prev_prev_sibling_kind",
            Expr::select(
                Expr::var("cur_parent_prev_prev_sibling_valid"),
                Expr::load(
                    vast_nodes,
                    Expr::mul(
                        Expr::var("cur_parent_prev_prev_sibling_idx"),
                        Expr::u32(VAST_NODE_STRIDE_U32),
                    ),
                ),
                Expr::u32(SENTINEL),
            ),
        ),
        Node::let_bind(
            "cur_parent_parent_safe_idx",
            Expr::select(
                Expr::var("cur_parent_parent_valid"),
                Expr::var("cur_parent_parent"),
                t.clone(),
            ),
        ),
        Node::let_bind(
            "cur_grandparent_prev_sibling_idx",
            Expr::select(
                Expr::var("cur_parent_parent_valid"),
                Expr::load(
                    vast_nodes,
                    Expr::add(
                        Expr::var("cur_parent_parent_base"),
                        Expr::u32(VAST_PREVIOUS_SIBLING_FIELD),
                    ),
                ),
                Expr::u32(SENTINEL),
            ),
        ),
        Node::let_bind(
            "cur_grandparent_prev_sibling_valid",
            Expr::lt(
                Expr::var("cur_grandparent_prev_sibling_idx"),
                num_nodes.clone(),
            ),
        ),
        Node::let_bind(
            "cur_grandparent_prev_sibling_kind",
            Expr::select(
                Expr::var("cur_grandparent_prev_sibling_valid"),
                Expr::load(
                    vast_nodes,
                    Expr::mul(
                        Expr::var("cur_grandparent_prev_sibling_idx"),
                        Expr::u32(VAST_NODE_STRIDE_U32),
                    ),
                ),
                Expr::u32(SENTINEL),
            ),
        ),
        Node::let_bind(
            "cur_parent_parent_prev_adjacent_valid",
            Expr::and(
                Expr::var("cur_parent_parent_valid"),
                Expr::gt(Expr::var("cur_parent_parent"), Expr::u32(0)),
            ),
        ),
        Node::let_bind(
            "cur_parent_parent_prev_adjacent_base",
            Expr::mul(
                Expr::select(
                    Expr::var("cur_parent_parent_prev_adjacent_valid"),
                    Expr::sub(Expr::var("cur_parent_parent"), Expr::u32(1)),
                    t.clone(),
                ),
                Expr::u32(VAST_NODE_STRIDE_U32),
            ),
        ),
        Node::let_bind(
            "cur_parent_parent_prev_adjacent_kind",
            Expr::select(
                Expr::var("cur_parent_parent_prev_adjacent_valid"),
                Expr::load(
                    vast_nodes,
                    Expr::var("cur_parent_parent_prev_adjacent_base"),
                ),
                Expr::u32(SENTINEL),
            ),
        ),
        Node::let_bind("colon_count_before", Expr::u32(0)),
        Node::let_bind(
            "colon_count_needed",
            Expr::and(
                any_token_eq(
                    Expr::var("raw_kind"),
                    &[TOK_STRING, TOK_LPAREN, TOK_IDENTIFIER],
                ),
                Expr::and(
                    Expr::eq(Expr::var("cur_parent_kind"), Expr::u32(TOK_LPAREN)),
                    Expr::or(
                        Expr::eq(
                            Expr::var("cur_parent_prev_sibling_kind"),
                            Expr::u32(TOK_GNU_ASM),
                        ),
                        Expr::or(
                            Expr::and(
                                any_token_eq(
                                    Expr::var("cur_parent_prev_sibling_kind"),
                                    &[TOK_VOLATILE, TOK_GOTO],
                                ),
                                Expr::eq(
                                    Expr::var("cur_parent_prev_prev_sibling_kind"),
                                    Expr::u32(TOK_GNU_ASM),
                                ),
                            ),
                            Expr::and(
                                Expr::eq(
                                    Expr::var("cur_parent_prev_sibling_kind"),
                                    Expr::u32(TOK_GOTO),
                                ),
                                Expr::eq(
                                    Expr::var("cur_parent_prev_prev_sibling_kind"),
                                    Expr::u32(TOK_VOLATILE),
                                ),
                            ),
                        ),
                    ),
                ),
            ),
        ),
        Node::let_bind(
            "colon_count_cursor",
            Expr::load(
                vast_nodes,
                Expr::add(base.clone(), Expr::u32(VAST_PREVIOUS_SIBLING_FIELD)),
            ),
        ),
        Node::if_then(
            Expr::var("colon_count_needed"),
            vec![Node::loop_for(
                "colon_count_scan",
                Expr::u32(0),
                t.clone(),
                vec![
                    Node::let_bind(
                        "colon_count_cursor_valid",
                        Expr::lt(Expr::var("colon_count_cursor"), num_nodes.clone()),
                    ),
                    Node::let_bind(
                        "colon_count_safe_cursor",
                        Expr::select(
                            Expr::var("colon_count_cursor_valid"),
                            Expr::var("colon_count_cursor"),
                            Expr::u32(0),
                        ),
                    ),
                    Node::let_bind(
                        "colon_count_scan_base",
                        Expr::mul(
                            Expr::var("colon_count_safe_cursor"),
                            Expr::u32(VAST_NODE_STRIDE_U32),
                        ),
                    ),
                    Node::let_bind(
                        "colon_count_scan_kind",
                        Expr::load(vast_nodes, Expr::var("colon_count_scan_base")),
                    ),
                    Node::if_then(
                        Expr::and(
                            Expr::var("colon_count_cursor_valid"),
                            Expr::eq(Expr::var("colon_count_scan_kind"), Expr::u32(TOK_COLON)),
                        ),
                        vec![Node::assign(
                            "colon_count_before",
                            Expr::add(Expr::var("colon_count_before"), Expr::u32(1)),
                        )],
                    ),
                    Node::assign(
                        "colon_count_cursor",
                        Expr::select(
                            Expr::var("colon_count_cursor_valid"),
                            Expr::load(
                                vast_nodes,
                                Expr::add(
                                    Expr::var("colon_count_scan_base"),
                                    Expr::u32(VAST_PREVIOUS_SIBLING_FIELD),
                                ),
                            ),
                            Expr::u32(SENTINEL),
                        ),
                    ),
                ],
            )],
        ),
        Node::let_bind(
            "cur_parent_next_idx",
            Expr::select(
                Expr::var("cur_parent_valid"),
                Expr::load(
                    vast_nodes,
                    Expr::add(Expr::var("cur_parent_base"), Expr::u32(3)),
                ),
                Expr::u32(SENTINEL),
            ),
        ),
        Node::let_bind(
            "cur_parent_next_valid",
            Expr::lt(Expr::var("cur_parent_next_idx"), num_nodes.clone()),
        ),
        Node::let_bind(
            "cur_parent_next_kind",
            Expr::select(
                Expr::var("cur_parent_next_valid"),
                Expr::load(
                    vast_nodes,
                    Expr::mul(
                        Expr::var("cur_parent_next_idx"),
                        Expr::u32(VAST_NODE_STRIDE_U32),
                    ),
                ),
                Expr::u32(0),
            ),
        ),
        Node::let_bind("parent_prev_kind", Expr::u32(SENTINEL)),
        Node::let_bind("parent_prev_prev_kind", Expr::u32(SENTINEL)),
        Node::let_bind("parent_has_decl_prefix", Expr::u32(0)),
        Node::let_bind(
            "parent_ctx_scan_limit",
            Expr::select(
                Expr::var("cur_parent_valid"),
                Expr::var("cur_parent"),
                Expr::u32(0),
            ),
        ),
    ]);
}