1use super::error::CodeGenError;
8use std::collections::HashMap;
9use std::fmt::Write as _;
10use std::sync::LazyLock;
11
12pub struct RuntimeDecl {
14 pub decl: &'static str,
16 pub category: Option<&'static str>,
18}
19
20pub static RUNTIME_DECLARATIONS: LazyLock<Vec<RuntimeDecl>> = LazyLock::new(|| {
23 vec![
24 RuntimeDecl {
26 decl: "declare ptr @patch_seq_push_int(ptr, i64)",
27 category: Some("; Runtime function declarations"),
28 },
29 RuntimeDecl {
30 decl: "declare ptr @patch_seq_push_string(ptr, ptr)",
31 category: None,
32 },
33 RuntimeDecl {
34 decl: "declare ptr @patch_seq_push_symbol(ptr, ptr)",
35 category: None,
36 },
37 RuntimeDecl {
38 decl: "declare ptr @patch_seq_push_interned_symbol(ptr, ptr)",
39 category: None,
40 },
41 RuntimeDecl {
43 decl: "declare ptr @patch_seq_write(ptr)",
44 category: None,
45 },
46 RuntimeDecl {
47 decl: "declare ptr @patch_seq_write_line(ptr)",
48 category: None,
49 },
50 RuntimeDecl {
51 decl: "declare ptr @patch_seq_read_line(ptr)",
52 category: None,
53 },
54 RuntimeDecl {
55 decl: "declare ptr @patch_seq_read_line_plus(ptr)",
56 category: None,
57 },
58 RuntimeDecl {
59 decl: "declare ptr @patch_seq_read_n(ptr)",
60 category: None,
61 },
62 RuntimeDecl {
64 decl: "declare ptr @patch_seq_int_to_string(ptr)",
65 category: None,
66 },
67 RuntimeDecl {
68 decl: "declare ptr @patch_seq_symbol_to_string(ptr)",
69 category: None,
70 },
71 RuntimeDecl {
72 decl: "declare ptr @patch_seq_string_to_symbol(ptr)",
73 category: None,
74 },
75 RuntimeDecl {
77 decl: "declare ptr @patch_seq_add(ptr)",
78 category: None,
79 },
80 RuntimeDecl {
81 decl: "declare ptr @patch_seq_subtract(ptr)",
82 category: None,
83 },
84 RuntimeDecl {
85 decl: "declare ptr @patch_seq_multiply(ptr)",
86 category: None,
87 },
88 RuntimeDecl {
89 decl: "declare ptr @patch_seq_divide(ptr)",
90 category: None,
91 },
92 RuntimeDecl {
93 decl: "declare ptr @patch_seq_modulo(ptr)",
94 category: None,
95 },
96 RuntimeDecl {
98 decl: "declare ptr @patch_seq_eq(ptr)",
99 category: None,
100 },
101 RuntimeDecl {
102 decl: "declare ptr @patch_seq_lt(ptr)",
103 category: None,
104 },
105 RuntimeDecl {
106 decl: "declare ptr @patch_seq_gt(ptr)",
107 category: None,
108 },
109 RuntimeDecl {
110 decl: "declare ptr @patch_seq_lte(ptr)",
111 category: None,
112 },
113 RuntimeDecl {
114 decl: "declare ptr @patch_seq_gte(ptr)",
115 category: None,
116 },
117 RuntimeDecl {
118 decl: "declare ptr @patch_seq_neq(ptr)",
119 category: None,
120 },
121 RuntimeDecl {
123 decl: "declare ptr @patch_seq_and(ptr)",
124 category: Some("; Boolean operations"),
125 },
126 RuntimeDecl {
127 decl: "declare ptr @patch_seq_or(ptr)",
128 category: None,
129 },
130 RuntimeDecl {
131 decl: "declare ptr @patch_seq_not(ptr)",
132 category: None,
133 },
134 RuntimeDecl {
136 decl: "declare ptr @patch_seq_band(ptr)",
137 category: Some("; Bitwise operations"),
138 },
139 RuntimeDecl {
140 decl: "declare ptr @patch_seq_bor(ptr)",
141 category: None,
142 },
143 RuntimeDecl {
144 decl: "declare ptr @patch_seq_bxor(ptr)",
145 category: None,
146 },
147 RuntimeDecl {
148 decl: "declare ptr @patch_seq_bnot(ptr)",
149 category: None,
150 },
151 RuntimeDecl {
152 decl: "declare ptr @patch_seq_shl(ptr)",
153 category: None,
154 },
155 RuntimeDecl {
156 decl: "declare ptr @patch_seq_shr(ptr)",
157 category: None,
158 },
159 RuntimeDecl {
160 decl: "declare ptr @patch_seq_popcount(ptr)",
161 category: None,
162 },
163 RuntimeDecl {
164 decl: "declare ptr @patch_seq_clz(ptr)",
165 category: None,
166 },
167 RuntimeDecl {
168 decl: "declare ptr @patch_seq_ctz(ptr)",
169 category: None,
170 },
171 RuntimeDecl {
172 decl: "declare ptr @patch_seq_int_bits(ptr)",
173 category: None,
174 },
175 RuntimeDecl {
177 decl: "declare i64 @llvm.ctpop.i64(i64)",
178 category: None,
179 },
180 RuntimeDecl {
181 decl: "declare i64 @llvm.ctlz.i64(i64, i1)",
182 category: None,
183 },
184 RuntimeDecl {
185 decl: "declare i64 @llvm.cttz.i64(i64, i1)",
186 category: None,
187 },
188 RuntimeDecl {
189 decl: "declare void @llvm.memmove.p0.p0.i64(ptr, ptr, i64, i1)",
190 category: None,
191 },
192 RuntimeDecl {
193 decl: "declare void @llvm.trap() noreturn nounwind",
194 category: None,
195 },
196 RuntimeDecl {
198 decl: "declare ptr @patch_seq_dup(ptr)",
199 category: Some("; Stack operations"),
200 },
201 RuntimeDecl {
202 decl: "declare ptr @patch_seq_drop_op(ptr)",
203 category: None,
204 },
205 RuntimeDecl {
206 decl: "declare ptr @patch_seq_swap(ptr)",
207 category: None,
208 },
209 RuntimeDecl {
210 decl: "declare ptr @patch_seq_over(ptr)",
211 category: None,
212 },
213 RuntimeDecl {
214 decl: "declare ptr @patch_seq_rot(ptr)",
215 category: None,
216 },
217 RuntimeDecl {
218 decl: "declare ptr @patch_seq_nip(ptr)",
219 category: None,
220 },
221 RuntimeDecl {
222 decl: "declare void @patch_seq_clone_value(ptr, ptr)",
223 category: None,
224 },
225 RuntimeDecl {
226 decl: "declare ptr @patch_seq_tuck(ptr)",
227 category: None,
228 },
229 RuntimeDecl {
230 decl: "declare ptr @patch_seq_2dup(ptr)",
231 category: None,
232 },
233 RuntimeDecl {
234 decl: "declare ptr @patch_seq_3drop(ptr)",
235 category: None,
236 },
237 RuntimeDecl {
238 decl: "declare ptr @patch_seq_pick_op(ptr)",
239 category: None,
240 },
241 RuntimeDecl {
242 decl: "declare ptr @patch_seq_roll(ptr)",
243 category: None,
244 },
245 RuntimeDecl {
246 decl: "declare ptr @patch_seq_push_value(ptr, %Value)",
247 category: None,
248 },
249 RuntimeDecl {
251 decl: "declare ptr @patch_seq_push_quotation(ptr, i64, i64)",
252 category: Some("; Quotation operations"),
253 },
254 RuntimeDecl {
255 decl: "declare ptr @patch_seq_call(ptr)",
256 category: None,
257 },
258 RuntimeDecl {
259 decl: "declare i64 @patch_seq_peek_is_quotation(ptr)",
260 category: None,
261 },
262 RuntimeDecl {
263 decl: "declare i64 @patch_seq_peek_quotation_fn_ptr(ptr)",
264 category: None,
265 },
266 RuntimeDecl {
267 decl: "declare ptr @patch_seq_times(ptr)",
268 category: None,
269 },
270 RuntimeDecl {
271 decl: "declare ptr @patch_seq_while_loop(ptr)",
272 category: None,
273 },
274 RuntimeDecl {
275 decl: "declare ptr @patch_seq_until_loop(ptr)",
276 category: None,
277 },
278 RuntimeDecl {
279 decl: "declare ptr @patch_seq_spawn(ptr)",
280 category: None,
281 },
282 RuntimeDecl {
283 decl: "declare ptr @patch_seq_weave(ptr)",
284 category: None,
285 },
286 RuntimeDecl {
287 decl: "declare ptr @patch_seq_resume(ptr)",
288 category: None,
289 },
290 RuntimeDecl {
291 decl: "declare ptr @patch_seq_weave_cancel(ptr)",
292 category: None,
293 },
294 RuntimeDecl {
295 decl: "declare ptr @patch_seq_yield(ptr)",
296 category: None,
297 },
298 RuntimeDecl {
299 decl: "declare ptr @patch_seq_cond(ptr)",
300 category: None,
301 },
302 RuntimeDecl {
304 decl: "declare ptr @patch_seq_create_env(i32)",
305 category: Some("; Closure operations"),
306 },
307 RuntimeDecl {
308 decl: "declare void @patch_seq_env_set(ptr, i32, %Value)",
309 category: None,
310 },
311 RuntimeDecl {
312 decl: "declare %Value @patch_seq_env_get(ptr, i64, i32)",
313 category: None,
314 },
315 RuntimeDecl {
316 decl: "declare i64 @patch_seq_env_get_int(ptr, i64, i32)",
317 category: None,
318 },
319 RuntimeDecl {
320 decl: "declare i64 @patch_seq_env_get_bool(ptr, i64, i32)",
321 category: None,
322 },
323 RuntimeDecl {
324 decl: "declare double @patch_seq_env_get_float(ptr, i64, i32)",
325 category: None,
326 },
327 RuntimeDecl {
328 decl: "declare i64 @patch_seq_env_get_quotation(ptr, i64, i32)",
329 category: None,
330 },
331 RuntimeDecl {
332 decl: "declare ptr @patch_seq_env_get_string(ptr, i64, i32)",
333 category: None,
334 },
335 RuntimeDecl {
336 decl: "declare ptr @patch_seq_env_push_string(ptr, ptr, i64, i32)",
337 category: None,
338 },
339 RuntimeDecl {
340 decl: "declare %Value @patch_seq_make_closure(i64, ptr)",
341 category: None,
342 },
343 RuntimeDecl {
344 decl: "declare ptr @patch_seq_push_closure(ptr, i64, i32)",
345 category: None,
346 },
347 RuntimeDecl {
348 decl: "declare ptr @patch_seq_push_seqstring(ptr, ptr)",
349 category: None,
350 },
351 RuntimeDecl {
353 decl: "declare ptr @patch_seq_make_channel(ptr)",
354 category: Some("; Concurrency operations"),
355 },
356 RuntimeDecl {
357 decl: "declare ptr @patch_seq_chan_send(ptr)",
358 category: None,
359 },
360 RuntimeDecl {
361 decl: "declare ptr @patch_seq_chan_receive(ptr)",
362 category: None,
363 },
364 RuntimeDecl {
365 decl: "declare ptr @patch_seq_close_channel(ptr)",
366 category: None,
367 },
368 RuntimeDecl {
369 decl: "declare ptr @patch_seq_yield_strand(ptr)",
370 category: None,
371 },
372 RuntimeDecl {
373 decl: "declare void @patch_seq_maybe_yield()",
374 category: None,
375 },
376 RuntimeDecl {
378 decl: "declare void @patch_seq_scheduler_init()",
379 category: Some("; Scheduler operations"),
380 },
381 RuntimeDecl {
382 decl: "declare ptr @patch_seq_scheduler_run()",
383 category: None,
384 },
385 RuntimeDecl {
386 decl: "declare i64 @patch_seq_strand_spawn(ptr, ptr)",
387 category: None,
388 },
389 RuntimeDecl {
391 decl: "declare void @patch_seq_args_init(i32, ptr)",
392 category: Some("; Command-line argument operations"),
393 },
394 RuntimeDecl {
395 decl: "declare ptr @patch_seq_arg_count(ptr)",
396 category: None,
397 },
398 RuntimeDecl {
399 decl: "declare ptr @patch_seq_arg_at(ptr)",
400 category: None,
401 },
402 RuntimeDecl {
404 decl: "declare ptr @patch_seq_file_slurp(ptr)",
405 category: Some("; File operations"),
406 },
407 RuntimeDecl {
408 decl: "declare ptr @patch_seq_file_exists(ptr)",
409 category: None,
410 },
411 RuntimeDecl {
412 decl: "declare ptr @patch_seq_file_for_each_line_plus(ptr)",
413 category: None,
414 },
415 RuntimeDecl {
417 decl: "declare ptr @patch_seq_list_make(ptr)",
418 category: Some("; List operations"),
419 },
420 RuntimeDecl {
421 decl: "declare ptr @patch_seq_list_push(ptr)",
422 category: None,
423 },
424 RuntimeDecl {
425 decl: "declare ptr @patch_seq_list_get(ptr)",
426 category: None,
427 },
428 RuntimeDecl {
429 decl: "declare ptr @patch_seq_list_set(ptr)",
430 category: None,
431 },
432 RuntimeDecl {
433 decl: "declare ptr @patch_seq_list_map(ptr)",
434 category: None,
435 },
436 RuntimeDecl {
437 decl: "declare ptr @patch_seq_list_filter(ptr)",
438 category: None,
439 },
440 RuntimeDecl {
441 decl: "declare ptr @patch_seq_list_fold(ptr)",
442 category: None,
443 },
444 RuntimeDecl {
445 decl: "declare ptr @patch_seq_list_each(ptr)",
446 category: None,
447 },
448 RuntimeDecl {
449 decl: "declare ptr @patch_seq_list_length(ptr)",
450 category: None,
451 },
452 RuntimeDecl {
453 decl: "declare ptr @patch_seq_list_empty(ptr)",
454 category: None,
455 },
456 RuntimeDecl {
458 decl: "declare ptr @patch_seq_make_map(ptr)",
459 category: Some("; Map operations"),
460 },
461 RuntimeDecl {
462 decl: "declare ptr @patch_seq_map_get(ptr)",
463 category: None,
464 },
465 RuntimeDecl {
466 decl: "declare ptr @patch_seq_map_set(ptr)",
467 category: None,
468 },
469 RuntimeDecl {
470 decl: "declare ptr @patch_seq_map_has(ptr)",
471 category: None,
472 },
473 RuntimeDecl {
474 decl: "declare ptr @patch_seq_map_remove(ptr)",
475 category: None,
476 },
477 RuntimeDecl {
478 decl: "declare ptr @patch_seq_map_keys(ptr)",
479 category: None,
480 },
481 RuntimeDecl {
482 decl: "declare ptr @patch_seq_map_values(ptr)",
483 category: None,
484 },
485 RuntimeDecl {
486 decl: "declare ptr @patch_seq_map_size(ptr)",
487 category: None,
488 },
489 RuntimeDecl {
490 decl: "declare ptr @patch_seq_map_empty(ptr)",
491 category: None,
492 },
493 RuntimeDecl {
495 decl: "declare ptr @patch_seq_tcp_listen(ptr)",
496 category: Some("; TCP operations"),
497 },
498 RuntimeDecl {
499 decl: "declare ptr @patch_seq_tcp_accept(ptr)",
500 category: None,
501 },
502 RuntimeDecl {
503 decl: "declare ptr @patch_seq_tcp_read(ptr)",
504 category: None,
505 },
506 RuntimeDecl {
507 decl: "declare ptr @patch_seq_tcp_write(ptr)",
508 category: None,
509 },
510 RuntimeDecl {
511 decl: "declare ptr @patch_seq_tcp_close(ptr)",
512 category: None,
513 },
514 RuntimeDecl {
516 decl: "declare ptr @patch_seq_getenv(ptr)",
517 category: Some("; OS operations"),
518 },
519 RuntimeDecl {
520 decl: "declare ptr @patch_seq_home_dir(ptr)",
521 category: None,
522 },
523 RuntimeDecl {
524 decl: "declare ptr @patch_seq_current_dir(ptr)",
525 category: None,
526 },
527 RuntimeDecl {
528 decl: "declare ptr @patch_seq_path_exists(ptr)",
529 category: None,
530 },
531 RuntimeDecl {
532 decl: "declare ptr @patch_seq_path_is_file(ptr)",
533 category: None,
534 },
535 RuntimeDecl {
536 decl: "declare ptr @patch_seq_path_is_dir(ptr)",
537 category: None,
538 },
539 RuntimeDecl {
540 decl: "declare ptr @patch_seq_path_join(ptr)",
541 category: None,
542 },
543 RuntimeDecl {
544 decl: "declare ptr @patch_seq_path_parent(ptr)",
545 category: None,
546 },
547 RuntimeDecl {
548 decl: "declare ptr @patch_seq_path_filename(ptr)",
549 category: None,
550 },
551 RuntimeDecl {
552 decl: "declare ptr @patch_seq_exit(ptr)",
553 category: None,
554 },
555 RuntimeDecl {
556 decl: "declare ptr @patch_seq_os_name(ptr)",
557 category: None,
558 },
559 RuntimeDecl {
560 decl: "declare ptr @patch_seq_os_arch(ptr)",
561 category: None,
562 },
563 RuntimeDecl {
565 decl: "declare ptr @patch_seq_terminal_raw_mode(ptr)",
566 category: Some("; Terminal operations"),
567 },
568 RuntimeDecl {
569 decl: "declare ptr @patch_seq_terminal_read_char(ptr)",
570 category: None,
571 },
572 RuntimeDecl {
573 decl: "declare ptr @patch_seq_terminal_read_char_nonblock(ptr)",
574 category: None,
575 },
576 RuntimeDecl {
577 decl: "declare ptr @patch_seq_terminal_width(ptr)",
578 category: None,
579 },
580 RuntimeDecl {
581 decl: "declare ptr @patch_seq_terminal_height(ptr)",
582 category: None,
583 },
584 RuntimeDecl {
585 decl: "declare ptr @patch_seq_terminal_flush(ptr)",
586 category: None,
587 },
588 RuntimeDecl {
590 decl: "declare ptr @patch_seq_string_concat(ptr)",
591 category: Some("; String operations"),
592 },
593 RuntimeDecl {
594 decl: "declare ptr @patch_seq_string_length(ptr)",
595 category: None,
596 },
597 RuntimeDecl {
598 decl: "declare ptr @patch_seq_string_byte_length(ptr)",
599 category: None,
600 },
601 RuntimeDecl {
602 decl: "declare ptr @patch_seq_string_char_at(ptr)",
603 category: None,
604 },
605 RuntimeDecl {
606 decl: "declare ptr @patch_seq_string_substring(ptr)",
607 category: None,
608 },
609 RuntimeDecl {
610 decl: "declare ptr @patch_seq_char_to_string(ptr)",
611 category: None,
612 },
613 RuntimeDecl {
614 decl: "declare ptr @patch_seq_string_find(ptr)",
615 category: None,
616 },
617 RuntimeDecl {
618 decl: "declare ptr @patch_seq_string_split(ptr)",
619 category: None,
620 },
621 RuntimeDecl {
622 decl: "declare ptr @patch_seq_string_contains(ptr)",
623 category: None,
624 },
625 RuntimeDecl {
626 decl: "declare ptr @patch_seq_string_starts_with(ptr)",
627 category: None,
628 },
629 RuntimeDecl {
630 decl: "declare ptr @patch_seq_string_empty(ptr)",
631 category: None,
632 },
633 RuntimeDecl {
634 decl: "declare ptr @patch_seq_string_trim(ptr)",
635 category: None,
636 },
637 RuntimeDecl {
638 decl: "declare ptr @patch_seq_string_chomp(ptr)",
639 category: None,
640 },
641 RuntimeDecl {
642 decl: "declare ptr @patch_seq_string_to_upper(ptr)",
643 category: None,
644 },
645 RuntimeDecl {
646 decl: "declare ptr @patch_seq_string_to_lower(ptr)",
647 category: None,
648 },
649 RuntimeDecl {
650 decl: "declare ptr @patch_seq_string_equal(ptr)",
651 category: None,
652 },
653 RuntimeDecl {
654 decl: "declare ptr @patch_seq_json_escape(ptr)",
655 category: None,
656 },
657 RuntimeDecl {
658 decl: "declare ptr @patch_seq_string_to_int(ptr)",
659 category: None,
660 },
661 RuntimeDecl {
663 decl: "declare ptr @patch_seq_base64_encode(ptr)",
664 category: Some("; Encoding operations"),
665 },
666 RuntimeDecl {
667 decl: "declare ptr @patch_seq_base64_decode(ptr)",
668 category: None,
669 },
670 RuntimeDecl {
671 decl: "declare ptr @patch_seq_base64url_encode(ptr)",
672 category: None,
673 },
674 RuntimeDecl {
675 decl: "declare ptr @patch_seq_base64url_decode(ptr)",
676 category: None,
677 },
678 RuntimeDecl {
679 decl: "declare ptr @patch_seq_hex_encode(ptr)",
680 category: None,
681 },
682 RuntimeDecl {
683 decl: "declare ptr @patch_seq_hex_decode(ptr)",
684 category: None,
685 },
686 RuntimeDecl {
688 decl: "declare ptr @patch_seq_sha256(ptr)",
689 category: Some("; Crypto operations"),
690 },
691 RuntimeDecl {
692 decl: "declare ptr @patch_seq_hmac_sha256(ptr)",
693 category: None,
694 },
695 RuntimeDecl {
696 decl: "declare ptr @patch_seq_constant_time_eq(ptr)",
697 category: None,
698 },
699 RuntimeDecl {
700 decl: "declare ptr @patch_seq_random_bytes(ptr)",
701 category: None,
702 },
703 RuntimeDecl {
704 decl: "declare ptr @patch_seq_random_int(ptr)",
705 category: None,
706 },
707 RuntimeDecl {
708 decl: "declare ptr @patch_seq_uuid4(ptr)",
709 category: None,
710 },
711 RuntimeDecl {
712 decl: "declare ptr @patch_seq_crypto_aes_gcm_encrypt(ptr)",
713 category: None,
714 },
715 RuntimeDecl {
716 decl: "declare ptr @patch_seq_crypto_aes_gcm_decrypt(ptr)",
717 category: None,
718 },
719 RuntimeDecl {
720 decl: "declare ptr @patch_seq_crypto_pbkdf2_sha256(ptr)",
721 category: None,
722 },
723 RuntimeDecl {
724 decl: "declare ptr @patch_seq_crypto_ed25519_keypair(ptr)",
725 category: None,
726 },
727 RuntimeDecl {
728 decl: "declare ptr @patch_seq_crypto_ed25519_sign(ptr)",
729 category: None,
730 },
731 RuntimeDecl {
732 decl: "declare ptr @patch_seq_crypto_ed25519_verify(ptr)",
733 category: None,
734 },
735 RuntimeDecl {
737 decl: "declare ptr @patch_seq_http_get(ptr)",
738 category: Some("; HTTP client operations"),
739 },
740 RuntimeDecl {
741 decl: "declare ptr @patch_seq_http_post(ptr)",
742 category: None,
743 },
744 RuntimeDecl {
745 decl: "declare ptr @patch_seq_http_put(ptr)",
746 category: None,
747 },
748 RuntimeDecl {
749 decl: "declare ptr @patch_seq_http_delete(ptr)",
750 category: None,
751 },
752 RuntimeDecl {
754 decl: "declare ptr @patch_seq_symbol_equal(ptr)",
755 category: Some("; Symbol operations"),
756 },
757 RuntimeDecl {
759 decl: "declare ptr @patch_seq_variant_field_count(ptr)",
760 category: Some("; Variant operations"),
761 },
762 RuntimeDecl {
763 decl: "declare ptr @patch_seq_variant_tag(ptr)",
764 category: None,
765 },
766 RuntimeDecl {
767 decl: "declare ptr @patch_seq_variant_field_at(ptr)",
768 category: None,
769 },
770 RuntimeDecl {
771 decl: "declare ptr @patch_seq_variant_append(ptr)",
772 category: None,
773 },
774 RuntimeDecl {
775 decl: "declare ptr @patch_seq_variant_last(ptr)",
776 category: None,
777 },
778 RuntimeDecl {
779 decl: "declare ptr @patch_seq_variant_init(ptr)",
780 category: None,
781 },
782 RuntimeDecl {
783 decl: "declare ptr @patch_seq_make_variant_0(ptr)",
784 category: None,
785 },
786 RuntimeDecl {
787 decl: "declare ptr @patch_seq_make_variant_1(ptr)",
788 category: None,
789 },
790 RuntimeDecl {
791 decl: "declare ptr @patch_seq_make_variant_2(ptr)",
792 category: None,
793 },
794 RuntimeDecl {
795 decl: "declare ptr @patch_seq_make_variant_3(ptr)",
796 category: None,
797 },
798 RuntimeDecl {
799 decl: "declare ptr @patch_seq_make_variant_4(ptr)",
800 category: None,
801 },
802 RuntimeDecl {
803 decl: "declare ptr @patch_seq_unpack_variant(ptr, i64)",
804 category: None,
805 },
806 RuntimeDecl {
807 decl: "declare ptr @patch_seq_symbol_eq_cstr(ptr, ptr)",
808 category: None,
809 },
810 RuntimeDecl {
812 decl: "declare ptr @patch_seq_push_float(ptr, double)",
813 category: Some("; Float operations"),
814 },
815 RuntimeDecl {
816 decl: "declare ptr @patch_seq_f_add(ptr)",
817 category: None,
818 },
819 RuntimeDecl {
820 decl: "declare ptr @patch_seq_f_subtract(ptr)",
821 category: None,
822 },
823 RuntimeDecl {
824 decl: "declare ptr @patch_seq_f_multiply(ptr)",
825 category: None,
826 },
827 RuntimeDecl {
828 decl: "declare ptr @patch_seq_f_divide(ptr)",
829 category: None,
830 },
831 RuntimeDecl {
832 decl: "declare ptr @patch_seq_f_eq(ptr)",
833 category: None,
834 },
835 RuntimeDecl {
836 decl: "declare ptr @patch_seq_f_lt(ptr)",
837 category: None,
838 },
839 RuntimeDecl {
840 decl: "declare ptr @patch_seq_f_gt(ptr)",
841 category: None,
842 },
843 RuntimeDecl {
844 decl: "declare ptr @patch_seq_f_lte(ptr)",
845 category: None,
846 },
847 RuntimeDecl {
848 decl: "declare ptr @patch_seq_f_gte(ptr)",
849 category: None,
850 },
851 RuntimeDecl {
852 decl: "declare ptr @patch_seq_f_neq(ptr)",
853 category: None,
854 },
855 RuntimeDecl {
856 decl: "declare ptr @patch_seq_int_to_float(ptr)",
857 category: None,
858 },
859 RuntimeDecl {
860 decl: "declare ptr @patch_seq_float_to_int(ptr)",
861 category: None,
862 },
863 RuntimeDecl {
864 decl: "declare ptr @patch_seq_float_to_string(ptr)",
865 category: None,
866 },
867 RuntimeDecl {
868 decl: "declare ptr @patch_seq_string_to_float(ptr)",
869 category: None,
870 },
871 RuntimeDecl {
873 decl: "declare ptr @patch_seq_test_init(ptr)",
874 category: Some("; Test framework operations"),
875 },
876 RuntimeDecl {
877 decl: "declare ptr @patch_seq_test_finish(ptr)",
878 category: None,
879 },
880 RuntimeDecl {
881 decl: "declare ptr @patch_seq_test_has_failures(ptr)",
882 category: None,
883 },
884 RuntimeDecl {
885 decl: "declare ptr @patch_seq_test_assert(ptr)",
886 category: None,
887 },
888 RuntimeDecl {
889 decl: "declare ptr @patch_seq_test_assert_not(ptr)",
890 category: None,
891 },
892 RuntimeDecl {
893 decl: "declare ptr @patch_seq_test_assert_eq(ptr)",
894 category: None,
895 },
896 RuntimeDecl {
897 decl: "declare ptr @patch_seq_test_assert_eq_str(ptr)",
898 category: None,
899 },
900 RuntimeDecl {
901 decl: "declare ptr @patch_seq_test_fail(ptr)",
902 category: None,
903 },
904 RuntimeDecl {
905 decl: "declare ptr @patch_seq_test_pass_count(ptr)",
906 category: None,
907 },
908 RuntimeDecl {
909 decl: "declare ptr @patch_seq_test_fail_count(ptr)",
910 category: None,
911 },
912 RuntimeDecl {
914 decl: "declare ptr @patch_seq_time_now(ptr)",
915 category: Some("; Time operations"),
916 },
917 RuntimeDecl {
918 decl: "declare ptr @patch_seq_time_nanos(ptr)",
919 category: None,
920 },
921 RuntimeDecl {
922 decl: "declare ptr @patch_seq_time_sleep_ms(ptr)",
923 category: None,
924 },
925 RuntimeDecl {
927 decl: "declare ptr @patch_seq_stack_dump(ptr)",
928 category: Some("; Stack introspection"),
929 },
930 RuntimeDecl {
932 decl: "declare ptr @patch_seq_son_dump(ptr)",
933 category: Some("; SON serialization"),
934 },
935 RuntimeDecl {
936 decl: "declare ptr @patch_seq_son_dump_pretty(ptr)",
937 category: None,
938 },
939 RuntimeDecl {
941 decl: "declare ptr @patch_seq_regex_match(ptr)",
942 category: Some("; Regex operations"),
943 },
944 RuntimeDecl {
945 decl: "declare ptr @patch_seq_regex_find(ptr)",
946 category: None,
947 },
948 RuntimeDecl {
949 decl: "declare ptr @patch_seq_regex_find_all(ptr)",
950 category: None,
951 },
952 RuntimeDecl {
953 decl: "declare ptr @patch_seq_regex_replace(ptr)",
954 category: None,
955 },
956 RuntimeDecl {
957 decl: "declare ptr @patch_seq_regex_replace_all(ptr)",
958 category: None,
959 },
960 RuntimeDecl {
961 decl: "declare ptr @patch_seq_regex_captures(ptr)",
962 category: None,
963 },
964 RuntimeDecl {
965 decl: "declare ptr @patch_seq_regex_split(ptr)",
966 category: None,
967 },
968 RuntimeDecl {
969 decl: "declare ptr @patch_seq_regex_valid(ptr)",
970 category: None,
971 },
972 RuntimeDecl {
974 decl: "declare ptr @patch_seq_compress_gzip(ptr)",
975 category: Some("; Compression operations"),
976 },
977 RuntimeDecl {
978 decl: "declare ptr @patch_seq_compress_gzip_level(ptr)",
979 category: None,
980 },
981 RuntimeDecl {
982 decl: "declare ptr @patch_seq_compress_gunzip(ptr)",
983 category: None,
984 },
985 RuntimeDecl {
986 decl: "declare ptr @patch_seq_compress_zstd(ptr)",
987 category: None,
988 },
989 RuntimeDecl {
990 decl: "declare ptr @patch_seq_compress_zstd_level(ptr)",
991 category: None,
992 },
993 RuntimeDecl {
994 decl: "declare ptr @patch_seq_compress_unzstd(ptr)",
995 category: None,
996 },
997 RuntimeDecl {
999 decl: "declare i64 @patch_seq_peek_int_value(ptr)",
1000 category: Some("; Helpers for conditionals"),
1001 },
1002 RuntimeDecl {
1003 decl: "declare i1 @patch_seq_peek_bool_value(ptr)",
1004 category: None,
1005 },
1006 RuntimeDecl {
1007 decl: "declare ptr @patch_seq_pop_stack(ptr)",
1008 category: None,
1009 },
1010 RuntimeDecl {
1012 decl: "declare ptr @seq_stack_new_default()",
1013 category: Some("; Tagged stack operations"),
1014 },
1015 RuntimeDecl {
1016 decl: "declare void @seq_stack_free(ptr)",
1017 category: None,
1018 },
1019 RuntimeDecl {
1020 decl: "declare ptr @seq_stack_base(ptr)",
1021 category: None,
1022 },
1023 RuntimeDecl {
1024 decl: "declare i64 @seq_stack_sp(ptr)",
1025 category: None,
1026 },
1027 RuntimeDecl {
1028 decl: "declare void @seq_stack_set_sp(ptr, i64)",
1029 category: None,
1030 },
1031 RuntimeDecl {
1032 decl: "declare void @seq_stack_grow(ptr, i64)",
1033 category: None,
1034 },
1035 RuntimeDecl {
1036 decl: "declare void @patch_seq_set_stack_base(ptr)",
1037 category: None,
1038 },
1039 ]
1040});
1041
1042pub static BUILTIN_SYMBOLS: LazyLock<HashMap<&'static str, &'static str>> = LazyLock::new(|| {
1049 HashMap::from([
1050 ("io.write", "patch_seq_write"),
1052 ("io.write-line", "patch_seq_write_line"),
1053 ("io.read-line", "patch_seq_read_line"),
1054 ("io.read-line+", "patch_seq_read_line_plus"),
1055 ("io.read-n", "patch_seq_read_n"),
1056 ("int->string", "patch_seq_int_to_string"),
1057 ("symbol->string", "patch_seq_symbol_to_string"),
1058 ("string->symbol", "patch_seq_string_to_symbol"),
1059 ("args.count", "patch_seq_arg_count"),
1061 ("args.at", "patch_seq_arg_at"),
1062 ("i.add", "patch_seq_add"),
1064 ("i.subtract", "patch_seq_subtract"),
1065 ("i.multiply", "patch_seq_multiply"),
1066 ("i.divide", "patch_seq_divide"),
1067 ("i.modulo", "patch_seq_modulo"),
1068 ("i.+", "patch_seq_add"),
1070 ("i.-", "patch_seq_subtract"),
1071 ("i.*", "patch_seq_multiply"),
1072 ("i./", "patch_seq_divide"),
1073 ("i.%", "patch_seq_modulo"),
1074 ("i.=", "patch_seq_eq"),
1076 ("i.<", "patch_seq_lt"),
1077 ("i.>", "patch_seq_gt"),
1078 ("i.<=", "patch_seq_lte"),
1079 ("i.>=", "patch_seq_gte"),
1080 ("i.<>", "patch_seq_neq"),
1081 ("i.eq", "patch_seq_eq"),
1083 ("i.lt", "patch_seq_lt"),
1084 ("i.gt", "patch_seq_gt"),
1085 ("i.lte", "patch_seq_lte"),
1086 ("i.gte", "patch_seq_gte"),
1087 ("i.neq", "patch_seq_neq"),
1088 ("and", "patch_seq_and"),
1090 ("or", "patch_seq_or"),
1091 ("not", "patch_seq_not"),
1092 ("band", "patch_seq_band"),
1094 ("bor", "patch_seq_bor"),
1095 ("bxor", "patch_seq_bxor"),
1096 ("bnot", "patch_seq_bnot"),
1097 ("shl", "patch_seq_shl"),
1098 ("shr", "patch_seq_shr"),
1099 ("popcount", "patch_seq_popcount"),
1100 ("clz", "patch_seq_clz"),
1101 ("ctz", "patch_seq_ctz"),
1102 ("int-bits", "patch_seq_int_bits"),
1103 ("dup", "patch_seq_dup"),
1105 ("swap", "patch_seq_swap"),
1106 ("over", "patch_seq_over"),
1107 ("rot", "patch_seq_rot"),
1108 ("nip", "patch_seq_nip"),
1109 ("tuck", "patch_seq_tuck"),
1110 ("2dup", "patch_seq_2dup"),
1111 ("3drop", "patch_seq_3drop"),
1112 ("drop", "patch_seq_drop_op"),
1113 ("pick", "patch_seq_pick_op"),
1114 ("roll", "patch_seq_roll"),
1115 ("chan.make", "patch_seq_make_channel"),
1117 ("chan.send", "patch_seq_chan_send"),
1118 ("chan.receive", "patch_seq_chan_receive"),
1119 ("chan.close", "patch_seq_close_channel"),
1120 ("chan.yield", "patch_seq_yield_strand"),
1121 ("call", "patch_seq_call"),
1123 ("times", "patch_seq_times"),
1124 ("while", "patch_seq_while_loop"),
1125 ("until", "patch_seq_until_loop"),
1126 ("strand.spawn", "patch_seq_spawn"),
1127 ("strand.weave", "patch_seq_weave"),
1128 ("strand.resume", "patch_seq_resume"),
1129 ("strand.weave-cancel", "patch_seq_weave_cancel"),
1130 ("yield", "patch_seq_yield"),
1131 ("cond", "patch_seq_cond"),
1132 ("tcp.listen", "patch_seq_tcp_listen"),
1134 ("tcp.accept", "patch_seq_tcp_accept"),
1135 ("tcp.read", "patch_seq_tcp_read"),
1136 ("tcp.write", "patch_seq_tcp_write"),
1137 ("tcp.close", "patch_seq_tcp_close"),
1138 ("os.getenv", "patch_seq_getenv"),
1140 ("os.home-dir", "patch_seq_home_dir"),
1141 ("os.current-dir", "patch_seq_current_dir"),
1142 ("os.path-exists", "patch_seq_path_exists"),
1143 ("os.path-is-file", "patch_seq_path_is_file"),
1144 ("os.path-is-dir", "patch_seq_path_is_dir"),
1145 ("os.path-join", "patch_seq_path_join"),
1146 ("os.path-parent", "patch_seq_path_parent"),
1147 ("os.path-filename", "patch_seq_path_filename"),
1148 ("os.exit", "patch_seq_exit"),
1149 ("os.name", "patch_seq_os_name"),
1150 ("os.arch", "patch_seq_os_arch"),
1151 ("terminal.raw-mode", "patch_seq_terminal_raw_mode"),
1153 ("terminal.read-char", "patch_seq_terminal_read_char"),
1154 (
1155 "terminal.read-char?",
1156 "patch_seq_terminal_read_char_nonblock",
1157 ),
1158 ("terminal.width", "patch_seq_terminal_width"),
1159 ("terminal.height", "patch_seq_terminal_height"),
1160 ("terminal.flush", "patch_seq_terminal_flush"),
1161 ("string.concat", "patch_seq_string_concat"),
1163 ("string.length", "patch_seq_string_length"),
1164 ("string.byte-length", "patch_seq_string_byte_length"),
1165 ("string.char-at", "patch_seq_string_char_at"),
1166 ("string.substring", "patch_seq_string_substring"),
1167 ("char->string", "patch_seq_char_to_string"),
1168 ("string.find", "patch_seq_string_find"),
1169 ("string.split", "patch_seq_string_split"),
1170 ("string.contains", "patch_seq_string_contains"),
1171 ("string.starts-with", "patch_seq_string_starts_with"),
1172 ("string.empty?", "patch_seq_string_empty"),
1173 ("string.trim", "patch_seq_string_trim"),
1174 ("string.chomp", "patch_seq_string_chomp"),
1175 ("string.to-upper", "patch_seq_string_to_upper"),
1176 ("string.to-lower", "patch_seq_string_to_lower"),
1177 ("string.equal?", "patch_seq_string_equal"),
1178 ("string.json-escape", "patch_seq_json_escape"),
1179 ("string->int", "patch_seq_string_to_int"),
1180 ("encoding.base64-encode", "patch_seq_base64_encode"),
1182 ("encoding.base64-decode", "patch_seq_base64_decode"),
1183 ("encoding.base64url-encode", "patch_seq_base64url_encode"),
1184 ("encoding.base64url-decode", "patch_seq_base64url_decode"),
1185 ("encoding.hex-encode", "patch_seq_hex_encode"),
1186 ("encoding.hex-decode", "patch_seq_hex_decode"),
1187 ("crypto.sha256", "patch_seq_sha256"),
1189 ("crypto.hmac-sha256", "patch_seq_hmac_sha256"),
1190 ("crypto.constant-time-eq", "patch_seq_constant_time_eq"),
1191 ("crypto.random-bytes", "patch_seq_random_bytes"),
1192 ("crypto.random-int", "patch_seq_random_int"),
1193 ("crypto.uuid4", "patch_seq_uuid4"),
1194 ("crypto.aes-gcm-encrypt", "patch_seq_crypto_aes_gcm_encrypt"),
1195 ("crypto.aes-gcm-decrypt", "patch_seq_crypto_aes_gcm_decrypt"),
1196 ("crypto.pbkdf2-sha256", "patch_seq_crypto_pbkdf2_sha256"),
1197 ("crypto.ed25519-keypair", "patch_seq_crypto_ed25519_keypair"),
1198 ("crypto.ed25519-sign", "patch_seq_crypto_ed25519_sign"),
1199 ("crypto.ed25519-verify", "patch_seq_crypto_ed25519_verify"),
1200 ("http.get", "patch_seq_http_get"),
1202 ("http.post", "patch_seq_http_post"),
1203 ("http.put", "patch_seq_http_put"),
1204 ("http.delete", "patch_seq_http_delete"),
1205 ("regex.match?", "patch_seq_regex_match"),
1207 ("regex.find", "patch_seq_regex_find"),
1208 ("regex.find-all", "patch_seq_regex_find_all"),
1209 ("regex.replace", "patch_seq_regex_replace"),
1210 ("regex.replace-all", "patch_seq_regex_replace_all"),
1211 ("regex.captures", "patch_seq_regex_captures"),
1212 ("regex.split", "patch_seq_regex_split"),
1213 ("regex.valid?", "patch_seq_regex_valid"),
1214 ("compress.gzip", "patch_seq_compress_gzip"),
1216 ("compress.gzip-level", "patch_seq_compress_gzip_level"),
1217 ("compress.gunzip", "patch_seq_compress_gunzip"),
1218 ("compress.zstd", "patch_seq_compress_zstd"),
1219 ("compress.zstd-level", "patch_seq_compress_zstd_level"),
1220 ("compress.unzstd", "patch_seq_compress_unzstd"),
1221 ("symbol.=", "patch_seq_symbol_equal"),
1223 ("file.slurp", "patch_seq_file_slurp"),
1225 ("file.exists?", "patch_seq_file_exists"),
1226 ("file.for-each-line+", "patch_seq_file_for_each_line_plus"),
1227 ("list.make", "patch_seq_list_make"),
1229 ("list.push", "patch_seq_list_push"),
1230 ("list.get", "patch_seq_list_get"),
1231 ("list.set", "patch_seq_list_set"),
1232 ("list.map", "patch_seq_list_map"),
1233 ("list.filter", "patch_seq_list_filter"),
1234 ("list.fold", "patch_seq_list_fold"),
1235 ("list.each", "patch_seq_list_each"),
1236 ("list.length", "patch_seq_list_length"),
1237 ("list.empty?", "patch_seq_list_empty"),
1238 ("map.make", "patch_seq_make_map"),
1240 ("map.get", "patch_seq_map_get"),
1241 ("map.set", "patch_seq_map_set"),
1242 ("map.has?", "patch_seq_map_has"),
1243 ("map.remove", "patch_seq_map_remove"),
1244 ("map.keys", "patch_seq_map_keys"),
1245 ("map.values", "patch_seq_map_values"),
1246 ("map.size", "patch_seq_map_size"),
1247 ("map.empty?", "patch_seq_map_empty"),
1248 ("variant.field-count", "patch_seq_variant_field_count"),
1250 ("variant.tag", "patch_seq_variant_tag"),
1251 ("variant.field-at", "patch_seq_variant_field_at"),
1252 ("variant.append", "patch_seq_variant_append"),
1253 ("variant.last", "patch_seq_variant_last"),
1254 ("variant.init", "patch_seq_variant_init"),
1255 ("variant.make-0", "patch_seq_make_variant_0"),
1256 ("variant.make-1", "patch_seq_make_variant_1"),
1257 ("variant.make-2", "patch_seq_make_variant_2"),
1258 ("variant.make-3", "patch_seq_make_variant_3"),
1259 ("variant.make-4", "patch_seq_make_variant_4"),
1260 ("wrap-0", "patch_seq_make_variant_0"),
1262 ("wrap-1", "patch_seq_make_variant_1"),
1263 ("wrap-2", "patch_seq_make_variant_2"),
1264 ("wrap-3", "patch_seq_make_variant_3"),
1265 ("wrap-4", "patch_seq_make_variant_4"),
1266 ("f.add", "patch_seq_f_add"),
1268 ("f.subtract", "patch_seq_f_subtract"),
1269 ("f.multiply", "patch_seq_f_multiply"),
1270 ("f.divide", "patch_seq_f_divide"),
1271 ("f.+", "patch_seq_f_add"),
1273 ("f.-", "patch_seq_f_subtract"),
1274 ("f.*", "patch_seq_f_multiply"),
1275 ("f./", "patch_seq_f_divide"),
1276 ("f.=", "patch_seq_f_eq"),
1278 ("f.<", "patch_seq_f_lt"),
1279 ("f.>", "patch_seq_f_gt"),
1280 ("f.<=", "patch_seq_f_lte"),
1281 ("f.>=", "patch_seq_f_gte"),
1282 ("f.<>", "patch_seq_f_neq"),
1283 ("f.eq", "patch_seq_f_eq"),
1285 ("f.lt", "patch_seq_f_lt"),
1286 ("f.gt", "patch_seq_f_gt"),
1287 ("f.lte", "patch_seq_f_lte"),
1288 ("f.gte", "patch_seq_f_gte"),
1289 ("f.neq", "patch_seq_f_neq"),
1290 ("int->float", "patch_seq_int_to_float"),
1292 ("float->int", "patch_seq_float_to_int"),
1293 ("float->string", "patch_seq_float_to_string"),
1294 ("string->float", "patch_seq_string_to_float"),
1295 ("test.init", "patch_seq_test_init"),
1297 ("test.finish", "patch_seq_test_finish"),
1298 ("test.has-failures", "patch_seq_test_has_failures"),
1299 ("test.assert", "patch_seq_test_assert"),
1300 ("test.assert-not", "patch_seq_test_assert_not"),
1301 ("test.assert-eq", "patch_seq_test_assert_eq"),
1302 ("test.assert-eq-str", "patch_seq_test_assert_eq_str"),
1303 ("test.fail", "patch_seq_test_fail"),
1304 ("test.pass-count", "patch_seq_test_pass_count"),
1305 ("test.fail-count", "patch_seq_test_fail_count"),
1306 ("time.now", "patch_seq_time_now"),
1308 ("time.nanos", "patch_seq_time_nanos"),
1309 ("time.sleep-ms", "patch_seq_time_sleep_ms"),
1310 ("son.dump", "patch_seq_son_dump"),
1312 ("son.dump-pretty", "patch_seq_son_dump_pretty"),
1313 ("stack.dump", "patch_seq_stack_dump"),
1315 ])
1316});
1317
1318pub fn emit_runtime_decls(ir: &mut String) -> Result<(), CodeGenError> {
1320 for decl in RUNTIME_DECLARATIONS.iter() {
1321 if let Some(cat) = decl.category {
1322 writeln!(ir, "{}", cat)?;
1323 }
1324 writeln!(ir, "{}", decl.decl)?;
1325 }
1326 writeln!(ir)?;
1327 Ok(())
1328}