the_lang/
lang.rs

1/*
2    lua2rust - Prelude
3    Copyright (C) 2019  Zaoqi <zaomir@outlook.com>
4
5    This program is free software: you can redistribute it and/or modify
6    it under the terms of the GNU Affero General Public License as published
7    by the Free Software Foundation, either version 3 of the License, or
8    (at your option) any later version.
9
10    This program is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13    GNU Affero General Public License for more details.
14
15    You should have received a copy of the GNU Affero General Public License
16    along with this program.  If not, see <https://www.gnu.org/licenses/>.
17
18*/
19#![allow(dead_code)]
20#![allow(unused_macros)]
21#![allow(unused_mut)]
22#![allow(unused_variables)]
23#![allow(non_snake_case)]
24#![allow(non_camel_case_types)]
25#![allow(unreachable_code)]
26#![allow(unused_parens)]
27
28#[derive(Debug, Copy, Clone, PartialEq, Eq)]
29pub struct _lua_debug_loc {
30    // line + column
31    pub start: (usize, usize),
32    pub end: (usize, usize),
33}
34impl std::fmt::Display for _lua_debug_loc {
35    fn fmt(&self, f: &mut std::fmt::Formatter<'_>) -> std::fmt::Result {
36        write!(f, "( start: ( line: {}, column: {} ), end: ( line: {}, column: {} ) )", self.start.0, self.start.1, self.end.0, self.end.1)
37    }
38}
39pub type _lua_gc_t<X> = std::sync::Arc<X>;
40pub fn _lua_gc_t__new<X>(x: X) -> _lua_gc_t<X> {
41    std::sync::Arc::new(x)
42}
43pub type _lua_data = _lua_gc_t<_lua_data_unpack>;
44pub fn _lua_data__pack(data: _lua_data_unpack) -> _lua_data {
45    _lua_gc_t__new(data)
46}
47pub struct _lua_data_unpack_function (Box<Fn(Vec<_lua_data>, _lua_debug_loc) -> _lua_data>);
48impl std::hash::Hash for _lua_data_unpack_function {
49    fn hash<H: std::hash::Hasher>(&self, state: &mut H) {
50        let sel: *const (Fn(Vec<_lua_data>, _lua_debug_loc) -> _lua_data) = &*self.0;
51        sel.hash(state);
52    }
53}
54impl PartialEq for _lua_data_unpack_function {
55    fn eq(&self, other: &Self) -> bool {
56        let sel: *const (Fn(Vec<_lua_data>, _lua_debug_loc) -> _lua_data) = &*self.0;
57        let other: *const (Fn(Vec<_lua_data>, _lua_debug_loc) -> _lua_data) = &*other.0;
58        sel == other
59    }
60}
61impl Eq for _lua_data_unpack_function {}
62impl std::fmt::Debug for _lua_data_unpack_function {
63    fn fmt(&self, f: &mut std::fmt::Formatter<'_>) -> std::fmt::Result {
64        let sel: *const (Fn(Vec<_lua_data>, _lua_debug_loc) -> _lua_data) = &*self.0;
65        write!(f, "_lua_data_unpack_function({:p})", sel)
66    }
67}
68#[derive(Debug)]
69pub struct _lua_data_unpack_table (std::sync::Mutex<std::collections::HashMap<_lua_data,_lua_data>>);
70impl std::hash::Hash for _lua_data_unpack_table {
71    fn hash<H: std::hash::Hasher>(&self, state: &mut H) {
72        let sel: *const (std::collections::HashMap<_lua_data,_lua_data>) = &*self.0.lock().unwrap();
73        sel.hash(state);
74    }
75}
76impl PartialEq for _lua_data_unpack_table {
77    fn eq(&self, other: &Self) -> bool {
78        let sel: *const (std::collections::HashMap<_lua_data,_lua_data>) = &*self.0.lock().unwrap();
79        let other: *const (std::collections::HashMap<_lua_data,_lua_data>) = &*other.0.lock().unwrap();
80        sel == other
81    }
82}
83impl Eq for _lua_data_unpack_table {}
84#[derive(Debug)]
85pub struct _lua_data_unpack_number (f64);
86impl std::hash::Hash for _lua_data_unpack_number {
87    fn hash<H: std::hash::Hasher>(&self, state: &mut H) {
88        self.0.to_bits().hash(state);
89    }
90}
91impl PartialEq for _lua_data_unpack_number {
92    fn eq(&self, other: &Self) -> bool {
93        self.0 == other.0 // 此处可能和Lua实现不同。
94    }
95}
96impl Eq for _lua_data_unpack_number {}
97#[derive(Hash,PartialEq,Eq,Debug)]
98pub enum _lua_data_unpack {
99    Number(_lua_data_unpack_number),
100    String(String),
101    Table(_lua_data_unpack_table),
102    Function(_lua_data_unpack_function),
103    True,
104    False,
105    Nil,
106}
107impl std::fmt::Display for _lua_data_unpack {
108    fn fmt(&self, f: &mut std::fmt::Formatter<'_>) -> std::fmt::Result {
109        match self {
110            _lua_data_unpack::Number(_lua_data_unpack_number(x)) => write!(f, "{}", x),
111            _lua_data_unpack::String(x) => write!(f, "{}", x),
112            _lua_data_unpack::Table(x) => {
113                let p: *const (std::collections::HashMap<_lua_data,_lua_data>) = &*x.0.lock().unwrap();
114                write!(f, "table: {:p}", p)},
115            _lua_data_unpack::Function(x) => {
116                let p: *const (Fn(Vec<_lua_data>, _lua_debug_loc) -> _lua_data) = &*x.0;
117                write!(f, "function: {:p}", p)},
118            _lua_data_unpack::True => write!(f, "true"),
119            _lua_data_unpack::False => write!(f, "false"),
120            _lua_data_unpack::Nil => write!(f, "nil"),
121        }
122    }
123}
124impl _lua_data_unpack {
125    pub fn as_bool(&self, loc: _lua_debug_loc) -> bool {
126        match self {
127            _lua_data_unpack::False | _lua_data_unpack::Nil => false,
128            _ => true,
129        }
130    }
131    pub fn as_f64(&self, loc: _lua_debug_loc) -> f64 {
132        if let _lua_data_unpack::Number(x) = self {
133            x.0
134        } else {
135            panic!("isn't number: {}\nat {}", self, loc)
136        }
137    }
138    pub fn lua_tonumber(&self) -> _lua_data {
139        if let _lua_data_unpack::String(x) = self {
140            if let Ok(r) = x.parse::<f64>() { _lua_num(r) } else { _lua_nil() }
141        } else if let _lua_data_unpack::Number(x) = self {
142            _lua_data__pack(_lua_data_unpack::Number(_lua_data_unpack_number(x.0)))
143        } else {
144            _lua_nil()
145        }
146    }
147    pub fn as_string(&self, loc: _lua_debug_loc) -> String {
148        if let _lua_data_unpack::String(x) = self {
149            x.clone()
150        } else {
151            panic!("isn't string: {}\nat {}", self, loc)
152        }
153    }
154    pub fn from_bool(x: bool) -> Self {
155        if x { _lua_data_unpack::True } else { _lua_data_unpack::False }
156    }
157}
158pub fn _lua_str<'a>(x: &'a str) -> _lua_data {
159    _lua_data__pack(_lua_data_unpack::String(String::from(x)))
160}
161#[macro_export]
162macro_rules! _lua_num {
163    ($x:expr) => (_lua_num($x as f64))
164}
165pub fn _lua_num(x: f64) -> _lua_data {
166    _lua_data__pack(_lua_data_unpack::Number(_lua_data_unpack_number(x)))
167}
168pub fn _lua_table(xs: Vec<(_lua_data, _lua_data)>) -> _lua_data {
169    _lua_data__pack(_lua_data_unpack::Table(_lua_data_unpack_table(std::sync::Mutex::new(xs.iter().cloned().collect()))))
170}
171pub fn _lua_len(xs: _lua_data, loc: _lua_debug_loc) -> _lua_data {
172    if let _lua_data_unpack::Table(t) = &*xs {
173        _lua_num!(t.0.lock().unwrap().len()) // FIX ME 此处与Lua不同
174    } else if let _lua_data_unpack::String(x) = &*xs {
175        _lua_num!(x.chars().count())
176    } else {
177        panic!("attempt to get length of a value that isn't a table: {}\nat: {}", xs, loc)
178    }
179}
180pub fn _lua_lookup(map: _lua_data, key: _lua_data, loc: _lua_debug_loc) -> _lua_data {
181    if let _lua_data_unpack::Table(t) = &*map {
182        if let Some(x) = t.0.lock().unwrap().get(&key) {
183            x.clone()
184        } else {
185            _lua_data__pack(_lua_data_unpack::Nil)
186        }
187    } else {
188        panic!("attempt to index a value that isn't a table: {}\nat: {}", map, loc)
189    }
190}
191pub fn _lua_set(map: _lua_data, key: _lua_data, val: _lua_data, loc: _lua_debug_loc) {
192    if let _lua_data_unpack::Table(t) = &*map {
193        t.0.lock().unwrap().insert(key,val);
194    } else {
195        panic!("attempt to index a value that isn't a table: {}\nat: {}", map, loc);
196    }
197}
198pub fn _lua_vec(xs: Vec<_lua_data>) -> _lua_data {
199    let mut result = std::collections::HashMap::new();
200    for i in 1..=xs.len() {
201        result.insert(_lua_num(i as f64), xs[i-1].clone());
202    }
203    _lua_data__pack(_lua_data_unpack::Table(_lua_data_unpack_table(std::sync::Mutex::new(result))))
204}
205pub fn _lua_lambda(f: Box<Fn(Vec<_lua_data>, _lua_debug_loc) -> _lua_data>) -> _lua_data {
206    _lua_data__pack(_lua_data_unpack::Function(_lua_data_unpack_function(f)))
207}
208pub fn _lua_call(f: _lua_data, args: Vec<_lua_data>, loc: _lua_debug_loc) -> _lua_data {
209    if let _lua_data_unpack::Function(v) = &*f {
210        v.0(args, loc)
211    } else {
212        panic!("attempt to call a value that isn't a function: {}\nat: {}", f, loc)
213    }
214}
215pub fn _lua_not(x: _lua_data, loc: _lua_debug_loc) -> _lua_data {
216    _lua_bool(!x.as_bool(loc))
217}
218pub fn _lua_bool(x: bool) -> _lua_data {
219    _lua_data__pack(_lua_data_unpack::from_bool(x))
220}
221#[macro_export]
222macro_rules! _lua_op {
223    (or, $x: expr, $y: expr, $loc: expr) => (if $x.as_bool($loc) { $x } else { $y });
224    (and, $x: expr, $y: expr, $loc: expr) => (if !$x.as_bool($loc) { $x } else { $y });
225    (add, $x: expr, $y: expr, $loc: expr) => (_lua_num($x.as_f64($loc) + $y.as_f64($loc)));
226    (sub, $x: expr, $y: expr, $loc: expr) => (_lua_num($x.as_f64($loc) - $y.as_f64($loc)));
227    (mul, $x: expr, $y: expr, $loc: expr) => (_lua_num($x.as_f64($loc) * $y.as_f64($loc)));
228    (div, $x: expr, $y: expr, $loc: expr) => (_lua_num($x.as_f64($loc) / $y.as_f64($loc)));
229    (rem, $x: expr, $y: expr, $loc: expr) => (panic!("not implemented: rem\nat: {}", $loc));
230    (exp, $x: expr, $y: expr, $loc: expr) => (panic!("not implemented: exp\nat: {}", $loc));
231    (eq, $x: expr, $y: expr, $loc: expr) => (_lua_bool($x == $y));
232    (not_eq, $x: expr, $y: expr, $loc: expr) => (_lua_bool($x != $y));
233    (less_eq, $x: expr, $y: expr, $loc: expr) => (_lua_bool($x.as_f64($loc) <= $y.as_f64($loc)));
234    (greater_eq, $x: expr, $y: expr, $loc: expr) => (_lua_bool($x.as_f64($loc) >= $y.as_f64($loc)));
235    (less, $x: expr, $y: expr, $loc: expr) => (_lua_bool($x.as_f64($loc) < $y.as_f64($loc)));
236    (greater, $x: expr, $y: expr, $loc: expr) => (_lua_bool($x.as_f64($loc) > $y.as_f64($loc)));
237    (concat, $x: expr, $y: expr, $loc: expr) => (_lua_data__pack(_lua_data_unpack::String($x.as_string($loc) + &$y.as_string($loc))));
238}
239pub fn _lua_nil() -> _lua_data {
240    _lua_data__pack(_lua_data_unpack::Nil)
241}
242pub fn _lua_true() -> _lua_data {
243    _lua_data__pack(_lua_data_unpack::True)
244}
245pub fn _lua_false() -> _lua_data {
246    _lua_data__pack(_lua_data_unpack::False)
247}
248pub fn _lua_neg(x: _lua_data, loc: _lua_debug_loc) -> _lua_data {
249    _lua_num(-x.as_f64(loc))
250}
251pub fn lang() -> _lua_data {
252    // https://www.lua.org/manual/5.3/manual.html#pdf-print
253    let print = std::sync::Arc::new(std::cell::RefCell::new(_lua_lambda(Box::new(|xs, _| {
254        println!("{}", xs.iter().fold(String::from(""), |acc, x| if acc == "" { format!("{}", x) } else { acc + "\t" + &format!("{}", x) }));
255        _lua_nil()
256    }))));
257    // https://www.lua.org/manual/5.3/manual.html#pdf-tostring
258    let tostring = std::sync::Arc::new(std::cell::RefCell::new(_lua_lambda(Box::new(|mut xs, _| {
259        let x = if xs.is_empty() { _lua_nil() } else { xs.remove(0) };
260        _lua_data__pack(_lua_data_unpack::String(format!("{}", x)))
261    }))));
262    // https://www.lua.org/manual/5.3/manual.html#pdf-tonumber
263    // base未实现
264    let tonumber = std::sync::Arc::new(std::cell::RefCell::new(_lua_lambda(Box::new(|mut xs, loc| {
265        let arg: _lua_data = if xs.is_empty() { _lua_nil() } else { xs.remove(0) };
266        arg.lua_tonumber()
267    }))));
268    // https://www.lua.org/manual/5.3/manual.html#pdf-error
269    // level未实现
270    let error = std::sync::Arc::new(std::cell::RefCell::new(_lua_lambda(Box::new(|mut xs, loc| {
271        let message: _lua_data = if xs.is_empty() { _lua_nil() } else { xs.remove(0) };
272        panic!("{}\nat: {}", message.as_string(loc), loc)
273    }))));
274    let table = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![
275        // https://www.lua.org/manual/5.3/manual.html#pdf-table.insert
276        (_lua_str("insert"), _lua_lambda(Box::new(|mut xs, loc| {
277            if xs.len() <= 2 {
278                let list = if xs.is_empty() { _lua_nil() } else { xs.remove(0) };
279                let value = if xs.is_empty() { _lua_nil() } else { xs.remove(0) };
280                _lua_set(list.clone(), _lua_op!(add, _lua_len(list.clone(), loc), _lua_num!(1), loc), value.clone(), loc);
281            } else {
282                let list = if xs.is_empty() { _lua_nil() } else { xs.remove(0) };
283                let pos = (if xs.is_empty() { _lua_nil() } else { xs.remove(0) }).as_f64(loc) as usize;
284                let value = if xs.is_empty() { _lua_nil() } else { xs.remove(0) };
285                let len = _lua_len(list.clone(), loc).as_f64(loc) as usize;
286                for i in (pos..=len).rev() {
287                    _lua_set(list.clone(), _lua_op!(add, _lua_num!(i), _lua_num!(1), loc), _lua_lookup(list.clone(), _lua_num!(i), loc), loc);
288                }
289                _lua_set(list.clone(), _lua_num!(pos), value, loc);
290            }
291            _lua_nil()
292        }))),
293    ])));
294    let string = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![
295        // https://www.lua.org/manual/5.3/manual.html#pdf-string.sub
296        // 只支持正整数
297        (_lua_str("sub"), _lua_lambda(Box::new(|mut xs, loc| {
298            let s: String = (if xs.is_empty() { _lua_nil() } else { xs.remove(0) }).as_string(loc).clone();
299            let i = (if xs.is_empty() { _lua_nil() } else { xs.remove(0) }).as_f64(loc) as usize;
300            let j = (if xs.is_empty() { _lua_nil() } else { xs.remove(0) }).as_f64(loc) as usize;
301            _lua_str(&s.chars().collect::<Vec<char>>()[i-1..j].iter().collect::<String>())
302        }))),
303    ])));
304let __TS__ArrayPush = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
305*__TS__ArrayPush.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
306let arr = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
307let mut _lua_tmp_vararg = _lua_vec(_lua_arg_tmp);
308let items = std::sync::Arc::new(std::cell::RefCell::new(_lua_tmp_vararg.clone()));
309let _lua_tmp_t={ let _lua_tmp = items.borrow(); _lua_tmp.clone() };
310for _lua_tmp_k in 1..=(_lua_len(_lua_tmp_t.clone(), _lua_debug_loc { start: (23, 29), end: (23, 34) }).as_f64(_lua_debug_loc { start: (23, 29), end: (23, 34) }) as usize) {
311let ____=std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(_lua_tmp_k)));
312let item=std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup(_lua_tmp_t.clone(),____.borrow().clone(), _lua_debug_loc { start: (23, 29), end: (23, 34) })));
313_lua_set({ let _lua_tmp = arr.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_len({ let _lua_tmp = arr.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (24, 12), end: (24, 16) }), _lua_num!(1), _lua_debug_loc { start: (24, 12), end: (24, 20) }},{ let _lua_tmp = item.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (24, 8), end: (24, 28) });
314}
315return _lua_len({ let _lua_tmp = arr.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (26, 11), end: (26, 15) });
316
317_lua_nil()
318}}));
319let __TS__ArrayUnshift = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
320*__TS__ArrayUnshift.borrow_mut() = _lua_lambda(Box::new({let table = table.clone();
321move |mut _lua_arg_tmp, _| {
322let arr = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
323let mut _lua_tmp_vararg = _lua_vec(_lua_arg_tmp);
324let items = std::sync::Arc::new(std::cell::RefCell::new(_lua_tmp_vararg.clone()));
325{
326let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_op!{sub, _lua_len({ let _lua_tmp = items.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (32, 18), end: (32, 24) }), _lua_num!(1), _lua_debug_loc { start: (32, 18), end: (32, 28) }}));
327while (_lua_op!{greater_eq, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (33, 14), end: (33, 20) }}).as_bool(_lua_debug_loc { start: (33, 8), end: (36, 11) }) {
328_lua_call(_lua_lookup({ let _lua_tmp = table.borrow(); _lua_tmp.clone() },_lua_str("insert"), _lua_debug_loc { start: (34, 12), end: (34, 46) }), vec![{ let _lua_tmp = arr.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_lookup({ let _lua_tmp = items.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (34, 39), end: (34, 44) }}, _lua_debug_loc { start: (34, 33), end: (34, 44) })], _lua_debug_loc { start: (34, 12), end: (34, 46) });
329*i.borrow_mut() = _lua_op!{sub, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (35, 16), end: (35, 21) }};
330}
331}
332return _lua_len({ let _lua_tmp = arr.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (38, 11), end: (38, 15) });
333
334_lua_nil()
335}}));
336let LANG_ERROR = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
337let LANG_ASSERT = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
338let recordstring_null_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
339let recordstring_shadow_copy = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
340let trampoline_return = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
341let trampoline_delay = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
342let atom_t = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
343let construction_t = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
344let null_t = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
345let data_t = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
346let just_t = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
347let delay_evaluate_t = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
348let delay_builtin_func_t = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
349let delay_builtin_form_t = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
350let delay_apply_t = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
351let comment_t = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
352let hole_t = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
353let new_comment = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
354let comment_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
355let comment_comment = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
356let comment_x = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
357let un_comment_all = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
358let atom_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
359let un_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
360let atom_equal_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
361let new_construction = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
362let construction_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
363let construction_head = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
364let construction_tail = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
365let null_v = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
366let null_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
367let new_data = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
368let data_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
369let data_name = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
370let data_list = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
371let just_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
372let un_just = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
373let evaluate = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
374let delay_evaluate_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
375let delay_evaluate_env = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
376let delay_evaluate_x = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
377let builtin_form_apply = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
378let delay_builtin_form_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
379let delay_builtin_form_env = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
380let delay_builtin_form_f = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
381let delay_builtin_form_xs = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
382let builtin_func_apply = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
383let delay_builtin_func_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
384let delay_builtin_func_f = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
385let delay_builtin_func_xs = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
386let apply = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
387let delay_apply_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
388let delay_apply_f = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
389let delay_apply_xs = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
390let force_all_rec = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
391let unlazy_all_rec = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
392let new_hole_do = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
393let hole_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
394let lang_assert_equal_set_do = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
395let hole_set_do = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
396let lang_copy_do = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
397let system_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
398let name_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
399let function_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
400let form_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
401let mapping_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
402let error_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
403let the_world_stopped_v = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
404let data_name_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
405let data_list_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
406let data_p_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
407let construction_p_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
408let construction_head_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
409let construction_tail_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
410let atom_p_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
411let null_p_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
412let equal_p_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
413let apply_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
414let evaluate_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
415let if_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
416let quote_form_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
417let lambda_form_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
418let function_builtin_use_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
419let form_builtin_use_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
420let form_use_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
421let comment_form_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
422let new_error = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
423let jsArray_to_list = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
424let new_list = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
425let un_just_all = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
426let delay_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
427let delay_just_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
428let lazy_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
429let force_all_inner = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
430let force1 = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
431let force_all = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
432let force_uncomment_all = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
433let unlazy1 = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
434let unlazy_list_1_keepcomment = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
435let name_unlazy1_p3 = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
436let make_enviroment_null_v = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
437let enviroment_null_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
438let enviroment_helper_print0 = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
439let enviroment_helper_print_step = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
440let enviroment_helper_node_expand = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
441let enviroment_helper_tree_shadow_copy = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
442let enviroment_set_helper = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
443let env_null_v = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
444let env_set = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
445let env_get = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
446let must_env_get = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
447let env2val = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
448let env_foreach = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
449let real_evaluate = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
450let real_builtin_func_apply_s = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
451let real_apply = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
452let real_builtin_func_apply = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
453let real_builtin_form_apply = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
454let make_quote = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
455let new_lambda = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
456let jsbool_equal_p_inner = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
457let equal_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
458let simple_print = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
459*LANG_ERROR.borrow_mut() = _lua_lambda(Box::new({let error = error.clone();
460move |mut _lua_arg_tmp, _| {
461_lua_call({ let _lua_tmp = error.borrow(); _lua_tmp.clone() }, vec![_lua_str("TheLanguage PANIC")], _lua_debug_loc { start: (43, 4), end: (43, 30) });
462
463_lua_nil()
464}}));
465*LANG_ASSERT.borrow_mut() = _lua_lambda(Box::new({let LANG_ERROR = LANG_ERROR.clone();
466move |mut _lua_arg_tmp, _| {
467let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
468if (_lua_not({ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (46, 7), end: (46, 12) })).as_bool(_lua_debug_loc { start: (46, 7), end: (46, 12) }) {
469return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (47, 15), end: (47, 27) });
470}
471
472_lua_nil()
473}}));
474*recordstring_null_p.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
475let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
476for (_lua_tmp_k, _) in { let _lua_tmp: std::collections::HashMap<_lua_data,_lua_data> = if let _lua_data_unpack::Table(t) = &*({ let _lua_tmp = x.borrow(); _lua_tmp.clone() }) { t.0.lock().unwrap().clone() } else { panic!("not table\nat{}", _lua_debug_loc { start: (51, 19), end: (51, 20) }) }; _lua_tmp }.iter() {
477let k=std::sync::Arc::new(std::cell::RefCell::new(_lua_tmp_k.clone()));
478return _lua_false();
479}
480return _lua_true();
481
482_lua_nil()
483}}));
484*recordstring_shadow_copy.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
485let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
486let result = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
487for (_lua_tmp_k, _) in { let _lua_tmp: std::collections::HashMap<_lua_data,_lua_data> = if let _lua_data_unpack::Table(t) = &*({ let _lua_tmp = x.borrow(); _lua_tmp.clone() }) { t.0.lock().unwrap().clone() } else { panic!("not table\nat{}", _lua_debug_loc { start: (58, 19), end: (58, 20) }) }; _lua_tmp }.iter() {
488let k=std::sync::Arc::new(std::cell::RefCell::new(_lua_tmp_k.clone()));
489_lua_set({ let _lua_tmp = result.borrow(); _lua_tmp.clone() },{ let _lua_tmp = k.borrow(); _lua_tmp.clone() },_lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },{ let _lua_tmp = k.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (59, 20), end: (59, 23) }), _lua_debug_loc { start: (59, 8), end: (59, 24) });
490}
491return { let _lua_tmp = result.borrow(); _lua_tmp.clone() };
492
493_lua_nil()
494}}));
495*trampoline_return.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
496let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
497return _lua_lambda(Box::new({let x = x.clone();
498move |mut _lua_arg_tmp, _| {
499return _lua_table(vec![(_lua_num!(1), _lua_false()), (_lua_num!(2), { let _lua_tmp = x.borrow(); _lua_tmp.clone() })]);
500
501_lua_nil()
502}}));
503
504_lua_nil()
505}}));
506*trampoline_delay.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
507let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
508return _lua_lambda(Box::new({let x = x.clone();
509move |mut _lua_arg_tmp, _| {
510return _lua_table(vec![(_lua_num!(1), _lua_true()), (_lua_num!(2), _lua_call({ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (69, 8), end: (69, 11) }))]);
511
512_lua_nil()
513}}));
514
515_lua_nil()
516}}));
517*new_comment.borrow_mut() = _lua_lambda(Box::new({let comment_t = comment_t.clone();
518move |mut _lua_arg_tmp, _| {
519let comment = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
520let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
521return _lua_table(vec![(_lua_num!(1), { let _lua_tmp = comment_t.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = comment.borrow(); _lua_tmp.clone() }), (_lua_num!(3), { let _lua_tmp = x.borrow(); _lua_tmp.clone() })]);
522
523_lua_nil()
524}}));
525*comment_p.borrow_mut() = _lua_lambda(Box::new({let comment_t = comment_t.clone();
526move |mut _lua_arg_tmp, _| {
527let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
528return _lua_op!{eq, _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (76, 11), end: (76, 14) }), { let _lua_tmp = comment_t.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (76, 11), end: (76, 28) }};
529
530_lua_nil()
531}}));
532*comment_comment.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
533let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
534return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (79, 11), end: (79, 14) });
535
536_lua_nil()
537}}));
538*comment_x.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
539let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
540return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (82, 11), end: (82, 14) });
541
542_lua_nil()
543}}));
544*un_comment_all.borrow_mut() = _lua_lambda(Box::new({let comment_p = comment_p.clone();
545let comment_x = comment_x.clone();
546move |mut _lua_arg_tmp, _| {
547let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
548while (_lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (85, 10), end: (85, 22) })).as_bool(_lua_debug_loc { start: (85, 4), end: (87, 7) }) {
549*x.borrow_mut() = _lua_call({ let _lua_tmp = comment_x.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (86, 12), end: (86, 24) });
550}
551return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
552
553_lua_nil()
554}}));
555*atom_p.borrow_mut() = _lua_lambda(Box::new({let atom_t = atom_t.clone();
556move |mut _lua_arg_tmp, _| {
557let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
558return _lua_op!{eq, _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (91, 11), end: (91, 14) }), { let _lua_tmp = atom_t.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (91, 11), end: (91, 25) }};
559
560_lua_nil()
561}}));
562*un_atom.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
563let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
564return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (94, 11), end: (94, 14) });
565
566_lua_nil()
567}}));
568*atom_equal_p.borrow_mut() = _lua_lambda(Box::new({let un_atom = un_atom.clone();
569let lang_assert_equal_set_do = lang_assert_equal_set_do.clone();
570move |mut _lua_arg_tmp, _| {
571let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
572let y = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
573if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (97, 7), end: (97, 13) }}).as_bool(_lua_debug_loc { start: (97, 7), end: (97, 13) }) {
574return _lua_true();
575}
576if (_lua_op!{eq, _lua_call({ let _lua_tmp = un_atom.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (100, 7), end: (100, 17) }), _lua_call({ let _lua_tmp = un_atom.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (100, 21), end: (100, 31) }), _lua_debug_loc { start: (100, 7), end: (100, 31) }}).as_bool(_lua_debug_loc { start: (100, 7), end: (100, 31) }) {
577_lua_call({ let _lua_tmp = lang_assert_equal_set_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (101, 8), end: (101, 38) });
578return _lua_true();
579} else {
580return _lua_false();
581}
582
583_lua_nil()
584}}));
585*new_construction.borrow_mut() = _lua_lambda(Box::new({let construction_t = construction_t.clone();
586move |mut _lua_arg_tmp, _| {
587let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
588let y = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
589return _lua_table(vec![(_lua_num!(1), { let _lua_tmp = construction_t.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = x.borrow(); _lua_tmp.clone() }), (_lua_num!(3), { let _lua_tmp = y.borrow(); _lua_tmp.clone() })]);
590
591_lua_nil()
592}}));
593*construction_p.borrow_mut() = _lua_lambda(Box::new({let construction_t = construction_t.clone();
594move |mut _lua_arg_tmp, _| {
595let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
596return _lua_op!{eq, _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (111, 11), end: (111, 14) }), { let _lua_tmp = construction_t.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (111, 11), end: (111, 33) }};
597
598_lua_nil()
599}}));
600*construction_head.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
601let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
602return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (114, 11), end: (114, 14) });
603
604_lua_nil()
605}}));
606*construction_tail.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
607let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
608return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (117, 11), end: (117, 14) });
609
610_lua_nil()
611}}));
612*null_p.borrow_mut() = _lua_lambda(Box::new({let null_t = null_t.clone();
613move |mut _lua_arg_tmp, _| {
614let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
615return _lua_op!{eq, _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (120, 11), end: (120, 14) }), { let _lua_tmp = null_t.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (120, 11), end: (120, 25) }};
616
617_lua_nil()
618}}));
619*new_data.borrow_mut() = _lua_lambda(Box::new({let data_t = data_t.clone();
620move |mut _lua_arg_tmp, _| {
621let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
622let y = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
623return _lua_table(vec![(_lua_num!(1), { let _lua_tmp = data_t.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = x.borrow(); _lua_tmp.clone() }), (_lua_num!(3), { let _lua_tmp = y.borrow(); _lua_tmp.clone() })]);
624
625_lua_nil()
626}}));
627*data_p.borrow_mut() = _lua_lambda(Box::new({let data_t = data_t.clone();
628move |mut _lua_arg_tmp, _| {
629let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
630return _lua_op!{eq, _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (126, 11), end: (126, 14) }), { let _lua_tmp = data_t.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (126, 11), end: (126, 25) }};
631
632_lua_nil()
633}}));
634*data_name.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
635let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
636return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (129, 11), end: (129, 14) });
637
638_lua_nil()
639}}));
640*data_list.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
641let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
642return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (132, 11), end: (132, 14) });
643
644_lua_nil()
645}}));
646*just_p.borrow_mut() = _lua_lambda(Box::new({let just_t = just_t.clone();
647move |mut _lua_arg_tmp, _| {
648let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
649return _lua_op!{eq, _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (135, 11), end: (135, 14) }), { let _lua_tmp = just_t.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (135, 11), end: (135, 25) }};
650
651_lua_nil()
652}}));
653*un_just.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
654let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
655return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (138, 11), end: (138, 14) });
656
657_lua_nil()
658}}));
659*evaluate.borrow_mut() = _lua_lambda(Box::new({let delay_evaluate_t = delay_evaluate_t.clone();
660move |mut _lua_arg_tmp, _| {
661let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
662let y = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
663return _lua_table(vec![(_lua_num!(1), { let _lua_tmp = delay_evaluate_t.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = x.borrow(); _lua_tmp.clone() }), (_lua_num!(3), { let _lua_tmp = y.borrow(); _lua_tmp.clone() })]);
664
665_lua_nil()
666}}));
667*delay_evaluate_p.borrow_mut() = _lua_lambda(Box::new({let delay_evaluate_t = delay_evaluate_t.clone();
668move |mut _lua_arg_tmp, _| {
669let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
670return _lua_op!{eq, _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (144, 11), end: (144, 14) }), { let _lua_tmp = delay_evaluate_t.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (144, 11), end: (144, 35) }};
671
672_lua_nil()
673}}));
674*delay_evaluate_env.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
675let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
676return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (147, 11), end: (147, 14) });
677
678_lua_nil()
679}}));
680*delay_evaluate_x.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
681let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
682return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (150, 11), end: (150, 14) });
683
684_lua_nil()
685}}));
686*builtin_form_apply.borrow_mut() = _lua_lambda(Box::new({let delay_builtin_form_t = delay_builtin_form_t.clone();
687move |mut _lua_arg_tmp, _| {
688let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
689let y = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
690let z = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
691return _lua_table(vec![(_lua_num!(1), { let _lua_tmp = delay_builtin_form_t.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = x.borrow(); _lua_tmp.clone() }), (_lua_num!(3), { let _lua_tmp = y.borrow(); _lua_tmp.clone() }), (_lua_num!(4), { let _lua_tmp = z.borrow(); _lua_tmp.clone() })]);
692
693_lua_nil()
694}}));
695*delay_builtin_form_p.borrow_mut() = _lua_lambda(Box::new({let delay_builtin_form_t = delay_builtin_form_t.clone();
696move |mut _lua_arg_tmp, _| {
697let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
698return _lua_op!{eq, _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (156, 11), end: (156, 14) }), { let _lua_tmp = delay_builtin_form_t.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (156, 11), end: (156, 39) }};
699
700_lua_nil()
701}}));
702*delay_builtin_form_env.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
703let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
704return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (159, 11), end: (159, 14) });
705
706_lua_nil()
707}}));
708*delay_builtin_form_f.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
709let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
710return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (162, 11), end: (162, 14) });
711
712_lua_nil()
713}}));
714*delay_builtin_form_xs.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
715let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
716return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(4), _lua_debug_loc { start: (165, 11), end: (165, 14) });
717
718_lua_nil()
719}}));
720*builtin_func_apply.borrow_mut() = _lua_lambda(Box::new({let delay_builtin_func_t = delay_builtin_func_t.clone();
721move |mut _lua_arg_tmp, _| {
722let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
723let y = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
724return _lua_table(vec![(_lua_num!(1), { let _lua_tmp = delay_builtin_func_t.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = x.borrow(); _lua_tmp.clone() }), (_lua_num!(3), { let _lua_tmp = y.borrow(); _lua_tmp.clone() })]);
725
726_lua_nil()
727}}));
728*delay_builtin_func_p.borrow_mut() = _lua_lambda(Box::new({let delay_builtin_func_t = delay_builtin_func_t.clone();
729move |mut _lua_arg_tmp, _| {
730let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
731return _lua_op!{eq, _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (171, 11), end: (171, 14) }), { let _lua_tmp = delay_builtin_func_t.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (171, 11), end: (171, 39) }};
732
733_lua_nil()
734}}));
735*delay_builtin_func_f.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
736let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
737return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (174, 11), end: (174, 14) });
738
739_lua_nil()
740}}));
741*delay_builtin_func_xs.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
742let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
743return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (177, 11), end: (177, 14) });
744
745_lua_nil()
746}}));
747*apply.borrow_mut() = _lua_lambda(Box::new({let delay_apply_t = delay_apply_t.clone();
748move |mut _lua_arg_tmp, _| {
749let f = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
750let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
751return _lua_table(vec![(_lua_num!(1), { let _lua_tmp = delay_apply_t.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = f.borrow(); _lua_tmp.clone() }), (_lua_num!(3), { let _lua_tmp = xs.borrow(); _lua_tmp.clone() })]);
752
753_lua_nil()
754}}));
755*delay_apply_p.borrow_mut() = _lua_lambda(Box::new({let delay_apply_t = delay_apply_t.clone();
756move |mut _lua_arg_tmp, _| {
757let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
758return _lua_op!{eq, _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (183, 11), end: (183, 14) }), { let _lua_tmp = delay_apply_t.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (183, 11), end: (183, 32) }};
759
760_lua_nil()
761}}));
762*delay_apply_f.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
763let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
764return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (186, 11), end: (186, 14) });
765
766_lua_nil()
767}}));
768*delay_apply_xs.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
769let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
770return _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (189, 11), end: (189, 14) });
771
772_lua_nil()
773}}));
774*force_all_rec.borrow_mut() = _lua_lambda(Box::new({let force_all = force_all.clone();
775let force_all_rec = force_all_rec.clone();
776let data_p = data_p.clone();
777let construction_p = construction_p.clone();
778let comment_p = comment_p.clone();
779move |mut _lua_arg_tmp, _| {
780let raw = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
781let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = raw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (192, 14), end: (192, 28) })));
782let conslike = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
783*conslike.borrow_mut() = _lua_lambda(Box::new({let force_all_rec = force_all_rec.clone();
784move |mut _lua_arg_tmp, _| {
785let xx = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
786_lua_set({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(2),_lua_call({ let _lua_tmp = force_all_rec.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (194, 30), end: (194, 34) })], _lua_debug_loc { start: (194, 16), end: (194, 36) }), _lua_debug_loc { start: (194, 8), end: (194, 36) });
787_lua_set({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(3),_lua_call({ let _lua_tmp = force_all_rec.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (195, 30), end: (195, 34) })], _lua_debug_loc { start: (195, 16), end: (195, 36) }), _lua_debug_loc { start: (195, 8), end: (195, 36) });
788return { let _lua_tmp = xx.borrow(); _lua_tmp.clone() };
789
790_lua_nil()
791}}));
792if (_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (198, 7), end: (198, 16) })).as_bool(_lua_debug_loc { start: (198, 7), end: (198, 16) }) {
793return _lua_call({ let _lua_tmp = conslike.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (199, 15), end: (199, 26) });
794} else if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (200, 11), end: (200, 28) })).as_bool(_lua_debug_loc { start: (200, 11), end: (200, 28) }) {
795return _lua_call({ let _lua_tmp = conslike.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (201, 15), end: (201, 26) });
796} else if (_lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (202, 11), end: (202, 23) })).as_bool(_lua_debug_loc { start: (202, 11), end: (202, 23) }) {
797return _lua_call({ let _lua_tmp = conslike.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (203, 15), end: (203, 26) });
798}
799return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
800
801_lua_nil()
802}}));
803*new_hole_do.borrow_mut() = _lua_lambda(Box::new({let hole_t = hole_t.clone();
804move |mut _lua_arg_tmp, _| {
805return _lua_table(vec![(_lua_num!(1), { let _lua_tmp = hole_t.borrow(); _lua_tmp.clone() })]);
806
807_lua_nil()
808}}));
809*hole_p.borrow_mut() = _lua_lambda(Box::new({let hole_t = hole_t.clone();
810move |mut _lua_arg_tmp, _| {
811let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
812return _lua_op!{eq, _lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (211, 11), end: (211, 14) }), { let _lua_tmp = hole_t.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (211, 11), end: (211, 25) }};
813
814_lua_nil()
815}}));
816*lang_assert_equal_set_do.borrow_mut() = _lua_lambda(Box::new({let null_v = null_v.clone();
817let just_t = just_t.clone();
818move |mut _lua_arg_tmp, _| {
819let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
820let y = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
821if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (214, 7), end: (214, 13) }}).as_bool(_lua_debug_loc { start: (214, 7), end: (214, 13) }) {
822return _lua_nil();
823}
824if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (217, 7), end: (217, 18) }}).as_bool(_lua_debug_loc { start: (217, 7), end: (217, 18) }) {
825*x.borrow_mut() = { let _lua_tmp = y.borrow(); _lua_tmp.clone() };
826*y.borrow_mut() = { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() };
827}
828_lua_set({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(1),{ let _lua_tmp = just_t.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (221, 4), end: (221, 17) });
829_lua_set({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(2),{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (222, 4), end: (222, 12) });
830_lua_set({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(3),_lua_false(), _lua_debug_loc { start: (223, 4), end: (223, 16) });
831_lua_set({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(4),_lua_false(), _lua_debug_loc { start: (224, 4), end: (224, 16) });
832
833_lua_nil()
834}}));
835*hole_set_do.borrow_mut() = _lua_lambda(Box::new({let LANG_ASSERT = LANG_ASSERT.clone();
836let hole_p = hole_p.clone();
837move |mut _lua_arg_tmp, _| {
838let rawx = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
839let rawy = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
840_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = hole_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = rawx.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (228, 8), end: (228, 20) })], _lua_debug_loc { start: (227, 4), end: (229, 5) });
841_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_not(_lua_call({ let _lua_tmp = hole_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = rawy.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (231, 12), end: (231, 24) }), _lua_debug_loc { start: (231, 8), end: (231, 24) })], _lua_debug_loc { start: (230, 4), end: (232, 5) });
842let x = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = rawx.borrow(); _lua_tmp.clone() }));
843let y = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = rawy.borrow(); _lua_tmp.clone() }));
844_lua_set({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(1),_lua_lookup({ let _lua_tmp = y.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (235, 11), end: (235, 14) }), _lua_debug_loc { start: (235, 4), end: (235, 15) });
845_lua_set({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(2),_lua_lookup({ let _lua_tmp = y.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (236, 11), end: (236, 14) }), _lua_debug_loc { start: (236, 4), end: (236, 15) });
846_lua_set({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(3),_lua_lookup({ let _lua_tmp = y.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (237, 11), end: (237, 14) }), _lua_debug_loc { start: (237, 4), end: (237, 15) });
847_lua_set({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(4),_lua_lookup({ let _lua_tmp = y.borrow(); _lua_tmp.clone() },_lua_num!(4), _lua_debug_loc { start: (238, 11), end: (238, 14) }), _lua_debug_loc { start: (238, 4), end: (238, 15) });
848
849_lua_nil()
850}}));
851*lang_copy_do.borrow_mut() = _lua_lambda(Box::new({let new_hole_do = new_hole_do.clone();
852let hole_set_do = hole_set_do.clone();
853move |mut _lua_arg_tmp, _| {
854let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
855let ret = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_hole_do.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (241, 16), end: (241, 29) })));
856_lua_call({ let _lua_tmp = hole_set_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (242, 4), end: (242, 23) });
857return { let _lua_tmp = ret.borrow(); _lua_tmp.clone() };
858
859_lua_nil()
860}}));
861*new_error.borrow_mut() = _lua_lambda(Box::new({let new_data = new_data.clone();
862let error_atom = error_atom.clone();
863let new_construction = new_construction.clone();
864let null_v = null_v.clone();
865move |mut _lua_arg_tmp, _| {
866let name = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
867let list = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
868return _lua_call({ let _lua_tmp = new_data.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = error_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = name.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list.borrow(); _lua_tmp.clone() }, { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (250, 12), end: (250, 42) })], _lua_debug_loc { start: (248, 8), end: (251, 9) })], _lua_debug_loc { start: (246, 11), end: (252, 5) });
869
870_lua_nil()
871}}));
872*jsArray_to_list.borrow_mut() = _lua_lambda(Box::new({let null_v = null_v.clone();
873let new_construction = new_construction.clone();
874move |mut _lua_arg_tmp, _| {
875let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
876let ret = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }));
877{
878let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_op!{sub, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (257, 18), end: (257, 21) }), _lua_num!(1), _lua_debug_loc { start: (257, 18), end: (257, 25) }}));
879while (_lua_op!{greater_eq, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (258, 14), end: (258, 20) }}).as_bool(_lua_debug_loc { start: (258, 8), end: (261, 11) }) {
880*ret.borrow_mut() = _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (259, 38), end: (259, 43) }}, _lua_debug_loc { start: (259, 35), end: (259, 43) }), { let _lua_tmp = ret.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (259, 18), end: (259, 50) });
881*i.borrow_mut() = _lua_op!{sub, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (260, 16), end: (260, 21) }};
882}
883}
884return { let _lua_tmp = ret.borrow(); _lua_tmp.clone() };
885
886_lua_nil()
887}}));
888*new_list.borrow_mut() = _lua_lambda(Box::new({let jsArray_to_list = jsArray_to_list.clone();
889move |mut _lua_arg_tmp, _| {
890let mut _lua_tmp_vararg = _lua_vec(_lua_arg_tmp);
891let xs = std::sync::Arc::new(std::cell::RefCell::new(_lua_tmp_vararg.clone()));
892return _lua_call({ let _lua_tmp = jsArray_to_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (267, 11), end: (267, 30) });
893
894_lua_nil()
895}}));
896*un_just_all.borrow_mut() = _lua_lambda(Box::new({let just_p = just_p.clone();
897let __TS__ArrayPush = __TS__ArrayPush.clone();
898let un_just = un_just.clone();
899let lang_assert_equal_set_do = lang_assert_equal_set_do.clone();
900move |mut _lua_arg_tmp, _| {
901let raw = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
902if (_lua_not(_lua_call({ let _lua_tmp = just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = raw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (270, 11), end: (270, 22) }), _lua_debug_loc { start: (270, 7), end: (270, 22) })).as_bool(_lua_debug_loc { start: (270, 7), end: (270, 22) }) {
903return { let _lua_tmp = raw.borrow(); _lua_tmp.clone() };
904}
905let x = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = raw.borrow(); _lua_tmp.clone() }));
906let xs = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
907while (_lua_call({ let _lua_tmp = just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (275, 10), end: (275, 19) })).as_bool(_lua_debug_loc { start: (275, 4), end: (278, 7) }) {
908_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (276, 8), end: (276, 30) });
909*x.borrow_mut() = _lua_call({ let _lua_tmp = un_just.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (277, 12), end: (277, 22) });
910}
911let _lua_tmp_t={ let _lua_tmp = xs.borrow(); _lua_tmp.clone() };
912for _lua_tmp_k in 1..=(_lua_len(_lua_tmp_t.clone(), _lua_debug_loc { start: (279, 26), end: (279, 28) }).as_f64(_lua_debug_loc { start: (279, 26), end: (279, 28) }) as usize) {
913let ____=std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(_lua_tmp_k)));
914let v=std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup(_lua_tmp_t.clone(),____.borrow().clone(), _lua_debug_loc { start: (279, 26), end: (279, 28) })));
915_lua_call({ let _lua_tmp = lang_assert_equal_set_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = v.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (280, 8), end: (280, 38) });
916}
917return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
918
919_lua_nil()
920}}));
921*delay_p.borrow_mut() = _lua_lambda(Box::new({let delay_evaluate_p = delay_evaluate_p.clone();
922let delay_builtin_form_p = delay_builtin_form_p.clone();
923let delay_builtin_func_p = delay_builtin_func_p.clone();
924let delay_apply_p = delay_apply_p.clone();
925move |mut _lua_arg_tmp, _| {
926let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
927return _lua_op!{or, _lua_op!{or, _lua_op!{or, _lua_call({ let _lua_tmp = delay_evaluate_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (285, 11), end: (285, 30) }), _lua_call({ let _lua_tmp = delay_builtin_form_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (285, 34), end: (285, 57) }), _lua_debug_loc { start: (285, 11), end: (285, 104) }}, _lua_call({ let _lua_tmp = delay_builtin_func_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (285, 61), end: (285, 84) }), _lua_debug_loc { start: (285, 11), end: (285, 104) }}, _lua_call({ let _lua_tmp = delay_apply_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (285, 88), end: (285, 104) }), _lua_debug_loc { start: (285, 11), end: (285, 104) }};
928
929_lua_nil()
930}}));
931*delay_just_p.borrow_mut() = _lua_lambda(Box::new({let just_p = just_p.clone();
932let delay_p = delay_p.clone();
933move |mut _lua_arg_tmp, _| {
934let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
935return _lua_op!{or, _lua_call({ let _lua_tmp = just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (288, 11), end: (288, 20) }), _lua_call({ let _lua_tmp = delay_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (288, 24), end: (288, 34) }), _lua_debug_loc { start: (288, 11), end: (288, 34) }};
936
937_lua_nil()
938}}));
939*lazy_p.borrow_mut() = _lua_lambda(Box::new({let delay_just_p = delay_just_p.clone();
940let comment_p = comment_p.clone();
941move |mut _lua_arg_tmp, _| {
942let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
943return _lua_op!{or, _lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (291, 11), end: (291, 26) }), _lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (291, 30), end: (291, 42) }), _lua_debug_loc { start: (291, 11), end: (291, 42) }};
944
945_lua_nil()
946}}));
947*force_all_inner.borrow_mut() = _lua_lambda(Box::new({let lang_assert_equal_set_do = lang_assert_equal_set_do.clone();
948let delay_just_p = delay_just_p.clone();
949let __TS__ArrayPush = __TS__ArrayPush.clone();
950let force_all_inner = force_all_inner.clone();
951let the_world_stopped_v = the_world_stopped_v.clone();
952let force1 = force1.clone();
953let simple_print = simple_print.clone();
954let delay_evaluate_p = delay_evaluate_p.clone();
955let delay_builtin_func_p = delay_builtin_func_p.clone();
956let delay_builtin_func_f = delay_builtin_func_f.clone();
957let delay_builtin_func_xs = delay_builtin_func_xs.clone();
958let data_name_function_builtin_systemName = data_name_function_builtin_systemName.clone();
959let data_list_function_builtin_systemName = data_list_function_builtin_systemName.clone();
960let data_p_function_builtin_systemName = data_p_function_builtin_systemName.clone();
961let construction_p_function_builtin_systemName = construction_p_function_builtin_systemName.clone();
962let construction_head_function_builtin_systemName = construction_head_function_builtin_systemName.clone();
963let construction_tail_function_builtin_systemName = construction_tail_function_builtin_systemName.clone();
964let atom_p_function_builtin_systemName = atom_p_function_builtin_systemName.clone();
965let null_p_function_builtin_systemName = null_p_function_builtin_systemName.clone();
966let equal_p = equal_p.clone();
967let LANG_ASSERT = LANG_ASSERT.clone();
968let builtin_func_apply = builtin_func_apply.clone();
969let LANG_ERROR = LANG_ERROR.clone();
970let equal_p_function_builtin_systemName = equal_p_function_builtin_systemName.clone();
971let apply_function_builtin_systemName = apply_function_builtin_systemName.clone();
972let evaluate_function_builtin_systemName = evaluate_function_builtin_systemName.clone();
973let if_function_builtin_systemName = if_function_builtin_systemName.clone();
974let delay_builtin_form_p = delay_builtin_form_p.clone();
975let delay_apply_p = delay_apply_p.clone();
976move |mut _lua_arg_tmp, _| {
977let raw = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
978let parents_history = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
979let ref_novalue_replace = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
980let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
981if (_lua_op!{eq, { let _lua_tmp = parents_history.borrow(); _lua_tmp.clone() }, _lua_nil(), _lua_debug_loc { start: (294, 7), end: (294, 29) }}).as_bool(_lua_debug_loc { start: (294, 7), end: (294, 29) }) {
982*parents_history.borrow_mut() = _lua_table(vec![]);
983}
984if (_lua_op!{eq, { let _lua_tmp = ref_novalue_replace.borrow(); _lua_tmp.clone() }, _lua_nil(), _lua_debug_loc { start: (297, 7), end: (297, 33) }}).as_bool(_lua_debug_loc { start: (297, 7), end: (297, 33) }) {
985*ref_novalue_replace.borrow_mut() = _lua_table(vec![(_lua_num!(1), _lua_false()), (_lua_num!(2), _lua_false())]);
986}
987if (_lua_op!{eq, { let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_nil(), _lua_debug_loc { start: (300, 7), end: (300, 16) }}).as_bool(_lua_debug_loc { start: (300, 7), end: (300, 16) }) {
988*xs.borrow_mut() = _lua_table(vec![]);
989}
990let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
991let do_rewrite = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
992let do_rewrite_force_all = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
993*do_rewrite.borrow_mut() = _lua_lambda(Box::new({let lang_assert_equal_set_do = lang_assert_equal_set_do.clone();
994let x = x.clone();
995let xs = xs.clone();
996move |mut _lua_arg_tmp, _| {
997let newval = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
998_lua_call({ let _lua_tmp = lang_assert_equal_set_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = newval.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (305, 8), end: (305, 43) });
999{
1000let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(0)));
1001while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (308, 22), end: (308, 25) }), _lua_debug_loc { start: (308, 18), end: (308, 25) }}).as_bool(_lua_debug_loc { start: (308, 12), end: (311, 15) }) {
1002_lua_call({ let _lua_tmp = lang_assert_equal_set_do.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (309, 44), end: (309, 49) }}, _lua_debug_loc { start: (309, 41), end: (309, 49) }), { let _lua_tmp = newval.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (309, 16), end: (309, 59) });
1003*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (310, 20), end: (310, 25) }};
1004}
1005}
1006return { let _lua_tmp = newval.borrow(); _lua_tmp.clone() };
1007
1008_lua_nil()
1009}}));
1010*do_rewrite_force_all.borrow_mut() = _lua_lambda(Box::new({let do_rewrite = do_rewrite.clone();
1011let delay_just_p = delay_just_p.clone();
1012let __TS__ArrayPush = __TS__ArrayPush.clone();
1013let xs = xs.clone();
1014let x = x.clone();
1015let force_all_inner = force_all_inner.clone();
1016let parents_history = parents_history.clone();
1017move |mut _lua_arg_tmp, _| {
1018let newval = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1019_lua_call({ let _lua_tmp = do_rewrite.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = newval.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (316, 8), end: (316, 26) });
1020if (_lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = newval.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (317, 11), end: (317, 31) })).as_bool(_lua_debug_loc { start: (317, 11), end: (317, 31) }) {
1021_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (318, 12), end: (318, 34) });
1022return _lua_call({ let _lua_tmp = force_all_inner.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = newval.borrow(); _lua_tmp.clone() }, { let _lua_tmp = parents_history.borrow(); _lua_tmp.clone() }, _lua_table(vec![(_lua_num!(1), _lua_false()), (_lua_num!(2), _lua_false())]), { let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (319, 19), end: (319, 79) });
1023}
1024return { let _lua_tmp = newval.borrow(); _lua_tmp.clone() };
1025
1026_lua_nil()
1027}}));
1028let history = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
1029*x.borrow_mut() = { let _lua_tmp = raw.borrow(); _lua_tmp.clone() };
1030let replace_this_with_stopped = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
1031*replace_this_with_stopped.borrow_mut() = _lua_lambda(Box::new({let ref_novalue_replace = ref_novalue_replace.clone();
1032let do_rewrite_force_all = do_rewrite_force_all.clone();
1033let the_world_stopped_v = the_world_stopped_v.clone();
1034move |mut _lua_arg_tmp, _| {
1035_lua_set({ let _lua_tmp = ref_novalue_replace.borrow(); _lua_tmp.clone() },_lua_num!(2),_lua_true(), _lua_debug_loc { start: (326, 8), end: (326, 37) });
1036return _lua_call({ let _lua_tmp = do_rewrite_force_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = the_world_stopped_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (327, 15), end: (327, 56) });
1037
1038_lua_nil()
1039}}));
1040let make_history = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
1041*make_history.borrow_mut() = _lua_lambda(Box::new({let history = history.clone();
1042let parents_history = parents_history.clone();
1043move |mut _lua_arg_tmp, _| {
1044let ret = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
1045for (_lua_tmp_k, _) in { let _lua_tmp: std::collections::HashMap<_lua_data,_lua_data> = if let _lua_data_unpack::Table(t) = &*({ let _lua_tmp = history.borrow(); _lua_tmp.clone() }) { t.0.lock().unwrap().clone() } else { panic!("not table\nat{}", _lua_debug_loc { start: (331, 26), end: (331, 33) }) }; _lua_tmp }.iter() {
1046let x_id=std::sync::Arc::new(std::cell::RefCell::new(_lua_tmp_k.clone()));
1047_lua_set({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() },{ let _lua_tmp = x_id.borrow(); _lua_tmp.clone() },_lua_true(), _lua_debug_loc { start: (332, 12), end: (332, 28) });
1048}
1049for (_lua_tmp_k, _) in { let _lua_tmp: std::collections::HashMap<_lua_data,_lua_data> = if let _lua_data_unpack::Table(t) = &*({ let _lua_tmp = parents_history.borrow(); _lua_tmp.clone() }) { t.0.lock().unwrap().clone() } else { panic!("not table\nat{}", _lua_debug_loc { start: (334, 26), end: (334, 41) }) }; _lua_tmp }.iter() {
1050let x_id=std::sync::Arc::new(std::cell::RefCell::new(_lua_tmp_k.clone()));
1051_lua_set({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() },{ let _lua_tmp = x_id.borrow(); _lua_tmp.clone() },_lua_true(), _lua_debug_loc { start: (335, 12), end: (335, 28) });
1052}
1053return { let _lua_tmp = ret.borrow(); _lua_tmp.clone() };
1054
1055_lua_nil()
1056}}));
1057{
1058let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(0)));
1059while (_lua_op!{and, _lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (341, 14), end: (341, 29) }), _lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(32), _lua_debug_loc { start: (341, 34), end: (341, 40) }}, _lua_debug_loc { start: (341, 14), end: (341, 40) }}).as_bool(_lua_debug_loc { start: (341, 8), end: (345, 11) }) {
1060_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (342, 12), end: (342, 34) });
1061*x.borrow_mut() = _lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (343, 16), end: (343, 25) });
1062*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (344, 16), end: (344, 21) }};
1063}
1064}
1065while (_lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (347, 10), end: (347, 25) })).as_bool(_lua_debug_loc { start: (347, 4), end: (416, 7) }) {
1066let x_id = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (348, 21), end: (348, 36) })));
1067if (_lua_op!{eq, _lua_lookup({ let _lua_tmp = parents_history.borrow(); _lua_tmp.clone() },{ let _lua_tmp = x_id.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (349, 11), end: (349, 31) }), _lua_true(), _lua_debug_loc { start: (349, 11), end: (349, 40) }}).as_bool(_lua_debug_loc { start: (349, 11), end: (349, 40) }) {
1068return _lua_call({ let _lua_tmp = replace_this_with_stopped.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (350, 19), end: (350, 46) });
1069}
1070if (_lua_op!{eq, _lua_lookup({ let _lua_tmp = history.borrow(); _lua_tmp.clone() },{ let _lua_tmp = x_id.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (352, 11), end: (352, 23) }), _lua_true(), _lua_debug_loc { start: (352, 11), end: (352, 32) }}).as_bool(_lua_debug_loc { start: (352, 11), end: (352, 32) }) {
1071_lua_set({ let _lua_tmp = ref_novalue_replace.borrow(); _lua_tmp.clone() },_lua_num!(1),_lua_true(), _lua_debug_loc { start: (353, 12), end: (353, 41) });
1072if (_lua_call({ let _lua_tmp = delay_evaluate_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (354, 15), end: (354, 34) })).as_bool(_lua_debug_loc { start: (354, 15), end: (354, 34) }) {
1073return _lua_call({ let _lua_tmp = replace_this_with_stopped.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (355, 23), end: (355, 50) });
1074} else if (_lua_call({ let _lua_tmp = delay_builtin_func_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (356, 19), end: (356, 42) })).as_bool(_lua_debug_loc { start: (356, 19), end: (356, 42) }) {
1075let f = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = delay_builtin_func_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (357, 26), end: (357, 49) })));
1076let xs = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = delay_builtin_func_xs.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (358, 27), end: (358, 51) })));
1077let elim_s = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![(_lua_num!(1), { let _lua_tmp = data_name_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = data_list_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(3), { let _lua_tmp = data_p_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(4), { let _lua_tmp = construction_p_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(5), { let _lua_tmp = construction_head_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(6), { let _lua_tmp = construction_tail_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(7), { let _lua_tmp = atom_p_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(8), { let _lua_tmp = null_p_function_builtin_systemName.borrow(); _lua_tmp.clone() })])));
1078let is_elim = std::sync::Arc::new(std::cell::RefCell::new(_lua_false()));
1079let _lua_tmp_t={ let _lua_tmp = elim_s.borrow(); _lua_tmp.clone() };
1080for _lua_tmp_k in 1..=(_lua_len(_lua_tmp_t.clone(), _lua_debug_loc { start: (361, 45), end: (361, 51) }).as_f64(_lua_debug_loc { start: (361, 45), end: (361, 51) }) as usize) {
1081let ____=std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(_lua_tmp_k)));
1082let elim_s_v=std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup(_lua_tmp_t.clone(),____.borrow().clone(), _lua_debug_loc { start: (361, 45), end: (361, 51) })));
1083if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = elim_s_v.borrow(); _lua_tmp.clone() }, { let _lua_tmp = f.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (362, 23), end: (362, 43) })).as_bool(_lua_debug_loc { start: (362, 23), end: (362, 43) }) {
1084*is_elim.borrow_mut() = _lua_true();
1085break;
1086}
1087}
1088if ({ let _lua_tmp = is_elim.borrow(); _lua_tmp.clone() }).as_bool(_lua_debug_loc { start: (367, 19), end: (367, 26) }) {
1089_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_op!{eq, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (368, 32), end: (368, 35) }), _lua_num!(1), _lua_debug_loc { start: (368, 32), end: (368, 40) }}], _lua_debug_loc { start: (368, 20), end: (368, 41) });
1090_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_op!{eq, _lua_lookup({ let _lua_tmp = ref_novalue_replace.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (369, 32), end: (369, 53) }), _lua_false(), _lua_debug_loc { start: (369, 32), end: (369, 63) }}], _lua_debug_loc { start: (369, 20), end: (369, 64) });
1091let inner = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all_inner.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (371, 24), end: (371, 28) }), _lua_call({ let _lua_tmp = make_history.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (372, 24), end: (372, 38) }), { let _lua_tmp = ref_novalue_replace.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (370, 34), end: (374, 21) })));
1092if (_lua_lookup({ let _lua_tmp = ref_novalue_replace.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (375, 23), end: (375, 44) })).as_bool(_lua_debug_loc { start: (375, 23), end: (375, 44) }) {
1093return _lua_call({ let _lua_tmp = do_rewrite_force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = builtin_func_apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, _lua_table(vec![(_lua_num!(1), { let _lua_tmp = inner.borrow(); _lua_tmp.clone() })])], _lua_debug_loc { start: (377, 28), end: (377, 58) })], _lua_debug_loc { start: (376, 31), end: (378, 25) });
1094} else {
1095return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (380, 31), end: (380, 43) });
1096}
1097}
1098if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, { let _lua_tmp = equal_p_function_builtin_systemName.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (383, 19), end: (383, 66) })).as_bool(_lua_debug_loc { start: (383, 19), end: (383, 66) }) {
1099return _lua_call({ let _lua_tmp = replace_this_with_stopped.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (384, 27), end: (384, 54) });
1100} else if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, { let _lua_tmp = apply_function_builtin_systemName.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (385, 23), end: (385, 68) })).as_bool(_lua_debug_loc { start: (385, 23), end: (385, 68) }) {
1101return _lua_call({ let _lua_tmp = replace_this_with_stopped.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (386, 27), end: (386, 54) });
1102} else if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, { let _lua_tmp = evaluate_function_builtin_systemName.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (387, 23), end: (387, 71) })).as_bool(_lua_debug_loc { start: (387, 23), end: (387, 71) }) {
1103return _lua_call({ let _lua_tmp = replace_this_with_stopped.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (388, 27), end: (388, 54) });
1104} else if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, { let _lua_tmp = if_function_builtin_systemName.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (389, 23), end: (389, 65) })).as_bool(_lua_debug_loc { start: (389, 23), end: (389, 65) }) {
1105_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_op!{eq, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (390, 32), end: (390, 35) }), _lua_num!(3), _lua_debug_loc { start: (390, 32), end: (390, 40) }}], _lua_debug_loc { start: (390, 20), end: (390, 41) });
1106_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_op!{eq, _lua_lookup({ let _lua_tmp = ref_novalue_replace.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (391, 32), end: (391, 53) }), _lua_false(), _lua_debug_loc { start: (391, 32), end: (391, 63) }}], _lua_debug_loc { start: (391, 20), end: (391, 64) });
1107let tf = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all_inner.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (393, 24), end: (393, 28) }), _lua_call({ let _lua_tmp = make_history.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (394, 24), end: (394, 38) }), { let _lua_tmp = ref_novalue_replace.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (392, 31), end: (396, 21) })));
1108if (_lua_lookup({ let _lua_tmp = ref_novalue_replace.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (397, 23), end: (397, 44) })).as_bool(_lua_debug_loc { start: (397, 23), end: (397, 44) }) {
1109return _lua_call({ let _lua_tmp = do_rewrite_force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = builtin_func_apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = if_function_builtin_systemName.borrow(); _lua_tmp.clone() }, _lua_table(vec![(_lua_num!(1), { let _lua_tmp = tf.borrow(); _lua_tmp.clone() }), (_lua_num!(2), _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (399, 84), end: (399, 88) })), (_lua_num!(3), _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (399, 91), end: (399, 95) }))])], _lua_debug_loc { start: (399, 28), end: (399, 98) })], _lua_debug_loc { start: (398, 31), end: (400, 25) });
1110} else {
1111return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (402, 31), end: (402, 43) });
1112}
1113}
1114return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (405, 23), end: (405, 35) });
1115} else if (_lua_call({ let _lua_tmp = delay_builtin_form_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (406, 19), end: (406, 42) })).as_bool(_lua_debug_loc { start: (406, 19), end: (406, 42) }) {
1116return _lua_call({ let _lua_tmp = replace_this_with_stopped.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (407, 23), end: (407, 50) });
1117} else if (_lua_call({ let _lua_tmp = delay_apply_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (408, 19), end: (408, 35) })).as_bool(_lua_debug_loc { start: (408, 19), end: (408, 35) }) {
1118return _lua_call({ let _lua_tmp = replace_this_with_stopped.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (409, 23), end: (409, 50) });
1119}
1120return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (411, 19), end: (411, 31) });
1121}
1122_lua_set({ let _lua_tmp = history.borrow(); _lua_tmp.clone() },{ let _lua_tmp = x_id.borrow(); _lua_tmp.clone() },_lua_true(), _lua_debug_loc { start: (413, 8), end: (413, 28) });
1123_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (414, 8), end: (414, 30) });
1124*x.borrow_mut() = _lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (415, 12), end: (415, 21) });
1125}
1126return _lua_call({ let _lua_tmp = do_rewrite.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (417, 11), end: (417, 24) });
1127
1128_lua_nil()
1129}}));
1130*force1.borrow_mut() = _lua_lambda(Box::new({let un_just_all = un_just_all.clone();
1131let LANG_ASSERT = LANG_ASSERT.clone();
1132let just_p = just_p.clone();
1133let delay_evaluate_p = delay_evaluate_p.clone();
1134let real_evaluate = real_evaluate.clone();
1135let delay_evaluate_env = delay_evaluate_env.clone();
1136let delay_evaluate_x = delay_evaluate_x.clone();
1137let delay_builtin_form_p = delay_builtin_form_p.clone();
1138let real_builtin_form_apply = real_builtin_form_apply.clone();
1139let delay_builtin_form_env = delay_builtin_form_env.clone();
1140let delay_builtin_form_f = delay_builtin_form_f.clone();
1141let delay_builtin_form_xs = delay_builtin_form_xs.clone();
1142let delay_builtin_func_p = delay_builtin_func_p.clone();
1143let real_builtin_func_apply = real_builtin_func_apply.clone();
1144let delay_builtin_func_f = delay_builtin_func_f.clone();
1145let delay_builtin_func_xs = delay_builtin_func_xs.clone();
1146let delay_apply_p = delay_apply_p.clone();
1147let real_apply = real_apply.clone();
1148let delay_apply_f = delay_apply_f.clone();
1149let delay_apply_xs = delay_apply_xs.clone();
1150let lang_assert_equal_set_do = lang_assert_equal_set_do.clone();
1151move |mut _lua_arg_tmp, _| {
1152let raw = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1153let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = un_just_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = raw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (420, 14), end: (420, 30) })));
1154let ret = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
1155_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_not(_lua_call({ let _lua_tmp = just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (423, 12), end: (423, 21) }), _lua_debug_loc { start: (423, 8), end: (423, 21) })], _lua_debug_loc { start: (422, 4), end: (424, 5) });
1156if (_lua_call({ let _lua_tmp = delay_evaluate_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (425, 7), end: (425, 26) })).as_bool(_lua_debug_loc { start: (425, 7), end: (425, 26) }) {
1157*ret.borrow_mut() = _lua_call({ let _lua_tmp = real_evaluate.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_evaluate_env.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (427, 12), end: (427, 33) }), _lua_call({ let _lua_tmp = delay_evaluate_x.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (428, 12), end: (428, 31) }), { let _lua_tmp = raw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (426, 14), end: (430, 9) });
1158} else if (_lua_call({ let _lua_tmp = delay_builtin_form_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (431, 11), end: (431, 34) })).as_bool(_lua_debug_loc { start: (431, 11), end: (431, 34) }) {
1159*ret.borrow_mut() = _lua_call({ let _lua_tmp = real_builtin_form_apply.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_builtin_form_env.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (433, 12), end: (433, 37) }), _lua_call({ let _lua_tmp = delay_builtin_form_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (434, 12), end: (434, 35) }), _lua_call({ let _lua_tmp = delay_builtin_form_xs.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (435, 12), end: (435, 36) }), { let _lua_tmp = raw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (432, 14), end: (437, 9) });
1160} else if (_lua_call({ let _lua_tmp = delay_builtin_func_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (438, 11), end: (438, 34) })).as_bool(_lua_debug_loc { start: (438, 11), end: (438, 34) }) {
1161*ret.borrow_mut() = _lua_call({ let _lua_tmp = real_builtin_func_apply.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_builtin_func_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (440, 12), end: (440, 35) }), _lua_call({ let _lua_tmp = delay_builtin_func_xs.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (441, 12), end: (441, 36) }), { let _lua_tmp = raw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (439, 14), end: (443, 9) });
1162} else if (_lua_call({ let _lua_tmp = delay_apply_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (444, 11), end: (444, 27) })).as_bool(_lua_debug_loc { start: (444, 11), end: (444, 27) }) {
1163*ret.borrow_mut() = _lua_call({ let _lua_tmp = real_apply.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_apply_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (446, 12), end: (446, 28) }), _lua_call({ let _lua_tmp = delay_apply_xs.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (447, 12), end: (447, 29) }), { let _lua_tmp = raw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (445, 14), end: (449, 9) });
1164} else {
1165*ret.borrow_mut() = { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
1166}
1167*ret.borrow_mut() = _lua_call({ let _lua_tmp = un_just_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (453, 10), end: (453, 26) });
1168_lua_call({ let _lua_tmp = lang_assert_equal_set_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = ret.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (454, 4), end: (454, 36) });
1169return { let _lua_tmp = ret.borrow(); _lua_tmp.clone() };
1170
1171_lua_nil()
1172}}));
1173*force_all.borrow_mut() = _lua_lambda(Box::new({let force_all_inner = force_all_inner.clone();
1174move |mut _lua_arg_tmp, _| {
1175let raw = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1176return _lua_call({ let _lua_tmp = force_all_inner.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = raw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (458, 11), end: (458, 31) });
1177
1178_lua_nil()
1179}}));
1180*force_uncomment_all.borrow_mut() = _lua_lambda(Box::new({let delay_just_p = delay_just_p.clone();
1181let comment_p = comment_p.clone();
1182let force_all = force_all.clone();
1183let un_comment_all = un_comment_all.clone();
1184move |mut _lua_arg_tmp, _| {
1185let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1186while (_lua_op!{or, _lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (461, 10), end: (461, 25) }), _lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (461, 29), end: (461, 41) }), _lua_debug_loc { start: (461, 10), end: (461, 41) }}).as_bool(_lua_debug_loc { start: (461, 4), end: (465, 7) }) {
1187*x.borrow_mut() = _lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = un_comment_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (463, 12), end: (463, 29) })], _lua_debug_loc { start: (462, 12), end: (464, 9) });
1188}
1189return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
1190
1191_lua_nil()
1192}}));
1193*unlazy1.borrow_mut() = _lua_lambda(Box::new({let comment_p = comment_p.clone();
1194let comment_x = comment_x.clone();
1195let force1 = force1.clone();
1196move |mut _lua_arg_tmp, _| {
1197let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1198while (_lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (469, 10), end: (469, 22) })).as_bool(_lua_debug_loc { start: (469, 4), end: (471, 7) }) {
1199*x.borrow_mut() = _lua_call({ let _lua_tmp = comment_x.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (470, 12), end: (470, 24) });
1200}
1201*x.borrow_mut() = _lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (472, 8), end: (472, 17) });
1202while (_lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (473, 10), end: (473, 22) })).as_bool(_lua_debug_loc { start: (473, 4), end: (475, 7) }) {
1203*x.borrow_mut() = _lua_call({ let _lua_tmp = comment_x.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (474, 12), end: (474, 24) });
1204}
1205return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
1206
1207_lua_nil()
1208}}));
1209*unlazy_list_1_keepcomment.borrow_mut() = _lua_lambda(Box::new({let un_just_all = un_just_all.clone();
1210let null_p = null_p.clone();
1211let comment_p = comment_p.clone();
1212let __TS__ArrayPush = __TS__ArrayPush.clone();
1213let comment_comment = comment_comment.clone();
1214let comment_x = comment_x.clone();
1215let construction_p = construction_p.clone();
1216let construction_head = construction_head.clone();
1217let construction_tail = construction_tail.clone();
1218let delay_just_p = delay_just_p.clone();
1219let force1 = force1.clone();
1220move |mut _lua_arg_tmp, _| {
1221let list = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1222let not_list_k = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1223let delay_just_k = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1224let k = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1225let ret = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
1226let comments = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
1227let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = un_just_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (481, 14), end: (481, 31) })));
1228let not_forced = std::sync::Arc::new(std::cell::RefCell::new(_lua_true()));
1229while (_lua_true()).as_bool(_lua_debug_loc { start: (483, 4), end: (508, 7) }) {
1230if (_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = i.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (484, 11), end: (484, 20) })).as_bool(_lua_debug_loc { start: (484, 11), end: (484, 20) }) {
1231return _lua_call({ let _lua_tmp = k.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = comments.borrow(); _lua_tmp.clone() }, { let _lua_tmp = ret.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (485, 19), end: (485, 35) });
1232} else if (_lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = i.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (486, 15), end: (486, 27) })).as_bool(_lua_debug_loc { start: (486, 15), end: (486, 27) }) {
1233_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = comments.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = comment_comment.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = i.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (489, 16), end: (489, 34) })], _lua_debug_loc { start: (487, 12), end: (490, 13) });
1234*i.borrow_mut() = _lua_call({ let _lua_tmp = comment_x.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = i.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (491, 16), end: (491, 28) });
1235} else if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = i.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (492, 15), end: (492, 32) })).as_bool(_lua_debug_loc { start: (492, 15), end: (492, 32) }) {
1236_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = i.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (495, 16), end: (495, 36) })], _lua_debug_loc { start: (493, 12), end: (496, 13) });
1237*i.borrow_mut() = _lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = i.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (497, 16), end: (497, 36) });
1238} else if (_lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = i.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (498, 15), end: (498, 30) })).as_bool(_lua_debug_loc { start: (498, 15), end: (498, 30) }) {
1239if ({ let _lua_tmp = not_forced.borrow(); _lua_tmp.clone() }).as_bool(_lua_debug_loc { start: (499, 15), end: (499, 25) }) {
1240*not_forced.borrow_mut() = _lua_false();
1241*i.borrow_mut() = _lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = i.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (501, 20), end: (501, 29) });
1242} else {
1243return _lua_call({ let _lua_tmp = delay_just_k.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (503, 23), end: (503, 37) });
1244}
1245} else {
1246return _lua_call({ let _lua_tmp = not_list_k.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (506, 19), end: (506, 31) });
1247}
1248}
1249
1250_lua_nil()
1251}}));
1252*name_unlazy1_p3.borrow_mut() = _lua_lambda(Box::new({let lazy_p = lazy_p.clone();
1253let unlazy1 = unlazy1.clone();
1254let atom_p = atom_p.clone();
1255let data_p = data_p.clone();
1256let data_name = data_name.clone();
1257let atom_equal_p = atom_equal_p.clone();
1258let name_atom = name_atom.clone();
1259move |mut _lua_arg_tmp, _| {
1260let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1261if (_lua_call({ let _lua_tmp = lazy_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (511, 7), end: (511, 16) })).as_bool(_lua_debug_loc { start: (511, 7), end: (511, 16) }) {
1262*x.borrow_mut() = _lua_call({ let _lua_tmp = unlazy1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (512, 12), end: (512, 22) });
1263}
1264if (_lua_call({ let _lua_tmp = lazy_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (514, 7), end: (514, 16) })).as_bool(_lua_debug_loc { start: (514, 7), end: (514, 16) }) {
1265return _lua_nil();
1266}
1267if (_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (517, 7), end: (517, 16) })).as_bool(_lua_debug_loc { start: (517, 7), end: (517, 16) }) {
1268return _lua_true();
1269}
1270if (_lua_not(_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (520, 11), end: (520, 20) }), _lua_debug_loc { start: (520, 7), end: (520, 20) })).as_bool(_lua_debug_loc { start: (520, 7), end: (520, 20) }) {
1271return _lua_false();
1272}
1273let n = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (523, 14), end: (523, 26) })));
1274if (_lua_call({ let _lua_tmp = lazy_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = n.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (524, 7), end: (524, 16) })).as_bool(_lua_debug_loc { start: (524, 7), end: (524, 16) }) {
1275*n.borrow_mut() = _lua_call({ let _lua_tmp = unlazy1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = n.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (525, 12), end: (525, 22) });
1276}
1277if (_lua_call({ let _lua_tmp = lazy_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = n.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (527, 7), end: (527, 16) })).as_bool(_lua_debug_loc { start: (527, 7), end: (527, 16) }) {
1278return _lua_nil();
1279}
1280if (_lua_not(_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = n.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (530, 11), end: (530, 20) }), _lua_debug_loc { start: (530, 7), end: (530, 20) })).as_bool(_lua_debug_loc { start: (530, 7), end: (530, 20) }) {
1281return _lua_false();
1282}
1283return _lua_call({ let _lua_tmp = atom_equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = n.borrow(); _lua_tmp.clone() }, { let _lua_tmp = name_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (533, 11), end: (533, 37) });
1284
1285_lua_nil()
1286}}));
1287*make_enviroment_null_v.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
1288return _lua_table(vec![(_lua_num!(1), _lua_true()), (_lua_num!(2), _lua_table(vec![])), (_lua_num!(3), _lua_nil())]);
1289
1290_lua_nil()
1291}}));
1292*enviroment_null_p.borrow_mut() = _lua_lambda(Box::new({let recordstring_null_p = recordstring_null_p.clone();
1293move |mut _lua_arg_tmp, _| {
1294let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1295if (_lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (539, 7), end: (539, 10) })).as_bool(_lua_debug_loc { start: (539, 7), end: (539, 10) }) {
1296return _lua_call({ let _lua_tmp = recordstring_null_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (540, 35), end: (540, 38) })], _lua_debug_loc { start: (540, 15), end: (540, 40) });
1297}
1298return _lua_false();
1299
1300_lua_nil()
1301}}));
1302*enviroment_helper_print0.borrow_mut() = _lua_lambda(Box::new({let force_uncomment_all = force_uncomment_all.clone();
1303let atom_p = atom_p.clone();
1304let __TS__ArrayPush = __TS__ArrayPush.clone();
1305let un_atom = un_atom.clone();
1306let construction_p = construction_p.clone();
1307let construction_head = construction_head.clone();
1308let construction_tail = construction_tail.clone();
1309let null_p = null_p.clone();
1310let data_p = data_p.clone();
1311let data_name = data_name.clone();
1312let data_list = data_list.clone();
1313let LANG_ERROR = LANG_ERROR.clone();
1314move |mut _lua_arg_tmp, _| {
1315let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1316let refe = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1317let ret = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1318*x.borrow_mut() = _lua_call({ let _lua_tmp = force_uncomment_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (545, 8), end: (545, 30) });
1319if (_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (546, 7), end: (546, 16) })).as_bool(_lua_debug_loc { start: (546, 7), end: (546, 16) }) {
1320_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }, _lua_str("^"), _lua_call({ let _lua_tmp = un_atom.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (550, 12), end: (550, 22) })], _lua_debug_loc { start: (547, 8), end: (551, 9) });
1321} else if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (552, 11), end: (552, 28) })).as_bool(_lua_debug_loc { start: (552, 11), end: (552, 28) }) {
1322_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }, _lua_str(".")], _lua_debug_loc { start: (553, 8), end: (553, 33) });
1323_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = refe.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (556, 12), end: (556, 32) }), _lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (557, 12), end: (557, 32) })], _lua_debug_loc { start: (554, 8), end: (558, 9) });
1324} else if (_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (559, 11), end: (559, 20) })).as_bool(_lua_debug_loc { start: (559, 11), end: (559, 20) }) {
1325_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }, _lua_str("_")], _lua_debug_loc { start: (560, 8), end: (560, 33) });
1326} else if (_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (561, 11), end: (561, 20) })).as_bool(_lua_debug_loc { start: (561, 11), end: (561, 20) }) {
1327_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }, _lua_str("#")], _lua_debug_loc { start: (562, 8), end: (562, 33) });
1328_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = refe.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (565, 12), end: (565, 24) }), _lua_call({ let _lua_tmp = data_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (566, 12), end: (566, 24) })], _lua_debug_loc { start: (563, 8), end: (567, 9) });
1329} else {
1330return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (569, 15), end: (569, 27) });
1331}
1332
1333_lua_nil()
1334}}));
1335*enviroment_helper_print_step.borrow_mut() = _lua_lambda(Box::new({let enviroment_helper_print0 = enviroment_helper_print0.clone();
1336move |mut _lua_arg_tmp, _| {
1337let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1338let rs = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
1339let ss = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
1340let _lua_tmp_t={ let _lua_tmp = xs.borrow(); _lua_tmp.clone() };
1341for _lua_tmp_k in 1..=(_lua_len(_lua_tmp_t.clone(), _lua_debug_loc { start: (575, 26), end: (575, 28) }).as_f64(_lua_debug_loc { start: (575, 26), end: (575, 28) }) as usize) {
1342let ____=std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(_lua_tmp_k)));
1343let x=std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup(_lua_tmp_t.clone(),____.borrow().clone(), _lua_debug_loc { start: (575, 26), end: (575, 28) })));
1344_lua_call({ let _lua_tmp = enviroment_helper_print0.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = rs.borrow(); _lua_tmp.clone() }, { let _lua_tmp = ss.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (576, 8), end: (576, 43) });
1345}
1346return _lua_table(vec![(_lua_num!(1), { let _lua_tmp = ss.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = rs.borrow(); _lua_tmp.clone() })]);
1347
1348_lua_nil()
1349}}));
1350*enviroment_helper_node_expand.borrow_mut() = _lua_lambda(Box::new({let enviroment_helper_print_step = enviroment_helper_print_step.clone();
1351let LANG_ASSERT = LANG_ASSERT.clone();
1352move |mut _lua_arg_tmp, _| {
1353let env = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1354let e = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = enviroment_helper_print_step.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (581, 43), end: (581, 48) })], _lua_debug_loc { start: (581, 14), end: (581, 50) })));
1355let es = std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup({ let _lua_tmp = e.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (582, 15), end: (582, 18) })));
1356let ev = std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup({ let _lua_tmp = e.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (583, 15), end: (583, 18) })));
1357let t = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
1358_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_op!{not_eq, _lua_len({ let _lua_tmp = es.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (585, 16), end: (585, 19) }), _lua_num!(0), _lua_debug_loc { start: (585, 16), end: (585, 24) }}], _lua_debug_loc { start: (585, 4), end: (585, 25) });
1359_lua_set({ let _lua_tmp = t.borrow(); _lua_tmp.clone() },_lua_lookup({ let _lua_tmp = es.borrow(); _lua_tmp.clone() },_lua_len({ let _lua_tmp = es.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (586, 9), end: (586, 12) }), _lua_debug_loc { start: (586, 6), end: (586, 12) }),_lua_table(vec![(_lua_num!(1), _lua_false()), (_lua_num!(2), { let _lua_tmp = ev.borrow(); _lua_tmp.clone() }), (_lua_num!(3), _lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (586, 29), end: (586, 34) }))]), _lua_debug_loc { start: (586, 4), end: (586, 36) });
1360let result = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![(_lua_num!(1), _lua_true()), (_lua_num!(2), { let _lua_tmp = t.borrow(); _lua_tmp.clone() }), (_lua_num!(3), _lua_nil())])));
1361{
1362let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_op!{sub, _lua_len({ let _lua_tmp = es.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (589, 18), end: (589, 21) }), _lua_num!(2), _lua_debug_loc { start: (589, 18), end: (589, 25) }}));
1363while (_lua_op!{greater_eq, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (590, 14), end: (590, 20) }}).as_bool(_lua_debug_loc { start: (590, 8), end: (595, 11) }) {
1364let t = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
1365_lua_set({ let _lua_tmp = t.borrow(); _lua_tmp.clone() },_lua_lookup({ let _lua_tmp = es.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (592, 17), end: (592, 22) }}, _lua_debug_loc { start: (592, 14), end: (592, 22) }),{ let _lua_tmp = result.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (592, 12), end: (592, 33) });
1366*result.borrow_mut() = _lua_table(vec![(_lua_num!(1), _lua_true()), (_lua_num!(2), { let _lua_tmp = t.borrow(); _lua_tmp.clone() }), (_lua_num!(3), _lua_nil())]);
1367*i.borrow_mut() = _lua_op!{sub, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (594, 16), end: (594, 21) }};
1368}
1369}
1370return { let _lua_tmp = result.borrow(); _lua_tmp.clone() };
1371
1372_lua_nil()
1373}}));
1374*enviroment_helper_tree_shadow_copy.borrow_mut() = _lua_lambda(Box::new({let recordstring_shadow_copy = recordstring_shadow_copy.clone();
1375move |mut _lua_arg_tmp, _| {
1376let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1377return _lua_table(vec![(_lua_num!(1), _lua_true()), (_lua_num!(2), _lua_call({ let _lua_tmp = recordstring_shadow_copy.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = x.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (602, 33), end: (602, 36) })], _lua_debug_loc { start: (602, 8), end: (602, 38) })), (_lua_num!(3), _lua_nil())]);
1378
1379_lua_nil()
1380}}));
1381*enviroment_set_helper.borrow_mut() = _lua_lambda(Box::new({let LANG_ASSERT = LANG_ASSERT.clone();
1382let enviroment_null_p = enviroment_null_p.clone();
1383let trampoline_return = trampoline_return.clone();
1384let enviroment_helper_tree_shadow_copy = enviroment_helper_tree_shadow_copy.clone();
1385let enviroment_helper_print_step = enviroment_helper_print_step.clone();
1386let make_enviroment_null_v = make_enviroment_null_v.clone();
1387let enviroment_helper_node_expand = enviroment_helper_node_expand.clone();
1388let trampoline_delay = trampoline_delay.clone();
1389let enviroment_set_helper = enviroment_set_helper.clone();
1390let LANG_ERROR = LANG_ERROR.clone();
1391move |mut _lua_arg_tmp, _| {
1392let env = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1393let key = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1394let val = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1395let return_pointer = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1396let real_return = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1397if (_lua_op!{eq, _lua_len({ let _lua_tmp = key.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (607, 7), end: (607, 11) }), _lua_num!(0), _lua_debug_loc { start: (607, 7), end: (607, 16) }}).as_bool(_lua_debug_loc { start: (607, 7), end: (607, 16) }) {
1398_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_op!{or, _lua_call({ let _lua_tmp = enviroment_null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (609, 12), end: (609, 34) }), _lua_op!{and, _lua_op!{eq, _lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (609, 39), end: (609, 44) }), _lua_false(), _lua_debug_loc { start: (609, 39), end: (609, 77) }}, _lua_op!{eq, _lua_lookup(_lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (609, 59), end: (609, 72) }),_lua_str("length"), _lua_debug_loc { start: (609, 59), end: (609, 72) }), _lua_num!(0), _lua_debug_loc { start: (609, 59), end: (609, 77) }}, _lua_debug_loc { start: (609, 39), end: (609, 77) }}, _lua_debug_loc { start: (609, 12), end: (609, 78) }}], _lua_debug_loc { start: (608, 8), end: (610, 9) });
1399_lua_set({ let _lua_tmp = return_pointer.borrow(); _lua_tmp.clone() },_lua_num!(1),_lua_false(), _lua_debug_loc { start: (611, 8), end: (611, 33) });
1400_lua_set({ let _lua_tmp = return_pointer.borrow(); _lua_tmp.clone() },_lua_num!(2),{ let _lua_tmp = key.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (612, 8), end: (612, 31) });
1401_lua_set({ let _lua_tmp = return_pointer.borrow(); _lua_tmp.clone() },_lua_num!(3),{ let _lua_tmp = val.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (613, 8), end: (613, 31) });
1402return _lua_call({ let _lua_tmp = trampoline_return.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = real_return.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (614, 15), end: (614, 45) });
1403}
1404if (_lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (616, 7), end: (616, 12) })).as_bool(_lua_debug_loc { start: (616, 7), end: (616, 12) }) {
1405let result_tmp = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = enviroment_helper_tree_shadow_copy.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (617, 27), end: (617, 66) })));
1406_lua_set({ let _lua_tmp = return_pointer.borrow(); _lua_tmp.clone() },_lua_num!(1),_lua_lookup({ let _lua_tmp = result_tmp.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (618, 28), end: (618, 40) }), _lua_debug_loc { start: (618, 8), end: (618, 41) });
1407_lua_set({ let _lua_tmp = return_pointer.borrow(); _lua_tmp.clone() },_lua_num!(2),_lua_lookup({ let _lua_tmp = result_tmp.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (619, 28), end: (619, 40) }), _lua_debug_loc { start: (619, 8), end: (619, 41) });
1408_lua_set({ let _lua_tmp = return_pointer.borrow(); _lua_tmp.clone() },_lua_num!(3),_lua_lookup({ let _lua_tmp = result_tmp.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (620, 28), end: (620, 40) }), _lua_debug_loc { start: (620, 8), end: (620, 41) });
1409let result = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = return_pointer.borrow(); _lua_tmp.clone() }));
1410let a = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = enviroment_helper_print_step.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = key.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (622, 18), end: (622, 51) })));
1411let astr = std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup({ let _lua_tmp = a.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (623, 21), end: (623, 24) })));
1412let av = std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup({ let _lua_tmp = a.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (624, 19), end: (624, 22) })));
1413let pointer = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = result.borrow(); _lua_tmp.clone() }));
1414{
1415let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(0)));
1416while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = astr.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (628, 22), end: (628, 27) }), _lua_debug_loc { start: (628, 18), end: (628, 27) }}).as_bool(_lua_debug_loc { start: (628, 12), end: (654, 15) }) {
1417let k = std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup({ let _lua_tmp = astr.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (629, 31), end: (629, 36) }}, _lua_debug_loc { start: (629, 26), end: (629, 36) })));
1418let m = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
1419if (_lua_op!{not_eq, _lua_lookup(_lua_lookup({ let _lua_tmp = pointer.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (631, 19), end: (631, 31) }),{ let _lua_tmp = k.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (631, 19), end: (631, 31) }), _lua_nil(), _lua_debug_loc { start: (631, 19), end: (631, 39) }}).as_bool(_lua_debug_loc { start: (631, 19), end: (631, 39) }) {
1420let t = std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup(_lua_lookup({ let _lua_tmp = pointer.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (632, 30), end: (632, 42) }),{ let _lua_tmp = k.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (632, 30), end: (632, 42) })));
1421if (_lua_lookup({ let _lua_tmp = t.borrow(); _lua_tmp.clone() },_lua_num!(0), _lua_debug_loc { start: (633, 23), end: (633, 26) })).as_bool(_lua_debug_loc { start: (633, 23), end: (633, 26) }) {
1422*m.borrow_mut() = _lua_call({ let _lua_tmp = enviroment_helper_tree_shadow_copy.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = t.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (634, 28), end: (634, 65) });
1423} else {
1424if (_lua_op!{eq, _lua_lookup(_lua_lookup({ let _lua_tmp = t.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (636, 27), end: (636, 38) }),_lua_str("length"), _lua_debug_loc { start: (636, 27), end: (636, 38) }), _lua_num!(0), _lua_debug_loc { start: (636, 27), end: (636, 43) }}).as_bool(_lua_debug_loc { start: (636, 27), end: (636, 43) }) {
1425_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_op!{eq, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_op!{sub, _lua_len({ let _lua_tmp = astr.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (637, 45), end: (637, 50) }), _lua_num!(1), _lua_debug_loc { start: (637, 45), end: (637, 54) }}, _lua_debug_loc { start: (637, 40), end: (637, 54) }}], _lua_debug_loc { start: (637, 28), end: (637, 55) });
1426let p = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = make_enviroment_null_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (638, 38), end: (638, 62) })));
1427_lua_set(_lua_lookup({ let _lua_tmp = pointer.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (639, 28), end: (639, 40) }),{ let _lua_tmp = k.borrow(); _lua_tmp.clone() },{ let _lua_tmp = p.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (639, 28), end: (639, 45) });
1428_lua_set({ let _lua_tmp = p.borrow(); _lua_tmp.clone() },_lua_num!(1),_lua_false(), _lua_debug_loc { start: (640, 28), end: (640, 40) });
1429_lua_set({ let _lua_tmp = p.borrow(); _lua_tmp.clone() },_lua_num!(2),{ let _lua_tmp = av.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (641, 28), end: (641, 37) });
1430_lua_set({ let _lua_tmp = p.borrow(); _lua_tmp.clone() },_lua_num!(3),{ let _lua_tmp = val.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (642, 28), end: (642, 38) });
1431return _lua_call({ let _lua_tmp = trampoline_return.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = real_return.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (643, 35), end: (643, 65) });
1432}
1433*m.borrow_mut() = _lua_call({ let _lua_tmp = enviroment_helper_node_expand.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = t.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (645, 28), end: (645, 60) });
1434}
1435} else {
1436*m.borrow_mut() = _lua_table(vec![(_lua_num!(1), _lua_true()), (_lua_num!(2), _lua_table(vec![])), (_lua_num!(3), _lua_nil())]);
1437}
1438_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_op!{not_eq, { let _lua_tmp = m.borrow(); _lua_tmp.clone() }, _lua_nil(), _lua_debug_loc { start: (650, 28), end: (650, 36) }}], _lua_debug_loc { start: (650, 16), end: (650, 37) });
1439_lua_set(_lua_lookup({ let _lua_tmp = pointer.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (651, 16), end: (651, 28) }),{ let _lua_tmp = k.borrow(); _lua_tmp.clone() },{ let _lua_tmp = m.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (651, 16), end: (651, 33) });
1440*pointer.borrow_mut() = { let _lua_tmp = m.borrow(); _lua_tmp.clone() };
1441*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (653, 20), end: (653, 25) }};
1442}
1443}
1444if (_lua_call({ let _lua_tmp = enviroment_null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = pointer.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (656, 11), end: (656, 37) })).as_bool(_lua_debug_loc { start: (656, 11), end: (656, 37) }) {
1445let p = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = pointer.borrow(); _lua_tmp.clone() }));
1446_lua_set({ let _lua_tmp = p.borrow(); _lua_tmp.clone() },_lua_num!(1),_lua_false(), _lua_debug_loc { start: (658, 12), end: (658, 24) });
1447_lua_set({ let _lua_tmp = p.borrow(); _lua_tmp.clone() },_lua_num!(2),{ let _lua_tmp = av.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (659, 12), end: (659, 21) });
1448_lua_set({ let _lua_tmp = p.borrow(); _lua_tmp.clone() },_lua_num!(3),{ let _lua_tmp = val.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (660, 12), end: (660, 22) });
1449return _lua_call({ let _lua_tmp = trampoline_return.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = real_return.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (661, 19), end: (661, 49) });
1450} else {
1451return _lua_call({ let _lua_tmp = trampoline_delay.borrow(); _lua_tmp.clone() }, vec![_lua_lambda(Box::new({let enviroment_set_helper = enviroment_set_helper.clone();
1452let pointer = pointer.clone();
1453let av = av.clone();
1454let val = val.clone();
1455let real_return = real_return.clone();
1456move |mut _lua_arg_tmp, _| {
1457return _lua_call({ let _lua_tmp = enviroment_set_helper.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = pointer.borrow(); _lua_tmp.clone() }, { let _lua_tmp = av.borrow(); _lua_tmp.clone() }, { let _lua_tmp = val.borrow(); _lua_tmp.clone() }, { let _lua_tmp = pointer.borrow(); _lua_tmp.clone() }, { let _lua_tmp = real_return.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (664, 34), end: (664, 95) });
1458
1459_lua_nil()
1460}}))], _lua_debug_loc { start: (663, 19), end: (665, 13) });
1461}
1462} else {
1463return _lua_call({ let _lua_tmp = trampoline_delay.borrow(); _lua_tmp.clone() }, vec![_lua_lambda(Box::new({let enviroment_set_helper = enviroment_set_helper.clone();
1464let enviroment_helper_node_expand = enviroment_helper_node_expand.clone();
1465let env = env.clone();
1466let key = key.clone();
1467let val = val.clone();
1468let return_pointer = return_pointer.clone();
1469let real_return = real_return.clone();
1470move |mut _lua_arg_tmp, _| {
1471return _lua_call({ let _lua_tmp = enviroment_set_helper.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = enviroment_helper_node_expand.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (670, 16), end: (670, 50) }), { let _lua_tmp = key.borrow(); _lua_tmp.clone() }, { let _lua_tmp = val.borrow(); _lua_tmp.clone() }, { let _lua_tmp = return_pointer.borrow(); _lua_tmp.clone() }, { let _lua_tmp = real_return.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (669, 30), end: (675, 13) });
1472
1473_lua_nil()
1474}}))], _lua_debug_loc { start: (668, 15), end: (676, 9) });
1475}
1476return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (678, 11), end: (678, 23) });
1477
1478_lua_nil()
1479}}));
1480*env_set.borrow_mut() = _lua_lambda(Box::new({let equal_p = equal_p.clone();
1481move |mut _lua_arg_tmp, _| {
1482let env = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1483let key = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1484let val = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1485let ret = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
1486{
1487let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(0)));
1488while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (684, 18), end: (684, 22) }), _lua_debug_loc { start: (684, 14), end: (684, 22) }}).as_bool(_lua_debug_loc { start: (684, 8), end: (702, 11) }) {
1489if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (685, 28), end: (685, 33) }}, _lua_num!(1), _lua_debug_loc { start: (685, 27), end: (685, 38) }}, _lua_debug_loc { start: (685, 23), end: (685, 38) }), { let _lua_tmp = key.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (685, 15), end: (685, 45) })).as_bool(_lua_debug_loc { start: (685, 15), end: (685, 45) }) {
1490_lua_set({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (686, 21), end: (686, 26) }}, _lua_num!(1), _lua_debug_loc { start: (686, 20), end: (686, 31) }},{ let _lua_tmp = key.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (686, 16), end: (686, 38) });
1491_lua_set({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (687, 21), end: (687, 26) }}, _lua_num!(1), _lua_debug_loc { start: (687, 20), end: (687, 31) }},{ let _lua_tmp = val.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (687, 16), end: (687, 38) });
1492{
1493*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(2), _lua_debug_loc { start: (689, 24), end: (689, 29) }};
1494while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (690, 30), end: (690, 34) }), _lua_debug_loc { start: (690, 26), end: (690, 34) }}).as_bool(_lua_debug_loc { start: (690, 20), end: (694, 23) }) {
1495_lua_set({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (691, 29), end: (691, 34) }}, _lua_num!(1), _lua_debug_loc { start: (691, 28), end: (691, 39) }},_lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (691, 48), end: (691, 53) }}, _lua_num!(1), _lua_debug_loc { start: (691, 47), end: (691, 58) }}, _lua_debug_loc { start: (691, 43), end: (691, 58) }), _lua_debug_loc { start: (691, 24), end: (691, 59) });
1496_lua_set({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (692, 29), end: (692, 34) }}, _lua_num!(1), _lua_debug_loc { start: (692, 28), end: (692, 39) }},_lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (692, 48), end: (692, 53) }}, _lua_num!(1), _lua_debug_loc { start: (692, 47), end: (692, 58) }}, _lua_debug_loc { start: (692, 43), end: (692, 58) }), _lua_debug_loc { start: (692, 24), end: (692, 59) });
1497*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(2), _lua_debug_loc { start: (693, 28), end: (693, 33) }};
1498}
1499}
1500return { let _lua_tmp = ret.borrow(); _lua_tmp.clone() };
1501} else {
1502_lua_set({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (698, 21), end: (698, 26) }}, _lua_num!(1), _lua_debug_loc { start: (698, 20), end: (698, 31) }},_lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (698, 40), end: (698, 45) }}, _lua_num!(1), _lua_debug_loc { start: (698, 39), end: (698, 50) }}, _lua_debug_loc { start: (698, 35), end: (698, 50) }), _lua_debug_loc { start: (698, 16), end: (698, 51) });
1503_lua_set({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (699, 21), end: (699, 26) }}, _lua_num!(1), _lua_debug_loc { start: (699, 20), end: (699, 31) }},_lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (699, 40), end: (699, 45) }}, _lua_num!(1), _lua_debug_loc { start: (699, 39), end: (699, 50) }}, _lua_debug_loc { start: (699, 35), end: (699, 50) }), _lua_debug_loc { start: (699, 16), end: (699, 51) });
1504}
1505*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(2), _lua_debug_loc { start: (701, 16), end: (701, 21) }};
1506}
1507}
1508_lua_set({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, _lua_len({ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (704, 9), end: (704, 13) }), _lua_num!(0), _lua_debug_loc { start: (704, 9), end: (704, 17) }}, _lua_num!(1), _lua_debug_loc { start: (704, 8), end: (704, 22) }},{ let _lua_tmp = key.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (704, 4), end: (704, 29) });
1509_lua_set({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, _lua_len({ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (705, 9), end: (705, 13) }), _lua_num!(1), _lua_debug_loc { start: (705, 9), end: (705, 17) }}, _lua_num!(1), _lua_debug_loc { start: (705, 8), end: (705, 22) }},{ let _lua_tmp = val.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (705, 4), end: (705, 29) });
1510return { let _lua_tmp = ret.borrow(); _lua_tmp.clone() };
1511
1512_lua_nil()
1513}}));
1514*env_get.borrow_mut() = _lua_lambda(Box::new({let equal_p = equal_p.clone();
1515move |mut _lua_arg_tmp, _| {
1516let env = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1517let key = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1518let default_v = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1519{
1520let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(0)));
1521while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (711, 18), end: (711, 22) }), _lua_debug_loc { start: (711, 14), end: (711, 22) }}).as_bool(_lua_debug_loc { start: (711, 8), end: (716, 11) }) {
1522if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (712, 28), end: (712, 33) }}, _lua_num!(1), _lua_debug_loc { start: (712, 27), end: (712, 38) }}, _lua_debug_loc { start: (712, 23), end: (712, 38) }), { let _lua_tmp = key.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (712, 15), end: (712, 45) })).as_bool(_lua_debug_loc { start: (712, 15), end: (712, 45) }) {
1523return _lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (713, 28), end: (713, 33) }}, _lua_num!(1), _lua_debug_loc { start: (713, 27), end: (713, 38) }}, _lua_debug_loc { start: (713, 23), end: (713, 38) });
1524}
1525*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(2), _lua_debug_loc { start: (715, 16), end: (715, 21) }};
1526}
1527}
1528return { let _lua_tmp = default_v.borrow(); _lua_tmp.clone() };
1529
1530_lua_nil()
1531}}));
1532*must_env_get.borrow_mut() = _lua_lambda(Box::new({let equal_p = equal_p.clone();
1533let LANG_ERROR = LANG_ERROR.clone();
1534move |mut _lua_arg_tmp, _| {
1535let env = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1536let key = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1537{
1538let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(0)));
1539while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (723, 18), end: (723, 22) }), _lua_debug_loc { start: (723, 14), end: (723, 22) }}).as_bool(_lua_debug_loc { start: (723, 8), end: (728, 11) }) {
1540if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (724, 28), end: (724, 33) }}, _lua_num!(1), _lua_debug_loc { start: (724, 27), end: (724, 38) }}, _lua_debug_loc { start: (724, 23), end: (724, 38) }), { let _lua_tmp = key.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (724, 15), end: (724, 45) })).as_bool(_lua_debug_loc { start: (724, 15), end: (724, 45) }) {
1541return _lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (725, 28), end: (725, 33) }}, _lua_num!(1), _lua_debug_loc { start: (725, 27), end: (725, 38) }}, _lua_debug_loc { start: (725, 23), end: (725, 38) });
1542}
1543*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(2), _lua_debug_loc { start: (727, 16), end: (727, 21) }};
1544}
1545}
1546return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (730, 11), end: (730, 23) });
1547
1548_lua_nil()
1549}}));
1550*env2val.borrow_mut() = _lua_lambda(Box::new({let null_v = null_v.clone();
1551let new_construction = new_construction.clone();
1552let new_list = new_list.clone();
1553let new_data = new_data.clone();
1554let mapping_atom = mapping_atom.clone();
1555move |mut _lua_arg_tmp, _| {
1556let env = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1557let ret = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }));
1558{
1559let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(0)));
1560while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (736, 18), end: (736, 22) }), _lua_debug_loc { start: (736, 14), end: (736, 22) }}).as_bool(_lua_debug_loc { start: (736, 8), end: (742, 11) }) {
1561*ret.borrow_mut() = _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (738, 30), end: (738, 35) }}, _lua_num!(1), _lua_debug_loc { start: (738, 29), end: (738, 40) }}, _lua_debug_loc { start: (738, 25), end: (738, 40) }), _lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (738, 48), end: (738, 53) }}, _lua_num!(1), _lua_debug_loc { start: (738, 47), end: (738, 58) }}, _lua_debug_loc { start: (738, 43), end: (738, 58) })], _lua_debug_loc { start: (738, 16), end: (738, 60) }), { let _lua_tmp = ret.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (737, 18), end: (740, 13) });
1562*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(2), _lua_debug_loc { start: (741, 16), end: (741, 21) }};
1563}
1564}
1565return _lua_call({ let _lua_tmp = new_data.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = mapping_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (746, 8), end: (746, 21) })], _lua_debug_loc { start: (744, 11), end: (747, 5) });
1566
1567_lua_nil()
1568}}));
1569*env_foreach.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
1570let env = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1571let f = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1572{
1573let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(0)));
1574while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (752, 18), end: (752, 22) }), _lua_debug_loc { start: (752, 14), end: (752, 22) }}).as_bool(_lua_debug_loc { start: (752, 8), end: (755, 11) }) {
1575_lua_call({ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (753, 19), end: (753, 24) }}, _lua_num!(1), _lua_debug_loc { start: (753, 18), end: (753, 29) }}, _lua_debug_loc { start: (753, 14), end: (753, 29) }), _lua_lookup({ let _lua_tmp = env.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (753, 37), end: (753, 42) }}, _lua_num!(1), _lua_debug_loc { start: (753, 36), end: (753, 47) }}, _lua_debug_loc { start: (753, 32), end: (753, 47) })], _lua_debug_loc { start: (753, 12), end: (753, 49) });
1576*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(2), _lua_debug_loc { start: (754, 16), end: (754, 21) }};
1577}
1578}
1579
1580_lua_nil()
1581}}));
1582*real_evaluate.borrow_mut() = _lua_lambda(Box::new({let force1 = force1.clone();
1583let delay_just_p = delay_just_p.clone();
1584let new_error = new_error.clone();
1585let system_atom = system_atom.clone();
1586let new_list = new_list.clone();
1587let function_builtin_use_systemName = function_builtin_use_systemName.clone();
1588let evaluate_function_builtin_systemName = evaluate_function_builtin_systemName.clone();
1589let env2val = env2val.clone();
1590let construction_p = construction_p.clone();
1591let unlazy_list_1_keepcomment = unlazy_list_1_keepcomment.clone();
1592let error = error.clone();
1593let equal_p = equal_p.clone();
1594let form_builtin_use_systemName = form_builtin_use_systemName.clone();
1595let __TS__ArrayPush = __TS__ArrayPush.clone();
1596let builtin_form_apply = builtin_form_apply.clone();
1597let form_use_systemName = form_use_systemName.clone();
1598let force_all = force_all.clone();
1599let evaluate = evaluate.clone();
1600let data_p = data_p.clone();
1601let data_name = data_name.clone();
1602let atom_p = atom_p.clone();
1603let atom_equal_p = atom_equal_p.clone();
1604let form_atom = form_atom.clone();
1605let data_list = data_list.clone();
1606let construction_head = construction_head.clone();
1607let construction_tail = construction_tail.clone();
1608let null_p = null_p.clone();
1609let apply = apply.clone();
1610let builtin_func_apply = builtin_func_apply.clone();
1611let name_unlazy1_p3 = name_unlazy1_p3.clone();
1612let env_get = env_get.clone();
1613move |mut _lua_arg_tmp, _| {
1614let env = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1615let raw = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1616let selfvalraw = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1617let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = raw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (759, 14), end: (759, 25) })));
1618if (_lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (760, 7), end: (760, 22) })).as_bool(_lua_debug_loc { start: (760, 7), end: (760, 22) }) {
1619return { let _lua_tmp = selfvalraw.borrow(); _lua_tmp.clone() };
1620}
1621let error_v = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
1622*error_v.borrow_mut() = _lua_lambda(Box::new({let new_error = new_error.clone();
1623let system_atom = system_atom.clone();
1624let new_list = new_list.clone();
1625let function_builtin_use_systemName = function_builtin_use_systemName.clone();
1626let evaluate_function_builtin_systemName = evaluate_function_builtin_systemName.clone();
1627let env2val = env2val.clone();
1628let env = env.clone();
1629let x = x.clone();
1630move |mut _lua_arg_tmp, _| {
1631return _lua_call({ let _lua_tmp = new_error.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = system_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_builtin_use_systemName.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = evaluate_function_builtin_systemName.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = env2val.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (770, 20), end: (770, 32) }), { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (769, 16), end: (772, 17) })], _lua_debug_loc { start: (767, 12), end: (773, 13) })], _lua_debug_loc { start: (765, 8), end: (774, 9) })], _lua_debug_loc { start: (763, 36), end: (775, 5) });
1632
1633_lua_nil()
1634}}));
1635if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (776, 7), end: (776, 24) })).as_bool(_lua_debug_loc { start: (776, 7), end: (776, 24) }) {
1636return _lua_call({ let _lua_tmp = unlazy_list_1_keepcomment.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, _lua_lambda(Box::new({let selfvalraw = selfvalraw.clone();
1637move |mut _lua_arg_tmp, _| {
1638return { let _lua_tmp = selfvalraw.borrow(); _lua_tmp.clone() };
1639
1640_lua_nil()
1641}})), _lua_lambda(Box::new({let error = error.clone();
1642let equal_p = equal_p.clone();
1643let form_builtin_use_systemName = form_builtin_use_systemName.clone();
1644let error_v = error_v.clone();
1645let __TS__ArrayPush = __TS__ArrayPush.clone();
1646let builtin_form_apply = builtin_form_apply.clone();
1647let env = env.clone();
1648let form_use_systemName = form_use_systemName.clone();
1649let force_all = force_all.clone();
1650let evaluate = evaluate.clone();
1651let data_p = data_p.clone();
1652let force1 = force1.clone();
1653let data_name = data_name.clone();
1654let delay_just_p = delay_just_p.clone();
1655let selfvalraw = selfvalraw.clone();
1656let atom_p = atom_p.clone();
1657let atom_equal_p = atom_equal_p.clone();
1658let form_atom = form_atom.clone();
1659let data_list = data_list.clone();
1660let construction_p = construction_p.clone();
1661let construction_head = construction_head.clone();
1662let construction_tail = construction_tail.clone();
1663let null_p = null_p.clone();
1664let env2val = env2val.clone();
1665let apply = apply.clone();
1666let function_builtin_use_systemName = function_builtin_use_systemName.clone();
1667let builtin_func_apply = builtin_func_apply.clone();
1668move |mut _lua_arg_tmp, _| {
1669let comments = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1670let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1671if (_lua_op!{not_eq, _lua_len({ let _lua_tmp = comments.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (782, 19), end: (782, 28) }), _lua_num!(0), _lua_debug_loc { start: (782, 19), end: (782, 33) }}).as_bool(_lua_debug_loc { start: (782, 19), end: (782, 33) }) {
1672_lua_call({ let _lua_tmp = error.borrow(); _lua_tmp.clone() }, vec![_lua_str("WIP")], _lua_debug_loc { start: (783, 20), end: (783, 32) });
1673}
1674if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (785, 27), end: (785, 31) }), { let _lua_tmp = form_builtin_use_systemName.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (785, 19), end: (785, 62) })).as_bool(_lua_debug_loc { start: (785, 19), end: (785, 62) }) {
1675if (_lua_op!{eq, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (786, 23), end: (786, 26) }), _lua_num!(1), _lua_debug_loc { start: (786, 23), end: (786, 31) }}).as_bool(_lua_debug_loc { start: (786, 23), end: (786, 31) }) {
1676return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (787, 31), end: (787, 40) });
1677}
1678let f = std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (789, 30), end: (789, 34) })));
1679let args = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
1680{
1681let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(2)));
1682while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (793, 34), end: (793, 37) }), _lua_debug_loc { start: (793, 30), end: (793, 37) }}).as_bool(_lua_debug_loc { start: (793, 24), end: (796, 27) }) {
1683_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args.borrow(); _lua_tmp.clone() }, _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (794, 53), end: (794, 58) }}, _lua_debug_loc { start: (794, 50), end: (794, 58) })], _lua_debug_loc { start: (794, 28), end: (794, 60) });
1684*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (795, 32), end: (795, 37) }};
1685}
1686}
1687return _lua_call({ let _lua_tmp = builtin_form_apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, { let _lua_tmp = f.borrow(); _lua_tmp.clone() }, { let _lua_tmp = args.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (798, 27), end: (798, 59) });
1688} else if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (799, 31), end: (799, 35) }), { let _lua_tmp = form_use_systemName.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (799, 23), end: (799, 58) })).as_bool(_lua_debug_loc { start: (799, 23), end: (799, 58) }) {
1689if (_lua_op!{eq, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (800, 23), end: (800, 26) }), _lua_num!(1), _lua_debug_loc { start: (800, 23), end: (800, 31) }}).as_bool(_lua_debug_loc { start: (800, 23), end: (800, 31) }) {
1690return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (801, 31), end: (801, 40) });
1691}
1692let f = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = evaluate.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (804, 38), end: (804, 42) })], _lua_debug_loc { start: (804, 24), end: (804, 44) })], _lua_debug_loc { start: (803, 30), end: (805, 21) })));
1693if (_lua_not(_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (806, 27), end: (806, 36) }), _lua_debug_loc { start: (806, 23), end: (806, 36) })).as_bool(_lua_debug_loc { start: (806, 23), end: (806, 36) }) {
1694return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (807, 31), end: (807, 40) });
1695}
1696let f_type = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (810, 24), end: (810, 36) })], _lua_debug_loc { start: (809, 35), end: (811, 21) })));
1697if (_lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_type.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (812, 23), end: (812, 43) })).as_bool(_lua_debug_loc { start: (812, 23), end: (812, 43) }) {
1698return { let _lua_tmp = selfvalraw.borrow(); _lua_tmp.clone() };
1699}
1700if (_lua_not(_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_type.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (815, 27), end: (815, 41) }), _lua_debug_loc { start: (815, 23), end: (815, 41) })).as_bool(_lua_debug_loc { start: (815, 23), end: (815, 41) }) {
1701return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (816, 31), end: (816, 40) });
1702}
1703if (_lua_not(_lua_call({ let _lua_tmp = atom_equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_type.borrow(); _lua_tmp.clone() }, { let _lua_tmp = form_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (818, 27), end: (818, 58) }), _lua_debug_loc { start: (818, 23), end: (818, 58) })).as_bool(_lua_debug_loc { start: (818, 23), end: (818, 58) }) {
1704return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (819, 31), end: (819, 40) });
1705}
1706let f_list = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = data_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (822, 24), end: (822, 36) })], _lua_debug_loc { start: (821, 35), end: (823, 21) })));
1707if (_lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (824, 23), end: (824, 43) })).as_bool(_lua_debug_loc { start: (824, 23), end: (824, 43) }) {
1708return { let _lua_tmp = selfvalraw.borrow(); _lua_tmp.clone() };
1709}
1710if (_lua_not(_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (827, 27), end: (827, 49) }), _lua_debug_loc { start: (827, 23), end: (827, 49) })).as_bool(_lua_debug_loc { start: (827, 23), end: (827, 49) }) {
1711return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (828, 31), end: (828, 40) });
1712}
1713let f_x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (830, 32), end: (830, 57) })));
1714let f_list_cdr = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (832, 24), end: (832, 49) })], _lua_debug_loc { start: (831, 39), end: (833, 21) })));
1715if (_lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_list_cdr.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (834, 23), end: (834, 47) })).as_bool(_lua_debug_loc { start: (834, 23), end: (834, 47) }) {
1716return { let _lua_tmp = selfvalraw.borrow(); _lua_tmp.clone() };
1717}
1718if (_lua_not(_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_list_cdr.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (837, 27), end: (837, 45) }), _lua_debug_loc { start: (837, 23), end: (837, 45) })).as_bool(_lua_debug_loc { start: (837, 23), end: (837, 45) }) {
1719return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (838, 31), end: (838, 40) });
1720}
1721let args = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![(_lua_num!(1), _lua_call({ let _lua_tmp = env2val.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (841, 24), end: (841, 36) }))])));
1722{
1723let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(2)));
1724while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (845, 34), end: (845, 37) }), _lua_debug_loc { start: (845, 30), end: (845, 37) }}).as_bool(_lua_debug_loc { start: (845, 24), end: (848, 27) }) {
1725_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args.borrow(); _lua_tmp.clone() }, _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (846, 53), end: (846, 58) }}, _lua_debug_loc { start: (846, 50), end: (846, 58) })], _lua_debug_loc { start: (846, 28), end: (846, 60) });
1726*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (847, 32), end: (847, 37) }};
1727}
1728}
1729return _lua_call({ let _lua_tmp = apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = args.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (850, 27), end: (850, 43) });
1730} else if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (851, 31), end: (851, 35) }), { let _lua_tmp = function_builtin_use_systemName.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (851, 23), end: (851, 70) })).as_bool(_lua_debug_loc { start: (851, 23), end: (851, 70) }) {
1731if (_lua_op!{eq, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (852, 23), end: (852, 26) }), _lua_num!(1), _lua_debug_loc { start: (852, 23), end: (852, 31) }}).as_bool(_lua_debug_loc { start: (852, 23), end: (852, 31) }) {
1732return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (853, 31), end: (853, 40) });
1733}
1734let f = std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (855, 30), end: (855, 34) })));
1735let args = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
1736{
1737let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(2)));
1738while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (859, 34), end: (859, 37) }), _lua_debug_loc { start: (859, 30), end: (859, 37) }}).as_bool(_lua_debug_loc { start: (859, 24), end: (865, 27) }) {
1739_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = evaluate.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (862, 49), end: (862, 54) }}, _lua_debug_loc { start: (862, 46), end: (862, 54) })], _lua_debug_loc { start: (862, 32), end: (862, 56) })], _lua_debug_loc { start: (860, 28), end: (863, 29) });
1740*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (864, 32), end: (864, 37) }};
1741}
1742}
1743return _lua_call({ let _lua_tmp = builtin_func_apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, { let _lua_tmp = args.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (867, 27), end: (867, 54) });
1744} else {
1745let f = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = evaluate.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (869, 44), end: (869, 48) })], _lua_debug_loc { start: (869, 30), end: (869, 50) })));
1746let args = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
1747{
1748let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(1)));
1749while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (873, 34), end: (873, 37) }), _lua_debug_loc { start: (873, 30), end: (873, 37) }}).as_bool(_lua_debug_loc { start: (873, 24), end: (879, 27) }) {
1750_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = evaluate.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (876, 49), end: (876, 54) }}, _lua_debug_loc { start: (876, 46), end: (876, 54) })], _lua_debug_loc { start: (876, 32), end: (876, 56) })], _lua_debug_loc { start: (874, 28), end: (877, 29) });
1751*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (878, 32), end: (878, 37) }};
1752}
1753}
1754return _lua_call({ let _lua_tmp = apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, { let _lua_tmp = args.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (881, 27), end: (881, 41) });
1755}
1756
1757_lua_nil()
1758}}))], _lua_debug_loc { start: (777, 15), end: (884, 9) });
1759} else if (_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (885, 11), end: (885, 20) })).as_bool(_lua_debug_loc { start: (885, 11), end: (885, 20) }) {
1760return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
1761}
1762let r = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = name_unlazy1_p3.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (888, 14), end: (888, 32) })));
1763if (_lua_op!{eq, { let _lua_tmp = r.borrow(); _lua_tmp.clone() }, _lua_nil(), _lua_debug_loc { start: (889, 7), end: (889, 15) }}).as_bool(_lua_debug_loc { start: (889, 7), end: (889, 15) }) {
1764return { let _lua_tmp = selfvalraw.borrow(); _lua_tmp.clone() };
1765}
1766if (_lua_op!{eq, { let _lua_tmp = r.borrow(); _lua_tmp.clone() }, _lua_true(), _lua_debug_loc { start: (892, 7), end: (892, 16) }}).as_bool(_lua_debug_loc { start: (892, 7), end: (892, 16) }) {
1767return _lua_call({ let _lua_tmp = env_get.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (896, 12), end: (896, 21) })], _lua_debug_loc { start: (893, 15), end: (897, 9) });
1768}
1769return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (899, 11), end: (899, 20) });
1770
1771_lua_nil()
1772}}));
1773*real_apply.borrow_mut() = _lua_lambda(Box::new({let new_error = new_error.clone();
1774let system_atom = system_atom.clone();
1775let new_list = new_list.clone();
1776let function_builtin_use_systemName = function_builtin_use_systemName.clone();
1777let apply_function_builtin_systemName = apply_function_builtin_systemName.clone();
1778let jsArray_to_list = jsArray_to_list.clone();
1779let force1 = force1.clone();
1780let delay_just_p = delay_just_p.clone();
1781let data_p = data_p.clone();
1782let force_all = force_all.clone();
1783let data_name = data_name.clone();
1784let atom_p = atom_p.clone();
1785let atom_equal_p = atom_equal_p.clone();
1786let function_atom = function_atom.clone();
1787let data_list = data_list.clone();
1788let construction_p = construction_p.clone();
1789let force_all_rec = force_all_rec.clone();
1790let construction_head = construction_head.clone();
1791let construction_tail = construction_tail.clone();
1792let null_p = null_p.clone();
1793let env_null_v = env_null_v.clone();
1794let name_unlazy1_p3 = name_unlazy1_p3.clone();
1795let null_v = null_v.clone();
1796let new_construction = new_construction.clone();
1797let env_set = env_set.clone();
1798let evaluate = evaluate.clone();
1799move |mut _lua_arg_tmp, _| {
1800let f = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1801let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1802let selfvalraw = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1803let error_v = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
1804*error_v.borrow_mut() = _lua_lambda(Box::new({let new_error = new_error.clone();
1805let system_atom = system_atom.clone();
1806let new_list = new_list.clone();
1807let function_builtin_use_systemName = function_builtin_use_systemName.clone();
1808let apply_function_builtin_systemName = apply_function_builtin_systemName.clone();
1809let f = f.clone();
1810let jsArray_to_list = jsArray_to_list.clone();
1811let xs = xs.clone();
1812move |mut _lua_arg_tmp, _| {
1813return _lua_call({ let _lua_tmp = new_error.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = system_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_builtin_use_systemName.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = apply_function_builtin_systemName.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = jsArray_to_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (910, 20), end: (910, 39) })], _lua_debug_loc { start: (908, 16), end: (911, 17) })], _lua_debug_loc { start: (906, 12), end: (912, 13) })], _lua_debug_loc { start: (904, 8), end: (913, 9) })], _lua_debug_loc { start: (902, 36), end: (914, 5) });
1814
1815_lua_nil()
1816}}));
1817*f.borrow_mut() = _lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (915, 8), end: (915, 17) });
1818if (_lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (916, 7), end: (916, 22) })).as_bool(_lua_debug_loc { start: (916, 7), end: (916, 22) }) {
1819return { let _lua_tmp = selfvalraw.borrow(); _lua_tmp.clone() };
1820}
1821if (_lua_not(_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (919, 11), end: (919, 20) }), _lua_debug_loc { start: (919, 7), end: (919, 20) })).as_bool(_lua_debug_loc { start: (919, 7), end: (919, 20) }) {
1822return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (920, 15), end: (920, 24) });
1823}
1824let f_type = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (923, 8), end: (923, 20) })], _lua_debug_loc { start: (922, 19), end: (924, 5) })));
1825if (_lua_not(_lua_op!{and, _lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_type.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (925, 12), end: (925, 26) }), _lua_call({ let _lua_tmp = atom_equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_type.borrow(); _lua_tmp.clone() }, { let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (925, 31), end: (925, 66) }), _lua_debug_loc { start: (925, 12), end: (925, 66) }}, _lua_debug_loc { start: (925, 7), end: (925, 67) })).as_bool(_lua_debug_loc { start: (925, 7), end: (925, 67) }) {
1826return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (926, 15), end: (926, 24) });
1827}
1828let f_list = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = data_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (929, 8), end: (929, 20) })], _lua_debug_loc { start: (928, 19), end: (930, 5) })));
1829if (_lua_not(_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (931, 11), end: (931, 33) }), _lua_debug_loc { start: (931, 7), end: (931, 33) })).as_bool(_lua_debug_loc { start: (931, 7), end: (931, 33) }) {
1830return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (932, 15), end: (932, 24) });
1831}
1832let args_pat = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all_rec.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (935, 8), end: (935, 33) })], _lua_debug_loc { start: (934, 21), end: (936, 5) })));
1833let f_list_cdr = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (938, 8), end: (938, 33) })], _lua_debug_loc { start: (937, 23), end: (939, 5) })));
1834if (_lua_not(_lua_op!{and, _lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_list_cdr.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (940, 12), end: (940, 38) }), _lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_list_cdr.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (942, 12), end: (942, 41) })], _lua_debug_loc { start: (941, 8), end: (943, 9) })], _lua_debug_loc { start: (940, 43), end: (944, 5) }), _lua_debug_loc { start: (940, 12), end: (944, 5) }}, _lua_debug_loc { start: (940, 7), end: (944, 6) })).as_bool(_lua_debug_loc { start: (940, 7), end: (944, 6) }) {
1835return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (945, 15), end: (945, 24) });
1836}
1837let f_code = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_list_cdr.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (947, 19), end: (947, 48) })));
1838let env = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = env_null_v.borrow(); _lua_tmp.clone() }));
1839let xs_i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(0)));
1840while (_lua_not(_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (950, 14), end: (950, 30) }), _lua_debug_loc { start: (950, 10), end: (950, 30) })).as_bool(_lua_debug_loc { start: (950, 4), end: (983, 7) }) {
1841let r = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = name_unlazy1_p3.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (951, 18), end: (951, 43) })));
1842if (_lua_op!{eq, { let _lua_tmp = r.borrow(); _lua_tmp.clone() }, _lua_nil(), _lua_debug_loc { start: (952, 11), end: (952, 19) }}).as_bool(_lua_debug_loc { start: (952, 11), end: (952, 19) }) {
1843return { let _lua_tmp = selfvalraw.borrow(); _lua_tmp.clone() };
1844}
1845if (_lua_op!{eq, { let _lua_tmp = r.borrow(); _lua_tmp.clone() }, _lua_true(), _lua_debug_loc { start: (955, 11), end: (955, 20) }}).as_bool(_lua_debug_loc { start: (955, 11), end: (955, 20) }) {
1846let x = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }));
1847{
1848let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_op!{sub, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (958, 26), end: (958, 29) }), _lua_num!(1), _lua_debug_loc { start: (958, 26), end: (958, 33) }}));
1849while (_lua_op!{greater_eq, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, { let _lua_tmp = xs_i.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (959, 22), end: (959, 31) }}).as_bool(_lua_debug_loc { start: (959, 16), end: (962, 19) }) {
1850*x.borrow_mut() = _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (960, 44), end: (960, 49) }}, _lua_debug_loc { start: (960, 41), end: (960, 49) }), { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (960, 24), end: (960, 54) });
1851*i.borrow_mut() = _lua_op!{sub, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (961, 24), end: (961, 29) }};
1852}
1853}
1854*env.borrow_mut() = _lua_call({ let _lua_tmp = env_set.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, { let _lua_tmp = args_pat.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (964, 18), end: (964, 43) });
1855*xs_i.borrow_mut() = _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (965, 19), end: (965, 22) });
1856*args_pat.borrow_mut() = { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() };
1857} else if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (967, 15), end: (967, 39) })).as_bool(_lua_debug_loc { start: (967, 15), end: (967, 39) }) {
1858if (_lua_op!{less, { let _lua_tmp = xs_i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (968, 22), end: (968, 25) }), _lua_debug_loc { start: (968, 15), end: (968, 25) }}).as_bool(_lua_debug_loc { start: (968, 15), end: (968, 25) }) {
1859let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = xs_i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (969, 29), end: (969, 37) }}, _lua_debug_loc { start: (969, 26), end: (969, 37) })));
1860*xs_i.borrow_mut() = _lua_op!{add, { let _lua_tmp = xs_i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (970, 23), end: (970, 31) }};
1861*env.borrow_mut() = _lua_call({ let _lua_tmp = env_set.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (973, 20), end: (973, 47) }), { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (971, 22), end: (975, 17) });
1862*args_pat.borrow_mut() = _lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (976, 27), end: (976, 54) });
1863} else {
1864return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (978, 23), end: (978, 32) });
1865}
1866} else {
1867return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (981, 19), end: (981, 28) });
1868}
1869}
1870if (_lua_op!{not_eq, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (984, 7), end: (984, 10) }), { let _lua_tmp = xs_i.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (984, 7), end: (984, 18) }}).as_bool(_lua_debug_loc { start: (984, 7), end: (984, 18) }) {
1871return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (985, 15), end: (985, 24) });
1872}
1873return _lua_call({ let _lua_tmp = evaluate.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, { let _lua_tmp = f_code.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (987, 11), end: (987, 32) });
1874
1875_lua_nil()
1876}}));
1877*real_builtin_func_apply.borrow_mut() = _lua_lambda(Box::new({let new_error = new_error.clone();
1878let system_atom = system_atom.clone();
1879let new_list = new_list.clone();
1880let function_builtin_use_systemName = function_builtin_use_systemName.clone();
1881let jsArray_to_list = jsArray_to_list.clone();
1882let equal_p = equal_p.clone();
1883let LANG_ERROR = LANG_ERROR.clone();
1884let real_builtin_func_apply_s = real_builtin_func_apply_s.clone();
1885move |mut _lua_arg_tmp, _| {
1886let f = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1887let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1888let selfvalraw = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1889let error_v = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
1890*error_v.borrow_mut() = _lua_lambda(Box::new({let new_error = new_error.clone();
1891let system_atom = system_atom.clone();
1892let new_list = new_list.clone();
1893let function_builtin_use_systemName = function_builtin_use_systemName.clone();
1894let f = f.clone();
1895let jsArray_to_list = jsArray_to_list.clone();
1896let xs = xs.clone();
1897move |mut _lua_arg_tmp, _| {
1898return _lua_call({ let _lua_tmp = new_error.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = system_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_builtin_use_systemName.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = jsArray_to_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (996, 16), end: (996, 35) })], _lua_debug_loc { start: (994, 12), end: (997, 13) })], _lua_debug_loc { start: (992, 8), end: (998, 9) })], _lua_debug_loc { start: (990, 36), end: (999, 5) });
1899
1900_lua_nil()
1901}}));
1902let _lua_tmp_t={ let _lua_tmp = real_builtin_func_apply_s.borrow(); _lua_tmp.clone() };
1903for _lua_tmp_k in 1..=(_lua_len(_lua_tmp_t.clone(), _lua_debug_loc { start: (1000, 27), end: (1000, 52) }).as_f64(_lua_debug_loc { start: (1000, 27), end: (1000, 52) }) as usize) {
1904let ____=std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(_lua_tmp_k)));
1905let xx=std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup(_lua_tmp_t.clone(),____.borrow().clone(), _lua_debug_loc { start: (1000, 27), end: (1000, 52) })));
1906if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, _lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (1001, 22), end: (1001, 26) })], _lua_debug_loc { start: (1001, 11), end: (1001, 28) })).as_bool(_lua_debug_loc { start: (1001, 11), end: (1001, 28) }) {
1907if (_lua_op!{not_eq, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1002, 15), end: (1002, 18) }), _lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (1002, 22), end: (1002, 26) }), _lua_debug_loc { start: (1002, 15), end: (1002, 27) }}).as_bool(_lua_debug_loc { start: (1002, 15), end: (1002, 27) }) {
1908return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1003, 23), end: (1003, 32) });
1909}
1910if (_lua_op!{eq, _lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (1005, 15), end: (1005, 19) }), _lua_num!(1), _lua_debug_loc { start: (1005, 15), end: (1005, 25) }}).as_bool(_lua_debug_loc { start: (1005, 15), end: (1005, 25) }) {
1911return _lua_call(_lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (1006, 23), end: (1006, 56) }), vec![_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (1006, 29), end: (1006, 33) }), { let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, { let _lua_tmp = selfvalraw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1006, 23), end: (1006, 56) });
1912} else if (_lua_op!{eq, _lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (1007, 19), end: (1007, 23) }), _lua_num!(2), _lua_debug_loc { start: (1007, 19), end: (1007, 29) }}).as_bool(_lua_debug_loc { start: (1007, 19), end: (1007, 29) }) {
1913return _lua_call(_lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (1008, 23), end: (1008, 63) }), vec![_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (1008, 29), end: (1008, 33) }), _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (1008, 36), end: (1008, 40) }), { let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, { let _lua_tmp = selfvalraw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1008, 23), end: (1008, 63) });
1914} else if (_lua_op!{eq, _lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (1009, 19), end: (1009, 23) }), _lua_num!(3), _lua_debug_loc { start: (1009, 19), end: (1009, 29) }}).as_bool(_lua_debug_loc { start: (1009, 19), end: (1009, 29) }) {
1915return _lua_call(_lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (1010, 23), end: (1010, 70) }), vec![_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (1010, 29), end: (1010, 33) }), _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (1010, 36), end: (1010, 40) }), _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (1010, 43), end: (1010, 47) }), { let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, { let _lua_tmp = selfvalraw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1010, 23), end: (1010, 70) });
1916}
1917return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1012, 19), end: (1012, 31) });
1918}
1919}
1920return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1015, 11), end: (1015, 20) });
1921
1922_lua_nil()
1923}}));
1924*real_builtin_form_apply.borrow_mut() = _lua_lambda(Box::new({let new_error = new_error.clone();
1925let system_atom = system_atom.clone();
1926let new_list = new_list.clone();
1927let form_builtin_use_systemName = form_builtin_use_systemName.clone();
1928let env2val = env2val.clone();
1929let jsArray_to_list = jsArray_to_list.clone();
1930let equal_p = equal_p.clone();
1931let quote_form_builtin_systemName = quote_form_builtin_systemName.clone();
1932let lambda_form_builtin_systemName = lambda_form_builtin_systemName.clone();
1933let new_lambda = new_lambda.clone();
1934let comment_form_builtin_systemName = comment_form_builtin_systemName.clone();
1935let new_comment = new_comment.clone();
1936let evaluate = evaluate.clone();
1937move |mut _lua_arg_tmp, _| {
1938let env = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1939let f = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1940let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1941let selfvalraw = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1942let error_v = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
1943*error_v.borrow_mut() = _lua_lambda(Box::new({let new_error = new_error.clone();
1944let system_atom = system_atom.clone();
1945let new_list = new_list.clone();
1946let form_builtin_use_systemName = form_builtin_use_systemName.clone();
1947let env2val = env2val.clone();
1948let env = env.clone();
1949let f = f.clone();
1950let jsArray_to_list = jsArray_to_list.clone();
1951let xs = xs.clone();
1952move |mut _lua_arg_tmp, _| {
1953return _lua_call({ let _lua_tmp = new_error.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = system_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = form_builtin_use_systemName.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = env2val.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1023, 16), end: (1023, 28) }), { let _lua_tmp = f.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = jsArray_to_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1025, 16), end: (1025, 35) })], _lua_debug_loc { start: (1022, 12), end: (1026, 13) })], _lua_debug_loc { start: (1020, 8), end: (1027, 9) })], _lua_debug_loc { start: (1018, 36), end: (1028, 5) });
1954
1955_lua_nil()
1956}}));
1957if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, { let _lua_tmp = quote_form_builtin_systemName.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1029, 7), end: (1029, 48) })).as_bool(_lua_debug_loc { start: (1029, 7), end: (1029, 48) }) {
1958if (_lua_op!{not_eq, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1030, 11), end: (1030, 14) }), _lua_num!(1), _lua_debug_loc { start: (1030, 11), end: (1030, 19) }}).as_bool(_lua_debug_loc { start: (1030, 11), end: (1030, 19) }) {
1959return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1031, 19), end: (1031, 28) });
1960}
1961return _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (1033, 15), end: (1033, 19) });
1962} else if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, { let _lua_tmp = lambda_form_builtin_systemName.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1034, 11), end: (1034, 53) })).as_bool(_lua_debug_loc { start: (1034, 11), end: (1034, 53) }) {
1963if (_lua_op!{not_eq, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1035, 11), end: (1035, 14) }), _lua_num!(2), _lua_debug_loc { start: (1035, 11), end: (1035, 19) }}).as_bool(_lua_debug_loc { start: (1035, 11), end: (1035, 19) }) {
1964return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1036, 19), end: (1036, 28) });
1965}
1966return _lua_call({ let _lua_tmp = new_lambda.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (1038, 31), end: (1038, 35) }), _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (1038, 38), end: (1038, 42) }), { let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1038, 15), end: (1038, 53) });
1967} else if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, { let _lua_tmp = comment_form_builtin_systemName.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1039, 11), end: (1039, 54) })).as_bool(_lua_debug_loc { start: (1039, 11), end: (1039, 54) }) {
1968if (_lua_op!{not_eq, _lua_len({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1040, 11), end: (1040, 14) }), _lua_num!(2), _lua_debug_loc { start: (1040, 11), end: (1040, 19) }}).as_bool(_lua_debug_loc { start: (1040, 11), end: (1040, 19) }) {
1969return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1041, 19), end: (1041, 28) });
1970}
1971return _lua_call({ let _lua_tmp = new_comment.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (1044, 12), end: (1044, 16) }), _lua_call({ let _lua_tmp = evaluate.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_lookup({ let _lua_tmp = xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (1045, 26), end: (1045, 30) })], _lua_debug_loc { start: (1045, 12), end: (1045, 32) })], _lua_debug_loc { start: (1043, 15), end: (1046, 9) });
1972}
1973return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1048, 11), end: (1048, 20) });
1974
1975_lua_nil()
1976}}));
1977*make_quote.borrow_mut() = _lua_lambda(Box::new({let new_list = new_list.clone();
1978let form_builtin_use_systemName = form_builtin_use_systemName.clone();
1979let quote_form_builtin_systemName = quote_form_builtin_systemName.clone();
1980move |mut _lua_arg_tmp, _| {
1981let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
1982return _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = form_builtin_use_systemName.borrow(); _lua_tmp.clone() }, { let _lua_tmp = quote_form_builtin_systemName.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1051, 11), end: (1051, 82) });
1983
1984_lua_nil()
1985}}));
1986*new_lambda.borrow_mut() = _lua_lambda(Box::new({let unlazy_all_rec = unlazy_all_rec.clone();
1987let null_p = null_p.clone();
1988let name_unlazy1_p3 = name_unlazy1_p3.clone();
1989let LANG_ASSERT = LANG_ASSERT.clone();
1990let __TS__ArrayPush = __TS__ArrayPush.clone();
1991let null_v = null_v.clone();
1992let construction_p = construction_p.clone();
1993let construction_head = construction_head.clone();
1994let construction_tail = construction_tail.clone();
1995let jsArray_to_list = jsArray_to_list.clone();
1996let env_foreach = env_foreach.clone();
1997let equal_p = equal_p.clone();
1998let new_construction = new_construction.clone();
1999let make_quote = make_quote.clone();
2000let must_env_get = must_env_get.clone();
2001let new_data = new_data.clone();
2002let function_atom = function_atom.clone();
2003let new_list = new_list.clone();
2004move |mut _lua_arg_tmp, _| {
2005let env = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2006let args_pat = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2007let body = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2008let error_v = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2009*args_pat.borrow_mut() = _lua_call({ let _lua_tmp = unlazy_all_rec.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1054, 15), end: (1054, 39) });
2010let args_pat_vars = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
2011let args_pat_is_dot = std::sync::Arc::new(std::cell::RefCell::new(_lua_false()));
2012let args_pat_iter = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = args_pat.borrow(); _lua_tmp.clone() }));
2013while (_lua_not(_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat_iter.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1058, 14), end: (1058, 35) }), _lua_debug_loc { start: (1058, 10), end: (1058, 35) })).as_bool(_lua_debug_loc { start: (1058, 4), end: (1074, 7) }) {
2014let r = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = name_unlazy1_p3.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat_iter.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1059, 18), end: (1059, 48) })));
2015_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_op!{not_eq, { let _lua_tmp = r.borrow(); _lua_tmp.clone() }, _lua_nil(), _lua_debug_loc { start: (1060, 20), end: (1060, 28) }}], _lua_debug_loc { start: (1060, 8), end: (1060, 29) });
2016if ({ let _lua_tmp = r.borrow(); _lua_tmp.clone() }).as_bool(_lua_debug_loc { start: (1061, 11), end: (1061, 12) }) {
2017_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat_vars.borrow(); _lua_tmp.clone() }, { let _lua_tmp = args_pat_iter.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1062, 12), end: (1062, 57) });
2018*args_pat_is_dot.borrow_mut() = _lua_true();
2019*args_pat_iter.borrow_mut() = { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() };
2020} else if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat_iter.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1065, 15), end: (1065, 44) })).as_bool(_lua_debug_loc { start: (1065, 15), end: (1065, 44) }) {
2021_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat_vars.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat_iter.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1068, 16), end: (1068, 48) })], _lua_debug_loc { start: (1066, 12), end: (1069, 13) });
2022*args_pat_iter.borrow_mut() = _lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat_iter.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1070, 28), end: (1070, 60) });
2023} else {
2024return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1072, 19), end: (1072, 28) });
2025}
2026}
2027let args_pat_vars_val = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2028if ({ let _lua_tmp = args_pat_is_dot.borrow(); _lua_tmp.clone() }).as_bool(_lua_debug_loc { start: (1076, 7), end: (1076, 22) }) {
2029*args_pat_vars_val.borrow_mut() = _lua_call({ let _lua_tmp = jsArray_to_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat_vars.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1077, 28), end: (1077, 58) });
2030} else {
2031*args_pat_vars_val.borrow_mut() = { let _lua_tmp = args_pat.borrow(); _lua_tmp.clone() };
2032}
2033let env_vars = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
2034_lua_call({ let _lua_tmp = env_foreach.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_lambda(Box::new({let args_pat_vars = args_pat_vars.clone();
2035let equal_p = equal_p.clone();
2036let __TS__ArrayPush = __TS__ArrayPush.clone();
2037let env_vars = env_vars.clone();
2038move |mut _lua_arg_tmp, _| {
2039let k = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2040let v = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2041{
2042let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(0)));
2043while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = args_pat_vars.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1087, 26), end: (1087, 40) }), _lua_debug_loc { start: (1087, 22), end: (1087, 40) }}).as_bool(_lua_debug_loc { start: (1087, 16), end: (1092, 19) }) {
2044if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = args_pat_vars.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (1088, 45), end: (1088, 50) }}, _lua_debug_loc { start: (1088, 31), end: (1088, 50) }), { let _lua_tmp = k.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1088, 23), end: (1088, 55) })).as_bool(_lua_debug_loc { start: (1088, 23), end: (1088, 55) }) {
2045return _lua_nil();
2046}
2047*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (1091, 24), end: (1091, 29) }};
2048}
2049}
2050_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env_vars.borrow(); _lua_tmp.clone() }, { let _lua_tmp = k.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1094, 12), end: (1094, 40) });
2051
2052_lua_nil()
2053}}))], _lua_debug_loc { start: (1082, 4), end: (1096, 5) });
2054let new_args_pat = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = args_pat_vars_val.borrow(); _lua_tmp.clone() }));
2055{
2056let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_op!{sub, _lua_len({ let _lua_tmp = env_vars.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1099, 18), end: (1099, 27) }), _lua_num!(1), _lua_debug_loc { start: (1099, 18), end: (1099, 31) }}));
2057while (_lua_op!{greater_eq, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (1100, 14), end: (1100, 20) }}).as_bool(_lua_debug_loc { start: (1100, 8), end: (1103, 11) }) {
2058*new_args_pat.borrow_mut() = _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = env_vars.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (1101, 53), end: (1101, 58) }}, _lua_debug_loc { start: (1101, 44), end: (1101, 58) }), { let _lua_tmp = new_args_pat.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1101, 27), end: (1101, 74) });
2059*i.borrow_mut() = _lua_op!{sub, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (1102, 16), end: (1102, 21) }};
2060}
2061}
2062let new_args = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = args_pat_vars_val.borrow(); _lua_tmp.clone() }));
2063{
2064let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_op!{sub, _lua_len({ let _lua_tmp = env_vars.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1107, 18), end: (1107, 27) }), _lua_num!(1), _lua_debug_loc { start: (1107, 18), end: (1107, 31) }}));
2065while (_lua_op!{greater_eq, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (1108, 14), end: (1108, 20) }}).as_bool(_lua_debug_loc { start: (1108, 8), end: (1116, 11) }) {
2066*new_args.borrow_mut() = _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = make_quote.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = must_env_get.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_lookup({ let _lua_tmp = env_vars.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (1111, 47), end: (1111, 52) }}, _lua_debug_loc { start: (1111, 38), end: (1111, 52) })], _lua_debug_loc { start: (1111, 20), end: (1111, 54) })], _lua_debug_loc { start: (1110, 16), end: (1112, 17) }), { let _lua_tmp = new_args.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1109, 23), end: (1114, 13) });
2067*i.borrow_mut() = _lua_op!{sub, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (1115, 16), end: (1115, 21) }};
2068}
2069}
2070return _lua_call({ let _lua_tmp = new_data.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = args_pat.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = make_quote.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_data.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = new_args_pat.borrow(); _lua_tmp.clone() }, { let _lua_tmp = body.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1126, 24), end: (1126, 52) })], _lua_debug_loc { start: (1124, 20), end: (1127, 21) })], _lua_debug_loc { start: (1123, 16), end: (1128, 17) }), { let _lua_tmp = new_args.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1122, 12), end: (1130, 13) })], _lua_debug_loc { start: (1120, 8), end: (1131, 9) })], _lua_debug_loc { start: (1118, 11), end: (1132, 5) });
2071
2072_lua_nil()
2073}}));
2074*jsbool_equal_p_inner.borrow_mut() = _lua_lambda(Box::new({let force_all = force_all.clone();
2075let jsbool_equal_p_inner = jsbool_equal_p_inner.clone();
2076let lang_assert_equal_set_do = lang_assert_equal_set_do.clone();
2077let comment_p = comment_p.clone();
2078let un_comment_all = un_comment_all.clone();
2079let null_p = null_p.clone();
2080let atom_p = atom_p.clone();
2081let atom_equal_p = atom_equal_p.clone();
2082let construction_p = construction_p.clone();
2083let construction_head = construction_head.clone();
2084let construction_tail = construction_tail.clone();
2085let data_p = data_p.clone();
2086let data_name = data_name.clone();
2087let data_list = data_list.clone();
2088let LANG_ERROR = LANG_ERROR.clone();
2089move |mut _lua_arg_tmp, _| {
2090let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2091let y = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2092if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1135, 7), end: (1135, 13) }}).as_bool(_lua_debug_loc { start: (1135, 7), end: (1135, 13) }) {
2093return _lua_true();
2094}
2095*x.borrow_mut() = _lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1138, 8), end: (1138, 20) });
2096*y.borrow_mut() = _lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1139, 8), end: (1139, 20) });
2097if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1140, 7), end: (1140, 13) }}).as_bool(_lua_debug_loc { start: (1140, 7), end: (1140, 13) }) {
2098return _lua_true();
2099}
2100let end_2 = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2101*end_2.borrow_mut() = _lua_lambda(Box::new({let jsbool_equal_p_inner = jsbool_equal_p_inner.clone();
2102let lang_assert_equal_set_do = lang_assert_equal_set_do.clone();
2103move |mut _lua_arg_tmp, _| {
2104let xx = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2105let yy = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2106let f1 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2107let f2 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2108let r1 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = jsbool_equal_p_inner.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = f1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xx.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1145, 12), end: (1145, 18) }), _lua_call({ let _lua_tmp = f1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = yy.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1146, 12), end: (1146, 18) })], _lua_debug_loc { start: (1144, 19), end: (1147, 9) })));
2109let r2 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = jsbool_equal_p_inner.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = f2.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xx.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1149, 12), end: (1149, 18) }), _lua_call({ let _lua_tmp = f2.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = yy.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1150, 12), end: (1150, 18) })], _lua_debug_loc { start: (1148, 19), end: (1151, 9) })));
2110if (_lua_op!{and, _lua_op!{eq, { let _lua_tmp = r1.borrow(); _lua_tmp.clone() }, _lua_true(), _lua_debug_loc { start: (1152, 11), end: (1152, 36) }}, _lua_op!{eq, { let _lua_tmp = r2.borrow(); _lua_tmp.clone() }, _lua_true(), _lua_debug_loc { start: (1152, 26), end: (1152, 36) }}, _lua_debug_loc { start: (1152, 11), end: (1152, 36) }}).as_bool(_lua_debug_loc { start: (1152, 11), end: (1152, 36) }) {
2111_lua_call({ let _lua_tmp = lang_assert_equal_set_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xx.borrow(); _lua_tmp.clone() }, { let _lua_tmp = yy.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1153, 12), end: (1153, 44) });
2112return _lua_true();
2113} else if (_lua_op!{and, _lua_op!{not_eq, { let _lua_tmp = r1.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (1155, 15), end: (1155, 42) }}, _lua_op!{not_eq, { let _lua_tmp = r2.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (1155, 31), end: (1155, 42) }}, _lua_debug_loc { start: (1155, 15), end: (1155, 42) }}).as_bool(_lua_debug_loc { start: (1155, 15), end: (1155, 42) }) {
2114return _lua_nil();
2115} else {
2116return _lua_false();
2117}
2118
2119_lua_nil()
2120}}));
2121if (_lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1161, 7), end: (1161, 19) })).as_bool(_lua_debug_loc { start: (1161, 7), end: (1161, 19) }) {
2122let x2 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = un_comment_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1162, 19), end: (1162, 36) })));
2123let ret = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = jsbool_equal_p_inner.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x2.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1163, 20), end: (1163, 47) })));
2124if (_lua_op!{eq, { let _lua_tmp = ret.borrow(); _lua_tmp.clone() }, _lua_true(), _lua_debug_loc { start: (1164, 11), end: (1164, 22) }}).as_bool(_lua_debug_loc { start: (1164, 11), end: (1164, 22) }) {
2125*ret.borrow_mut() = _lua_nil();
2126}
2127return { let _lua_tmp = ret.borrow(); _lua_tmp.clone() };
2128} else if (_lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1168, 11), end: (1168, 23) })).as_bool(_lua_debug_loc { start: (1168, 11), end: (1168, 23) }) {
2129let y2 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = un_comment_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1169, 19), end: (1169, 36) })));
2130let ret = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = jsbool_equal_p_inner.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y2.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1170, 20), end: (1170, 47) })));
2131if (_lua_op!{eq, { let _lua_tmp = ret.borrow(); _lua_tmp.clone() }, _lua_true(), _lua_debug_loc { start: (1171, 11), end: (1171, 22) }}).as_bool(_lua_debug_loc { start: (1171, 11), end: (1171, 22) }) {
2132*ret.borrow_mut() = _lua_nil();
2133}
2134return { let _lua_tmp = ret.borrow(); _lua_tmp.clone() };
2135} else if (_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1175, 11), end: (1175, 20) })).as_bool(_lua_debug_loc { start: (1175, 11), end: (1175, 20) }) {
2136if (_lua_not(_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1176, 15), end: (1176, 24) }), _lua_debug_loc { start: (1176, 11), end: (1176, 24) })).as_bool(_lua_debug_loc { start: (1176, 11), end: (1176, 24) }) {
2137return _lua_false();
2138}
2139_lua_call({ let _lua_tmp = lang_assert_equal_set_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1179, 8), end: (1179, 38) });
2140return _lua_true();
2141} else if (_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1181, 11), end: (1181, 20) })).as_bool(_lua_debug_loc { start: (1181, 11), end: (1181, 20) }) {
2142if (_lua_not(_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1182, 15), end: (1182, 24) }), _lua_debug_loc { start: (1182, 11), end: (1182, 24) })).as_bool(_lua_debug_loc { start: (1182, 11), end: (1182, 24) }) {
2143return _lua_false();
2144}
2145return _lua_call({ let _lua_tmp = atom_equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1185, 15), end: (1185, 33) });
2146} else if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1186, 11), end: (1186, 28) })).as_bool(_lua_debug_loc { start: (1186, 11), end: (1186, 28) }) {
2147if (_lua_not(_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1187, 15), end: (1187, 32) }), _lua_debug_loc { start: (1187, 11), end: (1187, 32) })).as_bool(_lua_debug_loc { start: (1187, 11), end: (1187, 32) }) {
2148return _lua_false();
2149}
2150return _lua_call({ let _lua_tmp = end_2.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, { let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, { let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1190, 15), end: (1190, 64) });
2151} else if (_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1191, 11), end: (1191, 20) })).as_bool(_lua_debug_loc { start: (1191, 11), end: (1191, 20) }) {
2152if (_lua_not(_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1192, 15), end: (1192, 24) }), _lua_debug_loc { start: (1192, 11), end: (1192, 24) })).as_bool(_lua_debug_loc { start: (1192, 11), end: (1192, 24) }) {
2153return _lua_false();
2154}
2155return _lua_call({ let _lua_tmp = end_2.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, { let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }, { let _lua_tmp = data_list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1195, 15), end: (1195, 48) });
2156}
2157return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1197, 11), end: (1197, 23) });
2158
2159_lua_nil()
2160}}));
2161*equal_p.borrow_mut() = _lua_lambda(Box::new({let jsbool_equal_p_inner = jsbool_equal_p_inner.clone();
2162move |mut _lua_arg_tmp, _| {
2163let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2164let y = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2165return _lua_op!{not_eq, _lua_call({ let _lua_tmp = jsbool_equal_p_inner.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1200, 11), end: (1200, 37) }), _lua_false(), _lua_debug_loc { start: (1200, 11), end: (1200, 46) }};
2166
2167_lua_nil()
2168}}));
2169*simple_print.borrow_mut() = _lua_lambda(Box::new({let un_just_all = un_just_all.clone();
2170let null_p = null_p.clone();
2171let construction_p = construction_p.clone();
2172let tostring = tostring.clone();
2173let simple_print = simple_print.clone();
2174let construction_head = construction_head.clone();
2175let construction_tail = construction_tail.clone();
2176let data_p = data_p.clone();
2177let new_construction = new_construction.clone();
2178let data_name = data_name.clone();
2179let data_list = data_list.clone();
2180let atom_p = atom_p.clone();
2181let un_atom = un_atom.clone();
2182let comment_p = comment_p.clone();
2183let comment_comment = comment_comment.clone();
2184let comment_x = comment_x.clone();
2185let delay_evaluate_p = delay_evaluate_p.clone();
2186let env2val = env2val.clone();
2187let delay_evaluate_env = delay_evaluate_env.clone();
2188let delay_evaluate_x = delay_evaluate_x.clone();
2189let delay_builtin_func_p = delay_builtin_func_p.clone();
2190let delay_builtin_func_f = delay_builtin_func_f.clone();
2191let jsArray_to_list = jsArray_to_list.clone();
2192let delay_builtin_func_xs = delay_builtin_func_xs.clone();
2193let delay_builtin_form_p = delay_builtin_form_p.clone();
2194let delay_builtin_form_env = delay_builtin_form_env.clone();
2195let delay_builtin_form_f = delay_builtin_form_f.clone();
2196let delay_builtin_form_xs = delay_builtin_form_xs.clone();
2197let delay_apply_p = delay_apply_p.clone();
2198let delay_apply_f = delay_apply_f.clone();
2199let delay_apply_xs = delay_apply_xs.clone();
2200let LANG_ERROR = LANG_ERROR.clone();
2201move |mut _lua_arg_tmp, _| {
2202let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2203*x.borrow_mut() = _lua_call({ let _lua_tmp = un_just_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1203, 8), end: (1203, 22) });
2204let temp = std::sync::Arc::new(std::cell::RefCell::new(_lua_str("")));
2205let prefix = std::sync::Arc::new(std::cell::RefCell::new(_lua_str("")));
2206if (_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1206, 7), end: (1206, 16) })).as_bool(_lua_debug_loc { start: (1206, 7), end: (1206, 16) }) {
2207return _lua_str("()");
2208} else if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1208, 11), end: (1208, 28) })).as_bool(_lua_debug_loc { start: (1208, 11), end: (1208, 28) }) {
2209*temp.borrow_mut() = _lua_str("(");
2210*prefix.borrow_mut() = _lua_str("");
2211while (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1211, 14), end: (1211, 31) })).as_bool(_lua_debug_loc { start: (1211, 8), end: (1221, 11) }) {
2212*temp.borrow_mut() = _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = temp.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1212, 19), end: (1212, 33) }), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = prefix.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1212, 37), end: (1212, 53) }), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1214, 20), end: (1214, 40) })], _lua_debug_loc { start: (1213, 16), end: (1215, 17) })], _lua_debug_loc { start: (1212, 57), end: (1216, 13) }), _lua_debug_loc { start: (1212, 37), end: (1216, 13) }}, _lua_debug_loc { start: (1212, 19), end: (1216, 13) }};
2213*prefix.borrow_mut() = _lua_str(" ");
2214*x.borrow_mut() = _lua_call({ let _lua_tmp = un_just_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1219, 16), end: (1219, 36) })], _lua_debug_loc { start: (1218, 16), end: (1220, 13) });
2215}
2216if (_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1222, 11), end: (1222, 20) })).as_bool(_lua_debug_loc { start: (1222, 11), end: (1222, 20) }) {
2217*temp.borrow_mut() = _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = temp.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1223, 19), end: (1223, 33) }), _lua_str(")"), _lua_debug_loc { start: (1223, 19), end: (1223, 40) }};
2218} else {
2219*temp.borrow_mut() = _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = temp.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1225, 19), end: (1225, 33) }), _lua_op!{concat, _lua_str(" . "), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1226, 16), end: (1226, 31) })], _lua_debug_loc { start: (1225, 46), end: (1227, 13) }), _lua_str(")"), _lua_debug_loc { start: (1225, 46), end: (1227, 20) }}, _lua_debug_loc { start: (1225, 37), end: (1227, 20) }}, _lua_debug_loc { start: (1225, 19), end: (1227, 20) }};
2220}
2221return { let _lua_tmp = temp.borrow(); _lua_tmp.clone() };
2222} else if (_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1230, 11), end: (1230, 20) })).as_bool(_lua_debug_loc { start: (1230, 11), end: (1230, 20) }) {
2223return _lua_op!{concat, _lua_str("#"), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1234, 20), end: (1234, 32) }), _lua_call({ let _lua_tmp = data_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1235, 20), end: (1235, 32) })], _lua_debug_loc { start: (1233, 16), end: (1236, 17) })], _lua_debug_loc { start: (1232, 12), end: (1237, 13) })], _lua_debug_loc { start: (1231, 22), end: (1238, 9) }), _lua_debug_loc { start: (1231, 15), end: (1238, 9) }};
2224} else if (_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1239, 11), end: (1239, 20) })).as_bool(_lua_debug_loc { start: (1239, 11), end: (1239, 20) }) {
2225return _lua_call({ let _lua_tmp = un_atom.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1240, 15), end: (1240, 25) });
2226} else if (_lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1241, 11), end: (1241, 23) })).as_bool(_lua_debug_loc { start: (1241, 11), end: (1241, 23) }) {
2227return _lua_op!{concat, _lua_str(";("), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = comment_comment.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1244, 16), end: (1244, 34) })], _lua_debug_loc { start: (1243, 12), end: (1245, 13) })], _lua_debug_loc { start: (1242, 23), end: (1246, 9) }), _lua_op!{concat, _lua_str(" "), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = comment_x.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1248, 16), end: (1248, 28) })], _lua_debug_loc { start: (1247, 12), end: (1249, 13) })], _lua_debug_loc { start: (1246, 20), end: (1250, 9) }), _lua_str(")"), _lua_debug_loc { start: (1246, 20), end: (1250, 16) }}, _lua_debug_loc { start: (1246, 13), end: (1250, 16) }}, _lua_debug_loc { start: (1242, 23), end: (1250, 16) }}, _lua_debug_loc { start: (1242, 15), end: (1250, 16) }};
2228} else if (_lua_call({ let _lua_tmp = delay_evaluate_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1251, 11), end: (1251, 30) })).as_bool(_lua_debug_loc { start: (1251, 11), end: (1251, 30) }) {
2229return _lua_op!{concat, _lua_str("$("), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = env2val.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_evaluate_env.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1255, 20), end: (1255, 41) })], _lua_debug_loc { start: (1254, 16), end: (1256, 17) })], _lua_debug_loc { start: (1253, 12), end: (1257, 13) })], _lua_debug_loc { start: (1252, 23), end: (1258, 9) }), _lua_op!{concat, _lua_str(" "), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_evaluate_x.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1260, 16), end: (1260, 35) })], _lua_debug_loc { start: (1259, 12), end: (1261, 13) })], _lua_debug_loc { start: (1258, 20), end: (1262, 9) }), _lua_str(")"), _lua_debug_loc { start: (1258, 20), end: (1262, 16) }}, _lua_debug_loc { start: (1258, 13), end: (1262, 16) }}, _lua_debug_loc { start: (1252, 23), end: (1262, 16) }}, _lua_debug_loc { start: (1252, 15), end: (1262, 16) }};
2230} else if (_lua_call({ let _lua_tmp = delay_builtin_func_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1263, 11), end: (1263, 34) })).as_bool(_lua_debug_loc { start: (1263, 11), end: (1263, 34) }) {
2231return _lua_op!{concat, _lua_str("%("), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_builtin_func_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1266, 16), end: (1266, 39) })], _lua_debug_loc { start: (1265, 12), end: (1267, 13) })], _lua_debug_loc { start: (1264, 23), end: (1268, 9) }), _lua_op!{concat, _lua_str(" "), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = jsArray_to_list.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_builtin_func_xs.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1271, 20), end: (1271, 44) })], _lua_debug_loc { start: (1270, 16), end: (1272, 17) })], _lua_debug_loc { start: (1269, 12), end: (1273, 13) })], _lua_debug_loc { start: (1268, 20), end: (1274, 9) }), _lua_str(")"), _lua_debug_loc { start: (1268, 20), end: (1274, 16) }}, _lua_debug_loc { start: (1268, 13), end: (1274, 16) }}, _lua_debug_loc { start: (1264, 23), end: (1274, 16) }}, _lua_debug_loc { start: (1264, 15), end: (1274, 16) }};
2232} else if (_lua_call({ let _lua_tmp = delay_builtin_form_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1275, 11), end: (1275, 34) })).as_bool(_lua_debug_loc { start: (1275, 11), end: (1275, 34) }) {
2233return _lua_op!{concat, _lua_str("@("), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = env2val.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_builtin_form_env.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1279, 20), end: (1279, 45) })], _lua_debug_loc { start: (1278, 16), end: (1280, 17) })], _lua_debug_loc { start: (1277, 12), end: (1281, 13) })], _lua_debug_loc { start: (1276, 23), end: (1282, 9) }), _lua_op!{concat, _lua_str(" "), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_builtin_form_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1284, 16), end: (1284, 39) })], _lua_debug_loc { start: (1283, 12), end: (1285, 13) })], _lua_debug_loc { start: (1282, 20), end: (1286, 9) }), _lua_op!{concat, _lua_str(" "), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = jsArray_to_list.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_builtin_form_xs.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1289, 20), end: (1289, 44) })], _lua_debug_loc { start: (1288, 16), end: (1290, 17) })], _lua_debug_loc { start: (1287, 12), end: (1291, 13) })], _lua_debug_loc { start: (1286, 20), end: (1292, 9) }), _lua_str(")"), _lua_debug_loc { start: (1286, 20), end: (1292, 16) }}, _lua_debug_loc { start: (1286, 13), end: (1292, 16) }}, _lua_debug_loc { start: (1282, 20), end: (1292, 16) }}, _lua_debug_loc { start: (1282, 13), end: (1292, 16) }}, _lua_debug_loc { start: (1276, 23), end: (1292, 16) }}, _lua_debug_loc { start: (1276, 15), end: (1292, 16) }};
2234} else if (_lua_call({ let _lua_tmp = delay_apply_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1293, 11), end: (1293, 27) })).as_bool(_lua_debug_loc { start: (1293, 11), end: (1293, 27) }) {
2235return _lua_op!{concat, _lua_str("^("), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_apply_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1296, 16), end: (1296, 32) })], _lua_debug_loc { start: (1295, 12), end: (1297, 13) })], _lua_debug_loc { start: (1294, 23), end: (1298, 9) }), _lua_op!{concat, _lua_str(" "), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = jsArray_to_list.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_apply_xs.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1301, 20), end: (1301, 37) })], _lua_debug_loc { start: (1300, 16), end: (1302, 17) })], _lua_debug_loc { start: (1299, 12), end: (1303, 13) })], _lua_debug_loc { start: (1298, 20), end: (1304, 9) }), _lua_str(")"), _lua_debug_loc { start: (1298, 20), end: (1304, 16) }}, _lua_debug_loc { start: (1298, 13), end: (1304, 16) }}, _lua_debug_loc { start: (1294, 23), end: (1304, 16) }}, _lua_debug_loc { start: (1294, 15), end: (1304, 16) }};
2236}
2237return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1306, 11), end: (1306, 23) });
2238
2239_lua_nil()
2240}}));
2241let run_trampoline = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2242*run_trampoline.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
2243let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2244let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1309, 14), end: (1309, 17) })));
2245while (_lua_lookup({ let _lua_tmp = i.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (1310, 10), end: (1310, 13) })).as_bool(_lua_debug_loc { start: (1310, 4), end: (1312, 7) }) {
2246*i.borrow_mut() = _lua_call(_lua_lookup({ let _lua_tmp = i.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (1311, 12), end: (1311, 18) }), vec![], _lua_debug_loc { start: (1311, 12), end: (1311, 18) });
2247}
2248return _lua_lookup({ let _lua_tmp = i.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (1313, 11), end: (1313, 14) });
2249
2250_lua_nil()
2251}}));
2252*atom_t.borrow_mut() = _lua_num!(0);
2253*construction_t.borrow_mut() = _lua_num!(1);
2254*null_t.borrow_mut() = _lua_num!(2);
2255*data_t.borrow_mut() = _lua_num!(3);
2256*just_t.borrow_mut() = _lua_num!(4);
2257*delay_evaluate_t.borrow_mut() = _lua_num!(5);
2258*delay_builtin_func_t.borrow_mut() = _lua_num!(6);
2259*delay_builtin_form_t.borrow_mut() = _lua_num!(7);
2260*delay_apply_t.borrow_mut() = _lua_num!(8);
2261*comment_t.borrow_mut() = _lua_num!(10);
2262*hole_t.borrow_mut() = _lua_num!(9);
2263let new_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2264*new_atom.borrow_mut() = _lua_lambda(Box::new({let atom_t = atom_t.clone();
2265move |mut _lua_arg_tmp, _| {
2266let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2267return _lua_table(vec![(_lua_num!(1), { let _lua_tmp = atom_t.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = x.borrow(); _lua_tmp.clone() })]);
2268
2269_lua_nil()
2270}}));
2271*null_v.borrow_mut() = _lua_table(vec![(_lua_num!(1), { let _lua_tmp = null_t.borrow(); _lua_tmp.clone() })]);
2272let force_uncomment_all_rec = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2273*force_uncomment_all_rec.borrow_mut() = _lua_lambda(Box::new({let force_uncomment_all = force_uncomment_all.clone();
2274let force_all_rec = force_all_rec.clone();
2275let comment_p = comment_p.clone();
2276let lang_copy_do = lang_copy_do.clone();
2277let force_uncomment_all_rec = force_uncomment_all_rec.clone();
2278let data_p = data_p.clone();
2279let construction_p = construction_p.clone();
2280move |mut _lua_arg_tmp, _| {
2281let raw = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2282let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_uncomment_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = raw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1331, 14), end: (1331, 38) })));
2283let conslike = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2284*conslike.borrow_mut() = _lua_lambda(Box::new({let force_all_rec = force_all_rec.clone();
2285let comment_p = comment_p.clone();
2286let lang_copy_do = lang_copy_do.clone();
2287let force_uncomment_all_rec = force_uncomment_all_rec.clone();
2288move |mut _lua_arg_tmp, _| {
2289let xx = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2290_lua_set({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(2),_lua_call({ let _lua_tmp = force_all_rec.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (1333, 30), end: (1333, 34) })], _lua_debug_loc { start: (1333, 16), end: (1333, 36) }), _lua_debug_loc { start: (1333, 8), end: (1333, 36) });
2291_lua_set({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(3),_lua_call({ let _lua_tmp = force_all_rec.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (1334, 30), end: (1334, 34) })], _lua_debug_loc { start: (1334, 16), end: (1334, 36) }), _lua_debug_loc { start: (1334, 8), end: (1334, 36) });
2292if (_lua_op!{or, _lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (1335, 21), end: (1335, 25) })], _lua_debug_loc { start: (1335, 11), end: (1335, 27) }), _lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (1335, 41), end: (1335, 45) })], _lua_debug_loc { start: (1335, 31), end: (1335, 47) }), _lua_debug_loc { start: (1335, 11), end: (1335, 47) }}).as_bool(_lua_debug_loc { start: (1335, 11), end: (1335, 47) }) {
2293let ret = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = lang_copy_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xx.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1336, 24), end: (1336, 40) })));
2294let a = std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (1337, 22), end: (1337, 26) })));
2295let d = std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup({ let _lua_tmp = xx.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (1338, 22), end: (1338, 26) })));
2296let a1 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_uncomment_all_rec.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = a.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1339, 23), end: (1339, 49) })));
2297let d1 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_uncomment_all_rec.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = d.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1340, 23), end: (1340, 49) })));
2298_lua_set({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() },_lua_num!(2),{ let _lua_tmp = a1.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1341, 12), end: (1341, 23) });
2299_lua_set({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() },_lua_num!(3),{ let _lua_tmp = d1.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1342, 12), end: (1342, 23) });
2300return { let _lua_tmp = ret.borrow(); _lua_tmp.clone() };
2301} else {
2302return { let _lua_tmp = xx.borrow(); _lua_tmp.clone() };
2303}
2304
2305_lua_nil()
2306}}));
2307if (_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1348, 7), end: (1348, 16) })).as_bool(_lua_debug_loc { start: (1348, 7), end: (1348, 16) }) {
2308return _lua_call({ let _lua_tmp = conslike.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1349, 15), end: (1349, 26) });
2309} else if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1350, 11), end: (1350, 28) })).as_bool(_lua_debug_loc { start: (1350, 11), end: (1350, 28) }) {
2310return _lua_call({ let _lua_tmp = conslike.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1351, 15), end: (1351, 26) });
2311}
2312return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
2313
2314_lua_nil()
2315}}));
2316*unlazy_all_rec.borrow_mut() = { let _lua_tmp = force_uncomment_all_rec.borrow(); _lua_tmp.clone() };
2317*system_atom.borrow_mut() = _lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("太始初核")], _lua_debug_loc { start: (1356, 14), end: (1356, 30) });
2318*name_atom.borrow_mut() = _lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("符名")], _lua_debug_loc { start: (1357, 12), end: (1357, 26) });
2319*function_atom.borrow_mut() = _lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("化滅")], _lua_debug_loc { start: (1358, 16), end: (1358, 30) });
2320*form_atom.borrow_mut() = _lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("式形")], _lua_debug_loc { start: (1359, 12), end: (1359, 26) });
2321let equal_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("等同")], _lua_debug_loc { start: (1360, 19), end: (1360, 33) })));
2322let evaluate_sym = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("解算")], _lua_debug_loc { start: (1361, 21), end: (1361, 35) })));
2323let theThing_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("特定其物")], _lua_debug_loc { start: (1362, 22), end: (1362, 38) })));
2324let something_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("省略一物")], _lua_debug_loc { start: (1363, 23), end: (1363, 39) })));
2325*mapping_atom.borrow_mut() = _lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("映表")], _lua_debug_loc { start: (1364, 15), end: (1364, 29) });
2326let if_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("如若")], _lua_debug_loc { start: (1365, 16), end: (1365, 30) })));
2327let typeAnnotation_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("一類何物")], _lua_debug_loc { start: (1366, 28), end: (1366, 44) })));
2328let isOrNot_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("是非")], _lua_debug_loc { start: (1367, 21), end: (1367, 35) })));
2329let sub_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("其子")], _lua_debug_loc { start: (1368, 17), end: (1368, 31) })));
2330let true_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("爻陽")], _lua_debug_loc { start: (1369, 18), end: (1369, 32) })));
2331let false_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("爻陰")], _lua_debug_loc { start: (1370, 19), end: (1370, 33) })));
2332let quote_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("引用")], _lua_debug_loc { start: (1371, 19), end: (1371, 33) })));
2333let apply_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("應用")], _lua_debug_loc { start: (1372, 19), end: (1372, 33) })));
2334let null_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("間空")], _lua_debug_loc { start: (1373, 18), end: (1373, 32) })));
2335let construction_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("連頸")], _lua_debug_loc { start: (1374, 26), end: (1374, 40) })));
2336let data_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("構物")], _lua_debug_loc { start: (1375, 18), end: (1375, 32) })));
2337*error_atom.borrow_mut() = _lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("謬誤")], _lua_debug_loc { start: (1376, 13), end: (1376, 27) });
2338let atom_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("詞素")], _lua_debug_loc { start: (1377, 18), end: (1377, 32) })));
2339let list_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("列序")], _lua_debug_loc { start: (1378, 18), end: (1378, 32) })));
2340let head_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("首始")], _lua_debug_loc { start: (1379, 18), end: (1379, 32) })));
2341let tail_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("尾末")], _lua_debug_loc { start: (1380, 18), end: (1380, 32) })));
2342let thing_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("之物")], _lua_debug_loc { start: (1381, 19), end: (1381, 33) })));
2343let theWorldStopped_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("宇宙亡矣")], _lua_debug_loc { start: (1382, 29), end: (1382, 45) })));
2344let effect_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("效應")], _lua_debug_loc { start: (1383, 20), end: (1383, 34) })));
2345let comment_atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("註疏")], _lua_debug_loc { start: (1384, 21), end: (1384, 35) })));
2346*the_world_stopped_v.borrow_mut() = _lua_call({ let _lua_tmp = new_error.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = system_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = theWorldStopped_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1387, 4), end: (1387, 50) })], _lua_debug_loc { start: (1385, 22), end: (1388, 1) });
2347let systemName_make = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2348*systemName_make.borrow_mut() = _lua_lambda(Box::new({let new_data = new_data.clone();
2349let name_atom = name_atom.clone();
2350let new_construction = new_construction.clone();
2351let system_atom = system_atom.clone();
2352let null_v = null_v.clone();
2353move |mut _lua_arg_tmp, _| {
2354let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2355return _lua_call({ let _lua_tmp = new_data.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = name_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = system_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1394, 12), end: (1394, 39) })], _lua_debug_loc { start: (1392, 8), end: (1395, 9) })], _lua_debug_loc { start: (1390, 11), end: (1396, 5) });
2356
2357_lua_nil()
2358}}));
2359let make_builtin_f_new_sym_f = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2360*make_builtin_f_new_sym_f.borrow_mut() = _lua_lambda(Box::new({let systemName_make = systemName_make.clone();
2361let new_list = new_list.clone();
2362let typeAnnotation_atom = typeAnnotation_atom.clone();
2363let function_atom = function_atom.clone();
2364let something_atom = something_atom.clone();
2365let theThing_atom = theThing_atom.clone();
2366move |mut _lua_arg_tmp, _| {
2367let x_sym = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2368return _lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x_sym.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1402, 12), end: (1402, 58) }), { let _lua_tmp = theThing_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1400, 8), end: (1404, 9) })], _lua_debug_loc { start: (1399, 11), end: (1405, 5) });
2369
2370_lua_nil()
2371}}));
2372let make_builtin_f_get_sym_f = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2373*make_builtin_f_get_sym_f.borrow_mut() = _lua_lambda(Box::new({let systemName_make = systemName_make.clone();
2374let new_list = new_list.clone();
2375let typeAnnotation_atom = typeAnnotation_atom.clone();
2376let function_atom = function_atom.clone();
2377let something_atom = something_atom.clone();
2378move |mut _lua_arg_tmp, _| {
2379let t_sym = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2380let x_sym = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2381return _lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = t_sym.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1413, 16), end: (1413, 31) }), { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1411, 12), end: (1415, 13) }), { let _lua_tmp = x_sym.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1409, 8), end: (1417, 9) })], _lua_debug_loc { start: (1408, 11), end: (1418, 5) });
2382
2383_lua_nil()
2384}}));
2385let make_builtin_f_p_sym_f = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2386*make_builtin_f_p_sym_f.borrow_mut() = _lua_lambda(Box::new({let systemName_make = systemName_make.clone();
2387let new_list = new_list.clone();
2388let typeAnnotation_atom = typeAnnotation_atom.clone();
2389let function_atom = function_atom.clone();
2390let isOrNot_atom = isOrNot_atom.clone();
2391let something_atom = something_atom.clone();
2392move |mut _lua_arg_tmp, _| {
2393let t_sym = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2394return _lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = isOrNot_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = t_sym.borrow(); _lua_tmp.clone() }, { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1427, 16), end: (1427, 68) })], _lua_debug_loc { start: (1425, 12), end: (1428, 13) })], _lua_debug_loc { start: (1422, 8), end: (1429, 9) })], _lua_debug_loc { start: (1421, 11), end: (1430, 5) });
2395
2396_lua_nil()
2397}}));
2398let new_data_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = make_builtin_f_new_sym_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = data_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1432, 45), end: (1432, 80) })));
2399*data_name_function_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = make_builtin_f_get_sym_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = data_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = name_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1433, 40), end: (1433, 86) });
2400*data_list_function_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = make_builtin_f_get_sym_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = data_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = list_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1434, 40), end: (1434, 86) });
2401*data_p_function_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = make_builtin_f_p_sym_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = data_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1435, 37), end: (1435, 70) });
2402let new_construction_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = make_builtin_f_new_sym_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = construction_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1436, 53), end: (1436, 96) })));
2403*construction_p_function_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = make_builtin_f_p_sym_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = construction_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1437, 45), end: (1437, 86) });
2404*construction_head_function_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = make_builtin_f_get_sym_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = construction_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = head_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1438, 48), end: (1438, 102) });
2405*construction_tail_function_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = make_builtin_f_get_sym_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = construction_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = tail_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1439, 48), end: (1439, 102) });
2406*atom_p_function_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = make_builtin_f_p_sym_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = atom_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1440, 37), end: (1440, 70) });
2407*null_p_function_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = make_builtin_f_p_sym_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = null_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1441, 37), end: (1441, 70) });
2408*equal_p_function_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = isOrNot_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = equal_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1446, 8), end: (1446, 42) })], _lua_debug_loc { start: (1443, 4), end: (1447, 5) })], _lua_debug_loc { start: (1442, 38), end: (1448, 1) });
2409*apply_function_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1454, 12), end: (1454, 59) }), { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1452, 8), end: (1456, 9) }), { let _lua_tmp = apply_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1450, 4), end: (1458, 5) })], _lua_debug_loc { start: (1449, 36), end: (1459, 1) });
2410*evaluate_function_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = evaluate_sym.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1461, 4), end: (1461, 62) })], _lua_debug_loc { start: (1460, 39), end: (1462, 1) });
2411let list_chooseOne_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = make_builtin_f_get_sym_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = thing_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1465, 4), end: (1465, 61) })], _lua_debug_loc { start: (1463, 51), end: (1466, 1) })));
2412*if_function_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = if_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1468, 4), end: (1468, 57) })], _lua_debug_loc { start: (1467, 33), end: (1469, 1) });
2413*quote_form_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = form_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = quote_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1471, 4), end: (1471, 56) })], _lua_debug_loc { start: (1470, 32), end: (1472, 1) });
2414*lambda_form_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = form_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1478, 12), end: (1478, 66) })], _lua_debug_loc { start: (1476, 8), end: (1479, 9) }), { let _lua_tmp = theThing_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1474, 4), end: (1481, 5) })], _lua_debug_loc { start: (1473, 33), end: (1482, 1) });
2415*function_builtin_use_systemName.borrow_mut() = _lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = form_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = system_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1486, 8), end: (1486, 44) })], _lua_debug_loc { start: (1484, 4), end: (1487, 5) })], _lua_debug_loc { start: (1483, 34), end: (1488, 1) });
2416*form_builtin_use_systemName.borrow_mut() = _lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = form_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = system_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = form_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1492, 8), end: (1492, 40) })], _lua_debug_loc { start: (1490, 4), end: (1493, 5) })], _lua_debug_loc { start: (1489, 30), end: (1494, 1) });
2417*form_use_systemName.borrow_mut() = _lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = form_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = form_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1496, 4), end: (1496, 34) })], _lua_debug_loc { start: (1495, 22), end: (1497, 1) });
2418let comment_function_builtin_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = comment_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1499, 4), end: (1499, 62) })], _lua_debug_loc { start: (1498, 44), end: (1500, 1) })));
2419*comment_form_builtin_systemName.borrow_mut() = _lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = form_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = comment_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1502, 4), end: (1502, 58) })], _lua_debug_loc { start: (1501, 34), end: (1503, 1) });
2420let false_v = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_data.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = false_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1506, 4), end: (1506, 14) })], _lua_debug_loc { start: (1504, 16), end: (1507, 1) })));
2421let true_v = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_data.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = true_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1510, 4), end: (1510, 14) })], _lua_debug_loc { start: (1508, 15), end: (1511, 1) })));
2422let list_to_jsArray = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2423*list_to_jsArray.borrow_mut() = _lua_lambda(Box::new({let construction_p = construction_p.clone();
2424let __TS__ArrayPush = __TS__ArrayPush.clone();
2425let construction_head = construction_head.clone();
2426let construction_tail = construction_tail.clone();
2427let null_p = null_p.clone();
2428move |mut _lua_arg_tmp, _| {
2429let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2430let k_done = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2431let k_tail = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2432let ret = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
2433while (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1514, 10), end: (1514, 28) })).as_bool(_lua_debug_loc { start: (1514, 4), end: (1520, 7) }) {
2434_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1517, 12), end: (1517, 33) })], _lua_debug_loc { start: (1515, 8), end: (1518, 9) });
2435*xs.borrow_mut() = _lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1519, 13), end: (1519, 34) });
2436}
2437if (_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1521, 7), end: (1521, 17) })).as_bool(_lua_debug_loc { start: (1521, 7), end: (1521, 17) }) {
2438return _lua_call({ let _lua_tmp = k_done.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1522, 15), end: (1522, 26) });
2439}
2440return _lua_call({ let _lua_tmp = k_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }, { let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1524, 11), end: (1524, 26) });
2441
2442_lua_nil()
2443}}));
2444let maybe_list_to_jsArray = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2445*maybe_list_to_jsArray.borrow_mut() = _lua_lambda(Box::new({let list_to_jsArray = list_to_jsArray.clone();
2446move |mut _lua_arg_tmp, _| {
2447let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2448return _lua_call({ let _lua_tmp = list_to_jsArray.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
2449let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2450return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
2451
2452_lua_nil()
2453}})), _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
2454let _1 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2455let _2 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2456return _lua_false();
2457
2458_lua_nil()
2459}}))], _lua_debug_loc { start: (1527, 11), end: (1531, 5) });
2460
2461_lua_nil()
2462}}));
2463let un_just_comment_all = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2464*un_just_comment_all.borrow_mut() = _lua_lambda(Box::new({let just_p = just_p.clone();
2465let comment_p = comment_p.clone();
2466let un_just_all = un_just_all.clone();
2467let un_comment_all = un_comment_all.clone();
2468move |mut _lua_arg_tmp, _| {
2469let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2470while (_lua_op!{or, _lua_call({ let _lua_tmp = just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1534, 10), end: (1534, 19) }), _lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1534, 23), end: (1534, 35) }), _lua_debug_loc { start: (1534, 10), end: (1534, 35) }}).as_bool(_lua_debug_loc { start: (1534, 4), end: (1538, 7) }) {
2471*x.borrow_mut() = _lua_call({ let _lua_tmp = un_just_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = un_comment_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1536, 12), end: (1536, 29) })], _lua_debug_loc { start: (1535, 12), end: (1537, 9) });
2472}
2473return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
2474
2475_lua_nil()
2476}}));
2477let delay2delay_evaluate = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2478*delay2delay_evaluate.borrow_mut() = _lua_lambda(Box::new({let delay_evaluate_p = delay_evaluate_p.clone();
2479let delay_builtin_form_p = delay_builtin_form_p.clone();
2480let error = error.clone();
2481let delay_builtin_func_p = delay_builtin_func_p.clone();
2482let delay_apply_p = delay_apply_p.clone();
2483let LANG_ERROR = LANG_ERROR.clone();
2484move |mut _lua_arg_tmp, _| {
2485let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2486if (_lua_call({ let _lua_tmp = delay_evaluate_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1542, 7), end: (1542, 26) })).as_bool(_lua_debug_loc { start: (1542, 7), end: (1542, 26) }) {
2487return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
2488} else if (_lua_call({ let _lua_tmp = delay_builtin_form_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1544, 11), end: (1544, 34) })).as_bool(_lua_debug_loc { start: (1544, 11), end: (1544, 34) }) {
2489_lua_call({ let _lua_tmp = error.borrow(); _lua_tmp.clone() }, vec![_lua_str("WIP")], _lua_debug_loc { start: (1545, 8), end: (1545, 20) });
2490} else if (_lua_call({ let _lua_tmp = delay_builtin_func_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1546, 11), end: (1546, 34) })).as_bool(_lua_debug_loc { start: (1546, 11), end: (1546, 34) }) {
2491_lua_call({ let _lua_tmp = error.borrow(); _lua_tmp.clone() }, vec![_lua_str("WIP")], _lua_debug_loc { start: (1547, 8), end: (1547, 20) });
2492} else if (_lua_call({ let _lua_tmp = delay_apply_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1548, 11), end: (1548, 27) })).as_bool(_lua_debug_loc { start: (1548, 11), end: (1548, 27) }) {
2493_lua_call({ let _lua_tmp = error.borrow(); _lua_tmp.clone() }, vec![_lua_str("WIP")], _lua_debug_loc { start: (1549, 8), end: (1549, 20) });
2494}
2495return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1551, 11), end: (1551, 23) });
2496
2497_lua_nil()
2498}}));
2499let delay_env = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2500*delay_env.borrow_mut() = _lua_lambda(Box::new({let delay_evaluate_env = delay_evaluate_env.clone();
2501let delay2delay_evaluate = delay2delay_evaluate.clone();
2502move |mut _lua_arg_tmp, _| {
2503let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2504return _lua_call({ let _lua_tmp = delay_evaluate_env.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay2delay_evaluate.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1555, 8), end: (1555, 31) })], _lua_debug_loc { start: (1554, 11), end: (1556, 5) });
2505
2506_lua_nil()
2507}}));
2508let delay_x = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2509*delay_x.borrow_mut() = _lua_lambda(Box::new({let delay_evaluate_x = delay_evaluate_x.clone();
2510let delay2delay_evaluate = delay2delay_evaluate.clone();
2511move |mut _lua_arg_tmp, _| {
2512let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2513return _lua_call({ let _lua_tmp = delay_evaluate_x.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay2delay_evaluate.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1560, 8), end: (1560, 31) })], _lua_debug_loc { start: (1559, 11), end: (1561, 5) });
2514
2515_lua_nil()
2516}}));
2517let force_uncomment1 = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2518*force_uncomment1.borrow_mut() = _lua_lambda(Box::new({let comment_p = comment_p.clone();
2519let comment_x = comment_x.clone();
2520let force1 = force1.clone();
2521move |mut _lua_arg_tmp, _| {
2522let raw = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2523if (_lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = raw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1564, 7), end: (1564, 21) })).as_bool(_lua_debug_loc { start: (1564, 7), end: (1564, 21) }) {
2524return _lua_call({ let _lua_tmp = comment_x.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = raw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1565, 15), end: (1565, 29) });
2525} else {
2526return _lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = raw.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1567, 15), end: (1567, 26) });
2527}
2528
2529_lua_nil()
2530}}));
2531let enviroment_null_v = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = make_enviroment_null_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1570, 26), end: (1570, 50) })));
2532let enviroment_set = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2533*enviroment_set.borrow_mut() = _lua_lambda(Box::new({let make_enviroment_null_v = make_enviroment_null_v.clone();
2534let run_trampoline = run_trampoline.clone();
2535let enviroment_set_helper = enviroment_set_helper.clone();
2536move |mut _lua_arg_tmp, _| {
2537let env = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2538let key = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2539let val = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2540let result = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = make_enviroment_null_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1572, 19), end: (1572, 43) })));
2541return _lua_call({ let _lua_tmp = run_trampoline.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = enviroment_set_helper.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_table(vec![(_lua_num!(1), { let _lua_tmp = key.borrow(); _lua_tmp.clone() })]), { let _lua_tmp = val.borrow(); _lua_tmp.clone() }, { let _lua_tmp = result.borrow(); _lua_tmp.clone() }, { let _lua_tmp = result.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1574, 8), end: (1574, 62) })], _lua_debug_loc { start: (1573, 11), end: (1575, 5) });
2542
2543_lua_nil()
2544}}));
2545*env_null_v.borrow_mut() = _lua_table(vec![]);
2546let val2env = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2547*val2env.borrow_mut() = _lua_lambda(Box::new({let force_all = force_all.clone();
2548let data_p = data_p.clone();
2549let data_name = data_name.clone();
2550let atom_p = atom_p.clone();
2551let atom_equal_p = atom_equal_p.clone();
2552let mapping_atom = mapping_atom.clone();
2553let data_list = data_list.clone();
2554let construction_p = construction_p.clone();
2555let null_p = null_p.clone();
2556let construction_tail = construction_tail.clone();
2557let construction_head = construction_head.clone();
2558let equal_p = equal_p.clone();
2559let __TS__ArrayPush = __TS__ArrayPush.clone();
2560move |mut _lua_arg_tmp, _| {
2561let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2562*x.borrow_mut() = _lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1579, 8), end: (1579, 20) });
2563if (_lua_not(_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1580, 11), end: (1580, 20) }), _lua_debug_loc { start: (1580, 7), end: (1580, 20) })).as_bool(_lua_debug_loc { start: (1580, 7), end: (1580, 20) }) {
2564return _lua_false();
2565}
2566let s = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1584, 8), end: (1584, 20) })], _lua_debug_loc { start: (1583, 14), end: (1585, 5) })));
2567if (_lua_not(_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = s.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1586, 11), end: (1586, 20) }), _lua_debug_loc { start: (1586, 7), end: (1586, 20) })).as_bool(_lua_debug_loc { start: (1586, 7), end: (1586, 20) }) {
2568return _lua_false();
2569}
2570if (_lua_not(_lua_call({ let _lua_tmp = atom_equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = s.borrow(); _lua_tmp.clone() }, { let _lua_tmp = mapping_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1589, 11), end: (1589, 40) }), _lua_debug_loc { start: (1589, 7), end: (1589, 40) })).as_bool(_lua_debug_loc { start: (1589, 7), end: (1589, 40) }) {
2571return _lua_false();
2572}
2573*s.borrow_mut() = _lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = data_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1593, 8), end: (1593, 20) })], _lua_debug_loc { start: (1592, 8), end: (1594, 5) });
2574if (_lua_not(_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = s.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1595, 11), end: (1595, 28) }), _lua_debug_loc { start: (1595, 7), end: (1595, 28) })).as_bool(_lua_debug_loc { start: (1595, 7), end: (1595, 28) }) {
2575return _lua_false();
2576}
2577if (_lua_not(_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = s.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1600, 12), end: (1600, 32) })], _lua_debug_loc { start: (1599, 8), end: (1601, 9) })], _lua_debug_loc { start: (1598, 11), end: (1602, 5) }), _lua_debug_loc { start: (1598, 7), end: (1602, 5) })).as_bool(_lua_debug_loc { start: (1598, 7), end: (1602, 5) }) {
2578return _lua_false();
2579}
2580let ret = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
2581let xs = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = s.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1607, 8), end: (1607, 28) })], _lua_debug_loc { start: (1606, 15), end: (1608, 5) })));
2582while (_lua_not(_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1609, 14), end: (1609, 24) }), _lua_debug_loc { start: (1609, 10), end: (1609, 24) })).as_bool(_lua_debug_loc { start: (1609, 4), end: (1652, 7) }) {
2583if (_lua_not(_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1610, 15), end: (1610, 33) }), _lua_debug_loc { start: (1610, 11), end: (1610, 33) })).as_bool(_lua_debug_loc { start: (1610, 11), end: (1610, 33) }) {
2584return _lua_false();
2585}
2586let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1614, 12), end: (1614, 33) })], _lua_debug_loc { start: (1613, 18), end: (1615, 9) })));
2587*xs.borrow_mut() = _lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1617, 12), end: (1617, 33) })], _lua_debug_loc { start: (1616, 13), end: (1618, 9) });
2588if (_lua_not(_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1619, 15), end: (1619, 32) }), _lua_debug_loc { start: (1619, 11), end: (1619, 32) })).as_bool(_lua_debug_loc { start: (1619, 11), end: (1619, 32) }) {
2589return _lua_false();
2590}
2591let k = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1622, 18), end: (1622, 38) })));
2592*x.borrow_mut() = _lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1624, 12), end: (1624, 32) })], _lua_debug_loc { start: (1623, 12), end: (1625, 9) });
2593if (_lua_not(_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1626, 15), end: (1626, 32) }), _lua_debug_loc { start: (1626, 11), end: (1626, 32) })).as_bool(_lua_debug_loc { start: (1626, 11), end: (1626, 32) }) {
2594return _lua_false();
2595}
2596let v = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1629, 18), end: (1629, 38) })));
2597if (_lua_not(_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1632, 16), end: (1632, 36) })], _lua_debug_loc { start: (1631, 12), end: (1633, 13) })], _lua_debug_loc { start: (1630, 15), end: (1634, 9) }), _lua_debug_loc { start: (1630, 11), end: (1634, 9) })).as_bool(_lua_debug_loc { start: (1630, 11), end: (1634, 9) }) {
2598return _lua_false();
2599}
2600let not_breaked = std::sync::Arc::new(std::cell::RefCell::new(_lua_true()));
2601{
2602let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(0)));
2603while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1640, 22), end: (1640, 26) }), _lua_debug_loc { start: (1640, 18), end: (1640, 26) }}).as_bool(_lua_debug_loc { start: (1640, 12), end: (1647, 15) }) {
2604if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (1641, 32), end: (1641, 37) }}, _lua_num!(1), _lua_debug_loc { start: (1641, 31), end: (1641, 42) }}, _lua_debug_loc { start: (1641, 27), end: (1641, 42) }), { let _lua_tmp = k.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1641, 19), end: (1641, 47) })).as_bool(_lua_debug_loc { start: (1641, 19), end: (1641, 47) }) {
2605_lua_set({ let _lua_tmp = ret.borrow(); _lua_tmp.clone() },_lua_op!{add, _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (1642, 25), end: (1642, 30) }}, _lua_num!(1), _lua_debug_loc { start: (1642, 24), end: (1642, 35) }},{ let _lua_tmp = v.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1642, 20), end: (1642, 40) });
2606*not_breaked.borrow_mut() = _lua_false();
2607break;
2608}
2609*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(2), _lua_debug_loc { start: (1646, 20), end: (1646, 25) }};
2610}
2611}
2612if ({ let _lua_tmp = not_breaked.borrow(); _lua_tmp.clone() }).as_bool(_lua_debug_loc { start: (1649, 11), end: (1649, 22) }) {
2613_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }, { let _lua_tmp = k.borrow(); _lua_tmp.clone() }, { let _lua_tmp = v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1650, 12), end: (1650, 38) });
2614}
2615}
2616return { let _lua_tmp = ret.borrow(); _lua_tmp.clone() };
2617
2618_lua_nil()
2619}}));
2620let make_builtin_p_func = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2621*make_builtin_p_func.borrow_mut() = _lua_lambda(Box::new({let force1 = force1.clone();
2622let delay_just_p = delay_just_p.clone();
2623let builtin_func_apply = builtin_func_apply.clone();
2624let true_v = true_v.clone();
2625let false_v = false_v.clone();
2626move |mut _lua_arg_tmp, _| {
2627let p_sym = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2628let p_jsfunc = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2629return _lua_table(vec![(_lua_num!(1), { let _lua_tmp = p_sym.borrow(); _lua_tmp.clone() }), (_lua_num!(2), _lua_num!(1)), (_lua_num!(3), _lua_lambda(Box::new({let force1 = force1.clone();
2630let delay_just_p = delay_just_p.clone();
2631let builtin_func_apply = builtin_func_apply.clone();
2632let p_sym = p_sym.clone();
2633let p_jsfunc = p_jsfunc.clone();
2634let true_v = true_v.clone();
2635let false_v = false_v.clone();
2636move |mut _lua_arg_tmp, _| {
2637let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2638*x.borrow_mut() = _lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1660, 16), end: (1660, 25) });
2639if (_lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1661, 15), end: (1661, 30) })).as_bool(_lua_debug_loc { start: (1661, 15), end: (1661, 30) }) {
2640return _lua_call({ let _lua_tmp = builtin_func_apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = p_sym.borrow(); _lua_tmp.clone() }, _lua_table(vec![(_lua_num!(1), { let _lua_tmp = x.borrow(); _lua_tmp.clone() })])], _lua_debug_loc { start: (1662, 23), end: (1662, 53) });
2641}
2642if (_lua_call({ let _lua_tmp = p_jsfunc.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1664, 15), end: (1664, 26) })).as_bool(_lua_debug_loc { start: (1664, 15), end: (1664, 26) }) {
2643return { let _lua_tmp = true_v.borrow(); _lua_tmp.clone() };
2644}
2645return { let _lua_tmp = false_v.borrow(); _lua_tmp.clone() };
2646
2647_lua_nil()
2648}})))]);
2649
2650_lua_nil()
2651}}));
2652let make_builtin_get_func = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2653*make_builtin_get_func.borrow_mut() = _lua_lambda(Box::new({let force1 = force1.clone();
2654let delay_just_p = delay_just_p.clone();
2655let builtin_func_apply = builtin_func_apply.clone();
2656move |mut _lua_arg_tmp, _| {
2657let f_sym = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2658let p_jsfunc = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2659let f_jsfunc = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2660return _lua_table(vec![(_lua_num!(1), { let _lua_tmp = f_sym.borrow(); _lua_tmp.clone() }), (_lua_num!(2), _lua_num!(1)), (_lua_num!(3), _lua_lambda(Box::new({let force1 = force1.clone();
2661let delay_just_p = delay_just_p.clone();
2662let builtin_func_apply = builtin_func_apply.clone();
2663let f_sym = f_sym.clone();
2664let p_jsfunc = p_jsfunc.clone();
2665let f_jsfunc = f_jsfunc.clone();
2666move |mut _lua_arg_tmp, _| {
2667let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2668let error_v = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2669*x.borrow_mut() = _lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1676, 16), end: (1676, 25) });
2670if (_lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1677, 15), end: (1677, 30) })).as_bool(_lua_debug_loc { start: (1677, 15), end: (1677, 30) }) {
2671return _lua_call({ let _lua_tmp = builtin_func_apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f_sym.borrow(); _lua_tmp.clone() }, _lua_table(vec![(_lua_num!(1), { let _lua_tmp = x.borrow(); _lua_tmp.clone() })])], _lua_debug_loc { start: (1678, 23), end: (1678, 53) });
2672}
2673if (_lua_call({ let _lua_tmp = p_jsfunc.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1680, 15), end: (1680, 26) })).as_bool(_lua_debug_loc { start: (1680, 15), end: (1680, 26) }) {
2674return _lua_call({ let _lua_tmp = f_jsfunc.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1681, 23), end: (1681, 34) });
2675}
2676return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1683, 19), end: (1683, 28) });
2677
2678_lua_nil()
2679}})))]);
2680
2681_lua_nil()
2682}}));
2683*real_builtin_func_apply_s.borrow_mut() = _lua_table(vec![(_lua_num!(1), _lua_call({ let _lua_tmp = make_builtin_p_func.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = data_p_function_builtin_systemName.borrow(); _lua_tmp.clone() }, { let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1688, 4), end: (1688, 67) })), (_lua_num!(2), _lua_table(vec![(_lua_num!(1), { let _lua_tmp = new_data_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(2), _lua_num!(2)), (_lua_num!(3), { let _lua_tmp = new_data.borrow(); _lua_tmp.clone() })])), (_lua_num!(3), _lua_call({ let _lua_tmp = make_builtin_get_func.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = data_name_function_builtin_systemName.borrow(); _lua_tmp.clone() }, { let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, { let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1690, 4), end: (1690, 83) })), (_lua_num!(4), _lua_call({ let _lua_tmp = make_builtin_get_func.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = data_list_function_builtin_systemName.borrow(); _lua_tmp.clone() }, { let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, { let _lua_tmp = data_list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1691, 4), end: (1691, 83) })), (_lua_num!(5), _lua_call({ let _lua_tmp = make_builtin_p_func.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = null_p_function_builtin_systemName.borrow(); _lua_tmp.clone() }, { let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1692, 4), end: (1692, 67) })), (_lua_num!(6), _lua_table(vec![(_lua_num!(1), { let _lua_tmp = new_construction_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(2), _lua_num!(2)), (_lua_num!(3), { let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() })])), (_lua_num!(7), _lua_call({ let _lua_tmp = make_builtin_p_func.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = construction_p_function_builtin_systemName.borrow(); _lua_tmp.clone() }, { let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1694, 4), end: (1694, 83) })), (_lua_num!(8), _lua_call({ let _lua_tmp = make_builtin_get_func.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = construction_head_function_builtin_systemName.borrow(); _lua_tmp.clone() }, { let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, { let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1695, 4), end: (1695, 107) })), (_lua_num!(9), _lua_call({ let _lua_tmp = make_builtin_get_func.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = construction_tail_function_builtin_systemName.borrow(); _lua_tmp.clone() }, { let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, { let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1696, 4), end: (1696, 107) })), (_lua_num!(10), _lua_table(vec![(_lua_num!(1), { let _lua_tmp = equal_p_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(2), _lua_num!(2)), (_lua_num!(3), _lua_lambda(Box::new({let true_v = true_v.clone();
2684let force1 = force1.clone();
2685let delay_just_p = delay_just_p.clone();
2686let builtin_func_apply = builtin_func_apply.clone();
2687let equal_p_function_builtin_systemName = equal_p_function_builtin_systemName.clone();
2688let if_function_builtin_systemName = if_function_builtin_systemName.clone();
2689let false_v = false_v.clone();
2690let LANG_ASSERT = LANG_ASSERT.clone();
2691let null_p = null_p.clone();
2692let atom_p = atom_p.clone();
2693let atom_equal_p = atom_equal_p.clone();
2694let data_p = data_p.clone();
2695let data_name = data_name.clone();
2696let data_list = data_list.clone();
2697let construction_p = construction_p.clone();
2698let construction_head = construction_head.clone();
2699let construction_tail = construction_tail.clone();
2700let LANG_ERROR = LANG_ERROR.clone();
2701move |mut _lua_arg_tmp, _| {
2702let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2703let y = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2704let error_v = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2705if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1701, 15), end: (1701, 21) }}).as_bool(_lua_debug_loc { start: (1701, 15), end: (1701, 21) }) {
2706return { let _lua_tmp = true_v.borrow(); _lua_tmp.clone() };
2707}
2708*x.borrow_mut() = _lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1704, 16), end: (1704, 25) });
2709*y.borrow_mut() = _lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1705, 16), end: (1705, 25) });
2710if (_lua_op!{or, _lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1706, 15), end: (1706, 30) }), _lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1706, 34), end: (1706, 49) }), _lua_debug_loc { start: (1706, 15), end: (1706, 49) }}).as_bool(_lua_debug_loc { start: (1706, 15), end: (1706, 49) }) {
2711return _lua_call({ let _lua_tmp = builtin_func_apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = equal_p_function_builtin_systemName.borrow(); _lua_tmp.clone() }, _lua_table(vec![(_lua_num!(1), { let _lua_tmp = x.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = y.borrow(); _lua_tmp.clone() })])], _lua_debug_loc { start: (1707, 23), end: (1707, 86) });
2712}
2713if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1709, 15), end: (1709, 21) }}).as_bool(_lua_debug_loc { start: (1709, 15), end: (1709, 21) }) {
2714return { let _lua_tmp = true_v.borrow(); _lua_tmp.clone() };
2715}
2716let H_if = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2717*H_if.borrow_mut() = _lua_lambda(Box::new({let builtin_func_apply = builtin_func_apply.clone();
2718let if_function_builtin_systemName = if_function_builtin_systemName.clone();
2719move |mut _lua_arg_tmp, _| {
2720let b = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2721let xx = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2722let yy = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2723return _lua_call({ let _lua_tmp = builtin_func_apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = if_function_builtin_systemName.borrow(); _lua_tmp.clone() }, _lua_table(vec![(_lua_num!(1), { let _lua_tmp = b.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = xx.borrow(); _lua_tmp.clone() }), (_lua_num!(3), { let _lua_tmp = yy.borrow(); _lua_tmp.clone() })])], _lua_debug_loc { start: (1713, 23), end: (1713, 86) });
2724
2725_lua_nil()
2726}}));
2727let H_and = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2728*H_and.borrow_mut() = _lua_lambda(Box::new({let H_if = H_if.clone();
2729let false_v = false_v.clone();
2730move |mut _lua_arg_tmp, _| {
2731let xx = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2732let yy = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2733return _lua_call({ let _lua_tmp = H_if.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xx.borrow(); _lua_tmp.clone() }, { let _lua_tmp = yy.borrow(); _lua_tmp.clone() }, { let _lua_tmp = false_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1716, 23), end: (1716, 44) });
2734
2735_lua_nil()
2736}}));
2737_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_not(_lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1719, 20), end: (1719, 35) }), _lua_debug_loc { start: (1719, 16), end: (1719, 35) })], _lua_debug_loc { start: (1718, 12), end: (1720, 13) });
2738let end_2 = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2739*end_2.borrow_mut() = _lua_lambda(Box::new({let H_and = H_and.clone();
2740let builtin_func_apply = builtin_func_apply.clone();
2741let equal_p_function_builtin_systemName = equal_p_function_builtin_systemName.clone();
2742move |mut _lua_arg_tmp, _| {
2743let xx = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2744let yy = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2745let f1 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2746let f2 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2747return _lua_call({ let _lua_tmp = H_and.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = builtin_func_apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = equal_p_function_builtin_systemName.borrow(); _lua_tmp.clone() }, _lua_table(vec![(_lua_num!(1), _lua_call({ let _lua_tmp = f1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xx.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1726, 28), end: (1726, 34) })), (_lua_num!(2), _lua_call({ let _lua_tmp = f1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = yy.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1727, 28), end: (1727, 34) }))])], _lua_debug_loc { start: (1723, 20), end: (1729, 21) }), _lua_call({ let _lua_tmp = builtin_func_apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = equal_p_function_builtin_systemName.borrow(); _lua_tmp.clone() }, _lua_table(vec![(_lua_num!(1), _lua_call({ let _lua_tmp = f2.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xx.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1733, 28), end: (1733, 34) })), (_lua_num!(2), _lua_call({ let _lua_tmp = f2.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = yy.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1734, 28), end: (1734, 34) }))])], _lua_debug_loc { start: (1730, 20), end: (1736, 21) })], _lua_debug_loc { start: (1722, 23), end: (1737, 17) });
2748
2749_lua_nil()
2750}}));
2751if (_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1739, 15), end: (1739, 24) })).as_bool(_lua_debug_loc { start: (1739, 15), end: (1739, 24) }) {
2752if (_lua_not(_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1740, 23), end: (1740, 32) }), _lua_debug_loc { start: (1740, 19), end: (1740, 32) })).as_bool(_lua_debug_loc { start: (1740, 19), end: (1740, 32) }) {
2753return { let _lua_tmp = false_v.borrow(); _lua_tmp.clone() };
2754}
2755return { let _lua_tmp = true_v.borrow(); _lua_tmp.clone() };
2756} else if (_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1744, 19), end: (1744, 28) })).as_bool(_lua_debug_loc { start: (1744, 19), end: (1744, 28) }) {
2757if (_lua_not(_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1745, 23), end: (1745, 32) }), _lua_debug_loc { start: (1745, 19), end: (1745, 32) })).as_bool(_lua_debug_loc { start: (1745, 19), end: (1745, 32) }) {
2758return { let _lua_tmp = false_v.borrow(); _lua_tmp.clone() };
2759}
2760if (_lua_call({ let _lua_tmp = atom_equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1748, 19), end: (1748, 37) })).as_bool(_lua_debug_loc { start: (1748, 19), end: (1748, 37) }) {
2761return { let _lua_tmp = true_v.borrow(); _lua_tmp.clone() };
2762} else {
2763return { let _lua_tmp = false_v.borrow(); _lua_tmp.clone() };
2764}
2765} else if (_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1753, 19), end: (1753, 28) })).as_bool(_lua_debug_loc { start: (1753, 19), end: (1753, 28) }) {
2766if (_lua_not(_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1754, 23), end: (1754, 32) }), _lua_debug_loc { start: (1754, 19), end: (1754, 32) })).as_bool(_lua_debug_loc { start: (1754, 19), end: (1754, 32) }) {
2767return { let _lua_tmp = false_v.borrow(); _lua_tmp.clone() };
2768}
2769return _lua_call({ let _lua_tmp = end_2.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, { let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }, { let _lua_tmp = data_list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1757, 23), end: (1757, 56) });
2770} else if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1758, 19), end: (1758, 36) })).as_bool(_lua_debug_loc { start: (1758, 19), end: (1758, 36) }) {
2771if (_lua_not(_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1759, 23), end: (1759, 40) }), _lua_debug_loc { start: (1759, 19), end: (1759, 40) })).as_bool(_lua_debug_loc { start: (1759, 19), end: (1759, 40) }) {
2772return { let _lua_tmp = false_v.borrow(); _lua_tmp.clone() };
2773}
2774return _lua_call({ let _lua_tmp = end_2.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, { let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, { let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1762, 23), end: (1762, 72) });
2775}
2776return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1764, 19), end: (1764, 31) });
2777
2778_lua_nil()
2779}})))])), (_lua_num!(11), _lua_table(vec![(_lua_num!(1), { let _lua_tmp = apply_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(2), _lua_num!(2)), (_lua_num!(3), _lua_lambda(Box::new({let force_all = force_all.clone();
2780let construction_p = construction_p.clone();
2781let __TS__ArrayPush = __TS__ArrayPush.clone();
2782let construction_head = construction_head.clone();
2783let construction_tail = construction_tail.clone();
2784let null_p = null_p.clone();
2785let apply = apply.clone();
2786move |mut _lua_arg_tmp, _| {
2787let f = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2788let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2789let error_v = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2790let jslist = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
2791let iter = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1772, 25), end: (1772, 38) })));
2792while (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = iter.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1773, 18), end: (1773, 38) })).as_bool(_lua_debug_loc { start: (1773, 12), end: (1781, 15) }) {
2793_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = jslist.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = iter.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1776, 20), end: (1776, 43) })], _lua_debug_loc { start: (1774, 16), end: (1777, 17) });
2794*iter.borrow_mut() = _lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = iter.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1779, 20), end: (1779, 43) })], _lua_debug_loc { start: (1778, 23), end: (1780, 17) });
2795}
2796if (_lua_not(_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = iter.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1782, 19), end: (1782, 31) }), _lua_debug_loc { start: (1782, 15), end: (1782, 31) })).as_bool(_lua_debug_loc { start: (1782, 15), end: (1782, 31) }) {
2797return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1783, 23), end: (1783, 32) });
2798}
2799return _lua_call({ let _lua_tmp = apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, { let _lua_tmp = jslist.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1785, 19), end: (1785, 35) });
2800
2801_lua_nil()
2802}})))])), (_lua_num!(12), _lua_table(vec![(_lua_num!(1), { let _lua_tmp = evaluate_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(2), _lua_num!(2)), (_lua_num!(3), _lua_lambda(Box::new({let val2env = val2env.clone();
2803let evaluate = evaluate.clone();
2804move |mut _lua_arg_tmp, _| {
2805let env = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2806let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2807let error_v = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2808let maybeenv = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = val2env.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1792, 29), end: (1792, 41) })));
2809if (_lua_op!{eq, { let _lua_tmp = maybeenv.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (1793, 15), end: (1793, 32) }}).as_bool(_lua_debug_loc { start: (1793, 15), end: (1793, 32) }) {
2810return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1794, 23), end: (1794, 32) });
2811}
2812return _lua_call({ let _lua_tmp = evaluate.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = maybeenv.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1796, 19), end: (1796, 40) });
2813
2814_lua_nil()
2815}})))])), (_lua_num!(13), _lua_call({ let _lua_tmp = make_builtin_p_func.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = atom_p_function_builtin_systemName.borrow(); _lua_tmp.clone() }, { let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1799, 4), end: (1799, 67) })), (_lua_num!(14), _lua_table(vec![(_lua_num!(1), { let _lua_tmp = list_chooseOne_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(2), _lua_num!(1)), (_lua_num!(3), _lua_lambda(Box::new({let force1 = force1.clone();
2816let delay_just_p = delay_just_p.clone();
2817let builtin_func_apply = builtin_func_apply.clone();
2818let list_chooseOne_function_builtin_systemName = list_chooseOne_function_builtin_systemName.clone();
2819let construction_p = construction_p.clone();
2820let construction_head = construction_head.clone();
2821move |mut _lua_arg_tmp, _| {
2822let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2823let error_v = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2824*xs.borrow_mut() = _lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1804, 17), end: (1804, 27) });
2825if (_lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1805, 15), end: (1805, 31) })).as_bool(_lua_debug_loc { start: (1805, 15), end: (1805, 31) }) {
2826return _lua_call({ let _lua_tmp = builtin_func_apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list_chooseOne_function_builtin_systemName.borrow(); _lua_tmp.clone() }, _lua_table(vec![(_lua_num!(1), { let _lua_tmp = xs.borrow(); _lua_tmp.clone() })])], _lua_debug_loc { start: (1806, 23), end: (1806, 91) });
2827}
2828if (_lua_not(_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1808, 19), end: (1808, 37) }), _lua_debug_loc { start: (1808, 15), end: (1808, 37) })).as_bool(_lua_debug_loc { start: (1808, 15), end: (1808, 37) }) {
2829return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1809, 23), end: (1809, 32) });
2830}
2831return _lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1811, 19), end: (1811, 40) });
2832
2833_lua_nil()
2834}})))])), (_lua_num!(15), _lua_table(vec![(_lua_num!(1), { let _lua_tmp = if_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(2), _lua_num!(3)), (_lua_num!(3), _lua_lambda(Box::new({let force1 = force1.clone();
2835let delay_just_p = delay_just_p.clone();
2836let builtin_func_apply = builtin_func_apply.clone();
2837let if_function_builtin_systemName = if_function_builtin_systemName.clone();
2838let data_p = data_p.clone();
2839let force_all = force_all.clone();
2840let data_name = data_name.clone();
2841let atom_p = atom_p.clone();
2842let atom_equal_p = atom_equal_p.clone();
2843let true_atom = true_atom.clone();
2844let false_atom = false_atom.clone();
2845move |mut _lua_arg_tmp, _| {
2846let b = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2847let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2848let y = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2849let error_v = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2850*b.borrow_mut() = _lua_call({ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = b.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1818, 16), end: (1818, 25) });
2851if (_lua_call({ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = b.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1819, 15), end: (1819, 30) })).as_bool(_lua_debug_loc { start: (1819, 15), end: (1819, 30) }) {
2852return _lua_call({ let _lua_tmp = builtin_func_apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = if_function_builtin_systemName.borrow(); _lua_tmp.clone() }, _lua_table(vec![(_lua_num!(1), { let _lua_tmp = b.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = x.borrow(); _lua_tmp.clone() }), (_lua_num!(3), { let _lua_tmp = y.borrow(); _lua_tmp.clone() })])], _lua_debug_loc { start: (1820, 23), end: (1820, 84) });
2853}
2854if (_lua_not(_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = b.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1822, 19), end: (1822, 28) }), _lua_debug_loc { start: (1822, 15), end: (1822, 28) })).as_bool(_lua_debug_loc { start: (1822, 15), end: (1822, 28) }) {
2855return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1823, 23), end: (1823, 32) });
2856}
2857let nam = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = b.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1826, 16), end: (1826, 28) })], _lua_debug_loc { start: (1825, 24), end: (1827, 13) })));
2858if (_lua_not(_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = nam.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1828, 19), end: (1828, 30) }), _lua_debug_loc { start: (1828, 15), end: (1828, 30) })).as_bool(_lua_debug_loc { start: (1828, 15), end: (1828, 30) }) {
2859return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1829, 23), end: (1829, 32) });
2860}
2861if (_lua_call({ let _lua_tmp = atom_equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = nam.borrow(); _lua_tmp.clone() }, { let _lua_tmp = true_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1831, 15), end: (1831, 43) })).as_bool(_lua_debug_loc { start: (1831, 15), end: (1831, 43) }) {
2862return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
2863}
2864if (_lua_call({ let _lua_tmp = atom_equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = nam.borrow(); _lua_tmp.clone() }, { let _lua_tmp = false_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1834, 15), end: (1834, 44) })).as_bool(_lua_debug_loc { start: (1834, 15), end: (1834, 44) }) {
2865return { let _lua_tmp = y.borrow(); _lua_tmp.clone() };
2866}
2867return _lua_call({ let _lua_tmp = error_v.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1837, 19), end: (1837, 28) });
2868
2869_lua_nil()
2870}})))])), (_lua_num!(16), _lua_table(vec![(_lua_num!(1), { let _lua_tmp = comment_function_builtin_systemName.borrow(); _lua_tmp.clone() }), (_lua_num!(2), _lua_num!(2)), (_lua_num!(3), { let _lua_tmp = new_comment.borrow(); _lua_tmp.clone() })]))]);
2871let jsbool_no_force_isomorphism_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2872*jsbool_no_force_isomorphism_p.borrow_mut() = _lua_lambda(Box::new({let un_just_all = un_just_all.clone();
2873let jsbool_no_force_isomorphism_p = jsbool_no_force_isomorphism_p.clone();
2874let lang_assert_equal_set_do = lang_assert_equal_set_do.clone();
2875let null_p = null_p.clone();
2876let null_v = null_v.clone();
2877let atom_p = atom_p.clone();
2878let atom_equal_p = atom_equal_p.clone();
2879let construction_p = construction_p.clone();
2880let construction_head = construction_head.clone();
2881let construction_tail = construction_tail.clone();
2882let data_p = data_p.clone();
2883let data_name = data_name.clone();
2884let data_list = data_list.clone();
2885let delay_p = delay_p.clone();
2886let LANG_ERROR = LANG_ERROR.clone();
2887move |mut _lua_arg_tmp, _| {
2888let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2889let y = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2890if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1843, 7), end: (1843, 13) }}).as_bool(_lua_debug_loc { start: (1843, 7), end: (1843, 13) }) {
2891return _lua_true();
2892}
2893*x.borrow_mut() = _lua_call({ let _lua_tmp = un_just_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1846, 8), end: (1846, 22) });
2894*y.borrow_mut() = _lua_call({ let _lua_tmp = un_just_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1847, 8), end: (1847, 22) });
2895if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1848, 7), end: (1848, 13) }}).as_bool(_lua_debug_loc { start: (1848, 7), end: (1848, 13) }) {
2896return _lua_true();
2897}
2898let end_2 = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2899*end_2.borrow_mut() = _lua_lambda(Box::new({let jsbool_no_force_isomorphism_p = jsbool_no_force_isomorphism_p.clone();
2900let lang_assert_equal_set_do = lang_assert_equal_set_do.clone();
2901move |mut _lua_arg_tmp, _| {
2902let xx = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2903let yy = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2904let f1 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2905let f2 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2906if (_lua_op!{and, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = f1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xx.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1853, 12), end: (1853, 18) }), _lua_call({ let _lua_tmp = f1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = yy.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1854, 12), end: (1854, 18) })], _lua_debug_loc { start: (1852, 11), end: (1855, 9) }), _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = f2.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xx.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1856, 12), end: (1856, 18) }), _lua_call({ let _lua_tmp = f2.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = yy.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1857, 12), end: (1857, 18) })], _lua_debug_loc { start: (1855, 14), end: (1858, 9) }), _lua_debug_loc { start: (1852, 11), end: (1858, 9) }}).as_bool(_lua_debug_loc { start: (1852, 11), end: (1858, 9) }) {
2907_lua_call({ let _lua_tmp = lang_assert_equal_set_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xx.borrow(); _lua_tmp.clone() }, { let _lua_tmp = yy.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1859, 12), end: (1859, 44) });
2908return _lua_true();
2909} else {
2910return _lua_false();
2911}
2912
2913_lua_nil()
2914}}));
2915if (_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1865, 7), end: (1865, 16) })).as_bool(_lua_debug_loc { start: (1865, 7), end: (1865, 16) }) {
2916if (_lua_not(_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1866, 15), end: (1866, 24) }), _lua_debug_loc { start: (1866, 11), end: (1866, 24) })).as_bool(_lua_debug_loc { start: (1866, 11), end: (1866, 24) }) {
2917return _lua_false();
2918}
2919_lua_call({ let _lua_tmp = lang_assert_equal_set_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1869, 8), end: (1869, 43) });
2920_lua_call({ let _lua_tmp = lang_assert_equal_set_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }, { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1870, 8), end: (1870, 43) });
2921return _lua_true();
2922} else if (_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1872, 11), end: (1872, 20) })).as_bool(_lua_debug_loc { start: (1872, 11), end: (1872, 20) }) {
2923if (_lua_not(_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1873, 15), end: (1873, 24) }), _lua_debug_loc { start: (1873, 11), end: (1873, 24) })).as_bool(_lua_debug_loc { start: (1873, 11), end: (1873, 24) }) {
2924return _lua_false();
2925}
2926return _lua_call({ let _lua_tmp = atom_equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1876, 15), end: (1876, 33) });
2927} else if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1877, 11), end: (1877, 28) })).as_bool(_lua_debug_loc { start: (1877, 11), end: (1877, 28) }) {
2928if (_lua_not(_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1878, 15), end: (1878, 32) }), _lua_debug_loc { start: (1878, 11), end: (1878, 32) })).as_bool(_lua_debug_loc { start: (1878, 11), end: (1878, 32) }) {
2929return _lua_false();
2930}
2931return _lua_call({ let _lua_tmp = end_2.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, { let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, { let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1881, 15), end: (1881, 64) });
2932} else if (_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1882, 11), end: (1882, 20) })).as_bool(_lua_debug_loc { start: (1882, 11), end: (1882, 20) }) {
2933if (_lua_not(_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1883, 15), end: (1883, 24) }), _lua_debug_loc { start: (1883, 11), end: (1883, 24) })).as_bool(_lua_debug_loc { start: (1883, 11), end: (1883, 24) }) {
2934return _lua_false();
2935}
2936return _lua_call({ let _lua_tmp = end_2.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, { let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }, { let _lua_tmp = data_list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1886, 15), end: (1886, 48) });
2937} else if (_lua_call({ let _lua_tmp = delay_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1887, 11), end: (1887, 21) })).as_bool(_lua_debug_loc { start: (1887, 11), end: (1887, 21) }) {
2938return _lua_false();
2939}
2940return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1890, 11), end: (1890, 23) });
2941
2942_lua_nil()
2943}}));
2944let complex_parse = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2945*complex_parse.borrow_mut() = _lua_lambda(Box::new({let LANG_ASSERT = LANG_ASSERT.clone();
2946let string = string.clone();
2947let error = error.clone();
2948let tostring = tostring.clone();
2949let new_atom = new_atom.clone();
2950let new_hole_do = new_hole_do.clone();
2951let hole_set_do = hole_set_do.clone();
2952let new_construction = new_construction.clone();
2953let null_v = null_v.clone();
2954let construction_p = construction_p.clone();
2955let new_data = new_data.clone();
2956let construction_head = construction_head.clone();
2957let construction_tail = construction_tail.clone();
2958let new_list = new_list.clone();
2959let typeAnnotation_atom = typeAnnotation_atom.clone();
2960let function_atom = function_atom.clone();
2961let something_atom = something_atom.clone();
2962let isOrNot_atom = isOrNot_atom.clone();
2963let __TS__ArrayPush = __TS__ArrayPush.clone();
2964let sub_atom = sub_atom.clone();
2965let jsArray_to_list = jsArray_to_list.clone();
2966let form_atom = form_atom.clone();
2967let system_atom = system_atom.clone();
2968let theThing_atom = theThing_atom.clone();
2969let atom_p = atom_p.clone();
2970let systemName_make = systemName_make.clone();
2971let null_p = null_p.clone();
2972let val2env = val2env.clone();
2973let evaluate = evaluate.clone();
2974let list_to_jsArray = list_to_jsArray.clone();
2975let builtin_func_apply = builtin_func_apply.clone();
2976let builtin_form_apply = builtin_form_apply.clone();
2977let apply = apply.clone();
2978let new_comment = new_comment.clone();
2979move |mut _lua_arg_tmp, _| {
2980let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
2981let state_const = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2982let state = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2983let eof = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2984let get = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2985let put = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2986let parse_error = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2987let a_space_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2988let space = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2989let atom = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2990let readlist = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2991let data = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2992let readeval = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2993let readfuncapply = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2994let readformbuiltin = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2995let readapply = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2996let readcomment = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2997let a_atom_p = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2998let val = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
2999let un_maybe = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3000let not_eof = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3001let assert_get = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3002let readsysname_no_pack_inner_must = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3003let may_xfx_xf = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3004let readsysname_no_pack = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3005let readsysname = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3006*eof.borrow_mut() = _lua_lambda(Box::new({let state_const = state_const.clone();
3007let state = state.clone();
3008move |mut _lua_arg_tmp, _| {
3009return _lua_op!{eq, _lua_len({ let _lua_tmp = state_const.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1895, 15), end: (1895, 27) }), { let _lua_tmp = state.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1895, 15), end: (1895, 36) }};
3010
3011_lua_nil()
3012}}));
3013*get.borrow_mut() = _lua_lambda(Box::new({let LANG_ASSERT = LANG_ASSERT.clone();
3014let eof = eof.clone();
3015let string = string.clone();
3016let state_const = state_const.clone();
3017let state = state.clone();
3018move |mut _lua_arg_tmp, _| {
3019_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_not(_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1899, 16), end: (1899, 21) }), _lua_debug_loc { start: (1899, 12), end: (1899, 21) })], _lua_debug_loc { start: (1898, 8), end: (1900, 9) });
3020let ret = std::sync::Arc::new(std::cell::RefCell::new(_lua_call(_lua_lookup({ let _lua_tmp = string.borrow(); _lua_tmp.clone() },_lua_str("sub"), _lua_debug_loc { start: (1901, 20), end: (1901, 65) }), vec![{ let _lua_tmp = state_const.borrow(); _lua_tmp.clone() }, _lua_op!{add, { let _lua_tmp = state.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (1901, 44), end: (1901, 53) }}, _lua_op!{add, { let _lua_tmp = state.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (1901, 55), end: (1901, 64) }}], _lua_debug_loc { start: (1901, 20), end: (1901, 65) })));
3021*state.borrow_mut() = _lua_op!{add, { let _lua_tmp = state.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (1902, 16), end: (1902, 25) }};
3022return { let _lua_tmp = ret.borrow(); _lua_tmp.clone() };
3023
3024_lua_nil()
3025}}));
3026*put.borrow_mut() = _lua_lambda(Box::new({let LANG_ASSERT = LANG_ASSERT.clone();
3027let string = string.clone();
3028let state_const = state_const.clone();
3029let state = state.clone();
3030move |mut _lua_arg_tmp, _| {
3031let chr = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3032_lua_call({ let _lua_tmp = LANG_ASSERT.borrow(); _lua_tmp.clone() }, vec![_lua_op!{eq, _lua_call(_lua_lookup({ let _lua_tmp = string.borrow(); _lua_tmp.clone() },_lua_str("sub"), _lua_debug_loc { start: (1907, 12), end: (1907, 49) }), vec![{ let _lua_tmp = state_const.borrow(); _lua_tmp.clone() }, { let _lua_tmp = state.borrow(); _lua_tmp.clone() }, { let _lua_tmp = state.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1907, 12), end: (1907, 49) }), { let _lua_tmp = chr.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (1907, 12), end: (1907, 56) }}], _lua_debug_loc { start: (1906, 8), end: (1908, 9) });
3033*state.borrow_mut() = _lua_op!{sub, { let _lua_tmp = state.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (1909, 16), end: (1909, 25) }};
3034
3035_lua_nil()
3036}}));
3037*parse_error.borrow_mut() = _lua_lambda(Box::new({let error = error.clone();
3038let tostring = tostring.clone();
3039move |mut _lua_arg_tmp, _| {
3040let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3041if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_nil(), _lua_debug_loc { start: (1912, 11), end: (1912, 19) }}).as_bool(_lua_debug_loc { start: (1912, 11), end: (1912, 19) }) {
3042*x.borrow_mut() = _lua_str("");
3043}
3044_lua_call({ let _lua_tmp = error.borrow(); _lua_tmp.clone() }, vec![_lua_op!{concat, _lua_str("TheLanguage parse ERROR!"), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1916, 42), end: (1916, 53) }), _lua_debug_loc { start: (1916, 12), end: (1916, 53) }}], _lua_debug_loc { start: (1915, 8), end: (1917, 9) });
3045
3046_lua_nil()
3047}}));
3048*a_space_p.borrow_mut() = _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
3049let chr = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3050return _lua_op!{or, _lua_op!{or, _lua_op!{or, _lua_op!{eq, { let _lua_tmp = chr.borrow(); _lua_tmp.clone() }, _lua_str(" "), _lua_debug_loc { start: (1920, 15), end: (1920, 70) }}, _lua_op!{eq, { let _lua_tmp = chr.borrow(); _lua_tmp.clone() }, _lua_str("\n"), _lua_debug_loc { start: (1920, 29), end: (1920, 40) }}, _lua_debug_loc { start: (1920, 15), end: (1920, 70) }}, _lua_op!{eq, { let _lua_tmp = chr.borrow(); _lua_tmp.clone() }, _lua_str("\t"), _lua_debug_loc { start: (1920, 44), end: (1920, 55) }}, _lua_debug_loc { start: (1920, 15), end: (1920, 70) }}, _lua_op!{eq, { let _lua_tmp = chr.borrow(); _lua_tmp.clone() }, _lua_str("\r"), _lua_debug_loc { start: (1920, 59), end: (1920, 70) }}, _lua_debug_loc { start: (1920, 15), end: (1920, 70) }};
3051
3052_lua_nil()
3053}}));
3054*space.borrow_mut() = _lua_lambda(Box::new({let eof = eof.clone();
3055let get = get.clone();
3056let a_space_p = a_space_p.clone();
3057let put = put.clone();
3058move |mut _lua_arg_tmp, _| {
3059if (_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1923, 11), end: (1923, 16) })).as_bool(_lua_debug_loc { start: (1923, 11), end: (1923, 16) }) {
3060return _lua_false();
3061}
3062let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1926, 18), end: (1926, 23) })));
3063if (_lua_not(_lua_call({ let _lua_tmp = a_space_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1927, 15), end: (1927, 27) }), _lua_debug_loc { start: (1927, 11), end: (1927, 27) })).as_bool(_lua_debug_loc { start: (1927, 11), end: (1927, 27) }) {
3064_lua_call({ let _lua_tmp = put.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1928, 12), end: (1928, 18) });
3065return _lua_false();
3066}
3067while (_lua_op!{and, _lua_call({ let _lua_tmp = a_space_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1931, 14), end: (1931, 26) }), _lua_not(_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1931, 35), end: (1931, 40) }), _lua_debug_loc { start: (1931, 31), end: (1931, 40) }), _lua_debug_loc { start: (1931, 14), end: (1931, 40) }}).as_bool(_lua_debug_loc { start: (1931, 8), end: (1933, 11) }) {
3068*x.borrow_mut() = _lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1932, 16), end: (1932, 21) });
3069}
3070if (_lua_not(_lua_call({ let _lua_tmp = a_space_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1934, 15), end: (1934, 27) }), _lua_debug_loc { start: (1934, 11), end: (1934, 27) })).as_bool(_lua_debug_loc { start: (1934, 11), end: (1934, 27) }) {
3071_lua_call({ let _lua_tmp = put.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1935, 12), end: (1935, 18) });
3072}
3073return _lua_true();
3074
3075_lua_nil()
3076}}));
3077*atom.borrow_mut() = _lua_lambda(Box::new({let eof = eof.clone();
3078let get = get.clone();
3079let a_atom_p = a_atom_p.clone();
3080let put = put.clone();
3081let tostring = tostring.clone();
3082let new_atom = new_atom.clone();
3083move |mut _lua_arg_tmp, _| {
3084if (_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1940, 11), end: (1940, 16) })).as_bool(_lua_debug_loc { start: (1940, 11), end: (1940, 16) }) {
3085return _lua_false();
3086}
3087let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1943, 18), end: (1943, 23) })));
3088let ret = std::sync::Arc::new(std::cell::RefCell::new(_lua_str("")));
3089if (_lua_not(_lua_call({ let _lua_tmp = a_atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1945, 15), end: (1945, 26) }), _lua_debug_loc { start: (1945, 11), end: (1945, 26) })).as_bool(_lua_debug_loc { start: (1945, 11), end: (1945, 26) }) {
3090_lua_call({ let _lua_tmp = put.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1946, 12), end: (1946, 18) });
3091return _lua_false();
3092}
3093while (_lua_op!{and, _lua_call({ let _lua_tmp = a_atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1949, 14), end: (1949, 25) }), _lua_not(_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1949, 34), end: (1949, 39) }), _lua_debug_loc { start: (1949, 30), end: (1949, 39) }), _lua_debug_loc { start: (1949, 14), end: (1949, 39) }}).as_bool(_lua_debug_loc { start: (1949, 8), end: (1952, 11) }) {
3094*ret.borrow_mut() = _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1950, 18), end: (1950, 31) }), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1950, 35), end: (1950, 46) }), _lua_debug_loc { start: (1950, 18), end: (1950, 46) }};
3095*x.borrow_mut() = _lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1951, 16), end: (1951, 21) });
3096}
3097if (_lua_call({ let _lua_tmp = a_atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1953, 11), end: (1953, 22) })).as_bool(_lua_debug_loc { start: (1953, 11), end: (1953, 22) }) {
3098*ret.borrow_mut() = _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1954, 18), end: (1954, 31) }), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1954, 35), end: (1954, 46) }), _lua_debug_loc { start: (1954, 18), end: (1954, 46) }};
3099} else {
3100_lua_call({ let _lua_tmp = put.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1956, 12), end: (1956, 18) });
3101}
3102return _lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1958, 15), end: (1958, 28) });
3103
3104_lua_nil()
3105}}));
3106*readlist.borrow_mut() = _lua_lambda(Box::new({let eof = eof.clone();
3107let get = get.clone();
3108let put = put.clone();
3109let new_hole_do = new_hole_do.clone();
3110let hole_set_do = hole_set_do.clone();
3111let new_construction = new_construction.clone();
3112let space = space.clone();
3113let parse_error = parse_error.clone();
3114let null_v = null_v.clone();
3115let val = val.clone();
3116move |mut _lua_arg_tmp, _| {
3117if (_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1961, 11), end: (1961, 16) })).as_bool(_lua_debug_loc { start: (1961, 11), end: (1961, 16) }) {
3118return _lua_false();
3119}
3120let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1964, 18), end: (1964, 23) })));
3121if (_lua_op!{not_eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_str("("), _lua_debug_loc { start: (1965, 11), end: (1965, 19) }}).as_bool(_lua_debug_loc { start: (1965, 11), end: (1965, 19) }) {
3122_lua_call({ let _lua_tmp = put.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1966, 12), end: (1966, 18) });
3123return _lua_false();
3124}
3125let ret_last = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_hole_do.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1969, 25), end: (1969, 38) })));
3126let ret = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = ret_last.borrow(); _lua_tmp.clone() }));
3127let last_add_do = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3128*last_add_do.borrow_mut() = _lua_lambda(Box::new({let new_hole_do = new_hole_do.clone();
3129let hole_set_do = hole_set_do.clone();
3130let ret_last = ret_last.clone();
3131let new_construction = new_construction.clone();
3132move |mut _lua_arg_tmp, _| {
3133let val = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3134let ret_last2 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_hole_do.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1972, 30), end: (1972, 43) })));
3135_lua_call({ let _lua_tmp = hole_set_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret_last.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = val.borrow(); _lua_tmp.clone() }, { let _lua_tmp = ret_last2.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1975, 16), end: (1975, 48) })], _lua_debug_loc { start: (1973, 12), end: (1976, 13) });
3136*ret_last.borrow_mut() = { let _lua_tmp = ret_last2.borrow(); _lua_tmp.clone() };
3137
3138_lua_nil()
3139}}));
3140while (_lua_true()).as_bool(_lua_debug_loc { start: (1979, 8), end: (2006, 11) }) {
3141_lua_call({ let _lua_tmp = space.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1980, 12), end: (1980, 19) });
3142if (_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1981, 15), end: (1981, 20) })).as_bool(_lua_debug_loc { start: (1981, 15), end: (1981, 20) }) {
3143return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1982, 23), end: (1982, 36) });
3144}
3145*x.borrow_mut() = _lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1984, 16), end: (1984, 21) });
3146if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_str(")"), _lua_debug_loc { start: (1985, 15), end: (1985, 23) }}).as_bool(_lua_debug_loc { start: (1985, 15), end: (1985, 23) }) {
3147_lua_call({ let _lua_tmp = hole_set_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret_last.borrow(); _lua_tmp.clone() }, { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1986, 16), end: (1986, 45) });
3148return { let _lua_tmp = ret.borrow(); _lua_tmp.clone() };
3149}
3150if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_str("."), _lua_debug_loc { start: (1989, 15), end: (1989, 23) }}).as_bool(_lua_debug_loc { start: (1989, 15), end: (1989, 23) }) {
3151_lua_call({ let _lua_tmp = space.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1990, 16), end: (1990, 23) });
3152let e = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = val.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1991, 26), end: (1991, 31) })));
3153_lua_call({ let _lua_tmp = hole_set_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ret_last.borrow(); _lua_tmp.clone() }, { let _lua_tmp = e.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (1992, 16), end: (1992, 40) });
3154_lua_call({ let _lua_tmp = space.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1993, 16), end: (1993, 23) });
3155if (_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1994, 19), end: (1994, 24) })).as_bool(_lua_debug_loc { start: (1994, 19), end: (1994, 24) }) {
3156return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1995, 27), end: (1995, 40) });
3157}
3158*x.borrow_mut() = _lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1997, 20), end: (1997, 25) });
3159if (_lua_op!{not_eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_str(")"), _lua_debug_loc { start: (1998, 19), end: (1998, 27) }}).as_bool(_lua_debug_loc { start: (1998, 19), end: (1998, 27) }) {
3160return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (1999, 27), end: (1999, 40) });
3161}
3162return { let _lua_tmp = ret.borrow(); _lua_tmp.clone() };
3163}
3164_lua_call({ let _lua_tmp = put.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2003, 12), end: (2003, 18) });
3165let e = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = val.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2004, 22), end: (2004, 27) })));
3166_lua_call({ let _lua_tmp = last_add_do.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = e.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2005, 12), end: (2005, 26) });
3167}
3168
3169_lua_nil()
3170}}));
3171*data.borrow_mut() = _lua_lambda(Box::new({let eof = eof.clone();
3172let get = get.clone();
3173let put = put.clone();
3174let readlist = readlist.clone();
3175let parse_error = parse_error.clone();
3176let construction_p = construction_p.clone();
3177let new_data = new_data.clone();
3178let construction_head = construction_head.clone();
3179let construction_tail = construction_tail.clone();
3180move |mut _lua_arg_tmp, _| {
3181if (_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2009, 11), end: (2009, 16) })).as_bool(_lua_debug_loc { start: (2009, 11), end: (2009, 16) }) {
3182return _lua_false();
3183}
3184let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2012, 18), end: (2012, 23) })));
3185if (_lua_op!{not_eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_str("#"), _lua_debug_loc { start: (2013, 11), end: (2013, 19) }}).as_bool(_lua_debug_loc { start: (2013, 11), end: (2013, 19) }) {
3186_lua_call({ let _lua_tmp = put.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2014, 12), end: (2014, 18) });
3187return _lua_false();
3188}
3189let xs = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readlist.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2017, 19), end: (2017, 29) })));
3190if (_lua_op!{eq, { let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2018, 11), end: (2018, 22) }}).as_bool(_lua_debug_loc { start: (2018, 11), end: (2018, 22) }) {
3191return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2019, 19), end: (2019, 32) });
3192}
3193if (_lua_not(_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2021, 15), end: (2021, 33) }), _lua_debug_loc { start: (2021, 11), end: (2021, 33) })).as_bool(_lua_debug_loc { start: (2021, 11), end: (2021, 33) }) {
3194return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2022, 19), end: (2022, 32) });
3195}
3196return _lua_call({ let _lua_tmp = new_data.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2025, 12), end: (2025, 33) }), _lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2026, 12), end: (2026, 33) })], _lua_debug_loc { start: (2024, 15), end: (2027, 9) });
3197
3198_lua_nil()
3199}}));
3200*a_atom_p.borrow_mut() = _lua_lambda(Box::new({let a_space_p = a_space_p.clone();
3201move |mut _lua_arg_tmp, _| {
3202let chr = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3203if (_lua_call({ let _lua_tmp = a_space_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = chr.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2030, 11), end: (2030, 25) })).as_bool(_lua_debug_loc { start: (2030, 11), end: (2030, 25) }) {
3204return _lua_false();
3205}
3206let _lua_tmp_t=_lua_table(vec![(_lua_num!(1), _lua_str("(")), (_lua_num!(2), _lua_str(")")), (_lua_num!(3), _lua_str("!")), (_lua_num!(4), _lua_str("#")), (_lua_num!(5), _lua_str(".")), (_lua_num!(6), _lua_str("$")), (_lua_num!(7), _lua_str("%")), (_lua_num!(8), _lua_str("^")), (_lua_num!(9), _lua_str("@")), (_lua_num!(10), _lua_str("~")), (_lua_num!(11), _lua_str("/")), (_lua_num!(12), _lua_str("-")), (_lua_num!(13), _lua_str(">")), (_lua_num!(14), _lua_str("_")), (_lua_num!(15), _lua_str(":")), (_lua_num!(16), _lua_str("?")), (_lua_num!(17), _lua_str("[")), (_lua_num!(18), _lua_str("]")), (_lua_num!(19), _lua_str("&")), (_lua_num!(20), _lua_str(";"))]);
3207for _lua_tmp_k in 1..=(_lua_len(_lua_tmp_t.clone(), _lua_debug_loc { start: (2033, 30), end: (2033, 130) }).as_f64(_lua_debug_loc { start: (2033, 30), end: (2033, 130) }) as usize) {
3208let ____=std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(_lua_tmp_k)));
3209let v=std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup(_lua_tmp_t.clone(),____.borrow().clone(), _lua_debug_loc { start: (2033, 30), end: (2033, 130) })));
3210if (_lua_op!{eq, { let _lua_tmp = v.borrow(); _lua_tmp.clone() }, { let _lua_tmp = chr.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2034, 15), end: (2034, 23) }}).as_bool(_lua_debug_loc { start: (2034, 15), end: (2034, 23) }) {
3211return _lua_false();
3212}
3213}
3214return _lua_true();
3215
3216_lua_nil()
3217}}));
3218*val.borrow_mut() = _lua_lambda(Box::new({let space = space.clone();
3219let readlist = readlist.clone();
3220let readsysname = readsysname.clone();
3221let data = data.clone();
3222let readeval = readeval.clone();
3223let readfuncapply = readfuncapply.clone();
3224let readformbuiltin = readformbuiltin.clone();
3225let readapply = readapply.clone();
3226let readcomment = readcomment.clone();
3227let parse_error = parse_error.clone();
3228move |mut _lua_arg_tmp, _| {
3229_lua_call({ let _lua_tmp = space.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2041, 8), end: (2041, 15) });
3230let fs = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![(_lua_num!(1), { let _lua_tmp = readlist.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = readsysname.borrow(); _lua_tmp.clone() }), (_lua_num!(3), { let _lua_tmp = data.borrow(); _lua_tmp.clone() }), (_lua_num!(4), { let _lua_tmp = readeval.borrow(); _lua_tmp.clone() }), (_lua_num!(5), { let _lua_tmp = readfuncapply.borrow(); _lua_tmp.clone() }), (_lua_num!(6), { let _lua_tmp = readformbuiltin.borrow(); _lua_tmp.clone() }), (_lua_num!(7), { let _lua_tmp = readapply.borrow(); _lua_tmp.clone() }), (_lua_num!(8), { let _lua_tmp = readcomment.borrow(); _lua_tmp.clone() })])));
3231let _lua_tmp_t={ let _lua_tmp = fs.borrow(); _lua_tmp.clone() };
3232for _lua_tmp_k in 1..=(_lua_len(_lua_tmp_t.clone(), _lua_debug_loc { start: (2043, 30), end: (2043, 32) }).as_f64(_lua_debug_loc { start: (2043, 30), end: (2043, 32) }) as usize) {
3233let ____=std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(_lua_tmp_k)));
3234let f=std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup(_lua_tmp_t.clone(),____.borrow().clone(), _lua_debug_loc { start: (2043, 30), end: (2043, 32) })));
3235let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2044, 22), end: (2044, 25) })));
3236if (_lua_op!{not_eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2045, 15), end: (2045, 25) }}).as_bool(_lua_debug_loc { start: (2045, 15), end: (2045, 25) }) {
3237return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
3238}
3239}
3240return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2049, 15), end: (2049, 28) });
3241
3242_lua_nil()
3243}}));
3244*un_maybe.borrow_mut() = _lua_lambda(Box::new({let parse_error = parse_error.clone();
3245move |mut _lua_arg_tmp, _| {
3246let vl = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3247if (_lua_op!{eq, { let _lua_tmp = vl.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2052, 11), end: (2052, 22) }}).as_bool(_lua_debug_loc { start: (2052, 11), end: (2052, 22) }) {
3248return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2053, 19), end: (2053, 32) });
3249}
3250return { let _lua_tmp = vl.borrow(); _lua_tmp.clone() };
3251
3252_lua_nil()
3253}}));
3254*not_eof.borrow_mut() = _lua_lambda(Box::new({let eof = eof.clone();
3255move |mut _lua_arg_tmp, _| {
3256return _lua_not(_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2058, 19), end: (2058, 24) }), _lua_debug_loc { start: (2058, 15), end: (2058, 24) });
3257
3258_lua_nil()
3259}}));
3260*assert_get.borrow_mut() = _lua_lambda(Box::new({let un_maybe = un_maybe.clone();
3261let not_eof = not_eof.clone();
3262let get = get.clone();
3263move |mut _lua_arg_tmp, _| {
3264let c = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3265_lua_call({ let _lua_tmp = un_maybe.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = not_eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2062, 12), end: (2062, 21) })], _lua_debug_loc { start: (2061, 8), end: (2063, 9) });
3266_lua_call({ let _lua_tmp = un_maybe.borrow(); _lua_tmp.clone() }, vec![_lua_op!{eq, _lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2065, 12), end: (2065, 17) }), { let _lua_tmp = c.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2065, 12), end: (2065, 22) }}], _lua_debug_loc { start: (2064, 8), end: (2066, 9) });
3267
3268_lua_nil()
3269}}));
3270*readsysname_no_pack_inner_must.borrow_mut() = _lua_lambda(Box::new({let assert_get = assert_get.clone();
3271let readsysname_no_pack_inner_must = readsysname_no_pack_inner_must.clone();
3272let readlist = readlist.clone();
3273let atom = atom.clone();
3274let data = data.clone();
3275let readeval = readeval.clone();
3276let readfuncapply = readfuncapply.clone();
3277let readformbuiltin = readformbuiltin.clone();
3278let readapply = readapply.clone();
3279let readcomment = readcomment.clone();
3280let readsysname_no_pack = readsysname_no_pack.clone();
3281let parse_error = parse_error.clone();
3282move |mut _lua_arg_tmp, _| {
3283let strict = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3284if (_lua_op!{eq, { let _lua_tmp = strict.borrow(); _lua_tmp.clone() }, _lua_nil(), _lua_debug_loc { start: (2069, 11), end: (2069, 24) }}).as_bool(_lua_debug_loc { start: (2069, 11), end: (2069, 24) }) {
3285*strict.borrow_mut() = _lua_false();
3286}
3287let readsysname_no_pack_bracket = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3288*readsysname_no_pack_bracket.borrow_mut() = _lua_lambda(Box::new({let assert_get = assert_get.clone();
3289let readsysname_no_pack_inner_must = readsysname_no_pack_inner_must.clone();
3290move |mut _lua_arg_tmp, _| {
3291_lua_call({ let _lua_tmp = assert_get.borrow(); _lua_tmp.clone() }, vec![_lua_str("[")], _lua_debug_loc { start: (2073, 12), end: (2073, 27) });
3292let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readsysname_no_pack_inner_must.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2074, 22), end: (2074, 54) })));
3293_lua_call({ let _lua_tmp = assert_get.borrow(); _lua_tmp.clone() }, vec![_lua_str("]")], _lua_debug_loc { start: (2075, 12), end: (2075, 27) });
3294return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
3295
3296_lua_nil()
3297}}));
3298let fs = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3299if ({ let _lua_tmp = strict.borrow(); _lua_tmp.clone() }).as_bool(_lua_debug_loc { start: (2079, 11), end: (2079, 17) }) {
3300*fs.borrow_mut() = _lua_table(vec![(_lua_num!(1), { let _lua_tmp = readlist.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = atom.borrow(); _lua_tmp.clone() }), (_lua_num!(3), { let _lua_tmp = readsysname_no_pack_bracket.borrow(); _lua_tmp.clone() }), (_lua_num!(4), { let _lua_tmp = data.borrow(); _lua_tmp.clone() }), (_lua_num!(5), { let _lua_tmp = readeval.borrow(); _lua_tmp.clone() }), (_lua_num!(6), { let _lua_tmp = readfuncapply.borrow(); _lua_tmp.clone() }), (_lua_num!(7), { let _lua_tmp = readformbuiltin.borrow(); _lua_tmp.clone() }), (_lua_num!(8), { let _lua_tmp = readapply.borrow(); _lua_tmp.clone() }), (_lua_num!(9), { let _lua_tmp = readcomment.borrow(); _lua_tmp.clone() })]);
3301} else {
3302*fs.borrow_mut() = _lua_table(vec![(_lua_num!(1), { let _lua_tmp = readlist.borrow(); _lua_tmp.clone() }), (_lua_num!(2), { let _lua_tmp = readsysname_no_pack.borrow(); _lua_tmp.clone() }), (_lua_num!(3), { let _lua_tmp = data.borrow(); _lua_tmp.clone() }), (_lua_num!(4), { let _lua_tmp = readeval.borrow(); _lua_tmp.clone() }), (_lua_num!(5), { let _lua_tmp = readfuncapply.borrow(); _lua_tmp.clone() }), (_lua_num!(6), { let _lua_tmp = readformbuiltin.borrow(); _lua_tmp.clone() }), (_lua_num!(7), { let _lua_tmp = readapply.borrow(); _lua_tmp.clone() }), (_lua_num!(8), { let _lua_tmp = readcomment.borrow(); _lua_tmp.clone() })]);
3303}
3304let _lua_tmp_t={ let _lua_tmp = fs.borrow(); _lua_tmp.clone() };
3305for _lua_tmp_k in 1..=(_lua_len(_lua_tmp_t.clone(), _lua_debug_loc { start: (2084, 30), end: (2084, 32) }).as_f64(_lua_debug_loc { start: (2084, 30), end: (2084, 32) }) as usize) {
3306let ____=std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(_lua_tmp_k)));
3307let f=std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup(_lua_tmp_t.clone(),____.borrow().clone(), _lua_debug_loc { start: (2084, 30), end: (2084, 32) })));
3308let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2085, 22), end: (2085, 25) })));
3309if (_lua_op!{not_eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2086, 15), end: (2086, 25) }}).as_bool(_lua_debug_loc { start: (2086, 15), end: (2086, 25) }) {
3310return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
3311}
3312}
3313return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2090, 15), end: (2090, 28) });
3314
3315_lua_nil()
3316}}));
3317*may_xfx_xf.borrow_mut() = _lua_lambda(Box::new({let eof = eof.clone();
3318let get = get.clone();
3319let readsysname_no_pack_inner_must = readsysname_no_pack_inner_must.clone();
3320let new_list = new_list.clone();
3321let typeAnnotation_atom = typeAnnotation_atom.clone();
3322let function_atom = function_atom.clone();
3323let something_atom = something_atom.clone();
3324let isOrNot_atom = isOrNot_atom.clone();
3325let new_construction = new_construction.clone();
3326let __TS__ArrayPush = __TS__ArrayPush.clone();
3327let put = put.clone();
3328let sub_atom = sub_atom.clone();
3329let jsArray_to_list = jsArray_to_list.clone();
3330move |mut _lua_arg_tmp, _| {
3331let vl = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3332if (_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2093, 11), end: (2093, 16) })).as_bool(_lua_debug_loc { start: (2093, 11), end: (2093, 16) }) {
3333return { let _lua_tmp = vl.borrow(); _lua_tmp.clone() };
3334}
3335let head = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2096, 21), end: (2096, 26) })));
3336if (_lua_op!{eq, { let _lua_tmp = head.borrow(); _lua_tmp.clone() }, _lua_str("."), _lua_debug_loc { start: (2097, 11), end: (2097, 22) }}).as_bool(_lua_debug_loc { start: (2097, 11), end: (2097, 22) }) {
3337let y = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readsysname_no_pack_inner_must.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2098, 22), end: (2098, 54) })));
3338return _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = vl.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2103, 20), end: (2103, 32) }), { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2101, 16), end: (2105, 17) }), { let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2099, 19), end: (2107, 13) });
3339} else if (_lua_op!{eq, { let _lua_tmp = head.borrow(); _lua_tmp.clone() }, _lua_str(":"), _lua_debug_loc { start: (2108, 15), end: (2108, 26) }}).as_bool(_lua_debug_loc { start: (2108, 15), end: (2108, 26) }) {
3340let y = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readsysname_no_pack_inner_must.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2109, 22), end: (2109, 54) })));
3341return _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, { let _lua_tmp = vl.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2110, 19), end: (2110, 55) });
3342} else if (_lua_op!{eq, { let _lua_tmp = head.borrow(); _lua_tmp.clone() }, _lua_str("~"), _lua_debug_loc { start: (2111, 15), end: (2111, 26) }}).as_bool(_lua_debug_loc { start: (2111, 15), end: (2111, 26) }) {
3343return _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = isOrNot_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = vl.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2112, 19), end: (2112, 45) });
3344} else if (_lua_op!{eq, { let _lua_tmp = head.borrow(); _lua_tmp.clone() }, _lua_str("@"), _lua_debug_loc { start: (2113, 15), end: (2113, 26) }}).as_bool(_lua_debug_loc { start: (2113, 15), end: (2113, 26) }) {
3345let y = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readsysname_no_pack_inner_must.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2114, 22), end: (2114, 54) })));
3346return _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = vl.borrow(); _lua_tmp.clone() }, { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2119, 20), end: (2119, 56) }), { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2117, 16), end: (2121, 17) }), { let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2115, 19), end: (2123, 13) });
3347} else if (_lua_op!{eq, { let _lua_tmp = head.borrow(); _lua_tmp.clone() }, _lua_str("?"), _lua_debug_loc { start: (2124, 15), end: (2124, 26) }}).as_bool(_lua_debug_loc { start: (2124, 15), end: (2124, 26) }) {
3348return _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = isOrNot_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = vl.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2128, 16), end: (2128, 42) })], _lua_debug_loc { start: (2125, 19), end: (2129, 13) });
3349} else if (_lua_op!{eq, { let _lua_tmp = head.borrow(); _lua_tmp.clone() }, _lua_str("/"), _lua_debug_loc { start: (2130, 15), end: (2130, 26) }}).as_bool(_lua_debug_loc { start: (2130, 15), end: (2130, 26) }) {
3350let ys = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![(_lua_num!(1), { let _lua_tmp = vl.borrow(); _lua_tmp.clone() })])));
3351while (_lua_true()).as_bool(_lua_debug_loc { start: (2132, 12), end: (2143, 15) }) {
3352let y = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readsysname_no_pack_inner_must.borrow(); _lua_tmp.clone() }, vec![_lua_true()], _lua_debug_loc { start: (2133, 26), end: (2133, 62) })));
3353_lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ys.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2134, 16), end: (2134, 38) });
3354if (_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2135, 19), end: (2135, 24) })).as_bool(_lua_debug_loc { start: (2135, 19), end: (2135, 24) }) {
3355break;
3356}
3357let c0 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2138, 27), end: (2138, 32) })));
3358if (_lua_op!{not_eq, { let _lua_tmp = c0.borrow(); _lua_tmp.clone() }, _lua_str("/"), _lua_debug_loc { start: (2139, 19), end: (2139, 28) }}).as_bool(_lua_debug_loc { start: (2139, 19), end: (2139, 28) }) {
3359_lua_call({ let _lua_tmp = put.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = c0.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2140, 20), end: (2140, 27) });
3360break;
3361}
3362}
3363return _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = sub_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = jsArray_to_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ys.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2146, 16), end: (2146, 35) })], _lua_debug_loc { start: (2144, 19), end: (2147, 13) });
3364} else {
3365_lua_call({ let _lua_tmp = put.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = head.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2149, 12), end: (2149, 21) });
3366return { let _lua_tmp = vl.borrow(); _lua_tmp.clone() };
3367}
3368
3369_lua_nil()
3370}}));
3371*readsysname_no_pack.borrow_mut() = _lua_lambda(Box::new({let eof = eof.clone();
3372let get = get.clone();
3373let un_maybe = un_maybe.clone();
3374let not_eof = not_eof.clone();
3375let readsysname_no_pack_inner_must = readsysname_no_pack_inner_must.clone();
3376let new_list = new_list.clone();
3377let form_atom = form_atom.clone();
3378let system_atom = system_atom.clone();
3379let put = put.clone();
3380let assert_get = assert_get.clone();
3381let typeAnnotation_atom = typeAnnotation_atom.clone();
3382let function_atom = function_atom.clone();
3383let something_atom = something_atom.clone();
3384let theThing_atom = theThing_atom.clone();
3385let may_xfx_xf = may_xfx_xf.clone();
3386let atom = atom.clone();
3387move |mut _lua_arg_tmp, _| {
3388if (_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2154, 11), end: (2154, 16) })).as_bool(_lua_debug_loc { start: (2154, 11), end: (2154, 16) }) {
3389return _lua_false();
3390}
3391let head = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2157, 21), end: (2157, 26) })));
3392if (_lua_op!{eq, { let _lua_tmp = head.borrow(); _lua_tmp.clone() }, _lua_str("&"), _lua_debug_loc { start: (2158, 11), end: (2158, 22) }}).as_bool(_lua_debug_loc { start: (2158, 11), end: (2158, 22) }) {
3393_lua_call({ let _lua_tmp = un_maybe.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = not_eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2160, 16), end: (2160, 25) })], _lua_debug_loc { start: (2159, 12), end: (2161, 13) });
3394let c0 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2162, 23), end: (2162, 28) })));
3395if (_lua_op!{eq, { let _lua_tmp = c0.borrow(); _lua_tmp.clone() }, _lua_str("+"), _lua_debug_loc { start: (2163, 15), end: (2163, 24) }}).as_bool(_lua_debug_loc { start: (2163, 15), end: (2163, 24) }) {
3396let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readsysname_no_pack_inner_must.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2164, 26), end: (2164, 58) })));
3397return _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = form_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = system_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2167, 20), end: (2167, 44) })], _lua_debug_loc { start: (2165, 23), end: (2168, 17) });
3398} else {
3399_lua_call({ let _lua_tmp = put.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = c0.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2170, 16), end: (2170, 23) });
3400}
3401let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readsysname_no_pack_inner_must.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2172, 22), end: (2172, 54) })));
3402return _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = form_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2173, 19), end: (2173, 41) });
3403} else if (_lua_op!{eq, { let _lua_tmp = head.borrow(); _lua_tmp.clone() }, _lua_str(":"), _lua_debug_loc { start: (2174, 15), end: (2174, 26) }}).as_bool(_lua_debug_loc { start: (2174, 15), end: (2174, 26) }) {
3404_lua_call({ let _lua_tmp = un_maybe.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = not_eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2176, 16), end: (2176, 25) })], _lua_debug_loc { start: (2175, 12), end: (2177, 13) });
3405let c0 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2178, 23), end: (2178, 28) })));
3406if (_lua_op!{eq, { let _lua_tmp = c0.borrow(); _lua_tmp.clone() }, _lua_str("&"), _lua_debug_loc { start: (2179, 15), end: (2179, 24) }}).as_bool(_lua_debug_loc { start: (2179, 15), end: (2179, 24) }) {
3407_lua_call({ let _lua_tmp = assert_get.borrow(); _lua_tmp.clone() }, vec![_lua_str(">")], _lua_debug_loc { start: (2180, 16), end: (2180, 31) });
3408let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readsysname_no_pack_inner_must.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2181, 26), end: (2181, 58) })));
3409return _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = form_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2186, 24), end: (2186, 66) })], _lua_debug_loc { start: (2184, 20), end: (2187, 21) }), { let _lua_tmp = theThing_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2182, 23), end: (2189, 17) });
3410} else if (_lua_op!{eq, { let _lua_tmp = c0.borrow(); _lua_tmp.clone() }, _lua_str(">"), _lua_debug_loc { start: (2190, 19), end: (2190, 28) }}).as_bool(_lua_debug_loc { start: (2190, 19), end: (2190, 28) }) {
3411let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readsysname_no_pack_inner_must.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2191, 26), end: (2191, 58) })));
3412return _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2194, 20), end: (2194, 62) }), { let _lua_tmp = theThing_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2192, 23), end: (2196, 17) });
3413} else {
3414_lua_call({ let _lua_tmp = put.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = c0.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2198, 16), end: (2198, 23) });
3415}
3416let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readsysname_no_pack_inner_must.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2200, 22), end: (2200, 54) })));
3417return _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = theThing_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2201, 19), end: (2201, 66) });
3418} else if (_lua_op!{eq, { let _lua_tmp = head.borrow(); _lua_tmp.clone() }, _lua_str("+"), _lua_debug_loc { start: (2202, 15), end: (2202, 26) }}).as_bool(_lua_debug_loc { start: (2202, 15), end: (2202, 26) }) {
3419let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readsysname_no_pack_inner_must.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2203, 22), end: (2203, 54) })));
3420return _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = system_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2204, 19), end: (2204, 43) });
3421} else if (_lua_op!{eq, { let _lua_tmp = head.borrow(); _lua_tmp.clone() }, _lua_str("["), _lua_debug_loc { start: (2205, 15), end: (2205, 26) }}).as_bool(_lua_debug_loc { start: (2205, 15), end: (2205, 26) }) {
3422let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readsysname_no_pack_inner_must.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2206, 22), end: (2206, 54) })));
3423_lua_call({ let _lua_tmp = assert_get.borrow(); _lua_tmp.clone() }, vec![_lua_str("]")], _lua_debug_loc { start: (2207, 12), end: (2207, 27) });
3424return _lua_call({ let _lua_tmp = may_xfx_xf.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2208, 19), end: (2208, 32) });
3425} else if (_lua_op!{eq, { let _lua_tmp = head.borrow(); _lua_tmp.clone() }, _lua_str("_"), _lua_debug_loc { start: (2209, 15), end: (2209, 26) }}).as_bool(_lua_debug_loc { start: (2209, 15), end: (2209, 26) }) {
3426_lua_call({ let _lua_tmp = assert_get.borrow(); _lua_tmp.clone() }, vec![_lua_str(":")], _lua_debug_loc { start: (2210, 12), end: (2210, 27) });
3427let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readsysname_no_pack_inner_must.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2211, 22), end: (2211, 54) })));
3428return _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2212, 19), end: (2212, 67) });
3429} else {
3430_lua_call({ let _lua_tmp = put.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = head.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2214, 12), end: (2214, 21) });
3431let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = atom.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2215, 22), end: (2215, 28) })));
3432if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2216, 15), end: (2216, 25) }}).as_bool(_lua_debug_loc { start: (2216, 15), end: (2216, 25) }) {
3433return _lua_false();
3434}
3435return _lua_call({ let _lua_tmp = may_xfx_xf.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2219, 19), end: (2219, 32) });
3436}
3437
3438_lua_nil()
3439}}));
3440*readsysname.borrow_mut() = _lua_lambda(Box::new({let readsysname_no_pack = readsysname_no_pack.clone();
3441let atom_p = atom_p.clone();
3442let systemName_make = systemName_make.clone();
3443move |mut _lua_arg_tmp, _| {
3444let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readsysname_no_pack.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2223, 18), end: (2223, 39) })));
3445if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2224, 11), end: (2224, 21) }}).as_bool(_lua_debug_loc { start: (2224, 11), end: (2224, 21) }) {
3446return _lua_false();
3447}
3448if (_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2227, 11), end: (2227, 20) })).as_bool(_lua_debug_loc { start: (2227, 11), end: (2227, 20) }) {
3449return { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
3450}
3451return _lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2230, 15), end: (2230, 33) });
3452
3453_lua_nil()
3454}}));
3455*state_const.borrow_mut() = { let _lua_tmp = x.borrow(); _lua_tmp.clone() };
3456*state.borrow_mut() = _lua_num!(0);
3457let make_read_two = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3458*make_read_two.borrow_mut() = _lua_lambda(Box::new({let eof = eof.clone();
3459let get = get.clone();
3460let put = put.clone();
3461let readlist = readlist.clone();
3462let parse_error = parse_error.clone();
3463let construction_p = construction_p.clone();
3464let construction_tail = construction_tail.clone();
3465let null_p = null_p.clone();
3466let construction_head = construction_head.clone();
3467move |mut _lua_arg_tmp, _| {
3468let prefix = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3469let k = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3470return _lua_lambda(Box::new({let eof = eof.clone();
3471let get = get.clone();
3472let prefix = prefix.clone();
3473let put = put.clone();
3474let readlist = readlist.clone();
3475let parse_error = parse_error.clone();
3476let construction_p = construction_p.clone();
3477let construction_tail = construction_tail.clone();
3478let null_p = null_p.clone();
3479let k = k.clone();
3480let construction_head = construction_head.clone();
3481move |mut _lua_arg_tmp, _| {
3482if (_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2236, 15), end: (2236, 20) })).as_bool(_lua_debug_loc { start: (2236, 15), end: (2236, 20) }) {
3483return _lua_false();
3484}
3485let c = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2239, 22), end: (2239, 27) })));
3486if (_lua_op!{not_eq, { let _lua_tmp = c.borrow(); _lua_tmp.clone() }, { let _lua_tmp = prefix.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2240, 15), end: (2240, 26) }}).as_bool(_lua_debug_loc { start: (2240, 15), end: (2240, 26) }) {
3487_lua_call({ let _lua_tmp = put.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = c.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2241, 16), end: (2241, 22) });
3488return _lua_false();
3489}
3490let xs = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readlist.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2244, 23), end: (2244, 33) })));
3491if (_lua_op!{eq, { let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2245, 15), end: (2245, 26) }}).as_bool(_lua_debug_loc { start: (2245, 15), end: (2245, 26) }) {
3492return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2246, 23), end: (2246, 36) });
3493}
3494if (_lua_not(_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2248, 19), end: (2248, 37) }), _lua_debug_loc { start: (2248, 15), end: (2248, 37) })).as_bool(_lua_debug_loc { start: (2248, 15), end: (2248, 37) }) {
3495return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2249, 23), end: (2249, 36) });
3496}
3497let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2251, 22), end: (2251, 43) })));
3498if (_lua_not(_lua_op!{and, _lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2252, 20), end: (2252, 37) }), _lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2253, 16), end: (2253, 36) })], _lua_debug_loc { start: (2252, 42), end: (2254, 13) }), _lua_debug_loc { start: (2252, 20), end: (2254, 13) }}, _lua_debug_loc { start: (2252, 15), end: (2254, 14) })).as_bool(_lua_debug_loc { start: (2252, 15), end: (2254, 14) }) {
3499return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2255, 23), end: (2255, 36) });
3500}
3501return _lua_call({ let _lua_tmp = k.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2258, 16), end: (2258, 37) }), _lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2259, 16), end: (2259, 36) })], _lua_debug_loc { start: (2257, 19), end: (2260, 13) });
3502
3503_lua_nil()
3504}}));
3505
3506_lua_nil()
3507}}));
3508let make_read_three = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3509*make_read_three.borrow_mut() = _lua_lambda(Box::new({let eof = eof.clone();
3510let get = get.clone();
3511let put = put.clone();
3512let readlist = readlist.clone();
3513let parse_error = parse_error.clone();
3514let construction_p = construction_p.clone();
3515let construction_tail = construction_tail.clone();
3516let null_p = null_p.clone();
3517let construction_head = construction_head.clone();
3518move |mut _lua_arg_tmp, _| {
3519let prefix = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3520let k = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3521return _lua_lambda(Box::new({let eof = eof.clone();
3522let get = get.clone();
3523let prefix = prefix.clone();
3524let put = put.clone();
3525let readlist = readlist.clone();
3526let parse_error = parse_error.clone();
3527let construction_p = construction_p.clone();
3528let construction_tail = construction_tail.clone();
3529let null_p = null_p.clone();
3530let k = k.clone();
3531let construction_head = construction_head.clone();
3532move |mut _lua_arg_tmp, _| {
3533if (_lua_call({ let _lua_tmp = eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2265, 15), end: (2265, 20) })).as_bool(_lua_debug_loc { start: (2265, 15), end: (2265, 20) }) {
3534return _lua_false();
3535}
3536let c = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = get.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2268, 22), end: (2268, 27) })));
3537if (_lua_op!{not_eq, { let _lua_tmp = c.borrow(); _lua_tmp.clone() }, { let _lua_tmp = prefix.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2269, 15), end: (2269, 26) }}).as_bool(_lua_debug_loc { start: (2269, 15), end: (2269, 26) }) {
3538_lua_call({ let _lua_tmp = put.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = c.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2270, 16), end: (2270, 22) });
3539return _lua_false();
3540}
3541let xs = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = readlist.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2273, 23), end: (2273, 33) })));
3542if (_lua_op!{eq, { let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2274, 15), end: (2274, 26) }}).as_bool(_lua_debug_loc { start: (2274, 15), end: (2274, 26) }) {
3543return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2275, 23), end: (2275, 36) });
3544}
3545if (_lua_not(_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2277, 19), end: (2277, 37) }), _lua_debug_loc { start: (2277, 15), end: (2277, 37) })).as_bool(_lua_debug_loc { start: (2277, 15), end: (2277, 37) }) {
3546return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2278, 23), end: (2278, 36) });
3547}
3548let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2280, 22), end: (2280, 43) })));
3549if (_lua_not(_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2281, 19), end: (2281, 36) }), _lua_debug_loc { start: (2281, 15), end: (2281, 36) })).as_bool(_lua_debug_loc { start: (2281, 15), end: (2281, 36) }) {
3550return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2282, 23), end: (2282, 36) });
3551}
3552let x_d = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2284, 24), end: (2284, 44) })));
3553if (_lua_not(_lua_op!{and, _lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x_d.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2285, 20), end: (2285, 39) }), _lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x_d.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2286, 16), end: (2286, 38) })], _lua_debug_loc { start: (2285, 44), end: (2287, 13) }), _lua_debug_loc { start: (2285, 20), end: (2287, 13) }}, _lua_debug_loc { start: (2285, 15), end: (2287, 14) })).as_bool(_lua_debug_loc { start: (2285, 15), end: (2287, 14) }) {
3554return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2288, 23), end: (2288, 36) });
3555}
3556return _lua_call({ let _lua_tmp = k.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2291, 16), end: (2291, 37) }), _lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2292, 16), end: (2292, 36) }), _lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x_d.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2293, 16), end: (2293, 38) })], _lua_debug_loc { start: (2290, 19), end: (2294, 13) });
3557
3558_lua_nil()
3559}}));
3560
3561_lua_nil()
3562}}));
3563*readeval.borrow_mut() = _lua_call({ let _lua_tmp = make_read_two.borrow(); _lua_tmp.clone() }, vec![_lua_str("$"), _lua_lambda(Box::new({let val2env = val2env.clone();
3564let parse_error = parse_error.clone();
3565let evaluate = evaluate.clone();
3566move |mut _lua_arg_tmp, _| {
3567let ev = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3568let val = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3569let env = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = val2env.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = ev.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2300, 24), end: (2300, 35) })));
3570if (_lua_op!{eq, { let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2301, 15), end: (2301, 27) }}).as_bool(_lua_debug_loc { start: (2301, 15), end: (2301, 27) }) {
3571return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2302, 23), end: (2302, 36) });
3572}
3573return _lua_call({ let _lua_tmp = evaluate.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, { let _lua_tmp = val.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2304, 19), end: (2304, 37) });
3574
3575_lua_nil()
3576}}))], _lua_debug_loc { start: (2297, 15), end: (2306, 5) });
3577*readfuncapply.borrow_mut() = _lua_call({ let _lua_tmp = make_read_two.borrow(); _lua_tmp.clone() }, vec![_lua_str("%"), _lua_lambda(Box::new({let list_to_jsArray = list_to_jsArray.clone();
3578let parse_error = parse_error.clone();
3579let builtin_func_apply = builtin_func_apply.clone();
3580move |mut _lua_arg_tmp, _| {
3581let f = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3582let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3583let jsxs = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = list_to_jsArray.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
3584let v = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3585return { let _lua_tmp = v.borrow(); _lua_tmp.clone() };
3586
3587_lua_nil()
3588}})), _lua_lambda(Box::new({let parse_error = parse_error.clone();
3589move |mut _lua_arg_tmp, _| {
3590let _1 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3591let _2 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3592return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2313, 40), end: (2313, 53) });
3593
3594_lua_nil()
3595}}))], _lua_debug_loc { start: (2310, 25), end: (2314, 13) })));
3596return _lua_call({ let _lua_tmp = builtin_func_apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, { let _lua_tmp = jsxs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2315, 19), end: (2315, 46) });
3597
3598_lua_nil()
3599}}))], _lua_debug_loc { start: (2307, 20), end: (2317, 5) });
3600*readformbuiltin.borrow_mut() = _lua_call({ let _lua_tmp = make_read_three.borrow(); _lua_tmp.clone() }, vec![_lua_str("@"), _lua_lambda(Box::new({let list_to_jsArray = list_to_jsArray.clone();
3601let parse_error = parse_error.clone();
3602let val2env = val2env.clone();
3603let builtin_form_apply = builtin_form_apply.clone();
3604move |mut _lua_arg_tmp, _| {
3605let e = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3606let f = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3607let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3608let jsxs = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = list_to_jsArray.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
3609let v = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3610return { let _lua_tmp = v.borrow(); _lua_tmp.clone() };
3611
3612_lua_nil()
3613}})), _lua_lambda(Box::new({let parse_error = parse_error.clone();
3614move |mut _lua_arg_tmp, _| {
3615let _1 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3616let _2 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3617return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2324, 40), end: (2324, 53) });
3618
3619_lua_nil()
3620}}))], _lua_debug_loc { start: (2321, 25), end: (2325, 13) })));
3621let env = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = val2env.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = e.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2326, 24), end: (2326, 34) })));
3622if (_lua_op!{eq, { let _lua_tmp = env.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2327, 15), end: (2327, 27) }}).as_bool(_lua_debug_loc { start: (2327, 15), end: (2327, 27) }) {
3623return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2328, 23), end: (2328, 36) });
3624}
3625return _lua_call({ let _lua_tmp = builtin_form_apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }, { let _lua_tmp = f.borrow(); _lua_tmp.clone() }, { let _lua_tmp = jsxs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2330, 19), end: (2330, 51) });
3626
3627_lua_nil()
3628}}))], _lua_debug_loc { start: (2318, 22), end: (2332, 5) });
3629*readapply.borrow_mut() = _lua_call({ let _lua_tmp = make_read_two.borrow(); _lua_tmp.clone() }, vec![_lua_str("^"), _lua_lambda(Box::new({let list_to_jsArray = list_to_jsArray.clone();
3630let parse_error = parse_error.clone();
3631let apply = apply.clone();
3632move |mut _lua_arg_tmp, _| {
3633let f = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3634let xs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3635let jsxs = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = list_to_jsArray.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xs.borrow(); _lua_tmp.clone() }, _lua_lambda(Box::new({move |mut _lua_arg_tmp, _| {
3636let v = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3637return { let _lua_tmp = v.borrow(); _lua_tmp.clone() };
3638
3639_lua_nil()
3640}})), _lua_lambda(Box::new({let parse_error = parse_error.clone();
3641move |mut _lua_arg_tmp, _| {
3642let _1 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3643let _2 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3644return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2339, 40), end: (2339, 53) });
3645
3646_lua_nil()
3647}}))], _lua_debug_loc { start: (2336, 25), end: (2340, 13) })));
3648return _lua_call({ let _lua_tmp = apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = f.borrow(); _lua_tmp.clone() }, { let _lua_tmp = jsxs.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2341, 19), end: (2341, 33) });
3649
3650_lua_nil()
3651}}))], _lua_debug_loc { start: (2333, 16), end: (2343, 5) });
3652*readcomment.borrow_mut() = _lua_call({ let _lua_tmp = make_read_two.borrow(); _lua_tmp.clone() }, vec![_lua_str(";"), _lua_lambda(Box::new({let new_comment = new_comment.clone();
3653move |mut _lua_arg_tmp, _| {
3654let comment = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3655let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3656return _lua_call({ let _lua_tmp = new_comment.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = comment.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2346, 36), end: (2346, 59) });
3657
3658_lua_nil()
3659}}))], _lua_debug_loc { start: (2344, 18), end: (2347, 5) });
3660return _lua_call({ let _lua_tmp = val.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2348, 11), end: (2348, 16) });
3661
3662_lua_nil()
3663}}));
3664let complex_print = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3665*complex_print.borrow_mut() = _lua_lambda(Box::new({let atom_p = atom_p.clone();
3666let un_atom = un_atom.clone();
3667let tostring = tostring.clone();
3668let maybe_list_to_jsArray = maybe_list_to_jsArray.clone();
3669let jsbool_no_force_isomorphism_p = jsbool_no_force_isomorphism_p.clone();
3670let typeAnnotation_atom = typeAnnotation_atom.clone();
3671let function_atom = function_atom.clone();
3672let something_atom = something_atom.clone();
3673let construction_p = construction_p.clone();
3674let construction_tail = construction_tail.clone();
3675let construction_head = construction_head.clone();
3676let theThing_atom = theThing_atom.clone();
3677let isOrNot_atom = isOrNot_atom.clone();
3678let form_atom = form_atom.clone();
3679let system_atom = system_atom.clone();
3680let sub_atom = sub_atom.clone();
3681let simple_print = simple_print.clone();
3682let systemName_make = systemName_make.clone();
3683let complex_parse = complex_parse.clone();
3684let null_p = null_p.clone();
3685let complex_print = complex_print.clone();
3686let data_p = data_p.clone();
3687let data_name = data_name.clone();
3688let data_list = data_list.clone();
3689let name_atom = name_atom.clone();
3690let new_construction = new_construction.clone();
3691let comment_p = comment_p.clone();
3692let comment_comment = comment_comment.clone();
3693let comment_x = comment_x.clone();
3694let delay_evaluate_p = delay_evaluate_p.clone();
3695let env2val = env2val.clone();
3696let delay_evaluate_env = delay_evaluate_env.clone();
3697let delay_evaluate_x = delay_evaluate_x.clone();
3698let delay_builtin_func_p = delay_builtin_func_p.clone();
3699let delay_builtin_func_f = delay_builtin_func_f.clone();
3700let jsArray_to_list = jsArray_to_list.clone();
3701let delay_builtin_func_xs = delay_builtin_func_xs.clone();
3702let delay_builtin_form_p = delay_builtin_form_p.clone();
3703let delay_builtin_form_env = delay_builtin_form_env.clone();
3704let delay_builtin_form_f = delay_builtin_form_f.clone();
3705let delay_builtin_form_xs = delay_builtin_form_xs.clone();
3706let delay_apply_p = delay_apply_p.clone();
3707let delay_apply_f = delay_apply_f.clone();
3708let delay_apply_xs = delay_apply_xs.clone();
3709let LANG_ERROR = LANG_ERROR.clone();
3710move |mut _lua_arg_tmp, _| {
3711let val = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3712let print_sys_name = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3713*print_sys_name.borrow_mut() = _lua_lambda(Box::new({let atom_p = atom_p.clone();
3714let un_atom = un_atom.clone();
3715let tostring = tostring.clone();
3716let maybe_list_to_jsArray = maybe_list_to_jsArray.clone();
3717let jsbool_no_force_isomorphism_p = jsbool_no_force_isomorphism_p.clone();
3718let typeAnnotation_atom = typeAnnotation_atom.clone();
3719let function_atom = function_atom.clone();
3720let something_atom = something_atom.clone();
3721let print_sys_name = print_sys_name.clone();
3722let construction_p = construction_p.clone();
3723let construction_tail = construction_tail.clone();
3724let construction_head = construction_head.clone();
3725let theThing_atom = theThing_atom.clone();
3726let isOrNot_atom = isOrNot_atom.clone();
3727let form_atom = form_atom.clone();
3728let system_atom = system_atom.clone();
3729let sub_atom = sub_atom.clone();
3730let simple_print = simple_print.clone();
3731let systemName_make = systemName_make.clone();
3732move |mut _lua_arg_tmp, _| {
3733let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3734let is_inner_bool = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3735if (_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2352, 11), end: (2352, 20) })).as_bool(_lua_debug_loc { start: (2352, 11), end: (2352, 20) }) {
3736return _lua_call({ let _lua_tmp = un_atom.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2353, 19), end: (2353, 29) });
3737}
3738let inner_bracket = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3739*inner_bracket.borrow_mut() = _lua_lambda(Box::new({let is_inner_bool = is_inner_bool.clone();
3740let tostring = tostring.clone();
3741move |mut _lua_arg_tmp, _| {
3742let vl = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3743if ({ let _lua_tmp = is_inner_bool.borrow(); _lua_tmp.clone() }).as_bool(_lua_debug_loc { start: (2356, 15), end: (2356, 28) }) {
3744return _lua_op!{concat, _lua_str("["), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = vl.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2357, 30), end: (2357, 42) }), _lua_str("]"), _lua_debug_loc { start: (2357, 30), end: (2357, 49) }}, _lua_debug_loc { start: (2357, 23), end: (2357, 49) }};
3745} else {
3746return { let _lua_tmp = vl.borrow(); _lua_tmp.clone() };
3747}
3748
3749_lua_nil()
3750}}));
3751let maybe_xs = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = maybe_list_to_jsArray.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2362, 25), end: (2362, 49) })));
3752if (_lua_op!{and, _lua_op!{and, _lua_op!{not_eq, { let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2363, 11), end: (2363, 115) }}, _lua_op!{eq, _lua_len({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2363, 33), end: (2363, 42) }), _lua_num!(3), _lua_debug_loc { start: (2363, 33), end: (2363, 47) }}, _lua_debug_loc { start: (2363, 11), end: (2363, 115) }}, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (2363, 82), end: (2363, 92) }), { let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2363, 52), end: (2363, 115) }), _lua_debug_loc { start: (2363, 11), end: (2363, 115) }}).as_bool(_lua_debug_loc { start: (2363, 11), end: (2363, 115) }) {
3753let maybe_lst_2 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = maybe_list_to_jsArray.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (2364, 54), end: (2364, 64) })], _lua_debug_loc { start: (2364, 32), end: (2364, 66) })));
3754if (_lua_op!{and, _lua_op!{and, _lua_op!{not_eq, { let _lua_tmp = maybe_lst_2.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2365, 15), end: (2365, 122) }}, _lua_op!{eq, _lua_len({ let _lua_tmp = maybe_lst_2.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2365, 40), end: (2365, 52) }), _lua_num!(3), _lua_debug_loc { start: (2365, 40), end: (2365, 57) }}, _lua_debug_loc { start: (2365, 15), end: (2365, 122) }}, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_2.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (2365, 92), end: (2365, 105) }), { let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2365, 62), end: (2365, 122) }), _lua_debug_loc { start: (2365, 15), end: (2365, 122) }}).as_bool(_lua_debug_loc { start: (2365, 15), end: (2365, 122) }) {
3755let var_2_1 = std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup({ let _lua_tmp = maybe_lst_2.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (2366, 32), end: (2366, 45) })));
3756let maybe_lst_3 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = maybe_list_to_jsArray.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = var_2_1.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2367, 36), end: (2367, 66) })));
3757if (_lua_op!{and, _lua_op!{and, _lua_op!{not_eq, { let _lua_tmp = maybe_lst_3.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2368, 19), end: (2368, 127) }}, _lua_op!{eq, _lua_len({ let _lua_tmp = maybe_lst_3.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2368, 44), end: (2368, 56) }), _lua_num!(1), _lua_debug_loc { start: (2368, 44), end: (2368, 61) }}, _lua_debug_loc { start: (2368, 19), end: (2368, 127) }}, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_2.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (2368, 96), end: (2368, 109) }), { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2368, 66), end: (2368, 127) }), _lua_debug_loc { start: (2368, 19), end: (2368, 127) }}).as_bool(_lua_debug_loc { start: (2368, 19), end: (2368, 127) }) {
3758return _lua_call({ let _lua_tmp = inner_bracket.borrow(); _lua_tmp.clone() }, vec![_lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_3.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (2371, 43), end: (2371, 56) }), _lua_true()], _lua_debug_loc { start: (2371, 28), end: (2371, 64) })], _lua_debug_loc { start: (2370, 24), end: (2372, 25) }), _lua_op!{concat, _lua_str("."), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (2373, 43), end: (2373, 53) }), _lua_true()], _lua_debug_loc { start: (2373, 28), end: (2373, 61) })], _lua_debug_loc { start: (2372, 36), end: (2374, 25) }), _lua_debug_loc { start: (2372, 29), end: (2374, 25) }}, _lua_debug_loc { start: (2370, 24), end: (2374, 25) }}], _lua_debug_loc { start: (2369, 27), end: (2375, 21) });
3759} else if (_lua_op!{and, _lua_op!{and, _lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = var_2_1.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2376, 23), end: (2376, 46) }), _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = var_2_1.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2377, 20), end: (2377, 46) }), { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2376, 51), end: (2379, 17) }), _lua_debug_loc { start: (2376, 23), end: (2379, 83) }}, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_2.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (2379, 52), end: (2379, 65) }), { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2379, 22), end: (2379, 83) }), _lua_debug_loc { start: (2376, 23), end: (2379, 83) }}).as_bool(_lua_debug_loc { start: (2376, 23), end: (2379, 83) }) {
3760return _lua_call({ let _lua_tmp = inner_bracket.borrow(); _lua_tmp.clone() }, vec![_lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = var_2_1.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2383, 32), end: (2383, 58) }), _lua_true()], _lua_debug_loc { start: (2382, 28), end: (2385, 29) })], _lua_debug_loc { start: (2381, 24), end: (2386, 25) }), _lua_op!{concat, _lua_str("@"), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (2387, 43), end: (2387, 53) }), _lua_true()], _lua_debug_loc { start: (2387, 28), end: (2387, 61) })], _lua_debug_loc { start: (2386, 36), end: (2388, 25) }), _lua_debug_loc { start: (2386, 29), end: (2388, 25) }}, _lua_debug_loc { start: (2381, 24), end: (2388, 25) }}], _lua_debug_loc { start: (2380, 27), end: (2389, 21) });
3761} else if (_lua_op!{and, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = var_2_1.borrow(); _lua_tmp.clone() }, { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2390, 23), end: (2390, 77) }), _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (2390, 112), end: (2390, 122) }), { let _lua_tmp = theThing_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2390, 82), end: (2390, 139) }), _lua_debug_loc { start: (2390, 23), end: (2390, 139) }}).as_bool(_lua_debug_loc { start: (2390, 23), end: (2390, 139) }) {
3762return _lua_call({ let _lua_tmp = inner_bracket.borrow(); _lua_tmp.clone() }, vec![_lua_op!{concat, _lua_str(":>"), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_2.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (2393, 43), end: (2393, 56) }), _lua_true()], _lua_debug_loc { start: (2393, 28), end: (2393, 64) })], _lua_debug_loc { start: (2392, 32), end: (2394, 25) }), _lua_debug_loc { start: (2392, 24), end: (2394, 25) }}], _lua_debug_loc { start: (2391, 27), end: (2395, 21) });
3763}
3764}
3765let maybe_lst_44 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = maybe_list_to_jsArray.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (2398, 55), end: (2398, 65) })], _lua_debug_loc { start: (2398, 33), end: (2398, 67) })));
3766if (_lua_op!{and, _lua_op!{and, _lua_op!{and, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (2399, 45), end: (2399, 55) }), { let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2399, 15), end: (2399, 72) }), _lua_op!{not_eq, { let _lua_tmp = maybe_lst_44.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2399, 77), end: (2399, 98) }}, _lua_debug_loc { start: (2399, 15), end: (2399, 186) }}, _lua_op!{eq, _lua_len({ let _lua_tmp = maybe_lst_44.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2399, 103), end: (2399, 116) }), _lua_num!(2), _lua_debug_loc { start: (2399, 103), end: (2399, 121) }}, _lua_debug_loc { start: (2399, 15), end: (2399, 186) }}, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_44.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (2399, 156), end: (2399, 170) }), { let _lua_tmp = isOrNot_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2399, 126), end: (2399, 186) }), _lua_debug_loc { start: (2399, 15), end: (2399, 186) }}).as_bool(_lua_debug_loc { start: (2399, 15), end: (2399, 186) }) {
3767return _lua_call({ let _lua_tmp = inner_bracket.borrow(); _lua_tmp.clone() }, vec![_lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_44.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (2402, 39), end: (2402, 53) }), _lua_true()], _lua_debug_loc { start: (2402, 24), end: (2402, 61) })], _lua_debug_loc { start: (2401, 20), end: (2403, 21) }), _lua_str("?"), _lua_debug_loc { start: (2401, 20), end: (2403, 28) }}], _lua_debug_loc { start: (2400, 23), end: (2404, 17) });
3768}
3769if (_lua_op!{and, _lua_op!{and, _lua_op!{and, _lua_op!{not_eq, { let _lua_tmp = maybe_lst_2.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2406, 15), end: (2406, 180) }}, _lua_op!{eq, _lua_len({ let _lua_tmp = maybe_lst_2.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2406, 40), end: (2406, 52) }), _lua_num!(2), _lua_debug_loc { start: (2406, 40), end: (2406, 57) }}, _lua_debug_loc { start: (2406, 15), end: (2406, 180) }}, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (2406, 92), end: (2406, 102) }), { let _lua_tmp = theThing_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2406, 62), end: (2406, 119) }), _lua_debug_loc { start: (2406, 15), end: (2406, 180) }}, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_2.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (2406, 154), end: (2406, 167) }), { let _lua_tmp = form_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2406, 124), end: (2406, 180) }), _lua_debug_loc { start: (2406, 15), end: (2406, 180) }}).as_bool(_lua_debug_loc { start: (2406, 15), end: (2406, 180) }) {
3770let maybe_lst_88 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = maybe_list_to_jsArray.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_2.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (2407, 59), end: (2407, 72) })], _lua_debug_loc { start: (2407, 37), end: (2407, 74) })));
3771if (_lua_op!{and, _lua_op!{and, _lua_op!{and, _lua_op!{not_eq, { let _lua_tmp = maybe_lst_88.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2408, 19), end: (2408, 196) }}, _lua_op!{eq, _lua_len({ let _lua_tmp = maybe_lst_88.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2408, 45), end: (2408, 58) }), _lua_num!(3), _lua_debug_loc { start: (2408, 45), end: (2408, 63) }}, _lua_debug_loc { start: (2408, 19), end: (2408, 196) }}, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_88.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (2408, 98), end: (2408, 112) }), { let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2408, 68), end: (2408, 129) }), _lua_debug_loc { start: (2408, 19), end: (2408, 196) }}, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_88.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (2408, 164), end: (2408, 178) }), { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2408, 134), end: (2408, 196) }), _lua_debug_loc { start: (2408, 19), end: (2408, 196) }}).as_bool(_lua_debug_loc { start: (2408, 19), end: (2408, 196) }) {
3772return _lua_call({ let _lua_tmp = inner_bracket.borrow(); _lua_tmp.clone() }, vec![_lua_op!{concat, _lua_str(":&>"), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_88.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (2411, 43), end: (2411, 57) }), _lua_true()], _lua_debug_loc { start: (2411, 28), end: (2411, 65) })], _lua_debug_loc { start: (2410, 33), end: (2412, 25) }), _lua_debug_loc { start: (2410, 24), end: (2412, 25) }}], _lua_debug_loc { start: (2409, 27), end: (2413, 21) });
3773}
3774}
3775let hd = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3776if (_lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (2417, 45), end: (2417, 55) }), { let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2417, 15), end: (2417, 73) })).as_bool(_lua_debug_loc { start: (2417, 15), end: (2417, 73) }) {
3777*hd.borrow_mut() = _lua_str("_");
3778} else if (_lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (2419, 49), end: (2419, 59) }), { let _lua_tmp = theThing_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2419, 19), end: (2419, 76) })).as_bool(_lua_debug_loc { start: (2419, 19), end: (2419, 76) }) {
3779*hd.borrow_mut() = _lua_str("");
3780} else {
3781*hd.borrow_mut() = _lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(3), _lua_debug_loc { start: (2422, 36), end: (2422, 46) }), _lua_true()], _lua_debug_loc { start: (2422, 21), end: (2422, 54) });
3782}
3783return _lua_call({ let _lua_tmp = inner_bracket.borrow(); _lua_tmp.clone() }, vec![_lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = hd.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2425, 16), end: (2425, 28) }), _lua_op!{concat, _lua_str(":"), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (2426, 35), end: (2426, 45) }), _lua_true()], _lua_debug_loc { start: (2426, 20), end: (2426, 53) })], _lua_debug_loc { start: (2425, 39), end: (2427, 17) }), _lua_debug_loc { start: (2425, 32), end: (2427, 17) }}, _lua_debug_loc { start: (2425, 16), end: (2427, 17) }}], _lua_debug_loc { start: (2424, 19), end: (2428, 13) });
3784} else if (_lua_op!{and, _lua_op!{not_eq, { let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2429, 15), end: (2429, 51) }}, _lua_op!{eq, _lua_len({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2429, 37), end: (2429, 46) }), _lua_num!(2), _lua_debug_loc { start: (2429, 37), end: (2429, 51) }}, _lua_debug_loc { start: (2429, 15), end: (2429, 51) }}).as_bool(_lua_debug_loc { start: (2429, 15), end: (2429, 51) }) {
3785if (_lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (2430, 45), end: (2430, 55) }), { let _lua_tmp = form_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2430, 15), end: (2430, 68) })).as_bool(_lua_debug_loc { start: (2430, 15), end: (2430, 68) }) {
3786let maybe_lst_288 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = maybe_list_to_jsArray.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (2431, 60), end: (2431, 70) })], _lua_debug_loc { start: (2431, 38), end: (2431, 72) })));
3787if (_lua_op!{and, _lua_op!{and, _lua_op!{not_eq, { let _lua_tmp = maybe_lst_288.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2432, 19), end: (2432, 130) }}, _lua_op!{eq, _lua_len({ let _lua_tmp = maybe_lst_288.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2432, 46), end: (2432, 60) }), _lua_num!(2), _lua_debug_loc { start: (2432, 46), end: (2432, 65) }}, _lua_debug_loc { start: (2432, 19), end: (2432, 130) }}, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_288.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (2432, 100), end: (2432, 115) }), { let _lua_tmp = system_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2432, 70), end: (2432, 130) }), _lua_debug_loc { start: (2432, 19), end: (2432, 130) }}).as_bool(_lua_debug_loc { start: (2432, 19), end: (2432, 130) }) {
3788return _lua_call({ let _lua_tmp = inner_bracket.borrow(); _lua_tmp.clone() }, vec![_lua_op!{concat, _lua_str("&+"), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_288.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (2435, 43), end: (2435, 58) }), _lua_true()], _lua_debug_loc { start: (2435, 28), end: (2435, 66) })], _lua_debug_loc { start: (2434, 32), end: (2436, 25) }), _lua_debug_loc { start: (2434, 24), end: (2436, 25) }}], _lua_debug_loc { start: (2433, 27), end: (2437, 21) });
3789}
3790return _lua_call({ let _lua_tmp = inner_bracket.borrow(); _lua_tmp.clone() }, vec![_lua_op!{concat, _lua_str("&"), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (2441, 39), end: (2441, 49) }), _lua_true()], _lua_debug_loc { start: (2441, 24), end: (2441, 57) })], _lua_debug_loc { start: (2440, 27), end: (2442, 21) }), _lua_debug_loc { start: (2440, 20), end: (2442, 21) }}], _lua_debug_loc { start: (2439, 23), end: (2443, 17) });
3791} else if (_lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (2444, 49), end: (2444, 59) }), { let _lua_tmp = isOrNot_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2444, 19), end: (2444, 75) })).as_bool(_lua_debug_loc { start: (2444, 19), end: (2444, 75) }) {
3792return _lua_call({ let _lua_tmp = inner_bracket.borrow(); _lua_tmp.clone() }, vec![_lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (2447, 39), end: (2447, 49) }), _lua_true()], _lua_debug_loc { start: (2447, 24), end: (2447, 57) })], _lua_debug_loc { start: (2446, 20), end: (2448, 21) }), _lua_str("~"), _lua_debug_loc { start: (2446, 20), end: (2448, 28) }}], _lua_debug_loc { start: (2445, 23), end: (2449, 17) });
3793} else if (_lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (2450, 49), end: (2450, 59) }), { let _lua_tmp = system_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2450, 19), end: (2450, 74) })).as_bool(_lua_debug_loc { start: (2450, 19), end: (2450, 74) }) {
3794return _lua_call({ let _lua_tmp = inner_bracket.borrow(); _lua_tmp.clone() }, vec![_lua_op!{concat, _lua_str("+"), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (2453, 39), end: (2453, 49) }), _lua_true()], _lua_debug_loc { start: (2453, 24), end: (2453, 57) })], _lua_debug_loc { start: (2452, 27), end: (2454, 21) }), _lua_debug_loc { start: (2452, 20), end: (2454, 21) }}], _lua_debug_loc { start: (2451, 23), end: (2455, 17) });
3795} else if (_lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (2456, 49), end: (2456, 59) }), { let _lua_tmp = sub_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2456, 19), end: (2456, 71) })).as_bool(_lua_debug_loc { start: (2456, 19), end: (2456, 71) }) {
3796let maybe_lst_8934 = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = maybe_list_to_jsArray.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (2457, 61), end: (2457, 71) })], _lua_debug_loc { start: (2457, 39), end: (2457, 73) })));
3797if (_lua_op!{and, _lua_op!{not_eq, { let _lua_tmp = maybe_lst_8934.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2458, 19), end: (2458, 66) }}, _lua_op!{greater, _lua_len({ let _lua_tmp = maybe_lst_8934.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2458, 47), end: (2458, 62) }), _lua_num!(1), _lua_debug_loc { start: (2458, 47), end: (2458, 66) }}, _lua_debug_loc { start: (2458, 19), end: (2458, 66) }}).as_bool(_lua_debug_loc { start: (2458, 19), end: (2458, 66) }) {
3798let tmp = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_8934.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (2459, 47), end: (2459, 63) }), _lua_true()], _lua_debug_loc { start: (2459, 32), end: (2459, 71) })));
3799{
3800let i = std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(1)));
3801while (_lua_op!{less, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_len({ let _lua_tmp = maybe_lst_8934.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2462, 34), end: (2462, 49) }), _lua_debug_loc { start: (2462, 30), end: (2462, 49) }}).as_bool(_lua_debug_loc { start: (2462, 24), end: (2467, 27) }) {
3802*tmp.borrow_mut() = _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = tmp.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2463, 34), end: (2463, 47) }), _lua_op!{concat, _lua_str("/"), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_lst_8934.borrow(); _lua_tmp.clone() },_lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (2464, 62), end: (2464, 67) }}, _lua_debug_loc { start: (2464, 47), end: (2464, 67) }), _lua_true()], _lua_debug_loc { start: (2464, 32), end: (2464, 75) })], _lua_debug_loc { start: (2463, 58), end: (2465, 29) }), _lua_debug_loc { start: (2463, 51), end: (2465, 29) }}, _lua_debug_loc { start: (2463, 34), end: (2465, 29) }};
3803*i.borrow_mut() = _lua_op!{add, { let _lua_tmp = i.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (2466, 32), end: (2466, 37) }};
3804}
3805}
3806return _lua_call({ let _lua_tmp = inner_bracket.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = tmp.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2469, 27), end: (2469, 45) });
3807}
3808}
3809}
3810if ({ let _lua_tmp = is_inner_bool.borrow(); _lua_tmp.clone() }).as_bool(_lua_debug_loc { start: (2473, 11), end: (2473, 24) }) {
3811return _lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2474, 19), end: (2474, 34) });
3812} else {
3813return _lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2477, 16), end: (2477, 34) })], _lua_debug_loc { start: (2476, 19), end: (2478, 13) });
3814}
3815
3816_lua_nil()
3817}}));
3818let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = complex_parse.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = val.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2482, 8), end: (2482, 25) })], _lua_debug_loc { start: (2481, 14), end: (2483, 5) })));
3819let temp = std::sync::Arc::new(std::cell::RefCell::new(_lua_str("")));
3820let prefix = std::sync::Arc::new(std::cell::RefCell::new(_lua_str("")));
3821if (_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2486, 7), end: (2486, 16) })).as_bool(_lua_debug_loc { start: (2486, 7), end: (2486, 16) }) {
3822return _lua_str("()");
3823} else if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2488, 11), end: (2488, 28) })).as_bool(_lua_debug_loc { start: (2488, 11), end: (2488, 28) }) {
3824*temp.borrow_mut() = _lua_str("(");
3825*prefix.borrow_mut() = _lua_str("");
3826while (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2491, 14), end: (2491, 31) })).as_bool(_lua_debug_loc { start: (2491, 8), end: (2499, 11) }) {
3827*temp.borrow_mut() = _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = temp.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2492, 19), end: (2492, 33) }), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = prefix.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2492, 37), end: (2492, 53) }), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2494, 20), end: (2494, 40) })], _lua_debug_loc { start: (2493, 16), end: (2495, 17) })], _lua_debug_loc { start: (2492, 57), end: (2496, 13) }), _lua_debug_loc { start: (2492, 37), end: (2496, 13) }}, _lua_debug_loc { start: (2492, 19), end: (2496, 13) }};
3828*prefix.borrow_mut() = _lua_str(" ");
3829*x.borrow_mut() = _lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2498, 16), end: (2498, 36) });
3830}
3831if (_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2500, 11), end: (2500, 20) })).as_bool(_lua_debug_loc { start: (2500, 11), end: (2500, 20) }) {
3832*temp.borrow_mut() = _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = temp.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2501, 19), end: (2501, 33) }), _lua_str(")"), _lua_debug_loc { start: (2501, 19), end: (2501, 40) }};
3833} else {
3834*temp.borrow_mut() = _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = temp.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2503, 19), end: (2503, 33) }), _lua_op!{concat, _lua_str(" . "), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2504, 16), end: (2504, 32) })], _lua_debug_loc { start: (2503, 46), end: (2505, 13) }), _lua_str(")"), _lua_debug_loc { start: (2503, 46), end: (2505, 20) }}, _lua_debug_loc { start: (2503, 37), end: (2505, 20) }}, _lua_debug_loc { start: (2503, 19), end: (2505, 20) }};
3835}
3836return { let _lua_tmp = temp.borrow(); _lua_tmp.clone() };
3837} else if (_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2508, 11), end: (2508, 20) })).as_bool(_lua_debug_loc { start: (2508, 11), end: (2508, 20) }) {
3838let name = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2509, 21), end: (2509, 33) })));
3839let list = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = data_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2510, 21), end: (2510, 33) })));
3840let maybe_xs = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = maybe_list_to_jsArray.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2511, 25), end: (2511, 52) })));
3841if (_lua_op!{and, _lua_op!{and, _lua_op!{and, _lua_op!{not_eq, { let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2512, 11), end: (2512, 158) }}, _lua_op!{eq, _lua_len({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2512, 33), end: (2512, 42) }), _lua_num!(2), _lua_debug_loc { start: (2512, 33), end: (2512, 47) }}, _lua_debug_loc { start: (2512, 11), end: (2512, 158) }}, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = name.borrow(); _lua_tmp.clone() }, { let _lua_tmp = name_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2512, 52), end: (2512, 98) }), _lua_debug_loc { start: (2512, 11), end: (2512, 158) }}, _lua_call({ let _lua_tmp = jsbool_no_force_isomorphism_p.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (2512, 133), end: (2512, 143) }), { let _lua_tmp = system_atom.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2512, 103), end: (2512, 158) }), _lua_debug_loc { start: (2512, 11), end: (2512, 158) }}).as_bool(_lua_debug_loc { start: (2512, 11), end: (2512, 158) }) {
3842return _lua_call({ let _lua_tmp = print_sys_name.borrow(); _lua_tmp.clone() }, vec![_lua_lookup({ let _lua_tmp = maybe_xs.borrow(); _lua_tmp.clone() },_lua_num!(2), _lua_debug_loc { start: (2513, 34), end: (2513, 44) }), _lua_false()], _lua_debug_loc { start: (2513, 19), end: (2513, 53) });
3843}
3844return _lua_op!{concat, _lua_str("#"), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = name.borrow(); _lua_tmp.clone() }, { let _lua_tmp = list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2517, 16), end: (2517, 44) })], _lua_debug_loc { start: (2516, 12), end: (2518, 13) })], _lua_debug_loc { start: (2515, 22), end: (2519, 9) }), _lua_debug_loc { start: (2515, 15), end: (2519, 9) }};
3845} else if (_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2520, 11), end: (2520, 20) })).as_bool(_lua_debug_loc { start: (2520, 11), end: (2520, 20) }) {
3846return _lua_call({ let _lua_tmp = un_atom.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2521, 15), end: (2521, 25) });
3847} else if (_lua_call({ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2522, 11), end: (2522, 23) })).as_bool(_lua_debug_loc { start: (2522, 11), end: (2522, 23) }) {
3848return _lua_op!{concat, _lua_str(";("), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = comment_comment.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2525, 16), end: (2525, 34) })], _lua_debug_loc { start: (2524, 12), end: (2526, 13) })], _lua_debug_loc { start: (2523, 23), end: (2527, 9) }), _lua_op!{concat, _lua_str(" "), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = comment_x.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2529, 16), end: (2529, 28) })], _lua_debug_loc { start: (2528, 12), end: (2530, 13) })], _lua_debug_loc { start: (2527, 20), end: (2531, 9) }), _lua_str(")"), _lua_debug_loc { start: (2527, 20), end: (2531, 16) }}, _lua_debug_loc { start: (2527, 13), end: (2531, 16) }}, _lua_debug_loc { start: (2523, 23), end: (2531, 16) }}, _lua_debug_loc { start: (2523, 15), end: (2531, 16) }};
3849} else if (_lua_call({ let _lua_tmp = delay_evaluate_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2532, 11), end: (2532, 30) })).as_bool(_lua_debug_loc { start: (2532, 11), end: (2532, 30) }) {
3850return _lua_op!{concat, _lua_str("$("), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = env2val.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_evaluate_env.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2536, 20), end: (2536, 41) })], _lua_debug_loc { start: (2535, 16), end: (2537, 17) })], _lua_debug_loc { start: (2534, 12), end: (2538, 13) })], _lua_debug_loc { start: (2533, 23), end: (2539, 9) }), _lua_op!{concat, _lua_str(" "), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_evaluate_x.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2541, 16), end: (2541, 35) })], _lua_debug_loc { start: (2540, 12), end: (2542, 13) })], _lua_debug_loc { start: (2539, 20), end: (2543, 9) }), _lua_str(")"), _lua_debug_loc { start: (2539, 20), end: (2543, 16) }}, _lua_debug_loc { start: (2539, 13), end: (2543, 16) }}, _lua_debug_loc { start: (2533, 23), end: (2543, 16) }}, _lua_debug_loc { start: (2533, 15), end: (2543, 16) }};
3851} else if (_lua_call({ let _lua_tmp = delay_builtin_func_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2544, 11), end: (2544, 34) })).as_bool(_lua_debug_loc { start: (2544, 11), end: (2544, 34) }) {
3852return _lua_op!{concat, _lua_str("%("), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_builtin_func_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2547, 16), end: (2547, 39) })], _lua_debug_loc { start: (2546, 12), end: (2548, 13) })], _lua_debug_loc { start: (2545, 23), end: (2549, 9) }), _lua_op!{concat, _lua_str(" "), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = jsArray_to_list.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_builtin_func_xs.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2552, 20), end: (2552, 44) })], _lua_debug_loc { start: (2551, 16), end: (2553, 17) })], _lua_debug_loc { start: (2550, 12), end: (2554, 13) })], _lua_debug_loc { start: (2549, 20), end: (2555, 9) }), _lua_str(")"), _lua_debug_loc { start: (2549, 20), end: (2555, 16) }}, _lua_debug_loc { start: (2549, 13), end: (2555, 16) }}, _lua_debug_loc { start: (2545, 23), end: (2555, 16) }}, _lua_debug_loc { start: (2545, 15), end: (2555, 16) }};
3853} else if (_lua_call({ let _lua_tmp = delay_builtin_form_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2556, 11), end: (2556, 34) })).as_bool(_lua_debug_loc { start: (2556, 11), end: (2556, 34) }) {
3854return _lua_op!{concat, _lua_str("@("), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = env2val.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_builtin_form_env.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2560, 20), end: (2560, 45) })], _lua_debug_loc { start: (2559, 16), end: (2561, 17) })], _lua_debug_loc { start: (2558, 12), end: (2562, 13) })], _lua_debug_loc { start: (2557, 23), end: (2563, 9) }), _lua_op!{concat, _lua_str(" "), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_builtin_form_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2565, 16), end: (2565, 39) })], _lua_debug_loc { start: (2564, 12), end: (2566, 13) })], _lua_debug_loc { start: (2563, 20), end: (2567, 9) }), _lua_op!{concat, _lua_str(" "), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = jsArray_to_list.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_builtin_form_xs.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2570, 20), end: (2570, 44) })], _lua_debug_loc { start: (2569, 16), end: (2571, 17) })], _lua_debug_loc { start: (2568, 12), end: (2572, 13) })], _lua_debug_loc { start: (2567, 20), end: (2573, 9) }), _lua_str(")"), _lua_debug_loc { start: (2567, 20), end: (2573, 16) }}, _lua_debug_loc { start: (2567, 13), end: (2573, 16) }}, _lua_debug_loc { start: (2563, 20), end: (2573, 16) }}, _lua_debug_loc { start: (2563, 13), end: (2573, 16) }}, _lua_debug_loc { start: (2557, 23), end: (2573, 16) }}, _lua_debug_loc { start: (2557, 15), end: (2573, 16) }};
3855} else if (_lua_call({ let _lua_tmp = delay_apply_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2574, 11), end: (2574, 27) })).as_bool(_lua_debug_loc { start: (2574, 11), end: (2574, 27) }) {
3856return _lua_op!{concat, _lua_str("^("), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_apply_f.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2577, 16), end: (2577, 32) })], _lua_debug_loc { start: (2576, 12), end: (2578, 13) })], _lua_debug_loc { start: (2575, 23), end: (2579, 9) }), _lua_op!{concat, _lua_str(" "), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = jsArray_to_list.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_apply_xs.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2582, 20), end: (2582, 37) })], _lua_debug_loc { start: (2581, 16), end: (2583, 17) })], _lua_debug_loc { start: (2580, 12), end: (2584, 13) })], _lua_debug_loc { start: (2579, 20), end: (2585, 9) }), _lua_str(")"), _lua_debug_loc { start: (2579, 20), end: (2585, 16) }}, _lua_debug_loc { start: (2579, 13), end: (2585, 16) }}, _lua_debug_loc { start: (2575, 23), end: (2585, 16) }}, _lua_debug_loc { start: (2575, 15), end: (2585, 16) }};
3857}
3858return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2587, 11), end: (2587, 23) });
3859
3860_lua_nil()
3861}}));
3862let machinetext_parse = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3863*machinetext_parse.borrow_mut() = _lua_lambda(Box::new({let error = error.clone();
3864let tostring = tostring.clone();
3865let string = string.clone();
3866let table = table.clone();
3867let __TS__ArrayUnshift = __TS__ArrayUnshift.clone();
3868let new_atom = new_atom.clone();
3869let new_construction = new_construction.clone();
3870let new_data = new_data.clone();
3871let val2env = val2env.clone();
3872let evaluate = evaluate.clone();
3873let null_v = null_v.clone();
3874move |mut _lua_arg_tmp, _| {
3875let rawstr = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3876let state = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3877let is_eof = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3878let is_not_eof = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3879*is_eof.borrow_mut() = _lua_lambda(Box::new({let state = state.clone();
3880move |mut _lua_arg_tmp, _| {
3881return _lua_op!{eq, { let _lua_tmp = state.borrow(); _lua_tmp.clone() }, _lua_num!(0), _lua_debug_loc { start: (2592, 15), end: (2592, 25) }};
3882
3883_lua_nil()
3884}}));
3885*is_not_eof.borrow_mut() = _lua_lambda(Box::new({let is_eof = is_eof.clone();
3886move |mut _lua_arg_tmp, _| {
3887return _lua_not(_lua_call({ let _lua_tmp = is_eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2595, 19), end: (2595, 27) }), _lua_debug_loc { start: (2595, 15), end: (2595, 27) });
3888
3889_lua_nil()
3890}}));
3891*state.borrow_mut() = _lua_len({ let _lua_tmp = rawstr.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2597, 12), end: (2597, 19) });
3892let parse_error = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3893*parse_error.borrow_mut() = _lua_lambda(Box::new({let error = error.clone();
3894let tostring = tostring.clone();
3895move |mut _lua_arg_tmp, _| {
3896let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3897if (_lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_nil(), _lua_debug_loc { start: (2599, 11), end: (2599, 19) }}).as_bool(_lua_debug_loc { start: (2599, 11), end: (2599, 19) }) {
3898*x.borrow_mut() = _lua_str("");
3899}
3900_lua_call({ let _lua_tmp = error.borrow(); _lua_tmp.clone() }, vec![_lua_op!{concat, _lua_str("MT parse ERROR "), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2603, 33), end: (2603, 44) }), _lua_debug_loc { start: (2603, 12), end: (2603, 44) }}], _lua_debug_loc { start: (2602, 8), end: (2604, 9) });
3901
3902_lua_nil()
3903}}));
3904let parse_assert = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3905*parse_assert.borrow_mut() = _lua_lambda(Box::new({let parse_error = parse_error.clone();
3906move |mut _lua_arg_tmp, _| {
3907let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3908if (_lua_not({ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2607, 11), end: (2607, 16) })).as_bool(_lua_debug_loc { start: (2607, 11), end: (2607, 16) }) {
3909return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2608, 19), end: (2608, 32) });
3910}
3911
3912_lua_nil()
3913}}));
3914let get_do = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3915*get_do.borrow_mut() = _lua_lambda(Box::new({let parse_assert = parse_assert.clone();
3916let is_not_eof = is_not_eof.clone();
3917let state = state.clone();
3918let string = string.clone();
3919let rawstr = rawstr.clone();
3920move |mut _lua_arg_tmp, _| {
3921_lua_call({ let _lua_tmp = parse_assert.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = is_not_eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2613, 12), end: (2613, 24) })], _lua_debug_loc { start: (2612, 8), end: (2614, 9) });
3922*state.borrow_mut() = _lua_op!{sub, { let _lua_tmp = state.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (2615, 16), end: (2615, 25) }};
3923return _lua_call(_lua_lookup({ let _lua_tmp = string.borrow(); _lua_tmp.clone() },_lua_str("sub"), _lua_debug_loc { start: (2616, 15), end: (2616, 55) }), vec![{ let _lua_tmp = rawstr.borrow(); _lua_tmp.clone() }, _lua_op!{add, { let _lua_tmp = state.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (2616, 34), end: (2616, 43) }}, _lua_op!{add, { let _lua_tmp = state.borrow(); _lua_tmp.clone() }, _lua_num!(1), _lua_debug_loc { start: (2616, 45), end: (2616, 54) }}], _lua_debug_loc { start: (2616, 15), end: (2616, 55) });
3924
3925_lua_nil()
3926}}));
3927let stack = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
3928let conslike = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3929*conslike.borrow_mut() = _lua_lambda(Box::new({let table = table.clone();
3930let stack = stack.clone();
3931let parse_error = parse_error.clone();
3932let __TS__ArrayUnshift = __TS__ArrayUnshift.clone();
3933move |mut _lua_arg_tmp, _| {
3934let c = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3935let y = std::sync::Arc::new(std::cell::RefCell::new(_lua_call(_lua_lookup({ let _lua_tmp = table.borrow(); _lua_tmp.clone() },_lua_str("remove"), _lua_debug_loc { start: (2620, 18), end: (2620, 37) }), vec![{ let _lua_tmp = stack.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2620, 18), end: (2620, 37) })));
3936let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call(_lua_lookup({ let _lua_tmp = table.borrow(); _lua_tmp.clone() },_lua_str("remove"), _lua_debug_loc { start: (2621, 18), end: (2621, 37) }), vec![{ let _lua_tmp = stack.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2621, 18), end: (2621, 37) })));
3937if (_lua_op!{or, _lua_op!{eq, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_nil(), _lua_debug_loc { start: (2622, 11), end: (2622, 31) }}, _lua_op!{eq, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }, _lua_nil(), _lua_debug_loc { start: (2622, 23), end: (2622, 31) }}, _lua_debug_loc { start: (2622, 11), end: (2622, 31) }}).as_bool(_lua_debug_loc { start: (2622, 11), end: (2622, 31) }) {
3938return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2623, 19), end: (2623, 32) });
3939} else {
3940return _lua_call({ let _lua_tmp = __TS__ArrayUnshift.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = stack.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = c.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, { let _lua_tmp = y.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2627, 16), end: (2627, 23) })], _lua_debug_loc { start: (2625, 19), end: (2628, 13) });
3941}
3942
3943_lua_nil()
3944}}));
3945while (_lua_call({ let _lua_tmp = is_not_eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2631, 10), end: (2631, 22) })).as_bool(_lua_debug_loc { start: (2631, 4), end: (2666, 7) }) {
3946let chr = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = get_do.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2632, 20), end: (2632, 28) })));
3947if (_lua_op!{eq, { let _lua_tmp = chr.borrow(); _lua_tmp.clone() }, _lua_str("^"), _lua_debug_loc { start: (2633, 11), end: (2633, 21) }}).as_bool(_lua_debug_loc { start: (2633, 11), end: (2633, 21) }) {
3948let tmp = std::sync::Arc::new(std::cell::RefCell::new(_lua_str("")));
3949while (_lua_true()).as_bool(_lua_debug_loc { start: (2635, 12), end: (2641, 15) }) {
3950let chr = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = get_do.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2636, 28), end: (2636, 36) })));
3951if (_lua_op!{eq, { let _lua_tmp = chr.borrow(); _lua_tmp.clone() }, _lua_str("^"), _lua_debug_loc { start: (2637, 19), end: (2637, 29) }}).as_bool(_lua_debug_loc { start: (2637, 19), end: (2637, 29) }) {
3952break;
3953}
3954*tmp.borrow_mut() = _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = chr.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2640, 22), end: (2640, 35) }), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = tmp.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2640, 39), end: (2640, 52) }), _lua_debug_loc { start: (2640, 22), end: (2640, 52) }};
3955}
3956_lua_call({ let _lua_tmp = __TS__ArrayUnshift.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = stack.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = tmp.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2644, 16), end: (2644, 29) })], _lua_debug_loc { start: (2642, 12), end: (2645, 13) });
3957} else if (_lua_op!{eq, { let _lua_tmp = chr.borrow(); _lua_tmp.clone() }, _lua_str("."), _lua_debug_loc { start: (2646, 15), end: (2646, 25) }}).as_bool(_lua_debug_loc { start: (2646, 15), end: (2646, 25) }) {
3958_lua_call({ let _lua_tmp = conslike.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2647, 12), end: (2647, 38) });
3959} else if (_lua_op!{eq, { let _lua_tmp = chr.borrow(); _lua_tmp.clone() }, _lua_str("#"), _lua_debug_loc { start: (2648, 15), end: (2648, 25) }}).as_bool(_lua_debug_loc { start: (2648, 15), end: (2648, 25) }) {
3960_lua_call({ let _lua_tmp = conslike.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = new_data.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2649, 12), end: (2649, 30) });
3961} else if (_lua_op!{eq, { let _lua_tmp = chr.borrow(); _lua_tmp.clone() }, _lua_str("$"), _lua_debug_loc { start: (2650, 15), end: (2650, 25) }}).as_bool(_lua_debug_loc { start: (2650, 15), end: (2650, 25) }) {
3962_lua_call({ let _lua_tmp = conslike.borrow(); _lua_tmp.clone() }, vec![_lua_lambda(Box::new({let val2env = val2env.clone();
3963let parse_error = parse_error.clone();
3964let evaluate = evaluate.clone();
3965move |mut _lua_arg_tmp, _| {
3966let env = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3967let val = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
3968let r_env = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = val2env.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = env.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2653, 34), end: (2653, 46) })));
3969if (_lua_op!{eq, { let _lua_tmp = r_env.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2654, 23), end: (2654, 37) }}).as_bool(_lua_debug_loc { start: (2654, 23), end: (2654, 37) }) {
3970return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2655, 31), end: (2655, 44) });
3971} else {
3972return _lua_call({ let _lua_tmp = evaluate.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = r_env.borrow(); _lua_tmp.clone() }, { let _lua_tmp = val.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2657, 31), end: (2657, 51) });
3973}
3974
3975_lua_nil()
3976}}))], _lua_debug_loc { start: (2651, 12), end: (2660, 13) });
3977} else if (_lua_op!{eq, { let _lua_tmp = chr.borrow(); _lua_tmp.clone() }, _lua_str("_"), _lua_debug_loc { start: (2661, 15), end: (2661, 25) }}).as_bool(_lua_debug_loc { start: (2661, 15), end: (2661, 25) }) {
3978_lua_call({ let _lua_tmp = __TS__ArrayUnshift.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = stack.borrow(); _lua_tmp.clone() }, { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2662, 12), end: (2662, 45) });
3979} else {
3980return _lua_call({ let _lua_tmp = parse_error.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2664, 19), end: (2664, 32) });
3981}
3982}
3983_lua_call({ let _lua_tmp = parse_assert.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = is_eof.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2668, 8), end: (2668, 16) })], _lua_debug_loc { start: (2667, 4), end: (2669, 5) });
3984_lua_call({ let _lua_tmp = parse_assert.borrow(); _lua_tmp.clone() }, vec![_lua_op!{eq, _lua_len({ let _lua_tmp = stack.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2670, 17), end: (2670, 23) }), _lua_num!(1), _lua_debug_loc { start: (2670, 17), end: (2670, 28) }}], _lua_debug_loc { start: (2670, 4), end: (2670, 29) });
3985return _lua_lookup({ let _lua_tmp = stack.borrow(); _lua_tmp.clone() },_lua_num!(1), _lua_debug_loc { start: (2671, 11), end: (2671, 18) });
3986
3987_lua_nil()
3988}}));
3989let machinetext_print = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
3990*machinetext_print.borrow_mut() = _lua_lambda(Box::new({let un_just_all = un_just_all.clone();
3991let tostring = tostring.clone();
3992let __TS__ArrayPush = __TS__ArrayPush.clone();
3993let atom_p = atom_p.clone();
3994let un_atom = un_atom.clone();
3995let construction_p = construction_p.clone();
3996let construction_head = construction_head.clone();
3997let construction_tail = construction_tail.clone();
3998let null_p = null_p.clone();
3999let data_p = data_p.clone();
4000let data_name = data_name.clone();
4001let data_list = data_list.clone();
4002let delay_p = delay_p.clone();
4003let delay2delay_evaluate = delay2delay_evaluate.clone();
4004let env2val = env2val.clone();
4005let delay_evaluate_env = delay_evaluate_env.clone();
4006let delay_evaluate_x = delay_evaluate_x.clone();
4007let LANG_ERROR = LANG_ERROR.clone();
4008move |mut _lua_arg_tmp, _| {
4009let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4010let stack = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![(_lua_num!(1), { let _lua_tmp = x.borrow(); _lua_tmp.clone() })])));
4011let result = std::sync::Arc::new(std::cell::RefCell::new(_lua_str("")));
4012while (_lua_op!{not_eq, _lua_len({ let _lua_tmp = stack.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2676, 10), end: (2676, 16) }), _lua_num!(0), _lua_debug_loc { start: (2676, 10), end: (2676, 21) }}).as_bool(_lua_debug_loc { start: (2676, 4), end: (2715, 7) }) {
4013let new_stack = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
4014let _lua_tmp_t={ let _lua_tmp = stack.borrow(); _lua_tmp.clone() };
4015for _lua_tmp_k in 1..=(_lua_len(_lua_tmp_t.clone(), _lua_debug_loc { start: (2678, 30), end: (2678, 35) }).as_f64(_lua_debug_loc { start: (2678, 30), end: (2678, 35) }) as usize) {
4016let ____=std::sync::Arc::new(std::cell::RefCell::new(_lua_num!(_lua_tmp_k)));
4017let x=std::sync::Arc::new(std::cell::RefCell::new(_lua_lookup(_lua_tmp_t.clone(),____.borrow().clone(), _lua_debug_loc { start: (2678, 30), end: (2678, 35) })));
4018*x.borrow_mut() = _lua_call({ let _lua_tmp = un_just_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2679, 16), end: (2679, 30) });
4019let conslike = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4020*conslike.borrow_mut() = _lua_lambda(Box::new({let result = result.clone();
4021let tostring = tostring.clone();
4022let __TS__ArrayPush = __TS__ArrayPush.clone();
4023let new_stack = new_stack.clone();
4024move |mut _lua_arg_tmp, _| {
4025let xx = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4026let s = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4027let g1 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4028let g2 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4029*result.borrow_mut() = _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = result.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2681, 25), end: (2681, 41) }), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = s.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2681, 45), end: (2681, 56) }), _lua_debug_loc { start: (2681, 25), end: (2681, 56) }};
4030return _lua_call({ let _lua_tmp = __TS__ArrayPush.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = new_stack.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = g1.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xx.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2684, 20), end: (2684, 26) }), _lua_call({ let _lua_tmp = g2.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = xx.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2685, 20), end: (2685, 26) })], _lua_debug_loc { start: (2682, 23), end: (2686, 17) });
4031
4032_lua_nil()
4033}}));
4034if (_lua_call({ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2688, 15), end: (2688, 24) })).as_bool(_lua_debug_loc { start: (2688, 15), end: (2688, 24) }) {
4035*result.borrow_mut() = _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = result.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2689, 25), end: (2689, 41) }), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_op!{concat, _lua_str("^"), _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = un_atom.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2691, 24), end: (2691, 34) })], _lua_debug_loc { start: (2690, 28), end: (2692, 21) }), _lua_str("^"), _lua_debug_loc { start: (2690, 28), end: (2692, 28) }}, _lua_debug_loc { start: (2690, 21), end: (2692, 28) }}], _lua_debug_loc { start: (2689, 45), end: (2693, 17) }), _lua_debug_loc { start: (2689, 25), end: (2693, 17) }};
4036} else if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2694, 19), end: (2694, 36) })).as_bool(_lua_debug_loc { start: (2694, 19), end: (2694, 36) }) {
4037_lua_call({ let _lua_tmp = conslike.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_str("."), { let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, { let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2695, 16), end: (2695, 70) });
4038} else if (_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2696, 19), end: (2696, 28) })).as_bool(_lua_debug_loc { start: (2696, 19), end: (2696, 28) }) {
4039*result.borrow_mut() = _lua_op!{concat, _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = result.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2697, 25), end: (2697, 41) }), _lua_call({ let _lua_tmp = tostring.borrow(); _lua_tmp.clone() }, vec![_lua_str("_")], _lua_debug_loc { start: (2697, 45), end: (2697, 60) }), _lua_debug_loc { start: (2697, 25), end: (2697, 60) }};
4040} else if (_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2698, 19), end: (2698, 28) })).as_bool(_lua_debug_loc { start: (2698, 19), end: (2698, 28) }) {
4041_lua_call({ let _lua_tmp = conslike.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }, _lua_str("#"), { let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }, { let _lua_tmp = data_list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2699, 16), end: (2699, 54) });
4042} else if (_lua_call({ let _lua_tmp = delay_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2700, 19), end: (2700, 29) })).as_bool(_lua_debug_loc { start: (2700, 19), end: (2700, 29) }) {
4043let y = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = delay2delay_evaluate.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2701, 26), end: (2701, 49) })));
4044_lua_call({ let _lua_tmp = conslike.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = y.borrow(); _lua_tmp.clone() }, _lua_str("$"), _lua_lambda(Box::new({let env2val = env2val.clone();
4045let delay_evaluate_env = delay_evaluate_env.clone();
4046move |mut _lua_arg_tmp, _| {
4047let vl = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4048return _lua_call({ let _lua_tmp = env2val.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = delay_evaluate_env.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = vl.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2706, 24), end: (2706, 46) })], _lua_debug_loc { start: (2705, 41), end: (2707, 21) });
4049
4050_lua_nil()
4051}})), { let _lua_tmp = delay_evaluate_x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2702, 16), end: (2709, 17) });
4052} else {
4053return _lua_call({ let _lua_tmp = LANG_ERROR.borrow(); _lua_tmp.clone() }, vec![], _lua_debug_loc { start: (2711, 23), end: (2711, 35) });
4054}
4055}
4056*stack.borrow_mut() = { let _lua_tmp = new_stack.borrow(); _lua_tmp.clone() };
4057}
4058return { let _lua_tmp = result.borrow(); _lua_tmp.clone() };
4059
4060_lua_nil()
4061}}));
4062let return_effect_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = sub_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = effect_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = typeAnnotation_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = thing_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = something_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2729, 28), end: (2729, 68) })], _lua_debug_loc { start: (2727, 24), end: (2730, 25) })], _lua_debug_loc { start: (2725, 20), end: (2731, 21) }), { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2724, 16), end: (2733, 17) })], _lua_debug_loc { start: (2722, 12), end: (2734, 13) }), { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2721, 8), end: (2736, 9) })], _lua_debug_loc { start: (2719, 4), end: (2737, 5) })], _lua_debug_loc { start: (2718, 33), end: (2738, 1) })));
4063let bind_effect_systemName = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = systemName_make.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = sub_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = effect_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = construction_atom.borrow(); _lua_tmp.clone() }, { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2745, 16), end: (2745, 59) })], _lua_debug_loc { start: (2743, 12), end: (2746, 13) }), { let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2742, 8), end: (2748, 9) })], _lua_debug_loc { start: (2740, 4), end: (2749, 5) })], _lua_debug_loc { start: (2739, 31), end: (2750, 1) })));
4064let new_effect_bind = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4065*new_effect_bind.borrow_mut() = _lua_lambda(Box::new({let new_data = new_data.clone();
4066let bind_effect_systemName = bind_effect_systemName.clone();
4067let new_list = new_list.clone();
4068move |mut _lua_arg_tmp, _| {
4069let monad = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4070let func = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4071return _lua_call({ let _lua_tmp = new_data.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = bind_effect_systemName.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = monad.borrow(); _lua_tmp.clone() }, { let _lua_tmp = func.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2754, 8), end: (2754, 29) })], _lua_debug_loc { start: (2752, 11), end: (2755, 5) });
4072
4073_lua_nil()
4074}}));
4075let new_effect_return = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4076*new_effect_return.borrow_mut() = _lua_lambda(Box::new({let new_data = new_data.clone();
4077let return_effect_systemName = return_effect_systemName.clone();
4078move |mut _lua_arg_tmp, _| {
4079let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4080return _lua_call({ let _lua_tmp = new_data.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = return_effect_systemName.borrow(); _lua_tmp.clone() }, { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2758, 11), end: (2758, 48) });
4081
4082_lua_nil()
4083}}));
4084let run_monad_helper = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4085*run_monad_helper.borrow_mut() = _lua_lambda(Box::new({let error = error.clone();
4086let force_all = force_all.clone();
4087let data_p = data_p.clone();
4088let data_name = data_name.clone();
4089let data_list = data_list.clone();
4090let equal_p = equal_p.clone();
4091let return_effect_systemName = return_effect_systemName.clone();
4092let construction_p = construction_p.clone();
4093let construction_head = construction_head.clone();
4094let construction_tail = construction_tail.clone();
4095let null_p = null_p.clone();
4096let trampoline_delay = trampoline_delay.clone();
4097let run_monad_helper = run_monad_helper.clone();
4098let apply = apply.clone();
4099let bind_effect_systemName = bind_effect_systemName.clone();
4100let new_atom = new_atom.clone();
4101let new_data = new_data.clone();
4102let function_atom = function_atom.clone();
4103let new_list = new_list.clone();
4104let make_quote = make_quote.clone();
4105move |mut _lua_arg_tmp, _| {
4106let return_handler = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4107let op_handler = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4108let code = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4109let state = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4110let next = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4111if (_lua_op!{eq, { let _lua_tmp = next.borrow(); _lua_tmp.clone() }, _lua_nil(), _lua_debug_loc { start: (2761, 7), end: (2761, 18) }}).as_bool(_lua_debug_loc { start: (2761, 7), end: (2761, 18) }) {
4112*next.borrow_mut() = _lua_false();
4113}
4114let make_bind = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4115*make_bind.borrow_mut() = _lua_lambda(Box::new({let error = error.clone();
4116move |mut _lua_arg_tmp, _| {
4117let x = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4118let f = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4119_lua_call({ let _lua_tmp = error.borrow(); _lua_tmp.clone() }, vec![_lua_str("WIP")], _lua_debug_loc { start: (2765, 8), end: (2765, 20) });
4120
4121_lua_nil()
4122}}));
4123*code.borrow_mut() = _lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = code.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2767, 11), end: (2767, 26) });
4124if (_lua_call({ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = code.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2768, 7), end: (2768, 19) })).as_bool(_lua_debug_loc { start: (2768, 7), end: (2768, 19) }) {
4125let name = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = code.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2769, 21), end: (2769, 36) })));
4126let list = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = data_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = code.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2770, 21), end: (2770, 36) })));
4127if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = name.borrow(); _lua_tmp.clone() }, { let _lua_tmp = return_effect_systemName.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2771, 11), end: (2771, 50) })).as_bool(_lua_debug_loc { start: (2771, 11), end: (2771, 50) }) {
4128*list.borrow_mut() = _lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2772, 19), end: (2772, 34) });
4129if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2773, 15), end: (2773, 35) })).as_bool(_lua_debug_loc { start: (2773, 15), end: (2773, 35) }) {
4130let list_a = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2774, 31), end: (2774, 54) })));
4131let list_d = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2776, 20), end: (2776, 43) })], _lua_debug_loc { start: (2775, 31), end: (2777, 17) })));
4132if (_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list_d.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2778, 19), end: (2778, 33) })).as_bool(_lua_debug_loc { start: (2778, 19), end: (2778, 33) }) {
4133if (_lua_op!{eq, { let _lua_tmp = next.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2779, 23), end: (2779, 36) }}).as_bool(_lua_debug_loc { start: (2779, 23), end: (2779, 36) }) {
4134let upval_v = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = list_a.borrow(); _lua_tmp.clone() }));
4135let upval_st = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = state.borrow(); _lua_tmp.clone() }));
4136let r = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4137*r.borrow_mut() = _lua_lambda(Box::new({let return_handler = return_handler.clone();
4138let upval_v = upval_v.clone();
4139let upval_st = upval_st.clone();
4140move |mut _lua_arg_tmp, _| {
4141return _lua_call({ let _lua_tmp = return_handler.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = upval_v.borrow(); _lua_tmp.clone() }, { let _lua_tmp = upval_st.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2782, 50), end: (2782, 83) });
4142
4143_lua_nil()
4144}}));
4145return _lua_call({ let _lua_tmp = trampoline_delay.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = r.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2783, 31), end: (2783, 50) });
4146} else {
4147let upval_rt = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4148*upval_rt.borrow_mut() = { let _lua_tmp = return_handler.borrow(); _lua_tmp.clone() };
4149let upval_op = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4150*upval_op.borrow_mut() = { let _lua_tmp = op_handler.borrow(); _lua_tmp.clone() };
4151let upval_v = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = list_a.borrow(); _lua_tmp.clone() }));
4152let upval_st = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = state.borrow(); _lua_tmp.clone() }));
4153let r = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4154*r.borrow_mut() = _lua_lambda(Box::new({let run_monad_helper = run_monad_helper.clone();
4155let upval_rt = upval_rt.clone();
4156let upval_op = upval_op.clone();
4157let apply = apply.clone();
4158let next = next.clone();
4159let upval_v = upval_v.clone();
4160let upval_st = upval_st.clone();
4161move |mut _lua_arg_tmp, _| {
4162return _lua_call({ let _lua_tmp = run_monad_helper.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = upval_rt.borrow(); _lua_tmp.clone() }, { let _lua_tmp = upval_op.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = next.borrow(); _lua_tmp.clone() }, { let _lua_tmp = upval_v.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2794, 28), end: (2794, 48) }), { let _lua_tmp = upval_st.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2791, 50), end: (2796, 25) });
4163
4164_lua_nil()
4165}}));
4166return _lua_call({ let _lua_tmp = trampoline_delay.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = r.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2797, 31), end: (2797, 50) });
4167}
4168}
4169}
4170} else if (_lua_call({ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = name.borrow(); _lua_tmp.clone() }, { let _lua_tmp = bind_effect_systemName.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2801, 15), end: (2801, 52) })).as_bool(_lua_debug_loc { start: (2801, 15), end: (2801, 52) }) {
4171*list.borrow_mut() = _lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2802, 19), end: (2802, 34) });
4172if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2803, 15), end: (2803, 35) })).as_bool(_lua_debug_loc { start: (2803, 15), end: (2803, 35) }) {
4173let list_a = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2804, 31), end: (2804, 54) })));
4174let list_d = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2806, 20), end: (2806, 43) })], _lua_debug_loc { start: (2805, 31), end: (2807, 17) })));
4175if (_lua_call({ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list_d.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2808, 19), end: (2808, 41) })).as_bool(_lua_debug_loc { start: (2808, 19), end: (2808, 41) }) {
4176let list_d_a = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list_d.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2809, 37), end: (2809, 62) })));
4177let list_d_d = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list_d.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2811, 24), end: (2811, 49) })], _lua_debug_loc { start: (2810, 37), end: (2812, 21) })));
4178if (_lua_call({ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = list_d_d.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2813, 23), end: (2813, 39) })).as_bool(_lua_debug_loc { start: (2813, 23), end: (2813, 39) }) {
4179if (_lua_op!{eq, { let _lua_tmp = next.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2814, 27), end: (2814, 40) }}).as_bool(_lua_debug_loc { start: (2814, 27), end: (2814, 40) }) {
4180let upval_rt = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4181*upval_rt.borrow_mut() = { let _lua_tmp = return_handler.borrow(); _lua_tmp.clone() };
4182let upval_op = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4183*upval_op.borrow_mut() = { let _lua_tmp = op_handler.borrow(); _lua_tmp.clone() };
4184let upval_a = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = list_a.borrow(); _lua_tmp.clone() }));
4185let upval_b = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = list_d_a.borrow(); _lua_tmp.clone() }));
4186let upval_st = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = state.borrow(); _lua_tmp.clone() }));
4187let r = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4188*r.borrow_mut() = _lua_lambda(Box::new({let run_monad_helper = run_monad_helper.clone();
4189let upval_rt = upval_rt.clone();
4190let upval_op = upval_op.clone();
4191let upval_a = upval_a.clone();
4192let upval_st = upval_st.clone();
4193let upval_b = upval_b.clone();
4194move |mut _lua_arg_tmp, _| {
4195return _lua_call({ let _lua_tmp = run_monad_helper.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = upval_rt.borrow(); _lua_tmp.clone() }, { let _lua_tmp = upval_op.borrow(); _lua_tmp.clone() }, { let _lua_tmp = upval_a.borrow(); _lua_tmp.clone() }, { let _lua_tmp = upval_st.borrow(); _lua_tmp.clone() }, { let _lua_tmp = upval_b.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2822, 54), end: (2822, 118) });
4196
4197_lua_nil()
4198}}));
4199return _lua_call({ let _lua_tmp = trampoline_delay.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = r.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2823, 35), end: (2823, 54) });
4200} else {
4201let upval_rt = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4202*upval_rt.borrow_mut() = { let _lua_tmp = return_handler.borrow(); _lua_tmp.clone() };
4203let upval_op = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4204*upval_op.borrow_mut() = { let _lua_tmp = op_handler.borrow(); _lua_tmp.clone() };
4205let upval_a = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = list_a.borrow(); _lua_tmp.clone() }));
4206let upval_b = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = list_d_a.borrow(); _lua_tmp.clone() }));
4207let upval_st = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = state.borrow(); _lua_tmp.clone() }));
4208let upval_nt = std::sync::Arc::new(std::cell::RefCell::new({ let _lua_tmp = next.borrow(); _lua_tmp.clone() }));
4209let x = std::sync::Arc::new(std::cell::RefCell::new(_lua_call({ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, vec![_lua_str("序甲")], _lua_debug_loc { start: (2833, 38), end: (2833, 52) })));
4210let r = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4211*r.borrow_mut() = _lua_lambda(Box::new({let run_monad_helper = run_monad_helper.clone();
4212let upval_rt = upval_rt.clone();
4213let upval_op = upval_op.clone();
4214let upval_a = upval_a.clone();
4215let upval_st = upval_st.clone();
4216let new_data = new_data.clone();
4217let function_atom = function_atom.clone();
4218let new_list = new_list.clone();
4219let x = x.clone();
4220let make_bind = make_bind.clone();
4221let make_quote = make_quote.clone();
4222let upval_b = upval_b.clone();
4223let upval_nt = upval_nt.clone();
4224move |mut _lua_arg_tmp, _| {
4225return _lua_call({ let _lua_tmp = run_monad_helper.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = upval_rt.borrow(); _lua_tmp.clone() }, { let _lua_tmp = upval_op.borrow(); _lua_tmp.clone() }, { let _lua_tmp = upval_a.borrow(); _lua_tmp.clone() }, { let _lua_tmp = upval_st.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_data.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = function_atom.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2842, 40), end: (2842, 51) }), _lua_call({ let _lua_tmp = make_bind.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = make_quote.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = upval_b.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2845, 48), end: (2845, 67) }), { let _lua_tmp = x.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2844, 44), end: (2847, 45) }), _lua_call({ let _lua_tmp = make_quote.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = upval_nt.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2848, 44), end: (2848, 64) })], _lua_debug_loc { start: (2843, 40), end: (2849, 41) })], _lua_debug_loc { start: (2841, 36), end: (2850, 37) })], _lua_debug_loc { start: (2839, 32), end: (2851, 33) })], _lua_debug_loc { start: (2834, 54), end: (2852, 29) });
4226
4227_lua_nil()
4228}}));
4229return _lua_call({ let _lua_tmp = trampoline_delay.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = r.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2853, 35), end: (2853, 54) });
4230}
4231}
4232}
4233}
4234}
4235}
4236if (_lua_op!{eq, { let _lua_tmp = next.borrow(); _lua_tmp.clone() }, _lua_false(), _lua_debug_loc { start: (2860, 7), end: (2860, 20) }}).as_bool(_lua_debug_loc { start: (2860, 7), end: (2860, 20) }) {
4237return _lua_call({ let _lua_tmp = trampoline_delay.borrow(); _lua_tmp.clone() }, vec![_lua_lambda(Box::new({let op_handler = op_handler.clone();
4238let code = code.clone();
4239let state = state.clone();
4240let return_handler = return_handler.clone();
4241move |mut _lua_arg_tmp, _| {
4242return _lua_call({ let _lua_tmp = op_handler.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = code.borrow(); _lua_tmp.clone() }, { let _lua_tmp = state.borrow(); _lua_tmp.clone() }, { let _lua_tmp = return_handler.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2862, 30), end: (2862, 69) });
4243
4244_lua_nil()
4245}}))], _lua_debug_loc { start: (2861, 15), end: (2863, 9) });
4246} else {
4247return _lua_call({ let _lua_tmp = trampoline_delay.borrow(); _lua_tmp.clone() }, vec![_lua_lambda(Box::new({let op_handler = op_handler.clone();
4248let code = code.clone();
4249let state = state.clone();
4250let trampoline_delay = trampoline_delay.clone();
4251let run_monad_helper = run_monad_helper.clone();
4252let return_handler = return_handler.clone();
4253let apply = apply.clone();
4254let next = next.clone();
4255move |mut _lua_arg_tmp, _| {
4256return _lua_call({ let _lua_tmp = op_handler.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = code.borrow(); _lua_tmp.clone() }, { let _lua_tmp = state.borrow(); _lua_tmp.clone() }, _lua_lambda(Box::new({let trampoline_delay = trampoline_delay.clone();
4257let run_monad_helper = run_monad_helper.clone();
4258let return_handler = return_handler.clone();
4259let op_handler = op_handler.clone();
4260let apply = apply.clone();
4261let next = next.clone();
4262move |mut _lua_arg_tmp, _| {
4263let val2 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4264let state2 = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4265return _lua_call({ let _lua_tmp = trampoline_delay.borrow(); _lua_tmp.clone() }, vec![_lua_lambda(Box::new({let run_monad_helper = run_monad_helper.clone();
4266let return_handler = return_handler.clone();
4267let op_handler = op_handler.clone();
4268let apply = apply.clone();
4269let next = next.clone();
4270let val2 = val2.clone();
4271let state2 = state2.clone();
4272move |mut _lua_arg_tmp, _| {
4273return _lua_call({ let _lua_tmp = run_monad_helper.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = return_handler.borrow(); _lua_tmp.clone() }, { let _lua_tmp = op_handler.borrow(); _lua_tmp.clone() }, _lua_call({ let _lua_tmp = apply.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = next.borrow(); _lua_tmp.clone() }, _lua_table(vec![(_lua_num!(1), { let _lua_tmp = val2.borrow(); _lua_tmp.clone() })])], _lua_debug_loc { start: (2873, 24), end: (2873, 43) }), { let _lua_tmp = state2.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2870, 38), end: (2875, 21) });
4274
4275_lua_nil()
4276}}))], _lua_debug_loc { start: (2869, 46), end: (2876, 17) });
4277
4278_lua_nil()
4279}}))], _lua_debug_loc { start: (2866, 30), end: (2877, 13) });
4280
4281_lua_nil()
4282}}))], _lua_debug_loc { start: (2865, 15), end: (2878, 9) });
4283}
4284
4285_lua_nil()
4286}}));
4287let run_monad_trampoline = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4288*run_monad_trampoline.borrow_mut() = _lua_lambda(Box::new({let run_monad_helper = run_monad_helper.clone();
4289move |mut _lua_arg_tmp, _| {
4290let return_handler = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4291let op_handler = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4292let code = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4293let state = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4294return _lua_call({ let _lua_tmp = run_monad_helper.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = return_handler.borrow(); _lua_tmp.clone() }, { let _lua_tmp = op_handler.borrow(); _lua_tmp.clone() }, { let _lua_tmp = code.borrow(); _lua_tmp.clone() }, { let _lua_tmp = state.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2882, 11), end: (2882, 68) });
4295
4296_lua_nil()
4297}}));
4298let run_monad_stackoverflow = std::sync::Arc::new(std::cell::RefCell::new(_lua_nil()));
4299*run_monad_stackoverflow.borrow_mut() = _lua_lambda(Box::new({let run_trampoline = run_trampoline.clone();
4300let run_monad_helper = run_monad_helper.clone();
4301let trampoline_return = trampoline_return.clone();
4302move |mut _lua_arg_tmp, _| {
4303let return_handler = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4304let op_handler = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4305let code = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4306let state = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4307return _lua_call({ let _lua_tmp = run_trampoline.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = run_monad_helper.borrow(); _lua_tmp.clone() }, vec![_lua_lambda(Box::new({let trampoline_return = trampoline_return.clone();
4308let return_handler = return_handler.clone();
4309move |mut _lua_arg_tmp, _| {
4310let v = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4311let s = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4312return _lua_call({ let _lua_tmp = trampoline_return.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = return_handler.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = v.borrow(); _lua_tmp.clone() }, { let _lua_tmp = s.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2888, 16), end: (2888, 36) })], _lua_debug_loc { start: (2887, 35), end: (2889, 13) });
4313
4314_lua_nil()
4315}})), _lua_lambda(Box::new({let trampoline_return = trampoline_return.clone();
4316let op_handler = op_handler.clone();
4317let run_trampoline = run_trampoline.clone();
4318move |mut _lua_arg_tmp, _| {
4319let op = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4320let st = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4321let rs = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4322return _lua_call({ let _lua_tmp = trampoline_return.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = op_handler.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = op.borrow(); _lua_tmp.clone() }, { let _lua_tmp = st.borrow(); _lua_tmp.clone() }, _lua_lambda(Box::new({let run_trampoline = run_trampoline.clone();
4323let rs = rs.clone();
4324move |mut _lua_arg_tmp, _| {
4325let v = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4326let s = std::sync::Arc::new(std::cell::RefCell::new(if _lua_arg_tmp.is_empty() { _lua_nil() } else { _lua_arg_tmp.remove(0) }));
4327return _lua_call({ let _lua_tmp = run_trampoline.borrow(); _lua_tmp.clone() }, vec![_lua_call({ let _lua_tmp = rs.borrow(); _lua_tmp.clone() }, vec![{ let _lua_tmp = v.borrow(); _lua_tmp.clone() }, { let _lua_tmp = s.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2895, 24), end: (2895, 32) })], _lua_debug_loc { start: (2894, 42), end: (2896, 21) });
4328
4329_lua_nil()
4330}}))], _lua_debug_loc { start: (2891, 16), end: (2897, 17) })], _lua_debug_loc { start: (2890, 41), end: (2898, 13) });
4331
4332_lua_nil()
4333}})), { let _lua_tmp = code.borrow(); _lua_tmp.clone() }, { let _lua_tmp = state.borrow(); _lua_tmp.clone() }], _lua_debug_loc { start: (2886, 8), end: (2901, 9) })], _lua_debug_loc { start: (2885, 11), end: (2902, 5) });
4334
4335_lua_nil()
4336}}));
4337let ____exports = std::sync::Arc::new(std::cell::RefCell::new(_lua_table(vec![])));
4338_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("trampoline_return"),{ let _lua_tmp = trampoline_return.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2906, 0), end: (2906, 49) });
4339_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("trampoline_delay"),{ let _lua_tmp = trampoline_delay.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2907, 0), end: (2907, 47) });
4340_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("run_trampoline"),{ let _lua_tmp = run_trampoline.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2908, 0), end: (2908, 43) });
4341_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("new_comment"),{ let _lua_tmp = new_comment.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2909, 0), end: (2909, 37) });
4342_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("comment_p"),{ let _lua_tmp = comment_p.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2910, 0), end: (2910, 33) });
4343_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("comment_comment"),{ let _lua_tmp = comment_comment.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2911, 0), end: (2911, 45) });
4344_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("comment_x"),{ let _lua_tmp = comment_x.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2912, 0), end: (2912, 33) });
4345_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("un_comment_all"),{ let _lua_tmp = un_comment_all.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2913, 0), end: (2913, 43) });
4346_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("new_atom"),{ let _lua_tmp = new_atom.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2914, 0), end: (2914, 31) });
4347_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("atom_p"),{ let _lua_tmp = atom_p.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2915, 0), end: (2915, 27) });
4348_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("un_atom"),{ let _lua_tmp = un_atom.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2916, 0), end: (2916, 29) });
4349_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("atom_equal_p"),{ let _lua_tmp = atom_equal_p.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2917, 0), end: (2917, 39) });
4350_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("new_construction"),{ let _lua_tmp = new_construction.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2918, 0), end: (2918, 47) });
4351_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("construction_p"),{ let _lua_tmp = construction_p.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2919, 0), end: (2919, 43) });
4352_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("construction_head"),{ let _lua_tmp = construction_head.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2920, 0), end: (2920, 49) });
4353_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("construction_tail"),{ let _lua_tmp = construction_tail.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2921, 0), end: (2921, 49) });
4354_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("null_v"),{ let _lua_tmp = null_v.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2922, 0), end: (2922, 27) });
4355_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("null_p"),{ let _lua_tmp = null_p.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2923, 0), end: (2923, 27) });
4356_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("new_data"),{ let _lua_tmp = new_data.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2924, 0), end: (2924, 31) });
4357_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("data_p"),{ let _lua_tmp = data_p.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2925, 0), end: (2925, 27) });
4358_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("data_name"),{ let _lua_tmp = data_name.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2926, 0), end: (2926, 33) });
4359_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("data_list"),{ let _lua_tmp = data_list.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2927, 0), end: (2927, 33) });
4360_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("just_p"),{ let _lua_tmp = just_p.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2928, 0), end: (2928, 27) });
4361_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("evaluate"),{ let _lua_tmp = evaluate.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2929, 0), end: (2929, 31) });
4362_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("apply"),{ let _lua_tmp = apply.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2930, 0), end: (2930, 25) });
4363_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("force_all_rec"),{ let _lua_tmp = force_all_rec.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2931, 0), end: (2931, 41) });
4364_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("force_uncomment_all_rec"),{ let _lua_tmp = force_uncomment_all_rec.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2932, 0), end: (2932, 61) });
4365_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("unlazy_all_rec"),{ let _lua_tmp = unlazy_all_rec.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2933, 0), end: (2933, 43) });
4366_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("jsArray_to_list"),{ let _lua_tmp = jsArray_to_list.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2934, 0), end: (2934, 45) });
4367_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("maybe_list_to_jsArray"),{ let _lua_tmp = maybe_list_to_jsArray.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2935, 0), end: (2935, 57) });
4368_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("new_list"),{ let _lua_tmp = new_list.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2936, 0), end: (2936, 31) });
4369_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("un_just_all"),{ let _lua_tmp = un_just_all.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2937, 0), end: (2937, 37) });
4370_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("un_just_comment_all"),{ let _lua_tmp = un_just_comment_all.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2938, 0), end: (2938, 53) });
4371_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("delay_p"),{ let _lua_tmp = delay_p.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2939, 0), end: (2939, 29) });
4372_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("delay_just_p"),{ let _lua_tmp = delay_just_p.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2940, 0), end: (2940, 39) });
4373_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("lazy_p"),{ let _lua_tmp = lazy_p.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2941, 0), end: (2941, 27) });
4374_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("delay_env"),{ let _lua_tmp = delay_env.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2942, 0), end: (2942, 33) });
4375_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("delay_x"),{ let _lua_tmp = delay_x.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2943, 0), end: (2943, 29) });
4376_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("force_all"),{ let _lua_tmp = force_all.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2944, 0), end: (2944, 33) });
4377_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("force1"),{ let _lua_tmp = force1.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2945, 0), end: (2945, 27) });
4378_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("force_uncomment1"),{ let _lua_tmp = force_uncomment1.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2946, 0), end: (2946, 47) });
4379_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("force_uncomment_all"),{ let _lua_tmp = force_uncomment_all.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2947, 0), end: (2947, 53) });
4380_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("unlazy1"),{ let _lua_tmp = unlazy1.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2948, 0), end: (2948, 29) });
4381_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("env_null_v"),{ let _lua_tmp = env_null_v.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2949, 0), end: (2949, 35) });
4382_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("env_set"),{ let _lua_tmp = env_set.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2950, 0), end: (2950, 29) });
4383_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("env_get"),{ let _lua_tmp = env_get.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2951, 0), end: (2951, 29) });
4384_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("env2val"),{ let _lua_tmp = env2val.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2952, 0), end: (2952, 29) });
4385_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("env_foreach"),{ let _lua_tmp = env_foreach.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2953, 0), end: (2953, 37) });
4386_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("val2env"),{ let _lua_tmp = val2env.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2954, 0), end: (2954, 29) });
4387_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("equal_p"),{ let _lua_tmp = equal_p.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2955, 0), end: (2955, 29) });
4388_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("simple_print"),{ let _lua_tmp = simple_print.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2956, 0), end: (2956, 39) });
4389_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("complex_parse"),{ let _lua_tmp = complex_parse.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2957, 0), end: (2957, 41) });
4390_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("complex_print"),{ let _lua_tmp = complex_print.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2958, 0), end: (2958, 41) });
4391_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("machinetext_parse"),{ let _lua_tmp = machinetext_parse.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2959, 0), end: (2959, 49) });
4392_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("machinetext_print"),{ let _lua_tmp = machinetext_print.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2960, 0), end: (2960, 49) });
4393_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("return_effect_systemName"),{ let _lua_tmp = return_effect_systemName.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2961, 0), end: (2961, 63) });
4394_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("bind_effect_systemName"),{ let _lua_tmp = bind_effect_systemName.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2962, 0), end: (2962, 59) });
4395_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("new_effect_bind"),{ let _lua_tmp = new_effect_bind.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2963, 0), end: (2963, 45) });
4396_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("new_effect_return"),{ let _lua_tmp = new_effect_return.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2964, 0), end: (2964, 49) });
4397_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("run_monad_trampoline"),{ let _lua_tmp = run_monad_trampoline.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2965, 0), end: (2965, 55) });
4398_lua_set({ let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() },_lua_str("run_monad_stackoverflow"),{ let _lua_tmp = run_monad_stackoverflow.borrow(); _lua_tmp.clone() }, _lua_debug_loc { start: (2966, 0), end: (2966, 61) });
4399return { let _lua_tmp = ____exports.borrow(); _lua_tmp.clone() };
4400    _lua_nil()
4401}