mumuarray/
lib.rs

1#![allow(dead_code)]
2#![allow(unused_imports)]
3
4use mumu::{
5    parser::interpreter::Interpreter,
6    parser::types::{Value, FunctionValue},
7};
8use std::sync::{Arc, Mutex};
9
10mod simple;
11mod append;
12mod apply;
13mod assoc;
14mod collect;
15mod each;
16mod join;
17mod keys;
18mod key_eq;      // ← NEW
19mod length;
20mod map;
21mod multi;
22mod nth;
23mod prop;
24mod range;
25mod reduce;
26mod search;
27mod sort;
28mod tail;
29mod util;
30mod transform; // Now a directory, not a flat file
31
32#[no_mangle]
33pub unsafe extern "C" fn Cargo_lock(
34    interp_ptr: *mut std::ffi::c_void,
35    _extra_str: *const std::ffi::c_void,
36) -> i32 {
37    let interp = &mut *(interp_ptr as *mut Interpreter);
38
39    macro_rules! reg {
40        ($name:expr, $f:expr) => {{
41            let func = Arc::new(Mutex::new($f));
42            interp.register_dynamic_function($name, func);
43            interp.set_variable($name, Value::Function(Box::new(FunctionValue::Named($name.into()))));
44        }};
45    }
46
47    reg!("array:filter", simple::array_filter);
48    reg!("array:sort", sort::array_sort_bridge);
49    reg!("array:flatten", simple::array_flatten);
50    reg!("array:join", join::array_join_bridge);
51    reg!("array:zip", simple::array_zip);
52    reg!("array:zip_with", multi::array_zip_with_bridge);
53    reg!("array:prop", prop::array_prop_bridge);
54
55    reg!("array:append", append::array_append_bridge);
56    reg!("array:apply", apply::array_apply_bridge);
57    reg!("array:assoc", assoc::array_assoc_bridge);
58    reg!("array:chunk", transform::chunk::array_chunk_bridge);
59    reg!("array:collect", collect::array_collect_bridge);
60    reg!("array:compact", util::array_compact_bridge);
61    reg!("array:drop", transform::drop::array_drop_bridge);
62    reg!("array:drop_while", transform::drop_while::array_drop_while_bridge);
63    reg!("array:each", each::array_each_bridge);
64    reg!("array:every", search::array_every_bridge);
65    reg!("array:find", search::array_find_bridge);
66    reg!("array:findIndex", search::array_find_index_bridge);
67    reg!("array:flatten_deep", util::array_flatten_deep_bridge);
68    reg!("array:group_by", transform::group_by::array_group_by_bridge);
69    reg!("array:head", util::array_head_bridge);
70    reg!("array:includes", search::array_includes_bridge);
71    reg!("array:init", transform::init::array_init_bridge);
72    reg!("array:last", util::array_last_bridge);
73    reg!("array:length", length::array_length_bridge);
74    reg!("array:map", map::array_map_bridge);
75    reg!("array:multi_concat", multi::array_concat_bridge);
76    reg!("array:multi_difference", multi::array_difference_bridge);
77    reg!("array:multi_intersection", multi::array_intersection_bridge);
78    reg!("array:multi_union", multi::array_union_bridge);
79    reg!("array:multi_zip", multi::array_zip_bridge);
80    reg!("array:multi_zip_with", multi::array_zip_with_bridge);
81    reg!("array:nth", nth::array_nth_bridge);
82    reg!("array:partition", transform::partition::array_partition_bridge);
83    reg!("array:pluck", transform::pluck::array_pluck_bridge);
84    reg!("array:prop_partial", prop::array_prop_bridge);
85    reg!("array:range", range::array_range_bridge);
86    reg!("array:reduce", reduce::array_reduce_bridge);
87    reg!("array:repeat", transform::fill::array_repeat_bridge);
88    reg!("array:reverse", util::array_reverse_bridge);
89    reg!("array:slice", transform::slice::array_slice_bridge);
90    reg!("array:some", search::array_some_bridge);
91    reg!("array:sort_by", sort::array_sort_by_bridge);
92    reg!("array:sort_with", sort::array_sort_with_bridge);
93    reg!("array:tail", tail::array_tail_bridge);
94    reg!("array:take", transform::take::array_take_bridge);
95    reg!("array:take_while", transform::take_while::array_take_while_bridge);
96    reg!("array:uniq", util::array_uniq_bridge);
97    reg!("array:shuffle", util::array_shuffle_bridge);
98    reg!("array:keys", keys::array_keys_bridge);
99
100    // NEW: Ramda-like propEq
101    reg!("array:key_eq", key_eq::array_key_eq_bridge);
102
103    0
104}