lean4-htt/src/boot/init/lean/name_mangling.cpp
2019-02-03 10:06:47 -08:00

5988 lines
170 KiB
C++

// Lean compiler output
// Module: init.lean.name_mangling
// Imports: init.lean.name init.lean.parser.string_literal
#include "runtime/object.h"
#include "runtime/apply.h"
#include "runtime/io.h"
#include "kernel/builtin.h"
typedef lean::object obj;
#if defined(__clang__)
#pragma clang diagnostic ignored "-Wunused-parameter"
#endif
obj* _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__16(obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__4_s7___boxed(obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__10_s7___boxed(obj*, obj*);
obj* _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__2;
obj* _l_s8_function_s4_comp_s6___rarg(obj*, obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__14(unsigned, obj*);
obj* _l_s6_string_s7_to__nat(obj*);
obj* _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s3_eoi_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__6_s11___closed__1;
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__12(unsigned, obj*);
obj* _l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main_s11___closed__1;
obj* _l_s9___private_580269747__s8_str__aux_s6___main(obj*, obj*, obj*);
obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__15(obj*, obj*, obj*);
obj* _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__1;
extern obj* _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__3(obj*);
obj* _l_s4_char_s11_quote__core(unsigned);
obj* _l_s9___private_127590107__s9_take__aux_s6___main_s6___rarg(obj*, obj*, obj*);
extern obj* _l_s13_match__failed_s6___rarg_s11___closed__1;
extern obj* _l_s5_mjoin_s6___rarg_s11___closed__1;
obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__17(obj*, obj*, obj*);
obj* _l_s4_lean_s4_name_s8_demangle(obj*, obj*);
obj* _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(obj*, obj*);
obj* _l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main(obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__1(obj*, obj*, obj*);
obj* _l_s2_id_s6___rarg(obj*);
obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__7(obj*, obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s3_num_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__2(obj*);
unsigned char _l_s4_char_s9_is__digit(unsigned);
obj* _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__1;
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__1_s7___boxed(obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__8_s7___boxed(obj*, obj*);
obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__9(obj*, obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(obj*, obj*, obj*, obj*, obj*);
obj* _l_s4_lean_s4_name_s6_mangle(obj*, obj*);
extern obj* _l_s4_lean_s6_parser_s13_monad__parsec_s3_eoi_s6___rarg_s11___lambda__1_s11___closed__1;
obj* _l_s6_option_s13_get__or__else_s6___main_s6___rarg(obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__6(unsigned, obj*);
unsigned char _l_s4_char_s9_is__alpha(unsigned);
obj* _l_s9___private_3255790009__s6_string_s11_mangle__aux(obj*, obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__4(obj*);
extern obj* _l_s4_char_s9_has__repr_s11___closed__1;
obj* _l_s9___private_1496486805__s27_parse__mangled__string__aux(obj*, obj*, obj*);
obj* _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__2;
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3(obj*);
obj* _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__3;
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__8(unsigned, obj*);
obj* _l_s13_match__failed_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__19(obj*);
unsigned char _l_s6_string_s9_is__empty(obj*);
obj* _l_s3_nat_s11_digit__char(obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s4_take_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__18(obj*, obj*);
obj* _l_s4_lean_s6_string_s8_demangle_s11___closed__1;
obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__5(obj*, obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__1(unsigned, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__10(unsigned, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s3_eoi_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__6(obj*);
extern obj* _l_s6_string_s4_join_s11___closed__1;
obj* _l_s9___private_3162311557__s22_parse__mangled__string(obj*);
obj* _l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main_s11___closed__2;
extern obj* _l_s4_lean_s6_parser_s9_parsec__t_s11_monad__fail_s6___rarg_s11___closed__1;
obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__13(obj*, obj*, obj*);
obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__11(obj*, obj*, obj*);
obj* _l_s9___private_4217055689__s25_parse__mangled__name__aux(obj*, obj*, obj*);
obj* _l_s3_nat_s4_repr(obj*);
obj* _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2(obj*);
obj* _l_s4_lean_s6_string_s6_mangle(obj*);
obj* _l_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s11___closed__1;
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__14_s7___boxed(obj*, obj*);
obj* _l_s4_lean_s6_parser_s9_parsec__t_s3_run_s4___at_s4_lean_s6_parser_s6_parsec_s5_parse_s9___spec__1_s6___rarg(obj*, obj*, obj*);
obj* _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
extern obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1;
obj* _l_s9___private_74862231__s20_parse__mangled__name(obj*, obj*);
obj* _l_s4_lean_s6_string_s8_demangle(obj*);
obj* _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(obj*, obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__12_s7___boxed(obj*, obj*);
obj* _l_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main(obj*, obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__6_s7___boxed(obj*, obj*);
obj* _l_s9___private_1205956357__s4_name_s11_mangle__aux(obj*, obj*);
obj* _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__3;
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_alpha_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__5(obj*);
obj* _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(obj*, obj*);
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__4(unsigned, obj*);
obj* _l_s6_string_s5_quote(obj*);
obj* _l_s5_dlist_s9_singleton_s6___rarg(obj*, obj*);
obj* _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main(obj*, obj*, obj*);
obj* _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main(obj* x_0, obj* x_1, obj* x_2) {
{
obj* x_3; obj* x_4;
x_3 = lean::mk_nat_obj(0u);
x_4 = lean::nat_dec_eq(x_0, x_3);
if (lean::obj_tag(x_4) == 0)
{
obj* x_6; obj* x_7; unsigned x_10; unsigned char x_11; unsigned char x_13; unsigned char x_15;
lean::dec(x_4);
x_6 = lean::mk_nat_obj(1u);
x_7 = lean::nat_sub(x_0, x_6);
lean::dec(x_6);
lean::dec(x_0);
x_10 = lean::string_iterator_curr(x_1);
x_15 = _l_s4_char_s9_is__alpha(x_10);
if (x_15 == 0)
{
unsigned char x_16;
x_16 = _l_s4_char_s9_is__digit(x_10);
if (x_16 == 0)
{
unsigned char x_17;
x_17 = 0;
x_13 = x_17;
goto lbl_14;
}
else
{
obj* x_19; obj* x_20; obj* x_21;
lean::dec(x_3);
x_19 = lean::string_iterator_next(x_1);
x_20 = lean::string_push(x_2, x_10);
x_21 = _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main(x_7, x_19, x_20);
return x_21;
}
}
else
{
if (x_15 == 0)
{
unsigned char x_22;
x_22 = 0;
x_13 = x_22;
goto lbl_14;
}
else
{
obj* x_24; obj* x_25; obj* x_26;
lean::dec(x_3);
x_24 = lean::string_iterator_next(x_1);
x_25 = lean::string_push(x_2, x_10);
x_26 = _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main(x_7, x_24, x_25);
return x_26;
}
}
lbl_12:
{
obj* x_27; obj* x_28; obj* x_29;
x_27 = lean::mk_nat_obj(255u);
x_28 = lean::box_uint32(x_10);
x_29 = lean::nat_dec_lt(x_28, x_27);
lean::dec(x_27);
if (lean::obj_tag(x_29) == 0)
{
obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; unsigned x_37; obj* x_39; obj* x_40; obj* x_43; obj* x_44; obj* x_45; unsigned x_46; obj* x_48; obj* x_49; obj* x_52; obj* x_53; obj* x_54; unsigned x_55; obj* x_57; obj* x_58; obj* x_61; unsigned x_62; obj* x_64; obj* x_65; obj* x_66;
lean::dec(x_29);
x_32 = _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__1;
x_33 = lean::string_append(x_2, x_32);
x_34 = lean::mk_nat_obj(4096u);
x_35 = lean::nat_div(x_28, x_34);
x_36 = _l_s3_nat_s11_digit__char(x_35);
x_37 = lean::unbox_uint32(x_36);
lean::dec(x_36);
x_39 = lean::string_push(x_33, x_37);
x_40 = lean::nat_mod(x_28, x_34);
lean::dec(x_34);
lean::dec(x_28);
x_43 = lean::mk_nat_obj(256u);
x_44 = lean::nat_div(x_40, x_43);
x_45 = _l_s3_nat_s11_digit__char(x_44);
x_46 = lean::unbox_uint32(x_45);
lean::dec(x_45);
x_48 = lean::string_push(x_39, x_46);
x_49 = lean::nat_mod(x_40, x_43);
lean::dec(x_43);
lean::dec(x_40);
x_52 = lean::mk_nat_obj(16u);
x_53 = lean::nat_div(x_49, x_52);
x_54 = _l_s3_nat_s11_digit__char(x_53);
x_55 = lean::unbox_uint32(x_54);
lean::dec(x_54);
x_57 = lean::string_push(x_48, x_55);
x_58 = lean::nat_mod(x_49, x_52);
lean::dec(x_52);
lean::dec(x_49);
x_61 = _l_s3_nat_s11_digit__char(x_58);
x_62 = lean::unbox_uint32(x_61);
lean::dec(x_61);
x_64 = lean::string_push(x_57, x_62);
x_65 = lean::string_iterator_next(x_1);
x_66 = _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main(x_7, x_65, x_64);
return x_66;
}
else
{
obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; unsigned x_73; obj* x_75; obj* x_76; obj* x_79; unsigned x_80; obj* x_82; obj* x_83; obj* x_84;
lean::dec(x_29);
x_68 = _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__2;
x_69 = lean::string_append(x_2, x_68);
x_70 = lean::mk_nat_obj(16u);
x_71 = lean::nat_div(x_28, x_70);
x_72 = _l_s3_nat_s11_digit__char(x_71);
x_73 = lean::unbox_uint32(x_72);
lean::dec(x_72);
x_75 = lean::string_push(x_69, x_73);
x_76 = lean::nat_mod(x_28, x_70);
lean::dec(x_70);
lean::dec(x_28);
x_79 = _l_s3_nat_s11_digit__char(x_76);
x_80 = lean::unbox_uint32(x_79);
lean::dec(x_79);
x_82 = lean::string_push(x_75, x_80);
x_83 = lean::string_iterator_next(x_1);
x_84 = _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main(x_7, x_83, x_82);
return x_84;
}
}
lbl_14:
{
obj* x_85; obj* x_86; obj* x_87; unsigned x_89;
x_85 = lean::mk_nat_obj(95u);
x_86 = lean::mk_nat_obj(55296u);
x_87 = lean::nat_dec_lt(x_85, x_86);
lean::dec(x_86);
if (lean::obj_tag(x_87) == 0)
{
obj* x_92; obj* x_93;
lean::dec(x_87);
x_92 = lean::mk_nat_obj(57343u);
x_93 = lean::nat_dec_lt(x_92, x_85);
lean::dec(x_92);
if (lean::obj_tag(x_93) == 0)
{
unsigned x_97;
lean::dec(x_93);
lean::dec(x_85);
x_97 = lean::unbox_uint32(x_3);
lean::dec(x_3);
x_89 = x_97;
goto lbl_90;
}
else
{
obj* x_100; obj* x_101;
lean::dec(x_93);
x_100 = lean::mk_nat_obj(1114112u);
x_101 = lean::nat_dec_lt(x_85, x_100);
lean::dec(x_100);
if (lean::obj_tag(x_101) == 0)
{
unsigned x_105;
lean::dec(x_85);
lean::dec(x_101);
x_105 = lean::unbox_uint32(x_3);
lean::dec(x_3);
x_89 = x_105;
goto lbl_90;
}
else
{
unsigned x_109;
lean::dec(x_3);
lean::dec(x_101);
x_109 = lean::unbox_uint32(x_85);
lean::dec(x_85);
x_89 = x_109;
goto lbl_90;
}
}
}
else
{
unsigned x_113;
lean::dec(x_3);
lean::dec(x_87);
x_113 = lean::unbox_uint32(x_85);
lean::dec(x_85);
x_89 = x_113;
goto lbl_90;
}
lbl_90:
{
obj* x_115; obj* x_116; obj* x_117;
x_115 = lean::box_uint32(x_10);
x_116 = lean::box_uint32(x_89);
x_117 = lean::nat_dec_eq(x_115, x_116);
lean::dec(x_116);
lean::dec(x_115);
if (lean::obj_tag(x_117) == 0)
{
unsigned char x_121;
lean::dec(x_117);
x_121 = 0;
x_11 = x_121;
goto lbl_12;
}
else
{
obj* x_123; obj* x_124; obj* x_125; obj* x_126;
lean::dec(x_117);
x_123 = lean::string_iterator_next(x_1);
x_124 = _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__3;
x_125 = lean::string_append(x_2, x_124);
x_126 = _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main(x_7, x_123, x_125);
return x_126;
}
}
}
}
else
{
lean::dec(x_4);
lean::dec(x_0);
lean::dec(x_1);
lean::dec(x_3);
return x_2;
}
}
}
obj* _init__l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__1() {
{
obj* x_0;
x_0 = lean::mk_string("_u");
return x_0;
}
}
obj* _init__l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__2() {
{
obj* x_0;
x_0 = lean::mk_string("_x");
return x_0;
}
}
obj* _init__l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__3() {
{
obj* x_0;
x_0 = lean::mk_string("__");
return x_0;
}
}
obj* _l_s9___private_3255790009__s6_string_s11_mangle__aux(obj* x_0, obj* x_1, obj* x_2) {
{
obj* x_3;
x_3 = _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main(x_0, x_1, x_2);
return x_3;
}
}
obj* _l_s4_lean_s6_string_s6_mangle(obj* x_0) {
{
obj* x_1; obj* x_2; obj* x_3; obj* x_5;
x_1 = lean::string_length(x_0);
x_2 = lean::string_mk_iterator(x_0);
x_3 = _l_s6_string_s4_join_s11___closed__1;
lean::inc(x_3);
x_5 = _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main(x_1, x_2, x_3);
return x_5;
}
}
obj* _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(obj* x_0, obj* x_1, obj* x_2) {
{
obj* x_3; obj* x_4;
x_3 = lean::mk_nat_obj(0u);
x_4 = lean::nat_dec_eq(x_0, x_3);
if (lean::obj_tag(x_4) == 0)
{
obj* x_6; obj* x_7; obj* x_10; obj* x_13;
lean::dec(x_4);
x_6 = lean::mk_nat_obj(1u);
x_7 = lean::nat_sub(x_0, x_6);
lean::dec(x_6);
lean::dec(x_0);
lean::inc(x_2);
x_13 = _l_s4_lean_s6_parser_s13_monad__parsec_s3_eoi_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__6(x_2);
if (lean::obj_tag(x_13) == 0)
{
obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_22; obj* x_23;
x_14 = lean::cnstr_get(x_13, 1);
lean::inc(x_14);
x_16 = lean::cnstr_get(x_13, 2);
lean::inc(x_16);
if (lean::is_shared(x_13)) {
lean::dec(x_13);
x_18 = lean::box(0);
} else {
lean::cnstr_release(x_13, 0);
lean::cnstr_release(x_13, 1);
lean::cnstr_release(x_13, 2);
x_18 = x_13;
}
x_19 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
lean::inc(x_19);
lean::inc(x_1);
if (lean::is_scalar(x_18)) {
x_22 = lean::alloc_cnstr(0, 3, 0);
} else {
x_22 = x_18;
}
lean::cnstr_set(x_22, 0, x_1);
lean::cnstr_set(x_22, 1, x_14);
lean::cnstr_set(x_22, 2, x_19);
x_23 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_22);
x_10 = x_23;
goto lbl_11;
}
else
{
obj* x_24; unsigned char x_26; obj* x_27; obj* x_28; obj* x_29;
x_24 = lean::cnstr_get(x_13, 0);
lean::inc(x_24);
x_26 = lean::cnstr_get_scalar<unsigned char>(x_13, sizeof(void*)*1);
if (lean::is_shared(x_13)) {
lean::dec(x_13);
x_27 = lean::box(0);
} else {
lean::cnstr_release(x_13, 0);
x_27 = x_13;
}
if (lean::is_scalar(x_27)) {
x_28 = lean::alloc_cnstr(1, 1, 1);
} else {
x_28 = x_27;
}
lean::cnstr_set(x_28, 0, x_24);
lean::cnstr_set_scalar(x_28, sizeof(void*)*1, x_26);
x_29 = x_28;
x_10 = x_29;
goto lbl_11;
}
lbl_11:
{
if (lean::obj_tag(x_10) == 0)
{
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
return x_10;
}
else
{
obj* x_34; unsigned char x_36; obj* x_37; obj* x_38; unsigned char x_39;
x_34 = lean::cnstr_get(x_10, 0);
lean::inc(x_34);
x_36 = lean::cnstr_get_scalar<unsigned char>(x_10, sizeof(void*)*1);
if (x_36 == 0)
{
obj* x_43;
lean::dec(x_10);
lean::inc(x_2);
x_43 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_alpha_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__5(x_2);
if (lean::obj_tag(x_43) == 0)
{
obj* x_44; obj* x_46; obj* x_48; unsigned x_51; obj* x_54; obj* x_56; obj* x_57;
x_44 = lean::cnstr_get(x_43, 0);
lean::inc(x_44);
x_46 = lean::cnstr_get(x_43, 1);
lean::inc(x_46);
x_48 = lean::cnstr_get(x_43, 2);
lean::inc(x_48);
lean::dec(x_43);
x_51 = lean::unbox_uint32(x_44);
lean::dec(x_44);
lean::inc(x_1);
x_54 = lean::string_push(x_1, x_51);
lean::inc(x_7);
x_56 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_7, x_54, x_46);
x_57 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_48, x_56);
if (lean::obj_tag(x_57) == 0)
{
obj* x_62;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_62 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_57);
return x_62;
}
else
{
obj* x_63; unsigned char x_65;
x_63 = lean::cnstr_get(x_57, 0);
lean::inc(x_63);
x_65 = lean::cnstr_get_scalar<unsigned char>(x_57, sizeof(void*)*1);
x_37 = x_57;
x_38 = x_63;
x_39 = x_65;
goto lbl_40;
}
}
else
{
obj* x_66; unsigned char x_68; obj* x_69; obj* x_71; obj* x_72;
x_66 = lean::cnstr_get(x_43, 0);
lean::inc(x_66);
x_68 = lean::cnstr_get_scalar<unsigned char>(x_43, sizeof(void*)*1);
if (lean::is_shared(x_43)) {
lean::dec(x_43);
x_69 = lean::box(0);
} else {
lean::cnstr_release(x_43, 0);
x_69 = x_43;
}
lean::inc(x_66);
if (lean::is_scalar(x_69)) {
x_71 = lean::alloc_cnstr(1, 1, 1);
} else {
x_71 = x_69;
}
lean::cnstr_set(x_71, 0, x_66);
lean::cnstr_set_scalar(x_71, sizeof(void*)*1, x_68);
x_72 = x_71;
x_37 = x_72;
x_38 = x_66;
x_39 = x_68;
goto lbl_40;
}
}
else
{
lean::dec(x_34);
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
return x_10;
}
lbl_40:
{
obj* x_78; obj* x_79; unsigned char x_80;
if (x_39 == 0)
{
obj* x_84;
lean::dec(x_37);
lean::inc(x_2);
x_84 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__4(x_2);
if (lean::obj_tag(x_84) == 0)
{
obj* x_85; obj* x_87; obj* x_89; unsigned x_92; obj* x_95; obj* x_97; obj* x_98;
x_85 = lean::cnstr_get(x_84, 0);
lean::inc(x_85);
x_87 = lean::cnstr_get(x_84, 1);
lean::inc(x_87);
x_89 = lean::cnstr_get(x_84, 2);
lean::inc(x_89);
lean::dec(x_84);
x_92 = lean::unbox_uint32(x_85);
lean::dec(x_85);
lean::inc(x_1);
x_95 = lean::string_push(x_1, x_92);
lean::inc(x_7);
x_97 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_7, x_95, x_87);
x_98 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_89, x_97);
if (lean::obj_tag(x_98) == 0)
{
obj* x_103; obj* x_104;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_103 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_98);
x_104 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_103);
return x_104;
}
else
{
obj* x_105; unsigned char x_107;
x_105 = lean::cnstr_get(x_98, 0);
lean::inc(x_105);
x_107 = lean::cnstr_get_scalar<unsigned char>(x_98, sizeof(void*)*1);
x_78 = x_98;
x_79 = x_105;
x_80 = x_107;
goto lbl_81;
}
}
else
{
obj* x_108; unsigned char x_110; obj* x_111; obj* x_113; obj* x_114;
x_108 = lean::cnstr_get(x_84, 0);
lean::inc(x_108);
x_110 = lean::cnstr_get_scalar<unsigned char>(x_84, sizeof(void*)*1);
if (lean::is_shared(x_84)) {
lean::dec(x_84);
x_111 = lean::box(0);
} else {
lean::cnstr_release(x_84, 0);
x_111 = x_84;
}
lean::inc(x_108);
if (lean::is_scalar(x_111)) {
x_113 = lean::alloc_cnstr(1, 1, 1);
} else {
x_113 = x_111;
}
lean::cnstr_set(x_113, 0, x_108);
lean::cnstr_set_scalar(x_113, sizeof(void*)*1, x_110);
x_114 = x_113;
x_78 = x_114;
x_79 = x_108;
x_80 = x_110;
goto lbl_81;
}
}
else
{
obj* x_120;
lean::dec(x_38);
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_120 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_37);
return x_120;
}
lbl_81:
{
obj* x_121; obj* x_122; unsigned char x_123;
if (x_80 == 0)
{
obj* x_126; obj* x_127; obj* x_131;
lean::dec(x_78);
x_126 = _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__3;
x_127 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__3;
lean::inc(x_2);
lean::inc(x_127);
lean::inc(x_126);
x_131 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__1(x_126, x_127, x_2);
if (lean::obj_tag(x_131) == 0)
{
obj* x_132; obj* x_134; obj* x_137; obj* x_138; obj* x_139;
x_132 = lean::cnstr_get(x_131, 1);
lean::inc(x_132);
x_134 = lean::cnstr_get(x_131, 2);
lean::inc(x_134);
lean::dec(x_131);
x_137 = lean::mk_nat_obj(95u);
x_138 = lean::mk_nat_obj(55296u);
x_139 = lean::nat_dec_lt(x_137, x_138);
lean::dec(x_138);
if (lean::obj_tag(x_139) == 0)
{
obj* x_142; obj* x_143;
lean::dec(x_139);
x_142 = lean::mk_nat_obj(57343u);
x_143 = lean::nat_dec_lt(x_142, x_137);
lean::dec(x_142);
if (lean::obj_tag(x_143) == 0)
{
unsigned x_147; obj* x_149; obj* x_151; obj* x_152;
lean::dec(x_143);
lean::dec(x_137);
x_147 = lean::unbox_uint32(x_3);
lean::inc(x_1);
x_149 = lean::string_push(x_1, x_147);
lean::inc(x_7);
x_151 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_7, x_149, x_132);
x_152 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_134, x_151);
if (lean::obj_tag(x_152) == 0)
{
obj* x_157; obj* x_158; obj* x_159;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_157 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_152);
x_158 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_157);
x_159 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_158);
return x_159;
}
else
{
obj* x_160; unsigned char x_162;
x_160 = lean::cnstr_get(x_152, 0);
lean::inc(x_160);
x_162 = lean::cnstr_get_scalar<unsigned char>(x_152, sizeof(void*)*1);
x_121 = x_152;
x_122 = x_160;
x_123 = x_162;
goto lbl_124;
}
}
else
{
obj* x_164; obj* x_165;
lean::dec(x_143);
x_164 = lean::mk_nat_obj(1114112u);
x_165 = lean::nat_dec_lt(x_137, x_164);
lean::dec(x_164);
if (lean::obj_tag(x_165) == 0)
{
unsigned x_169; obj* x_171; obj* x_173; obj* x_174;
lean::dec(x_137);
lean::dec(x_165);
x_169 = lean::unbox_uint32(x_3);
lean::inc(x_1);
x_171 = lean::string_push(x_1, x_169);
lean::inc(x_7);
x_173 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_7, x_171, x_132);
x_174 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_134, x_173);
if (lean::obj_tag(x_174) == 0)
{
obj* x_179; obj* x_180; obj* x_181;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_179 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_174);
x_180 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_179);
x_181 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_180);
return x_181;
}
else
{
obj* x_182; unsigned char x_184;
x_182 = lean::cnstr_get(x_174, 0);
lean::inc(x_182);
x_184 = lean::cnstr_get_scalar<unsigned char>(x_174, sizeof(void*)*1);
x_121 = x_174;
x_122 = x_182;
x_123 = x_184;
goto lbl_124;
}
}
else
{
unsigned x_186; obj* x_189; obj* x_191; obj* x_192;
lean::dec(x_165);
x_186 = lean::unbox_uint32(x_137);
lean::dec(x_137);
lean::inc(x_1);
x_189 = lean::string_push(x_1, x_186);
lean::inc(x_7);
x_191 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_7, x_189, x_132);
x_192 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_134, x_191);
if (lean::obj_tag(x_192) == 0)
{
obj* x_197; obj* x_198; obj* x_199;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_197 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_192);
x_198 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_197);
x_199 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_198);
return x_199;
}
else
{
obj* x_200; unsigned char x_202;
x_200 = lean::cnstr_get(x_192, 0);
lean::inc(x_200);
x_202 = lean::cnstr_get_scalar<unsigned char>(x_192, sizeof(void*)*1);
x_121 = x_192;
x_122 = x_200;
x_123 = x_202;
goto lbl_124;
}
}
}
}
else
{
unsigned x_204; obj* x_207; obj* x_209; obj* x_210;
lean::dec(x_139);
x_204 = lean::unbox_uint32(x_137);
lean::dec(x_137);
lean::inc(x_1);
x_207 = lean::string_push(x_1, x_204);
lean::inc(x_7);
x_209 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_7, x_207, x_132);
x_210 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_134, x_209);
if (lean::obj_tag(x_210) == 0)
{
obj* x_215; obj* x_216; obj* x_217;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_215 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_210);
x_216 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_215);
x_217 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_216);
return x_217;
}
else
{
obj* x_218; unsigned char x_220;
x_218 = lean::cnstr_get(x_210, 0);
lean::inc(x_218);
x_220 = lean::cnstr_get_scalar<unsigned char>(x_210, sizeof(void*)*1);
x_121 = x_210;
x_122 = x_218;
x_123 = x_220;
goto lbl_124;
}
}
}
else
{
obj* x_221; unsigned char x_223; obj* x_224; obj* x_226; obj* x_227;
x_221 = lean::cnstr_get(x_131, 0);
lean::inc(x_221);
x_223 = lean::cnstr_get_scalar<unsigned char>(x_131, sizeof(void*)*1);
if (lean::is_shared(x_131)) {
lean::dec(x_131);
x_224 = lean::box(0);
} else {
lean::cnstr_release(x_131, 0);
x_224 = x_131;
}
lean::inc(x_221);
if (lean::is_scalar(x_224)) {
x_226 = lean::alloc_cnstr(1, 1, 1);
} else {
x_226 = x_224;
}
lean::cnstr_set(x_226, 0, x_221);
lean::cnstr_set_scalar(x_226, sizeof(void*)*1, x_223);
x_227 = x_226;
x_121 = x_227;
x_122 = x_221;
x_123 = x_223;
goto lbl_124;
}
}
else
{
obj* x_233; obj* x_234;
lean::dec(x_79);
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_233 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_78);
x_234 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_233);
return x_234;
}
lbl_124:
{
obj* x_235; obj* x_236; unsigned char x_237;
if (x_123 == 0)
{
obj* x_240; obj* x_241; obj* x_245;
lean::dec(x_121);
x_240 = _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__2;
x_241 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__2;
lean::inc(x_2);
lean::inc(x_241);
lean::inc(x_240);
x_245 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__1(x_240, x_241, x_2);
if (lean::obj_tag(x_245) == 0)
{
obj* x_246; obj* x_248; obj* x_251;
x_246 = lean::cnstr_get(x_245, 1);
lean::inc(x_246);
x_248 = lean::cnstr_get(x_245, 2);
lean::inc(x_248);
lean::dec(x_245);
x_251 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2(x_246);
if (lean::obj_tag(x_251) == 0)
{
obj* x_252; obj* x_254; obj* x_256; obj* x_259;
x_252 = lean::cnstr_get(x_251, 0);
lean::inc(x_252);
x_254 = lean::cnstr_get(x_251, 1);
lean::inc(x_254);
x_256 = lean::cnstr_get(x_251, 2);
lean::inc(x_256);
lean::dec(x_251);
x_259 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2(x_254);
if (lean::obj_tag(x_259) == 0)
{
obj* x_260; obj* x_262; obj* x_264; obj* x_267; obj* x_268; obj* x_271; obj* x_274; obj* x_275;
x_260 = lean::cnstr_get(x_259, 0);
lean::inc(x_260);
x_262 = lean::cnstr_get(x_259, 1);
lean::inc(x_262);
x_264 = lean::cnstr_get(x_259, 2);
lean::inc(x_264);
lean::dec(x_259);
x_267 = lean::mk_nat_obj(16u);
x_268 = lean::nat_mul(x_252, x_267);
lean::dec(x_267);
lean::dec(x_252);
x_271 = lean::nat_add(x_268, x_260);
lean::dec(x_260);
lean::dec(x_268);
x_274 = lean::mk_nat_obj(55296u);
x_275 = lean::nat_dec_lt(x_271, x_274);
lean::dec(x_274);
if (lean::obj_tag(x_275) == 0)
{
obj* x_278; obj* x_279;
lean::dec(x_275);
x_278 = lean::mk_nat_obj(57343u);
x_279 = lean::nat_dec_lt(x_278, x_271);
lean::dec(x_278);
if (lean::obj_tag(x_279) == 0)
{
unsigned x_283; obj* x_285; obj* x_287; obj* x_288; obj* x_289; obj* x_290;
lean::dec(x_279);
lean::dec(x_271);
x_283 = lean::unbox_uint32(x_3);
lean::inc(x_1);
x_285 = lean::string_push(x_1, x_283);
lean::inc(x_7);
x_287 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_7, x_285, x_262);
x_288 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_264, x_287);
x_289 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_256, x_288);
x_290 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_248, x_289);
if (lean::obj_tag(x_290) == 0)
{
obj* x_295; obj* x_296; obj* x_297; obj* x_298;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_295 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_290);
x_296 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_295);
x_297 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_296);
x_298 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_297);
return x_298;
}
else
{
obj* x_299; unsigned char x_301;
x_299 = lean::cnstr_get(x_290, 0);
lean::inc(x_299);
x_301 = lean::cnstr_get_scalar<unsigned char>(x_290, sizeof(void*)*1);
x_235 = x_290;
x_236 = x_299;
x_237 = x_301;
goto lbl_238;
}
}
else
{
obj* x_303; obj* x_304;
lean::dec(x_279);
x_303 = lean::mk_nat_obj(1114112u);
x_304 = lean::nat_dec_lt(x_271, x_303);
lean::dec(x_303);
if (lean::obj_tag(x_304) == 0)
{
unsigned x_308; obj* x_310; obj* x_312; obj* x_313; obj* x_314; obj* x_315;
lean::dec(x_271);
lean::dec(x_304);
x_308 = lean::unbox_uint32(x_3);
lean::inc(x_1);
x_310 = lean::string_push(x_1, x_308);
lean::inc(x_7);
x_312 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_7, x_310, x_262);
x_313 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_264, x_312);
x_314 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_256, x_313);
x_315 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_248, x_314);
if (lean::obj_tag(x_315) == 0)
{
obj* x_320; obj* x_321; obj* x_322; obj* x_323;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_320 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_315);
x_321 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_320);
x_322 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_321);
x_323 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_322);
return x_323;
}
else
{
obj* x_324; unsigned char x_326;
x_324 = lean::cnstr_get(x_315, 0);
lean::inc(x_324);
x_326 = lean::cnstr_get_scalar<unsigned char>(x_315, sizeof(void*)*1);
x_235 = x_315;
x_236 = x_324;
x_237 = x_326;
goto lbl_238;
}
}
else
{
unsigned x_328; obj* x_331; obj* x_333; obj* x_334; obj* x_335; obj* x_336;
lean::dec(x_304);
x_328 = lean::unbox_uint32(x_271);
lean::dec(x_271);
lean::inc(x_1);
x_331 = lean::string_push(x_1, x_328);
lean::inc(x_7);
x_333 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_7, x_331, x_262);
x_334 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_264, x_333);
x_335 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_256, x_334);
x_336 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_248, x_335);
if (lean::obj_tag(x_336) == 0)
{
obj* x_341; obj* x_342; obj* x_343; obj* x_344;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_341 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_336);
x_342 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_341);
x_343 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_342);
x_344 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_343);
return x_344;
}
else
{
obj* x_345; unsigned char x_347;
x_345 = lean::cnstr_get(x_336, 0);
lean::inc(x_345);
x_347 = lean::cnstr_get_scalar<unsigned char>(x_336, sizeof(void*)*1);
x_235 = x_336;
x_236 = x_345;
x_237 = x_347;
goto lbl_238;
}
}
}
}
else
{
unsigned x_349; obj* x_352; obj* x_354; obj* x_355; obj* x_356; obj* x_357;
lean::dec(x_275);
x_349 = lean::unbox_uint32(x_271);
lean::dec(x_271);
lean::inc(x_1);
x_352 = lean::string_push(x_1, x_349);
lean::inc(x_7);
x_354 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_7, x_352, x_262);
x_355 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_264, x_354);
x_356 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_256, x_355);
x_357 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_248, x_356);
if (lean::obj_tag(x_357) == 0)
{
obj* x_362; obj* x_363; obj* x_364; obj* x_365;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_362 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_357);
x_363 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_362);
x_364 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_363);
x_365 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_364);
return x_365;
}
else
{
obj* x_366; unsigned char x_368;
x_366 = lean::cnstr_get(x_357, 0);
lean::inc(x_366);
x_368 = lean::cnstr_get_scalar<unsigned char>(x_357, sizeof(void*)*1);
x_235 = x_357;
x_236 = x_366;
x_237 = x_368;
goto lbl_238;
}
}
}
else
{
obj* x_370; unsigned char x_372; obj* x_373; obj* x_374; obj* x_375; obj* x_376; obj* x_377;
lean::dec(x_252);
x_370 = lean::cnstr_get(x_259, 0);
lean::inc(x_370);
x_372 = lean::cnstr_get_scalar<unsigned char>(x_259, sizeof(void*)*1);
if (lean::is_shared(x_259)) {
lean::dec(x_259);
x_373 = lean::box(0);
} else {
lean::cnstr_release(x_259, 0);
x_373 = x_259;
}
if (lean::is_scalar(x_373)) {
x_374 = lean::alloc_cnstr(1, 1, 1);
} else {
x_374 = x_373;
}
lean::cnstr_set(x_374, 0, x_370);
lean::cnstr_set_scalar(x_374, sizeof(void*)*1, x_372);
x_375 = x_374;
x_376 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_256, x_375);
x_377 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_248, x_376);
if (lean::obj_tag(x_377) == 0)
{
obj* x_382; obj* x_383; obj* x_384; obj* x_385;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_382 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_377);
x_383 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_382);
x_384 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_383);
x_385 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_384);
return x_385;
}
else
{
obj* x_386; unsigned char x_388;
x_386 = lean::cnstr_get(x_377, 0);
lean::inc(x_386);
x_388 = lean::cnstr_get_scalar<unsigned char>(x_377, sizeof(void*)*1);
x_235 = x_377;
x_236 = x_386;
x_237 = x_388;
goto lbl_238;
}
}
}
else
{
obj* x_389; unsigned char x_391; obj* x_392; obj* x_393; obj* x_394; obj* x_395;
x_389 = lean::cnstr_get(x_251, 0);
lean::inc(x_389);
x_391 = lean::cnstr_get_scalar<unsigned char>(x_251, sizeof(void*)*1);
if (lean::is_shared(x_251)) {
lean::dec(x_251);
x_392 = lean::box(0);
} else {
lean::cnstr_release(x_251, 0);
x_392 = x_251;
}
if (lean::is_scalar(x_392)) {
x_393 = lean::alloc_cnstr(1, 1, 1);
} else {
x_393 = x_392;
}
lean::cnstr_set(x_393, 0, x_389);
lean::cnstr_set_scalar(x_393, sizeof(void*)*1, x_391);
x_394 = x_393;
x_395 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_248, x_394);
if (lean::obj_tag(x_395) == 0)
{
obj* x_400; obj* x_401; obj* x_402; obj* x_403;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_400 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_395);
x_401 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_400);
x_402 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_401);
x_403 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_402);
return x_403;
}
else
{
obj* x_404; unsigned char x_406;
x_404 = lean::cnstr_get(x_395, 0);
lean::inc(x_404);
x_406 = lean::cnstr_get_scalar<unsigned char>(x_395, sizeof(void*)*1);
x_235 = x_395;
x_236 = x_404;
x_237 = x_406;
goto lbl_238;
}
}
}
else
{
obj* x_407; unsigned char x_409; obj* x_410; obj* x_412; obj* x_413;
x_407 = lean::cnstr_get(x_245, 0);
lean::inc(x_407);
x_409 = lean::cnstr_get_scalar<unsigned char>(x_245, sizeof(void*)*1);
if (lean::is_shared(x_245)) {
lean::dec(x_245);
x_410 = lean::box(0);
} else {
lean::cnstr_release(x_245, 0);
x_410 = x_245;
}
lean::inc(x_407);
if (lean::is_scalar(x_410)) {
x_412 = lean::alloc_cnstr(1, 1, 1);
} else {
x_412 = x_410;
}
lean::cnstr_set(x_412, 0, x_407);
lean::cnstr_set_scalar(x_412, sizeof(void*)*1, x_409);
x_413 = x_412;
x_235 = x_413;
x_236 = x_407;
x_237 = x_409;
goto lbl_238;
}
}
else
{
obj* x_419; obj* x_420; obj* x_421;
lean::dec(x_122);
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_419 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_121);
x_420 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_419);
x_421 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_420);
return x_421;
}
lbl_238:
{
if (x_237 == 0)
{
obj* x_423; obj* x_424; obj* x_427;
lean::dec(x_235);
x_423 = _l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__1;
x_424 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__1;
lean::inc(x_424);
lean::inc(x_423);
x_427 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__1(x_423, x_424, x_2);
if (lean::obj_tag(x_427) == 0)
{
obj* x_428; obj* x_430; obj* x_433;
x_428 = lean::cnstr_get(x_427, 1);
lean::inc(x_428);
x_430 = lean::cnstr_get(x_427, 2);
lean::inc(x_430);
lean::dec(x_427);
x_433 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2(x_428);
if (lean::obj_tag(x_433) == 0)
{
obj* x_434; obj* x_436; obj* x_438; obj* x_441;
x_434 = lean::cnstr_get(x_433, 0);
lean::inc(x_434);
x_436 = lean::cnstr_get(x_433, 1);
lean::inc(x_436);
x_438 = lean::cnstr_get(x_433, 2);
lean::inc(x_438);
lean::dec(x_433);
x_441 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2(x_436);
if (lean::obj_tag(x_441) == 0)
{
obj* x_442; obj* x_444; obj* x_446; obj* x_449;
x_442 = lean::cnstr_get(x_441, 0);
lean::inc(x_442);
x_444 = lean::cnstr_get(x_441, 1);
lean::inc(x_444);
x_446 = lean::cnstr_get(x_441, 2);
lean::inc(x_446);
lean::dec(x_441);
x_449 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2(x_444);
if (lean::obj_tag(x_449) == 0)
{
obj* x_450; obj* x_452; obj* x_454; obj* x_457;
x_450 = lean::cnstr_get(x_449, 0);
lean::inc(x_450);
x_452 = lean::cnstr_get(x_449, 1);
lean::inc(x_452);
x_454 = lean::cnstr_get(x_449, 2);
lean::inc(x_454);
lean::dec(x_449);
x_457 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2(x_452);
if (lean::obj_tag(x_457) == 0)
{
obj* x_458; obj* x_460; obj* x_462; obj* x_465; obj* x_466; obj* x_469; obj* x_470; obj* x_473; obj* x_476; obj* x_477; obj* x_480; obj* x_483; obj* x_486; obj* x_487;
x_458 = lean::cnstr_get(x_457, 0);
lean::inc(x_458);
x_460 = lean::cnstr_get(x_457, 1);
lean::inc(x_460);
x_462 = lean::cnstr_get(x_457, 2);
lean::inc(x_462);
lean::dec(x_457);
x_465 = lean::mk_nat_obj(4096u);
x_466 = lean::nat_mul(x_434, x_465);
lean::dec(x_465);
lean::dec(x_434);
x_469 = lean::mk_nat_obj(256u);
x_470 = lean::nat_mul(x_442, x_469);
lean::dec(x_469);
lean::dec(x_442);
x_473 = lean::nat_add(x_466, x_470);
lean::dec(x_470);
lean::dec(x_466);
x_476 = lean::mk_nat_obj(16u);
x_477 = lean::nat_mul(x_450, x_476);
lean::dec(x_476);
lean::dec(x_450);
x_480 = lean::nat_add(x_473, x_477);
lean::dec(x_477);
lean::dec(x_473);
x_483 = lean::nat_add(x_480, x_458);
lean::dec(x_458);
lean::dec(x_480);
x_486 = lean::mk_nat_obj(55296u);
x_487 = lean::nat_dec_lt(x_483, x_486);
lean::dec(x_486);
if (lean::obj_tag(x_487) == 0)
{
obj* x_490; obj* x_491;
lean::dec(x_487);
x_490 = lean::mk_nat_obj(57343u);
x_491 = lean::nat_dec_lt(x_490, x_483);
lean::dec(x_490);
if (lean::obj_tag(x_491) == 0)
{
unsigned x_495; obj* x_497; obj* x_498; obj* x_499; obj* x_500; obj* x_501; obj* x_502; obj* x_503; obj* x_504; obj* x_505; obj* x_506; obj* x_507; obj* x_508;
lean::dec(x_483);
lean::dec(x_491);
x_495 = lean::unbox_uint32(x_3);
lean::dec(x_3);
x_497 = lean::string_push(x_1, x_495);
x_498 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_7, x_497, x_460);
x_499 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_462, x_498);
x_500 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_454, x_499);
x_501 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_446, x_500);
x_502 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_438, x_501);
x_503 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_430, x_502);
x_504 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_236, x_503);
x_505 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_504);
x_506 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_505);
x_507 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_506);
x_508 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_507);
return x_508;
}
else
{
obj* x_510; obj* x_511;
lean::dec(x_491);
x_510 = lean::mk_nat_obj(1114112u);
x_511 = lean::nat_dec_lt(x_483, x_510);
lean::dec(x_510);
if (lean::obj_tag(x_511) == 0)
{
unsigned x_515; obj* x_517; obj* x_518; obj* x_519; obj* x_520; obj* x_521; obj* x_522; obj* x_523; obj* x_524; obj* x_525; obj* x_526; obj* x_527; obj* x_528;
lean::dec(x_483);
lean::dec(x_511);
x_515 = lean::unbox_uint32(x_3);
lean::dec(x_3);
x_517 = lean::string_push(x_1, x_515);
x_518 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_7, x_517, x_460);
x_519 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_462, x_518);
x_520 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_454, x_519);
x_521 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_446, x_520);
x_522 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_438, x_521);
x_523 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_430, x_522);
x_524 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_236, x_523);
x_525 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_524);
x_526 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_525);
x_527 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_526);
x_528 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_527);
return x_528;
}
else
{
unsigned x_531; obj* x_533; obj* x_534; obj* x_535; obj* x_536; obj* x_537; obj* x_538; obj* x_539; obj* x_540; obj* x_541; obj* x_542; obj* x_543; obj* x_544;
lean::dec(x_511);
lean::dec(x_3);
x_531 = lean::unbox_uint32(x_483);
lean::dec(x_483);
x_533 = lean::string_push(x_1, x_531);
x_534 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_7, x_533, x_460);
x_535 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_462, x_534);
x_536 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_454, x_535);
x_537 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_446, x_536);
x_538 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_438, x_537);
x_539 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_430, x_538);
x_540 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_236, x_539);
x_541 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_540);
x_542 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_541);
x_543 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_542);
x_544 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_543);
return x_544;
}
}
}
else
{
unsigned x_547; obj* x_549; obj* x_550; obj* x_551; obj* x_552; obj* x_553; obj* x_554; obj* x_555; obj* x_556; obj* x_557; obj* x_558; obj* x_559; obj* x_560;
lean::dec(x_487);
lean::dec(x_3);
x_547 = lean::unbox_uint32(x_483);
lean::dec(x_483);
x_549 = lean::string_push(x_1, x_547);
x_550 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_7, x_549, x_460);
x_551 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_462, x_550);
x_552 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_454, x_551);
x_553 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_446, x_552);
x_554 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_438, x_553);
x_555 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_430, x_554);
x_556 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_236, x_555);
x_557 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_556);
x_558 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_557);
x_559 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_558);
x_560 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_559);
return x_560;
}
}
else
{
obj* x_567; unsigned char x_569; obj* x_570; obj* x_571; obj* x_572; obj* x_573; obj* x_574; obj* x_575; obj* x_576; obj* x_577; obj* x_578; obj* x_579; obj* x_580; obj* x_581;
lean::dec(x_434);
lean::dec(x_442);
lean::dec(x_450);
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_3);
x_567 = lean::cnstr_get(x_457, 0);
lean::inc(x_567);
x_569 = lean::cnstr_get_scalar<unsigned char>(x_457, sizeof(void*)*1);
if (lean::is_shared(x_457)) {
lean::dec(x_457);
x_570 = lean::box(0);
} else {
lean::cnstr_release(x_457, 0);
x_570 = x_457;
}
if (lean::is_scalar(x_570)) {
x_571 = lean::alloc_cnstr(1, 1, 1);
} else {
x_571 = x_570;
}
lean::cnstr_set(x_571, 0, x_567);
lean::cnstr_set_scalar(x_571, sizeof(void*)*1, x_569);
x_572 = x_571;
x_573 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_454, x_572);
x_574 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_446, x_573);
x_575 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_438, x_574);
x_576 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_430, x_575);
x_577 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_236, x_576);
x_578 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_577);
x_579 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_578);
x_580 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_579);
x_581 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_580);
return x_581;
}
}
else
{
obj* x_587; unsigned char x_589; obj* x_590; obj* x_591; obj* x_592; obj* x_593; obj* x_594; obj* x_595; obj* x_596; obj* x_597; obj* x_598; obj* x_599; obj* x_600;
lean::dec(x_434);
lean::dec(x_442);
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_3);
x_587 = lean::cnstr_get(x_449, 0);
lean::inc(x_587);
x_589 = lean::cnstr_get_scalar<unsigned char>(x_449, sizeof(void*)*1);
if (lean::is_shared(x_449)) {
lean::dec(x_449);
x_590 = lean::box(0);
} else {
lean::cnstr_release(x_449, 0);
x_590 = x_449;
}
if (lean::is_scalar(x_590)) {
x_591 = lean::alloc_cnstr(1, 1, 1);
} else {
x_591 = x_590;
}
lean::cnstr_set(x_591, 0, x_587);
lean::cnstr_set_scalar(x_591, sizeof(void*)*1, x_589);
x_592 = x_591;
x_593 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_446, x_592);
x_594 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_438, x_593);
x_595 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_430, x_594);
x_596 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_236, x_595);
x_597 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_596);
x_598 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_597);
x_599 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_598);
x_600 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_599);
return x_600;
}
}
else
{
obj* x_605; unsigned char x_607; obj* x_608; obj* x_609; obj* x_610; obj* x_611; obj* x_612; obj* x_613; obj* x_614; obj* x_615; obj* x_616; obj* x_617;
lean::dec(x_434);
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_3);
x_605 = lean::cnstr_get(x_441, 0);
lean::inc(x_605);
x_607 = lean::cnstr_get_scalar<unsigned char>(x_441, sizeof(void*)*1);
if (lean::is_shared(x_441)) {
lean::dec(x_441);
x_608 = lean::box(0);
} else {
lean::cnstr_release(x_441, 0);
x_608 = x_441;
}
if (lean::is_scalar(x_608)) {
x_609 = lean::alloc_cnstr(1, 1, 1);
} else {
x_609 = x_608;
}
lean::cnstr_set(x_609, 0, x_605);
lean::cnstr_set_scalar(x_609, sizeof(void*)*1, x_607);
x_610 = x_609;
x_611 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_438, x_610);
x_612 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_430, x_611);
x_613 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_236, x_612);
x_614 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_613);
x_615 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_614);
x_616 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_615);
x_617 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_616);
return x_617;
}
}
else
{
obj* x_621; unsigned char x_623; obj* x_624; obj* x_625; obj* x_626; obj* x_627; obj* x_628; obj* x_629; obj* x_630; obj* x_631; obj* x_632;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_3);
x_621 = lean::cnstr_get(x_433, 0);
lean::inc(x_621);
x_623 = lean::cnstr_get_scalar<unsigned char>(x_433, sizeof(void*)*1);
if (lean::is_shared(x_433)) {
lean::dec(x_433);
x_624 = lean::box(0);
} else {
lean::cnstr_release(x_433, 0);
x_624 = x_433;
}
if (lean::is_scalar(x_624)) {
x_625 = lean::alloc_cnstr(1, 1, 1);
} else {
x_625 = x_624;
}
lean::cnstr_set(x_625, 0, x_621);
lean::cnstr_set_scalar(x_625, sizeof(void*)*1, x_623);
x_626 = x_625;
x_627 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_430, x_626);
x_628 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_236, x_627);
x_629 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_628);
x_630 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_629);
x_631 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_630);
x_632 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_631);
return x_632;
}
}
else
{
obj* x_636; unsigned char x_638; obj* x_639; obj* x_640; obj* x_641; obj* x_642; obj* x_643; obj* x_644; obj* x_645; obj* x_646;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_3);
x_636 = lean::cnstr_get(x_427, 0);
lean::inc(x_636);
x_638 = lean::cnstr_get_scalar<unsigned char>(x_427, sizeof(void*)*1);
if (lean::is_shared(x_427)) {
lean::dec(x_427);
x_639 = lean::box(0);
} else {
lean::cnstr_release(x_427, 0);
x_639 = x_427;
}
if (lean::is_scalar(x_639)) {
x_640 = lean::alloc_cnstr(1, 1, 1);
} else {
x_640 = x_639;
}
lean::cnstr_set(x_640, 0, x_636);
lean::cnstr_set_scalar(x_640, sizeof(void*)*1, x_638);
x_641 = x_640;
x_642 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_236, x_641);
x_643 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_642);
x_644 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_643);
x_645 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_644);
x_646 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_645);
return x_646;
}
}
else
{
obj* x_652; obj* x_653; obj* x_654; obj* x_655;
lean::dec(x_236);
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
x_652 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_122, x_235);
x_653 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_79, x_652);
x_654 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_653);
x_655 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_654);
return x_655;
}
}
}
}
}
}
}
}
else
{
obj* x_659; obj* x_661;
lean::dec(x_4);
lean::dec(x_0);
lean::dec(x_3);
x_659 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
lean::inc(x_659);
x_661 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_661, 0, x_1);
lean::cnstr_set(x_661, 1, x_2);
lean::cnstr_set(x_661, 2, x_659);
return x_661;
}
}
}
obj* _init__l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__1() {
{
obj* x_0; obj* x_1; obj* x_2;
x_0 = lean::mk_string("_u");
x_1 = _l_s6_string_s5_quote(x_0);
x_2 = lean::alloc_closure(reinterpret_cast<void*>(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1);
lean::closure_set(x_2, 0, x_1);
return x_2;
}
}
obj* _init__l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__2() {
{
obj* x_0; obj* x_1; obj* x_2;
x_0 = lean::mk_string("_x");
x_1 = _l_s6_string_s5_quote(x_0);
x_2 = lean::alloc_closure(reinterpret_cast<void*>(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1);
lean::closure_set(x_2, 0, x_1);
return x_2;
}
}
obj* _init__l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__3() {
{
obj* x_0; obj* x_1; obj* x_2;
x_0 = lean::mk_string("__");
x_1 = _l_s6_string_s5_quote(x_0);
x_2 = lean::alloc_closure(reinterpret_cast<void*>(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1);
lean::closure_set(x_2, 0, x_1);
return x_2;
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__1(obj* x_0, obj* x_1, obj* x_2) {
{
unsigned char x_4;
lean::inc(x_0);
x_4 = _l_s6_string_s9_is__empty(x_0);
if (x_4 == 0)
{
obj* x_5; obj* x_7; obj* x_9;
x_5 = lean::string_length(x_0);
lean::inc(x_0);
x_7 = lean::string_mk_iterator(x_0);
lean::inc(x_2);
x_9 = _l_s9___private_580269747__s8_str__aux_s6___main(x_5, x_7, x_2);
if (lean::obj_tag(x_9) == 0)
{
obj* x_12; obj* x_13; obj* x_15; unsigned char x_16; obj* x_17; obj* x_18;
lean::dec(x_9);
lean::dec(x_0);
x_12 = lean::alloc_cnstr(0, 0, 0);
;
x_13 = _l_s6_string_s4_join_s11___closed__1;
lean::inc(x_13);
x_15 = lean::alloc_cnstr(0, 4, 0);
lean::cnstr_set(x_15, 0, x_2);
lean::cnstr_set(x_15, 1, x_13);
lean::cnstr_set(x_15, 2, x_1);
lean::cnstr_set(x_15, 3, x_12);
x_16 = 0;
x_17 = lean::alloc_cnstr(1, 1, 1);
lean::cnstr_set(x_17, 0, x_15);
lean::cnstr_set_scalar(x_17, sizeof(void*)*1, x_16);
x_18 = x_17;
return x_18;
}
else
{
obj* x_21; obj* x_24; obj* x_25;
lean::dec(x_1);
lean::dec(x_2);
x_21 = lean::cnstr_get(x_9, 0);
lean::inc(x_21);
lean::dec(x_9);
x_24 = lean::alloc_cnstr(0, 0, 0);
;
x_25 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_25, 0, x_0);
lean::cnstr_set(x_25, 1, x_21);
lean::cnstr_set(x_25, 2, x_24);
return x_25;
}
}
else
{
obj* x_28; obj* x_29; obj* x_32;
lean::dec(x_0);
lean::dec(x_1);
x_28 = _l_s6_string_s4_join_s11___closed__1;
x_29 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
lean::inc(x_29);
lean::inc(x_28);
x_32 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_32, 0, x_28);
lean::cnstr_set(x_32, 1, x_2);
lean::cnstr_set(x_32, 2, x_29);
return x_32;
}
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
{
obj* x_5; obj* x_6; unsigned char x_7; obj* x_8; obj* x_9;
x_5 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_2, x_4);
x_6 = lean::alloc_cnstr(0, 4, 0);
lean::cnstr_set(x_6, 0, x_5);
lean::cnstr_set(x_6, 1, x_0);
lean::cnstr_set(x_6, 2, x_1);
lean::cnstr_set(x_6, 3, x_3);
x_7 = 0;
x_8 = lean::alloc_cnstr(1, 1, 1);
lean::cnstr_set(x_8, 0, x_6);
lean::cnstr_set_scalar(x_8, sizeof(void*)*1, x_7);
x_9 = x_8;
return x_9;
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3(obj* x_0) {
{
obj* x_2;
lean::dec(x_0);
x_2 = lean::alloc_closure(reinterpret_cast<void*>(_l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg), 5, 0);
return x_2;
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__4(obj* x_0) {
{
unsigned char x_1;
x_1 = lean::string_iterator_has_next(x_0);
if (x_1 == 0)
{
obj* x_2; obj* x_3; obj* x_4; obj* x_8;
x_2 = lean::alloc_cnstr(0, 0, 0);
;
x_3 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1;
x_4 = _l_s5_mjoin_s6___rarg_s11___closed__1;
lean::inc(x_2);
lean::inc(x_4);
lean::inc(x_3);
x_8 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(x_3, x_4, x_2, x_2, x_0);
if (lean::obj_tag(x_8) == 0)
{
obj* x_9; obj* x_11; obj* x_13;
x_9 = lean::cnstr_get(x_8, 0);
lean::inc(x_9);
x_11 = lean::cnstr_get(x_8, 1);
lean::inc(x_11);
x_13 = lean::cnstr_get(x_8, 2);
lean::inc(x_13);
if (lean::obj_tag(x_13) == 0)
{
lean::dec(x_13);
lean::dec(x_4);
lean::dec(x_9);
lean::dec(x_11);
return x_8;
}
else
{
obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26;
lean::dec(x_8);
x_20 = lean::cnstr_get(x_13, 0);
lean::inc(x_20);
if (lean::is_shared(x_13)) {
lean::dec(x_13);
x_22 = lean::box(0);
} else {
lean::cnstr_release(x_13, 0);
x_22 = x_13;
}
lean::inc(x_4);
x_24 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_24, 0, x_4);
lean::closure_set(x_24, 1, x_20);
if (lean::is_scalar(x_22)) {
x_25 = lean::alloc_cnstr(1, 1, 0);
} else {
x_25 = x_22;
}
lean::cnstr_set(x_25, 0, x_24);
x_26 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_26, 0, x_9);
lean::cnstr_set(x_26, 1, x_11);
lean::cnstr_set(x_26, 2, x_25);
return x_26;
}
}
else
{
obj* x_27; unsigned char x_29;
x_27 = lean::cnstr_get(x_8, 0);
lean::inc(x_27);
x_29 = lean::cnstr_get_scalar<unsigned char>(x_8, sizeof(void*)*1);
if (x_29 == 0)
{
obj* x_31; obj* x_33; obj* x_35; obj* x_38; obj* x_39; obj* x_42; obj* x_43; obj* x_44;
lean::dec(x_8);
x_31 = lean::cnstr_get(x_27, 0);
lean::inc(x_31);
x_33 = lean::cnstr_get(x_27, 1);
lean::inc(x_33);
x_35 = lean::cnstr_get(x_27, 2);
lean::inc(x_35);
lean::inc(x_4);
x_38 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_38, 0, x_4);
lean::closure_set(x_38, 1, x_35);
x_39 = lean::cnstr_get(x_27, 3);
lean::inc(x_39);
lean::dec(x_27);
x_42 = lean::alloc_cnstr(0, 4, 0);
lean::cnstr_set(x_42, 0, x_31);
lean::cnstr_set(x_42, 1, x_33);
lean::cnstr_set(x_42, 2, x_38);
lean::cnstr_set(x_42, 3, x_39);
x_43 = lean::alloc_cnstr(1, 1, 1);
lean::cnstr_set(x_43, 0, x_42);
lean::cnstr_set_scalar(x_43, sizeof(void*)*1, x_29);
x_44 = x_43;
return x_44;
}
else
{
lean::dec(x_4);
lean::dec(x_27);
return x_8;
}
}
}
else
{
unsigned x_47; unsigned char x_48;
x_47 = lean::string_iterator_curr(x_0);
x_48 = _l_s4_char_s9_is__digit(x_47);
if (x_48 == 0)
{
obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_59;
x_49 = _l_s4_char_s11_quote__core(x_47);
x_50 = _l_s4_char_s9_has__repr_s11___closed__1;
lean::inc(x_50);
x_52 = lean::string_append(x_50, x_49);
lean::dec(x_49);
x_54 = lean::string_append(x_52, x_50);
x_55 = lean::alloc_cnstr(0, 0, 0);
;
x_56 = _l_s5_mjoin_s6___rarg_s11___closed__1;
lean::inc(x_55);
lean::inc(x_56);
x_59 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(x_54, x_56, x_55, x_55, x_0);
if (lean::obj_tag(x_59) == 0)
{
obj* x_60; obj* x_62; obj* x_64;
x_60 = lean::cnstr_get(x_59, 0);
lean::inc(x_60);
x_62 = lean::cnstr_get(x_59, 1);
lean::inc(x_62);
x_64 = lean::cnstr_get(x_59, 2);
lean::inc(x_64);
if (lean::obj_tag(x_64) == 0)
{
lean::dec(x_56);
lean::dec(x_60);
lean::dec(x_62);
lean::dec(x_64);
return x_59;
}
else
{
obj* x_71; obj* x_73; obj* x_75; obj* x_76; obj* x_77;
lean::dec(x_59);
x_71 = lean::cnstr_get(x_64, 0);
lean::inc(x_71);
if (lean::is_shared(x_64)) {
lean::dec(x_64);
x_73 = lean::box(0);
} else {
lean::cnstr_release(x_64, 0);
x_73 = x_64;
}
lean::inc(x_56);
x_75 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_75, 0, x_56);
lean::closure_set(x_75, 1, x_71);
if (lean::is_scalar(x_73)) {
x_76 = lean::alloc_cnstr(1, 1, 0);
} else {
x_76 = x_73;
}
lean::cnstr_set(x_76, 0, x_75);
x_77 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_77, 0, x_60);
lean::cnstr_set(x_77, 1, x_62);
lean::cnstr_set(x_77, 2, x_76);
return x_77;
}
}
else
{
obj* x_78; unsigned char x_80;
x_78 = lean::cnstr_get(x_59, 0);
lean::inc(x_78);
x_80 = lean::cnstr_get_scalar<unsigned char>(x_59, sizeof(void*)*1);
if (x_80 == 0)
{
obj* x_82; obj* x_84; obj* x_86; obj* x_89; obj* x_90; obj* x_93; obj* x_94; obj* x_95;
lean::dec(x_59);
x_82 = lean::cnstr_get(x_78, 0);
lean::inc(x_82);
x_84 = lean::cnstr_get(x_78, 1);
lean::inc(x_84);
x_86 = lean::cnstr_get(x_78, 2);
lean::inc(x_86);
lean::inc(x_56);
x_89 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_89, 0, x_56);
lean::closure_set(x_89, 1, x_86);
x_90 = lean::cnstr_get(x_78, 3);
lean::inc(x_90);
lean::dec(x_78);
x_93 = lean::alloc_cnstr(0, 4, 0);
lean::cnstr_set(x_93, 0, x_82);
lean::cnstr_set(x_93, 1, x_84);
lean::cnstr_set(x_93, 2, x_89);
lean::cnstr_set(x_93, 3, x_90);
x_94 = lean::alloc_cnstr(1, 1, 1);
lean::cnstr_set(x_94, 0, x_93);
lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_80);
x_95 = x_94;
return x_95;
}
else
{
lean::dec(x_56);
lean::dec(x_78);
return x_59;
}
}
}
else
{
obj* x_98; obj* x_99; obj* x_100; obj* x_101;
x_98 = lean::string_iterator_next(x_0);
x_99 = lean::alloc_cnstr(0, 0, 0);
;
x_100 = lean::box_uint32(x_47);
x_101 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_101, 0, x_100);
lean::cnstr_set(x_101, 1, x_98);
lean::cnstr_set(x_101, 2, x_99);
return x_101;
}
}
}
}
obj* _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2(obj* x_0) {
{
obj* x_1; obj* x_2; unsigned char x_3; obj* x_6;
lean::inc(x_0);
x_6 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__4(x_0);
if (lean::obj_tag(x_6) == 0)
{
obj* x_7; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16;
x_7 = lean::cnstr_get(x_6, 0);
lean::inc(x_7);
x_9 = lean::cnstr_get(x_6, 1);
lean::inc(x_9);
x_11 = lean::cnstr_get(x_6, 2);
lean::inc(x_11);
if (lean::is_shared(x_6)) {
lean::dec(x_6);
x_13 = lean::box(0);
} else {
lean::cnstr_release(x_6, 0);
lean::cnstr_release(x_6, 1);
lean::cnstr_release(x_6, 2);
x_13 = x_6;
}
x_14 = lean::mk_nat_obj(48u);
x_15 = lean::mk_nat_obj(55296u);
x_16 = lean::nat_dec_lt(x_14, x_15);
lean::dec(x_15);
if (lean::obj_tag(x_16) == 0)
{
obj* x_19; obj* x_20;
lean::dec(x_16);
x_19 = lean::mk_nat_obj(57343u);
x_20 = lean::nat_dec_lt(x_19, x_14);
lean::dec(x_19);
if (lean::obj_tag(x_20) == 0)
{
obj* x_24; obj* x_25; obj* x_28; obj* x_30; obj* x_31;
lean::dec(x_20);
lean::dec(x_14);
x_24 = lean::mk_nat_obj(0u);
x_25 = lean::nat_sub(x_7, x_24);
lean::dec(x_24);
lean::dec(x_7);
x_28 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
lean::inc(x_28);
if (lean::is_scalar(x_13)) {
x_30 = lean::alloc_cnstr(0, 3, 0);
} else {
x_30 = x_13;
}
lean::cnstr_set(x_30, 0, x_25);
lean::cnstr_set(x_30, 1, x_9);
lean::cnstr_set(x_30, 2, x_28);
x_31 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_11, x_30);
if (lean::obj_tag(x_31) == 0)
{
obj* x_33; obj* x_35;
lean::dec(x_0);
x_33 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_33);
x_35 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_31, x_33);
return x_35;
}
else
{
obj* x_36; unsigned char x_38;
x_36 = lean::cnstr_get(x_31, 0);
lean::inc(x_36);
x_38 = lean::cnstr_get_scalar<unsigned char>(x_31, sizeof(void*)*1);
x_1 = x_31;
x_2 = x_36;
x_3 = x_38;
goto lbl_4;
}
}
else
{
obj* x_40; obj* x_41;
lean::dec(x_20);
x_40 = lean::mk_nat_obj(1114112u);
x_41 = lean::nat_dec_lt(x_14, x_40);
lean::dec(x_40);
if (lean::obj_tag(x_41) == 0)
{
obj* x_45; obj* x_46; obj* x_49; obj* x_51; obj* x_52;
lean::dec(x_41);
lean::dec(x_14);
x_45 = lean::mk_nat_obj(0u);
x_46 = lean::nat_sub(x_7, x_45);
lean::dec(x_45);
lean::dec(x_7);
x_49 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
lean::inc(x_49);
if (lean::is_scalar(x_13)) {
x_51 = lean::alloc_cnstr(0, 3, 0);
} else {
x_51 = x_13;
}
lean::cnstr_set(x_51, 0, x_46);
lean::cnstr_set(x_51, 1, x_9);
lean::cnstr_set(x_51, 2, x_49);
x_52 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_11, x_51);
if (lean::obj_tag(x_52) == 0)
{
obj* x_54; obj* x_56;
lean::dec(x_0);
x_54 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_54);
x_56 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_52, x_54);
return x_56;
}
else
{
obj* x_57; unsigned char x_59;
x_57 = lean::cnstr_get(x_52, 0);
lean::inc(x_57);
x_59 = lean::cnstr_get_scalar<unsigned char>(x_52, sizeof(void*)*1);
x_1 = x_52;
x_2 = x_57;
x_3 = x_59;
goto lbl_4;
}
}
else
{
obj* x_61; obj* x_64; obj* x_66; obj* x_67;
lean::dec(x_41);
x_61 = lean::nat_sub(x_7, x_14);
lean::dec(x_14);
lean::dec(x_7);
x_64 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
lean::inc(x_64);
if (lean::is_scalar(x_13)) {
x_66 = lean::alloc_cnstr(0, 3, 0);
} else {
x_66 = x_13;
}
lean::cnstr_set(x_66, 0, x_61);
lean::cnstr_set(x_66, 1, x_9);
lean::cnstr_set(x_66, 2, x_64);
x_67 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_11, x_66);
if (lean::obj_tag(x_67) == 0)
{
obj* x_69; obj* x_71;
lean::dec(x_0);
x_69 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_69);
x_71 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_67, x_69);
return x_71;
}
else
{
obj* x_72; unsigned char x_74;
x_72 = lean::cnstr_get(x_67, 0);
lean::inc(x_72);
x_74 = lean::cnstr_get_scalar<unsigned char>(x_67, sizeof(void*)*1);
x_1 = x_67;
x_2 = x_72;
x_3 = x_74;
goto lbl_4;
}
}
}
}
else
{
obj* x_76; obj* x_79; obj* x_81; obj* x_82;
lean::dec(x_16);
x_76 = lean::nat_sub(x_7, x_14);
lean::dec(x_14);
lean::dec(x_7);
x_79 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
lean::inc(x_79);
if (lean::is_scalar(x_13)) {
x_81 = lean::alloc_cnstr(0, 3, 0);
} else {
x_81 = x_13;
}
lean::cnstr_set(x_81, 0, x_76);
lean::cnstr_set(x_81, 1, x_9);
lean::cnstr_set(x_81, 2, x_79);
x_82 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_11, x_81);
if (lean::obj_tag(x_82) == 0)
{
obj* x_84; obj* x_86;
lean::dec(x_0);
x_84 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_84);
x_86 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_82, x_84);
return x_86;
}
else
{
obj* x_87; unsigned char x_89;
x_87 = lean::cnstr_get(x_82, 0);
lean::inc(x_87);
x_89 = lean::cnstr_get_scalar<unsigned char>(x_82, sizeof(void*)*1);
x_1 = x_82;
x_2 = x_87;
x_3 = x_89;
goto lbl_4;
}
}
}
else
{
obj* x_90; unsigned char x_92; obj* x_93; obj* x_95; obj* x_96;
x_90 = lean::cnstr_get(x_6, 0);
lean::inc(x_90);
x_92 = lean::cnstr_get_scalar<unsigned char>(x_6, sizeof(void*)*1);
if (lean::is_shared(x_6)) {
lean::dec(x_6);
x_93 = lean::box(0);
} else {
lean::cnstr_release(x_6, 0);
x_93 = x_6;
}
lean::inc(x_90);
if (lean::is_scalar(x_93)) {
x_95 = lean::alloc_cnstr(1, 1, 1);
} else {
x_95 = x_93;
}
lean::cnstr_set(x_95, 0, x_90);
lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_92);
x_96 = x_95;
x_1 = x_96;
x_2 = x_90;
x_3 = x_92;
goto lbl_4;
}
lbl_4:
{
obj* x_97; obj* x_98; unsigned char x_99;
if (x_3 == 0)
{
obj* x_102; unsigned char x_104;
lean::dec(x_1);
x_104 = lean::string_iterator_has_next(x_0);
if (x_104 == 0)
{
obj* x_105; obj* x_106; obj* x_107; obj* x_112;
x_105 = lean::alloc_cnstr(0, 0, 0);
;
x_106 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1;
x_107 = _l_s5_mjoin_s6___rarg_s11___closed__1;
lean::inc(x_0);
lean::inc(x_105);
lean::inc(x_107);
lean::inc(x_106);
x_112 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(x_106, x_107, x_105, x_105, x_0);
x_102 = x_112;
goto lbl_103;
}
else
{
unsigned x_113; unsigned char x_114; unsigned char x_116; obj* x_118; obj* x_119; obj* x_120; unsigned char x_121;
x_113 = lean::string_iterator_curr(x_0);
x_118 = lean::mk_nat_obj(97u);
x_119 = lean::mk_nat_obj(55296u);
x_120 = lean::nat_dec_lt(x_118, x_119);
if (lean::obj_tag(x_120) == 0)
{
obj* x_124; obj* x_125;
lean::dec(x_120);
x_124 = lean::mk_nat_obj(57343u);
x_125 = lean::nat_dec_lt(x_124, x_118);
lean::dec(x_124);
if (lean::obj_tag(x_125) == 0)
{
obj* x_129; obj* x_130; obj* x_131;
lean::dec(x_118);
lean::dec(x_125);
x_129 = lean::mk_nat_obj(0u);
x_130 = lean::box_uint32(x_113);
x_131 = lean::nat_dec_le(x_129, x_130);
lean::dec(x_130);
lean::dec(x_129);
if (lean::obj_tag(x_131) == 0)
{
unsigned char x_136;
lean::dec(x_119);
lean::dec(x_131);
x_136 = 0;
x_114 = x_136;
goto lbl_115;
}
else
{
unsigned char x_138;
lean::dec(x_131);
x_138 = 1;
x_121 = x_138;
goto lbl_122;
}
}
else
{
obj* x_140; obj* x_141;
lean::dec(x_125);
x_140 = lean::mk_nat_obj(1114112u);
x_141 = lean::nat_dec_lt(x_118, x_140);
lean::dec(x_140);
if (lean::obj_tag(x_141) == 0)
{
obj* x_145; obj* x_146; obj* x_147;
lean::dec(x_118);
lean::dec(x_141);
x_145 = lean::mk_nat_obj(0u);
x_146 = lean::box_uint32(x_113);
x_147 = lean::nat_dec_le(x_145, x_146);
lean::dec(x_146);
lean::dec(x_145);
if (lean::obj_tag(x_147) == 0)
{
unsigned char x_152;
lean::dec(x_119);
lean::dec(x_147);
x_152 = 0;
x_114 = x_152;
goto lbl_115;
}
else
{
unsigned char x_154;
lean::dec(x_147);
x_154 = 1;
x_121 = x_154;
goto lbl_122;
}
}
else
{
obj* x_156; obj* x_157;
lean::dec(x_141);
x_156 = lean::box_uint32(x_113);
x_157 = lean::nat_dec_le(x_118, x_156);
lean::dec(x_156);
lean::dec(x_118);
if (lean::obj_tag(x_157) == 0)
{
unsigned char x_162;
lean::dec(x_119);
lean::dec(x_157);
x_162 = 0;
x_114 = x_162;
goto lbl_115;
}
else
{
unsigned char x_164;
lean::dec(x_157);
x_164 = 1;
x_121 = x_164;
goto lbl_122;
}
}
}
}
else
{
obj* x_166; obj* x_167;
lean::dec(x_120);
x_166 = lean::box_uint32(x_113);
x_167 = lean::nat_dec_le(x_118, x_166);
lean::dec(x_166);
lean::dec(x_118);
if (lean::obj_tag(x_167) == 0)
{
unsigned char x_172;
lean::dec(x_167);
lean::dec(x_119);
x_172 = 0;
x_114 = x_172;
goto lbl_115;
}
else
{
unsigned char x_174;
lean::dec(x_167);
x_174 = 1;
x_121 = x_174;
goto lbl_122;
}
}
lbl_115:
{
obj* x_175; obj* x_176; obj* x_178; obj* x_180; obj* x_181; obj* x_182; obj* x_186;
x_175 = _l_s4_char_s11_quote__core(x_113);
x_176 = _l_s4_char_s9_has__repr_s11___closed__1;
lean::inc(x_176);
x_178 = lean::string_append(x_176, x_175);
lean::dec(x_175);
x_180 = lean::string_append(x_178, x_176);
x_181 = lean::alloc_cnstr(0, 0, 0);
;
x_182 = _l_s5_mjoin_s6___rarg_s11___closed__1;
lean::inc(x_0);
lean::inc(x_181);
lean::inc(x_182);
x_186 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(x_180, x_182, x_181, x_181, x_0);
x_102 = x_186;
goto lbl_103;
}
lbl_117:
{
obj* x_188; obj* x_189; obj* x_190; obj* x_191;
lean::inc(x_0);
x_188 = lean::string_iterator_next(x_0);
x_189 = lean::alloc_cnstr(0, 0, 0);
;
x_190 = lean::box_uint32(x_113);
x_191 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_191, 0, x_190);
lean::cnstr_set(x_191, 1, x_188);
lean::cnstr_set(x_191, 2, x_189);
x_102 = x_191;
goto lbl_103;
}
lbl_122:
{
obj* x_192; obj* x_193;
x_192 = lean::mk_nat_obj(102u);
x_193 = lean::nat_dec_lt(x_192, x_119);
lean::dec(x_119);
if (lean::obj_tag(x_193) == 0)
{
obj* x_196; obj* x_197;
lean::dec(x_193);
x_196 = lean::mk_nat_obj(57343u);
x_197 = lean::nat_dec_lt(x_196, x_192);
lean::dec(x_196);
if (lean::obj_tag(x_197) == 0)
{
obj* x_201; obj* x_202; obj* x_203;
lean::dec(x_197);
lean::dec(x_192);
x_201 = lean::mk_nat_obj(0u);
x_202 = lean::box_uint32(x_113);
x_203 = lean::nat_dec_le(x_202, x_201);
lean::dec(x_201);
lean::dec(x_202);
if (lean::obj_tag(x_203) == 0)
{
unsigned char x_207;
lean::dec(x_203);
x_207 = 0;
x_114 = x_207;
goto lbl_115;
}
else
{
lean::dec(x_203);
if (x_121 == 0)
{
unsigned char x_209;
x_209 = 0;
x_114 = x_209;
goto lbl_115;
}
else
{
unsigned char x_210;
x_210 = 0;
x_116 = x_210;
goto lbl_117;
}
}
}
else
{
obj* x_212; obj* x_213;
lean::dec(x_197);
x_212 = lean::mk_nat_obj(1114112u);
x_213 = lean::nat_dec_lt(x_192, x_212);
lean::dec(x_212);
if (lean::obj_tag(x_213) == 0)
{
obj* x_217; obj* x_218; obj* x_219;
lean::dec(x_213);
lean::dec(x_192);
x_217 = lean::mk_nat_obj(0u);
x_218 = lean::box_uint32(x_113);
x_219 = lean::nat_dec_le(x_218, x_217);
lean::dec(x_217);
lean::dec(x_218);
if (lean::obj_tag(x_219) == 0)
{
unsigned char x_223;
lean::dec(x_219);
x_223 = 0;
x_114 = x_223;
goto lbl_115;
}
else
{
lean::dec(x_219);
if (x_121 == 0)
{
unsigned char x_225;
x_225 = 0;
x_114 = x_225;
goto lbl_115;
}
else
{
unsigned char x_226;
x_226 = 0;
x_116 = x_226;
goto lbl_117;
}
}
}
else
{
obj* x_228; obj* x_229;
lean::dec(x_213);
x_228 = lean::box_uint32(x_113);
x_229 = lean::nat_dec_le(x_228, x_192);
lean::dec(x_192);
lean::dec(x_228);
if (lean::obj_tag(x_229) == 0)
{
unsigned char x_233;
lean::dec(x_229);
x_233 = 0;
x_114 = x_233;
goto lbl_115;
}
else
{
lean::dec(x_229);
if (x_121 == 0)
{
unsigned char x_235;
x_235 = 0;
x_114 = x_235;
goto lbl_115;
}
else
{
unsigned char x_236;
x_236 = 0;
x_116 = x_236;
goto lbl_117;
}
}
}
}
}
else
{
obj* x_238; obj* x_239;
lean::dec(x_193);
x_238 = lean::box_uint32(x_113);
x_239 = lean::nat_dec_le(x_238, x_192);
lean::dec(x_192);
lean::dec(x_238);
if (lean::obj_tag(x_239) == 0)
{
unsigned char x_243;
lean::dec(x_239);
x_243 = 0;
x_114 = x_243;
goto lbl_115;
}
else
{
lean::dec(x_239);
if (x_121 == 0)
{
unsigned char x_245;
x_245 = 0;
x_114 = x_245;
goto lbl_115;
}
else
{
unsigned char x_246;
x_246 = 0;
x_116 = x_246;
goto lbl_117;
}
}
}
}
}
lbl_103:
{
obj* x_247; obj* x_249;
x_247 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
lean::inc(x_247);
x_249 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_247, x_102);
if (lean::obj_tag(x_249) == 0)
{
obj* x_250; obj* x_252; obj* x_254; obj* x_256; obj* x_257; obj* x_258; obj* x_259;
x_250 = lean::cnstr_get(x_249, 0);
lean::inc(x_250);
x_252 = lean::cnstr_get(x_249, 1);
lean::inc(x_252);
x_254 = lean::cnstr_get(x_249, 2);
lean::inc(x_254);
if (lean::is_shared(x_249)) {
lean::dec(x_249);
x_256 = lean::box(0);
} else {
lean::cnstr_release(x_249, 0);
lean::cnstr_release(x_249, 1);
lean::cnstr_release(x_249, 2);
x_256 = x_249;
}
x_257 = lean::mk_nat_obj(97u);
x_258 = lean::mk_nat_obj(55296u);
x_259 = lean::nat_dec_lt(x_257, x_258);
lean::dec(x_258);
if (lean::obj_tag(x_259) == 0)
{
obj* x_262; obj* x_263;
lean::dec(x_259);
x_262 = lean::mk_nat_obj(57343u);
x_263 = lean::nat_dec_lt(x_262, x_257);
lean::dec(x_262);
if (lean::obj_tag(x_263) == 0)
{
obj* x_267; obj* x_268; obj* x_271; obj* x_272; obj* x_276; obj* x_277;
lean::dec(x_263);
lean::dec(x_257);
x_267 = lean::mk_nat_obj(0u);
x_268 = lean::nat_sub(x_250, x_267);
lean::dec(x_267);
lean::dec(x_250);
x_271 = lean::mk_nat_obj(10u);
x_272 = lean::nat_add(x_271, x_268);
lean::dec(x_268);
lean::dec(x_271);
lean::inc(x_247);
if (lean::is_scalar(x_256)) {
x_276 = lean::alloc_cnstr(0, 3, 0);
} else {
x_276 = x_256;
}
lean::cnstr_set(x_276, 0, x_272);
lean::cnstr_set(x_276, 1, x_252);
lean::cnstr_set(x_276, 2, x_247);
x_277 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_254, x_276);
if (lean::obj_tag(x_277) == 0)
{
obj* x_279; obj* x_280; obj* x_282;
lean::dec(x_0);
x_279 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_2, x_277);
x_280 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_280);
x_282 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_279, x_280);
return x_282;
}
else
{
obj* x_283; unsigned char x_285;
x_283 = lean::cnstr_get(x_277, 0);
lean::inc(x_283);
x_285 = lean::cnstr_get_scalar<unsigned char>(x_277, sizeof(void*)*1);
x_97 = x_277;
x_98 = x_283;
x_99 = x_285;
goto lbl_100;
}
}
else
{
obj* x_287; obj* x_288;
lean::dec(x_263);
x_287 = lean::mk_nat_obj(1114112u);
x_288 = lean::nat_dec_lt(x_257, x_287);
lean::dec(x_287);
if (lean::obj_tag(x_288) == 0)
{
obj* x_292; obj* x_293; obj* x_296; obj* x_297; obj* x_301; obj* x_302;
lean::dec(x_257);
lean::dec(x_288);
x_292 = lean::mk_nat_obj(0u);
x_293 = lean::nat_sub(x_250, x_292);
lean::dec(x_292);
lean::dec(x_250);
x_296 = lean::mk_nat_obj(10u);
x_297 = lean::nat_add(x_296, x_293);
lean::dec(x_293);
lean::dec(x_296);
lean::inc(x_247);
if (lean::is_scalar(x_256)) {
x_301 = lean::alloc_cnstr(0, 3, 0);
} else {
x_301 = x_256;
}
lean::cnstr_set(x_301, 0, x_297);
lean::cnstr_set(x_301, 1, x_252);
lean::cnstr_set(x_301, 2, x_247);
x_302 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_254, x_301);
if (lean::obj_tag(x_302) == 0)
{
obj* x_304; obj* x_305; obj* x_307;
lean::dec(x_0);
x_304 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_2, x_302);
x_305 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_305);
x_307 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_304, x_305);
return x_307;
}
else
{
obj* x_308; unsigned char x_310;
x_308 = lean::cnstr_get(x_302, 0);
lean::inc(x_308);
x_310 = lean::cnstr_get_scalar<unsigned char>(x_302, sizeof(void*)*1);
x_97 = x_302;
x_98 = x_308;
x_99 = x_310;
goto lbl_100;
}
}
else
{
obj* x_312; obj* x_315; obj* x_316; obj* x_320; obj* x_321;
lean::dec(x_288);
x_312 = lean::nat_sub(x_250, x_257);
lean::dec(x_257);
lean::dec(x_250);
x_315 = lean::mk_nat_obj(10u);
x_316 = lean::nat_add(x_315, x_312);
lean::dec(x_312);
lean::dec(x_315);
lean::inc(x_247);
if (lean::is_scalar(x_256)) {
x_320 = lean::alloc_cnstr(0, 3, 0);
} else {
x_320 = x_256;
}
lean::cnstr_set(x_320, 0, x_316);
lean::cnstr_set(x_320, 1, x_252);
lean::cnstr_set(x_320, 2, x_247);
x_321 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_254, x_320);
if (lean::obj_tag(x_321) == 0)
{
obj* x_323; obj* x_324; obj* x_326;
lean::dec(x_0);
x_323 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_2, x_321);
x_324 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_324);
x_326 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_323, x_324);
return x_326;
}
else
{
obj* x_327; unsigned char x_329;
x_327 = lean::cnstr_get(x_321, 0);
lean::inc(x_327);
x_329 = lean::cnstr_get_scalar<unsigned char>(x_321, sizeof(void*)*1);
x_97 = x_321;
x_98 = x_327;
x_99 = x_329;
goto lbl_100;
}
}
}
}
else
{
obj* x_331; obj* x_334; obj* x_335; obj* x_339; obj* x_340;
lean::dec(x_259);
x_331 = lean::nat_sub(x_250, x_257);
lean::dec(x_257);
lean::dec(x_250);
x_334 = lean::mk_nat_obj(10u);
x_335 = lean::nat_add(x_334, x_331);
lean::dec(x_331);
lean::dec(x_334);
lean::inc(x_247);
if (lean::is_scalar(x_256)) {
x_339 = lean::alloc_cnstr(0, 3, 0);
} else {
x_339 = x_256;
}
lean::cnstr_set(x_339, 0, x_335);
lean::cnstr_set(x_339, 1, x_252);
lean::cnstr_set(x_339, 2, x_247);
x_340 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_254, x_339);
if (lean::obj_tag(x_340) == 0)
{
obj* x_342; obj* x_343; obj* x_345;
lean::dec(x_0);
x_342 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_2, x_340);
x_343 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_343);
x_345 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_342, x_343);
return x_345;
}
else
{
obj* x_346; unsigned char x_348;
x_346 = lean::cnstr_get(x_340, 0);
lean::inc(x_346);
x_348 = lean::cnstr_get_scalar<unsigned char>(x_340, sizeof(void*)*1);
x_97 = x_340;
x_98 = x_346;
x_99 = x_348;
goto lbl_100;
}
}
}
else
{
obj* x_350; unsigned char x_352; obj* x_353; obj* x_355; obj* x_356;
lean::dec(x_247);
x_350 = lean::cnstr_get(x_249, 0);
lean::inc(x_350);
x_352 = lean::cnstr_get_scalar<unsigned char>(x_249, sizeof(void*)*1);
if (lean::is_shared(x_249)) {
lean::dec(x_249);
x_353 = lean::box(0);
} else {
lean::cnstr_release(x_249, 0);
x_353 = x_249;
}
lean::inc(x_350);
if (lean::is_scalar(x_353)) {
x_355 = lean::alloc_cnstr(1, 1, 1);
} else {
x_355 = x_353;
}
lean::cnstr_set(x_355, 0, x_350);
lean::cnstr_set_scalar(x_355, sizeof(void*)*1, x_352);
x_356 = x_355;
x_97 = x_356;
x_98 = x_350;
x_99 = x_352;
goto lbl_100;
}
}
}
else
{
obj* x_359; obj* x_361;
lean::dec(x_2);
lean::dec(x_0);
x_359 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_359);
x_361 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_1, x_359);
return x_361;
}
lbl_100:
{
if (x_99 == 0)
{
obj* x_363; unsigned char x_365;
lean::dec(x_97);
x_365 = lean::string_iterator_has_next(x_0);
if (x_365 == 0)
{
obj* x_366; obj* x_367; obj* x_368; obj* x_372;
x_366 = lean::alloc_cnstr(0, 0, 0);
;
x_367 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1;
x_368 = _l_s5_mjoin_s6___rarg_s11___closed__1;
lean::inc(x_366);
lean::inc(x_368);
lean::inc(x_367);
x_372 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(x_367, x_368, x_366, x_366, x_0);
x_363 = x_372;
goto lbl_364;
}
else
{
unsigned x_373; unsigned char x_374; unsigned char x_376; obj* x_378; obj* x_379; obj* x_380; unsigned char x_381;
x_373 = lean::string_iterator_curr(x_0);
x_378 = lean::mk_nat_obj(65u);
x_379 = lean::mk_nat_obj(55296u);
x_380 = lean::nat_dec_lt(x_378, x_379);
if (lean::obj_tag(x_380) == 0)
{
obj* x_384; obj* x_385;
lean::dec(x_380);
x_384 = lean::mk_nat_obj(57343u);
x_385 = lean::nat_dec_lt(x_384, x_378);
lean::dec(x_384);
if (lean::obj_tag(x_385) == 0)
{
obj* x_389; obj* x_390; obj* x_391;
lean::dec(x_385);
lean::dec(x_378);
x_389 = lean::mk_nat_obj(0u);
x_390 = lean::box_uint32(x_373);
x_391 = lean::nat_dec_le(x_389, x_390);
lean::dec(x_390);
lean::dec(x_389);
if (lean::obj_tag(x_391) == 0)
{
unsigned char x_396;
lean::dec(x_391);
lean::dec(x_379);
x_396 = 0;
x_374 = x_396;
goto lbl_375;
}
else
{
unsigned char x_398;
lean::dec(x_391);
x_398 = 1;
x_381 = x_398;
goto lbl_382;
}
}
else
{
obj* x_400; obj* x_401;
lean::dec(x_385);
x_400 = lean::mk_nat_obj(1114112u);
x_401 = lean::nat_dec_lt(x_378, x_400);
lean::dec(x_400);
if (lean::obj_tag(x_401) == 0)
{
obj* x_405; obj* x_406; obj* x_407;
lean::dec(x_401);
lean::dec(x_378);
x_405 = lean::mk_nat_obj(0u);
x_406 = lean::box_uint32(x_373);
x_407 = lean::nat_dec_le(x_405, x_406);
lean::dec(x_406);
lean::dec(x_405);
if (lean::obj_tag(x_407) == 0)
{
unsigned char x_412;
lean::dec(x_407);
lean::dec(x_379);
x_412 = 0;
x_374 = x_412;
goto lbl_375;
}
else
{
unsigned char x_414;
lean::dec(x_407);
x_414 = 1;
x_381 = x_414;
goto lbl_382;
}
}
else
{
obj* x_416; obj* x_417;
lean::dec(x_401);
x_416 = lean::box_uint32(x_373);
x_417 = lean::nat_dec_le(x_378, x_416);
lean::dec(x_416);
lean::dec(x_378);
if (lean::obj_tag(x_417) == 0)
{
unsigned char x_422;
lean::dec(x_379);
lean::dec(x_417);
x_422 = 0;
x_374 = x_422;
goto lbl_375;
}
else
{
unsigned char x_424;
lean::dec(x_417);
x_424 = 1;
x_381 = x_424;
goto lbl_382;
}
}
}
}
else
{
obj* x_426; obj* x_427;
lean::dec(x_380);
x_426 = lean::box_uint32(x_373);
x_427 = lean::nat_dec_le(x_378, x_426);
lean::dec(x_426);
lean::dec(x_378);
if (lean::obj_tag(x_427) == 0)
{
unsigned char x_432;
lean::dec(x_427);
lean::dec(x_379);
x_432 = 0;
x_374 = x_432;
goto lbl_375;
}
else
{
unsigned char x_434;
lean::dec(x_427);
x_434 = 1;
x_381 = x_434;
goto lbl_382;
}
}
lbl_375:
{
obj* x_435; obj* x_436; obj* x_438; obj* x_440; obj* x_441; obj* x_442; obj* x_445;
x_435 = _l_s4_char_s11_quote__core(x_373);
x_436 = _l_s4_char_s9_has__repr_s11___closed__1;
lean::inc(x_436);
x_438 = lean::string_append(x_436, x_435);
lean::dec(x_435);
x_440 = lean::string_append(x_438, x_436);
x_441 = lean::alloc_cnstr(0, 0, 0);
;
x_442 = _l_s5_mjoin_s6___rarg_s11___closed__1;
lean::inc(x_441);
lean::inc(x_442);
x_445 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(x_440, x_442, x_441, x_441, x_0);
x_363 = x_445;
goto lbl_364;
}
lbl_377:
{
obj* x_446; obj* x_447; obj* x_448; obj* x_449;
x_446 = lean::string_iterator_next(x_0);
x_447 = lean::alloc_cnstr(0, 0, 0);
;
x_448 = lean::box_uint32(x_373);
x_449 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_449, 0, x_448);
lean::cnstr_set(x_449, 1, x_446);
lean::cnstr_set(x_449, 2, x_447);
x_363 = x_449;
goto lbl_364;
}
lbl_382:
{
obj* x_450; obj* x_451;
x_450 = lean::mk_nat_obj(70u);
x_451 = lean::nat_dec_lt(x_450, x_379);
lean::dec(x_379);
if (lean::obj_tag(x_451) == 0)
{
obj* x_454; obj* x_455;
lean::dec(x_451);
x_454 = lean::mk_nat_obj(57343u);
x_455 = lean::nat_dec_lt(x_454, x_450);
lean::dec(x_454);
if (lean::obj_tag(x_455) == 0)
{
obj* x_459; obj* x_460; obj* x_461;
lean::dec(x_450);
lean::dec(x_455);
x_459 = lean::mk_nat_obj(0u);
x_460 = lean::box_uint32(x_373);
x_461 = lean::nat_dec_le(x_460, x_459);
lean::dec(x_459);
lean::dec(x_460);
if (lean::obj_tag(x_461) == 0)
{
unsigned char x_465;
lean::dec(x_461);
x_465 = 0;
x_374 = x_465;
goto lbl_375;
}
else
{
lean::dec(x_461);
if (x_381 == 0)
{
unsigned char x_467;
x_467 = 0;
x_374 = x_467;
goto lbl_375;
}
else
{
unsigned char x_468;
x_468 = 0;
x_376 = x_468;
goto lbl_377;
}
}
}
else
{
obj* x_470; obj* x_471;
lean::dec(x_455);
x_470 = lean::mk_nat_obj(1114112u);
x_471 = lean::nat_dec_lt(x_450, x_470);
lean::dec(x_470);
if (lean::obj_tag(x_471) == 0)
{
obj* x_475; obj* x_476; obj* x_477;
lean::dec(x_471);
lean::dec(x_450);
x_475 = lean::mk_nat_obj(0u);
x_476 = lean::box_uint32(x_373);
x_477 = lean::nat_dec_le(x_476, x_475);
lean::dec(x_475);
lean::dec(x_476);
if (lean::obj_tag(x_477) == 0)
{
unsigned char x_481;
lean::dec(x_477);
x_481 = 0;
x_374 = x_481;
goto lbl_375;
}
else
{
lean::dec(x_477);
if (x_381 == 0)
{
unsigned char x_483;
x_483 = 0;
x_374 = x_483;
goto lbl_375;
}
else
{
unsigned char x_484;
x_484 = 0;
x_376 = x_484;
goto lbl_377;
}
}
}
else
{
obj* x_486; obj* x_487;
lean::dec(x_471);
x_486 = lean::box_uint32(x_373);
x_487 = lean::nat_dec_le(x_486, x_450);
lean::dec(x_450);
lean::dec(x_486);
if (lean::obj_tag(x_487) == 0)
{
unsigned char x_491;
lean::dec(x_487);
x_491 = 0;
x_374 = x_491;
goto lbl_375;
}
else
{
lean::dec(x_487);
if (x_381 == 0)
{
unsigned char x_493;
x_493 = 0;
x_374 = x_493;
goto lbl_375;
}
else
{
unsigned char x_494;
x_494 = 0;
x_376 = x_494;
goto lbl_377;
}
}
}
}
}
else
{
obj* x_496; obj* x_497;
lean::dec(x_451);
x_496 = lean::box_uint32(x_373);
x_497 = lean::nat_dec_le(x_496, x_450);
lean::dec(x_450);
lean::dec(x_496);
if (lean::obj_tag(x_497) == 0)
{
unsigned char x_501;
lean::dec(x_497);
x_501 = 0;
x_374 = x_501;
goto lbl_375;
}
else
{
lean::dec(x_497);
if (x_381 == 0)
{
unsigned char x_503;
x_503 = 0;
x_374 = x_503;
goto lbl_375;
}
else
{
unsigned char x_504;
x_504 = 0;
x_376 = x_504;
goto lbl_377;
}
}
}
}
}
lbl_364:
{
obj* x_505; obj* x_507;
x_505 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
lean::inc(x_505);
x_507 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_505, x_363);
if (lean::obj_tag(x_507) == 0)
{
obj* x_508; obj* x_510; obj* x_512; obj* x_514; obj* x_515; obj* x_516; obj* x_517;
x_508 = lean::cnstr_get(x_507, 0);
lean::inc(x_508);
x_510 = lean::cnstr_get(x_507, 1);
lean::inc(x_510);
x_512 = lean::cnstr_get(x_507, 2);
lean::inc(x_512);
if (lean::is_shared(x_507)) {
lean::dec(x_507);
x_514 = lean::box(0);
} else {
lean::cnstr_release(x_507, 0);
lean::cnstr_release(x_507, 1);
lean::cnstr_release(x_507, 2);
x_514 = x_507;
}
x_515 = lean::mk_nat_obj(65u);
x_516 = lean::mk_nat_obj(55296u);
x_517 = lean::nat_dec_lt(x_515, x_516);
lean::dec(x_516);
if (lean::obj_tag(x_517) == 0)
{
obj* x_520; obj* x_521;
lean::dec(x_517);
x_520 = lean::mk_nat_obj(57343u);
x_521 = lean::nat_dec_lt(x_520, x_515);
lean::dec(x_520);
if (lean::obj_tag(x_521) == 0)
{
obj* x_525; obj* x_526; obj* x_529; obj* x_530; obj* x_534; obj* x_535; obj* x_536; obj* x_537; obj* x_538; obj* x_540;
lean::dec(x_515);
lean::dec(x_521);
x_525 = lean::mk_nat_obj(0u);
x_526 = lean::nat_sub(x_508, x_525);
lean::dec(x_525);
lean::dec(x_508);
x_529 = lean::mk_nat_obj(10u);
x_530 = lean::nat_add(x_529, x_526);
lean::dec(x_526);
lean::dec(x_529);
lean::inc(x_505);
if (lean::is_scalar(x_514)) {
x_534 = lean::alloc_cnstr(0, 3, 0);
} else {
x_534 = x_514;
}
lean::cnstr_set(x_534, 0, x_530);
lean::cnstr_set(x_534, 1, x_510);
lean::cnstr_set(x_534, 2, x_505);
x_535 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_512, x_534);
x_536 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_98, x_535);
x_537 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_2, x_536);
x_538 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_538);
x_540 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_537, x_538);
return x_540;
}
else
{
obj* x_542; obj* x_543;
lean::dec(x_521);
x_542 = lean::mk_nat_obj(1114112u);
x_543 = lean::nat_dec_lt(x_515, x_542);
lean::dec(x_542);
if (lean::obj_tag(x_543) == 0)
{
obj* x_547; obj* x_548; obj* x_551; obj* x_552; obj* x_556; obj* x_557; obj* x_558; obj* x_559; obj* x_560; obj* x_562;
lean::dec(x_543);
lean::dec(x_515);
x_547 = lean::mk_nat_obj(0u);
x_548 = lean::nat_sub(x_508, x_547);
lean::dec(x_547);
lean::dec(x_508);
x_551 = lean::mk_nat_obj(10u);
x_552 = lean::nat_add(x_551, x_548);
lean::dec(x_548);
lean::dec(x_551);
lean::inc(x_505);
if (lean::is_scalar(x_514)) {
x_556 = lean::alloc_cnstr(0, 3, 0);
} else {
x_556 = x_514;
}
lean::cnstr_set(x_556, 0, x_552);
lean::cnstr_set(x_556, 1, x_510);
lean::cnstr_set(x_556, 2, x_505);
x_557 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_512, x_556);
x_558 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_98, x_557);
x_559 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_2, x_558);
x_560 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_560);
x_562 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_559, x_560);
return x_562;
}
else
{
obj* x_564; obj* x_567; obj* x_568; obj* x_572; obj* x_573; obj* x_574; obj* x_575; obj* x_576; obj* x_578;
lean::dec(x_543);
x_564 = lean::nat_sub(x_508, x_515);
lean::dec(x_515);
lean::dec(x_508);
x_567 = lean::mk_nat_obj(10u);
x_568 = lean::nat_add(x_567, x_564);
lean::dec(x_564);
lean::dec(x_567);
lean::inc(x_505);
if (lean::is_scalar(x_514)) {
x_572 = lean::alloc_cnstr(0, 3, 0);
} else {
x_572 = x_514;
}
lean::cnstr_set(x_572, 0, x_568);
lean::cnstr_set(x_572, 1, x_510);
lean::cnstr_set(x_572, 2, x_505);
x_573 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_512, x_572);
x_574 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_98, x_573);
x_575 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_2, x_574);
x_576 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_576);
x_578 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_575, x_576);
return x_578;
}
}
}
else
{
obj* x_580; obj* x_583; obj* x_584; obj* x_588; obj* x_589; obj* x_590; obj* x_591; obj* x_592; obj* x_594;
lean::dec(x_517);
x_580 = lean::nat_sub(x_508, x_515);
lean::dec(x_515);
lean::dec(x_508);
x_583 = lean::mk_nat_obj(10u);
x_584 = lean::nat_add(x_583, x_580);
lean::dec(x_580);
lean::dec(x_583);
lean::inc(x_505);
if (lean::is_scalar(x_514)) {
x_588 = lean::alloc_cnstr(0, 3, 0);
} else {
x_588 = x_514;
}
lean::cnstr_set(x_588, 0, x_584);
lean::cnstr_set(x_588, 1, x_510);
lean::cnstr_set(x_588, 2, x_505);
x_589 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_512, x_588);
x_590 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_98, x_589);
x_591 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_2, x_590);
x_592 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_592);
x_594 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_591, x_592);
return x_594;
}
}
else
{
obj* x_596; unsigned char x_598; obj* x_599; obj* x_600; obj* x_601; obj* x_602; obj* x_603; obj* x_604; obj* x_606;
lean::dec(x_505);
x_596 = lean::cnstr_get(x_507, 0);
lean::inc(x_596);
x_598 = lean::cnstr_get_scalar<unsigned char>(x_507, sizeof(void*)*1);
if (lean::is_shared(x_507)) {
lean::dec(x_507);
x_599 = lean::box(0);
} else {
lean::cnstr_release(x_507, 0);
x_599 = x_507;
}
if (lean::is_scalar(x_599)) {
x_600 = lean::alloc_cnstr(1, 1, 1);
} else {
x_600 = x_599;
}
lean::cnstr_set(x_600, 0, x_596);
lean::cnstr_set_scalar(x_600, sizeof(void*)*1, x_598);
x_601 = x_600;
x_602 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_98, x_601);
x_603 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_2, x_602);
x_604 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_604);
x_606 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_603, x_604);
return x_606;
}
}
}
else
{
obj* x_609; obj* x_610; obj* x_612;
lean::dec(x_0);
lean::dec(x_98);
x_609 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_2, x_97);
x_610 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1;
lean::inc(x_610);
x_612 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_609, x_610);
return x_612;
}
}
}
}
}
obj* _init__l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1() {
{
obj* x_0; obj* x_1;
x_0 = lean::mk_string("hexadecimal");
x_1 = lean::alloc_closure(reinterpret_cast<void*>(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1);
lean::closure_set(x_1, 0, x_0);
return x_1;
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_alpha_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__5(obj* x_0) {
{
unsigned char x_1;
x_1 = lean::string_iterator_has_next(x_0);
if (x_1 == 0)
{
obj* x_2; obj* x_3; obj* x_4; obj* x_8;
x_2 = lean::alloc_cnstr(0, 0, 0);
;
x_3 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1;
x_4 = _l_s5_mjoin_s6___rarg_s11___closed__1;
lean::inc(x_2);
lean::inc(x_4);
lean::inc(x_3);
x_8 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(x_3, x_4, x_2, x_2, x_0);
if (lean::obj_tag(x_8) == 0)
{
obj* x_9; obj* x_11; obj* x_13;
x_9 = lean::cnstr_get(x_8, 0);
lean::inc(x_9);
x_11 = lean::cnstr_get(x_8, 1);
lean::inc(x_11);
x_13 = lean::cnstr_get(x_8, 2);
lean::inc(x_13);
if (lean::obj_tag(x_13) == 0)
{
lean::dec(x_13);
lean::dec(x_4);
lean::dec(x_9);
lean::dec(x_11);
return x_8;
}
else
{
obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26;
lean::dec(x_8);
x_20 = lean::cnstr_get(x_13, 0);
lean::inc(x_20);
if (lean::is_shared(x_13)) {
lean::dec(x_13);
x_22 = lean::box(0);
} else {
lean::cnstr_release(x_13, 0);
x_22 = x_13;
}
lean::inc(x_4);
x_24 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_24, 0, x_4);
lean::closure_set(x_24, 1, x_20);
if (lean::is_scalar(x_22)) {
x_25 = lean::alloc_cnstr(1, 1, 0);
} else {
x_25 = x_22;
}
lean::cnstr_set(x_25, 0, x_24);
x_26 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_26, 0, x_9);
lean::cnstr_set(x_26, 1, x_11);
lean::cnstr_set(x_26, 2, x_25);
return x_26;
}
}
else
{
obj* x_27; unsigned char x_29;
x_27 = lean::cnstr_get(x_8, 0);
lean::inc(x_27);
x_29 = lean::cnstr_get_scalar<unsigned char>(x_8, sizeof(void*)*1);
if (x_29 == 0)
{
obj* x_31; obj* x_33; obj* x_35; obj* x_38; obj* x_39; obj* x_42; obj* x_43; obj* x_44;
lean::dec(x_8);
x_31 = lean::cnstr_get(x_27, 0);
lean::inc(x_31);
x_33 = lean::cnstr_get(x_27, 1);
lean::inc(x_33);
x_35 = lean::cnstr_get(x_27, 2);
lean::inc(x_35);
lean::inc(x_4);
x_38 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_38, 0, x_4);
lean::closure_set(x_38, 1, x_35);
x_39 = lean::cnstr_get(x_27, 3);
lean::inc(x_39);
lean::dec(x_27);
x_42 = lean::alloc_cnstr(0, 4, 0);
lean::cnstr_set(x_42, 0, x_31);
lean::cnstr_set(x_42, 1, x_33);
lean::cnstr_set(x_42, 2, x_38);
lean::cnstr_set(x_42, 3, x_39);
x_43 = lean::alloc_cnstr(1, 1, 1);
lean::cnstr_set(x_43, 0, x_42);
lean::cnstr_set_scalar(x_43, sizeof(void*)*1, x_29);
x_44 = x_43;
return x_44;
}
else
{
lean::dec(x_4);
lean::dec(x_27);
return x_8;
}
}
}
else
{
unsigned x_47; unsigned char x_48;
x_47 = lean::string_iterator_curr(x_0);
x_48 = _l_s4_char_s9_is__alpha(x_47);
if (x_48 == 0)
{
obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_59;
x_49 = _l_s4_char_s11_quote__core(x_47);
x_50 = _l_s4_char_s9_has__repr_s11___closed__1;
lean::inc(x_50);
x_52 = lean::string_append(x_50, x_49);
lean::dec(x_49);
x_54 = lean::string_append(x_52, x_50);
x_55 = lean::alloc_cnstr(0, 0, 0);
;
x_56 = _l_s5_mjoin_s6___rarg_s11___closed__1;
lean::inc(x_55);
lean::inc(x_56);
x_59 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(x_54, x_56, x_55, x_55, x_0);
if (lean::obj_tag(x_59) == 0)
{
obj* x_60; obj* x_62; obj* x_64;
x_60 = lean::cnstr_get(x_59, 0);
lean::inc(x_60);
x_62 = lean::cnstr_get(x_59, 1);
lean::inc(x_62);
x_64 = lean::cnstr_get(x_59, 2);
lean::inc(x_64);
if (lean::obj_tag(x_64) == 0)
{
lean::dec(x_56);
lean::dec(x_60);
lean::dec(x_62);
lean::dec(x_64);
return x_59;
}
else
{
obj* x_71; obj* x_73; obj* x_75; obj* x_76; obj* x_77;
lean::dec(x_59);
x_71 = lean::cnstr_get(x_64, 0);
lean::inc(x_71);
if (lean::is_shared(x_64)) {
lean::dec(x_64);
x_73 = lean::box(0);
} else {
lean::cnstr_release(x_64, 0);
x_73 = x_64;
}
lean::inc(x_56);
x_75 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_75, 0, x_56);
lean::closure_set(x_75, 1, x_71);
if (lean::is_scalar(x_73)) {
x_76 = lean::alloc_cnstr(1, 1, 0);
} else {
x_76 = x_73;
}
lean::cnstr_set(x_76, 0, x_75);
x_77 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_77, 0, x_60);
lean::cnstr_set(x_77, 1, x_62);
lean::cnstr_set(x_77, 2, x_76);
return x_77;
}
}
else
{
obj* x_78; unsigned char x_80;
x_78 = lean::cnstr_get(x_59, 0);
lean::inc(x_78);
x_80 = lean::cnstr_get_scalar<unsigned char>(x_59, sizeof(void*)*1);
if (x_80 == 0)
{
obj* x_82; obj* x_84; obj* x_86; obj* x_89; obj* x_90; obj* x_93; obj* x_94; obj* x_95;
lean::dec(x_59);
x_82 = lean::cnstr_get(x_78, 0);
lean::inc(x_82);
x_84 = lean::cnstr_get(x_78, 1);
lean::inc(x_84);
x_86 = lean::cnstr_get(x_78, 2);
lean::inc(x_86);
lean::inc(x_56);
x_89 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_89, 0, x_56);
lean::closure_set(x_89, 1, x_86);
x_90 = lean::cnstr_get(x_78, 3);
lean::inc(x_90);
lean::dec(x_78);
x_93 = lean::alloc_cnstr(0, 4, 0);
lean::cnstr_set(x_93, 0, x_82);
lean::cnstr_set(x_93, 1, x_84);
lean::cnstr_set(x_93, 2, x_89);
lean::cnstr_set(x_93, 3, x_90);
x_94 = lean::alloc_cnstr(1, 1, 1);
lean::cnstr_set(x_94, 0, x_93);
lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_80);
x_95 = x_94;
return x_95;
}
else
{
lean::dec(x_56);
lean::dec(x_78);
return x_59;
}
}
}
else
{
obj* x_98; obj* x_99; obj* x_100; obj* x_101;
x_98 = lean::string_iterator_next(x_0);
x_99 = lean::alloc_cnstr(0, 0, 0);
;
x_100 = lean::box_uint32(x_47);
x_101 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_101, 0, x_100);
lean::cnstr_set(x_101, 1, x_98);
lean::cnstr_set(x_101, 2, x_99);
return x_101;
}
}
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s3_eoi_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__6(obj* x_0) {
{
obj* x_1; obj* x_2; obj* x_3;
x_1 = lean::string_iterator_remaining(x_0);
x_2 = lean::mk_nat_obj(0u);
x_3 = lean::nat_dec_eq(x_1, x_2);
lean::dec(x_2);
lean::dec(x_1);
if (lean::obj_tag(x_3) == 0)
{
unsigned x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_18;
lean::dec(x_3);
x_7 = lean::string_iterator_curr(x_0);
x_8 = _l_s4_char_s11_quote__core(x_7);
x_9 = _l_s4_char_s9_has__repr_s11___closed__1;
lean::inc(x_9);
x_11 = lean::string_append(x_9, x_8);
lean::dec(x_8);
x_13 = lean::string_append(x_11, x_9);
x_14 = lean::alloc_cnstr(0, 0, 0);
;
x_15 = _l_s4_lean_s6_parser_s13_monad__parsec_s3_eoi_s6___rarg_s11___lambda__1_s11___closed__1;
lean::inc(x_14);
lean::inc(x_15);
x_18 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(x_13, x_15, x_14, x_14, x_0);
if (lean::obj_tag(x_18) == 0)
{
obj* x_19; obj* x_21; obj* x_23;
x_19 = lean::cnstr_get(x_18, 0);
lean::inc(x_19);
x_21 = lean::cnstr_get(x_18, 1);
lean::inc(x_21);
x_23 = lean::cnstr_get(x_18, 2);
lean::inc(x_23);
if (lean::obj_tag(x_23) == 0)
{
lean::dec(x_19);
lean::dec(x_21);
lean::dec(x_23);
return x_18;
}
else
{
obj* x_29; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36;
lean::dec(x_18);
x_29 = lean::cnstr_get(x_23, 0);
lean::inc(x_29);
if (lean::is_shared(x_23)) {
lean::dec(x_23);
x_31 = lean::box(0);
} else {
lean::cnstr_release(x_23, 0);
x_31 = x_23;
}
x_32 = _l_s5_mjoin_s6___rarg_s11___closed__1;
lean::inc(x_32);
x_34 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_34, 0, x_32);
lean::closure_set(x_34, 1, x_29);
if (lean::is_scalar(x_31)) {
x_35 = lean::alloc_cnstr(1, 1, 0);
} else {
x_35 = x_31;
}
lean::cnstr_set(x_35, 0, x_34);
x_36 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_36, 0, x_19);
lean::cnstr_set(x_36, 1, x_21);
lean::cnstr_set(x_36, 2, x_35);
return x_36;
}
}
else
{
obj* x_37; unsigned char x_39;
x_37 = lean::cnstr_get(x_18, 0);
lean::inc(x_37);
x_39 = lean::cnstr_get_scalar<unsigned char>(x_18, sizeof(void*)*1);
if (x_39 == 0)
{
obj* x_41; obj* x_43; obj* x_45; obj* x_47; obj* x_49; obj* x_50; obj* x_53; obj* x_54; obj* x_55;
lean::dec(x_18);
x_41 = lean::cnstr_get(x_37, 0);
lean::inc(x_41);
x_43 = lean::cnstr_get(x_37, 1);
lean::inc(x_43);
x_45 = lean::cnstr_get(x_37, 2);
lean::inc(x_45);
x_47 = _l_s5_mjoin_s6___rarg_s11___closed__1;
lean::inc(x_47);
x_49 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_49, 0, x_47);
lean::closure_set(x_49, 1, x_45);
x_50 = lean::cnstr_get(x_37, 3);
lean::inc(x_50);
lean::dec(x_37);
x_53 = lean::alloc_cnstr(0, 4, 0);
lean::cnstr_set(x_53, 0, x_41);
lean::cnstr_set(x_53, 1, x_43);
lean::cnstr_set(x_53, 2, x_49);
lean::cnstr_set(x_53, 3, x_50);
x_54 = lean::alloc_cnstr(1, 1, 1);
lean::cnstr_set(x_54, 0, x_53);
lean::cnstr_set_scalar(x_54, sizeof(void*)*1, x_39);
x_55 = x_54;
return x_55;
}
else
{
lean::dec(x_37);
return x_18;
}
}
}
else
{
unsigned char x_58; obj* x_59; obj* x_60; obj* x_62;
lean::dec(x_3);
x_58 = 0;
x_59 = _l_s4_lean_s6_parser_s13_monad__parsec_s3_eoi_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__6_s11___closed__1;
x_60 = lean::box(x_58);
lean::inc(x_59);
x_62 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_62, 0, x_60);
lean::cnstr_set(x_62, 1, x_0);
lean::cnstr_set(x_62, 2, x_59);
return x_62;
}
}
}
obj* _init__l_s4_lean_s6_parser_s13_monad__parsec_s3_eoi_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__6_s11___closed__1() {
{
obj* x_0; obj* x_2; obj* x_3;
x_0 = lean::alloc_closure(reinterpret_cast<void*>(_l_s2_id_s6___rarg), 1, 0);
lean::inc(x_0);
x_2 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_2, 0, x_0);
lean::closure_set(x_2, 1, x_0);
x_3 = lean::alloc_cnstr(1, 1, 0);
lean::cnstr_set(x_3, 0, x_2);
return x_3;
}
}
obj* _l_s9___private_1496486805__s27_parse__mangled__string__aux(obj* x_0, obj* x_1, obj* x_2) {
{
obj* x_3;
x_3 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_0, x_1, x_2);
return x_3;
}
}
obj* _l_s9___private_3162311557__s22_parse__mangled__string(obj* x_0) {
{
obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_7;
x_1 = lean::string_iterator_remaining(x_0);
x_2 = _l_s6_string_s4_join_s11___closed__1;
lean::inc(x_2);
x_4 = _l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main(x_1, x_2, x_0);
x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s3_eoi_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__6_s11___closed__1;
lean::inc(x_5);
x_7 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_5, x_4);
return x_7;
}
}
obj* _l_s4_lean_s6_string_s8_demangle(obj* x_0) {
{
obj* x_1; obj* x_2; obj* x_5;
x_1 = _l_s4_lean_s6_string_s8_demangle_s11___closed__1;
x_2 = _l_s6_string_s4_join_s11___closed__1;
lean::inc(x_2);
lean::inc(x_1);
x_5 = _l_s4_lean_s6_parser_s9_parsec__t_s3_run_s4___at_s4_lean_s6_parser_s6_parsec_s5_parse_s9___spec__1_s6___rarg(x_1, x_0, x_2);
if (lean::obj_tag(x_5) == 0)
{
obj* x_7;
lean::dec(x_5);
x_7 = lean::alloc_cnstr(0, 0, 0);
;
return x_7;
}
else
{
obj* x_8; obj* x_11;
x_8 = lean::cnstr_get(x_5, 0);
lean::inc(x_8);
lean::dec(x_5);
x_11 = lean::alloc_cnstr(1, 1, 0);
lean::cnstr_set(x_11, 0, x_8);
return x_11;
}
}
}
obj* _init__l_s4_lean_s6_string_s8_demangle_s11___closed__1() {
{
obj* x_0;
x_0 = lean::alloc_closure(reinterpret_cast<void*>(_l_s9___private_3162311557__s22_parse__mangled__string), 1, 0);
return x_0;
}
}
obj* _l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main(obj* x_0, obj* x_1) {
{
switch (lean::obj_tag(x_1)) {
case 0:
{
lean::dec(x_1);
return x_0;
}
case 1:
{
obj* x_3; obj* x_5; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18;
x_3 = lean::cnstr_get(x_1, 0);
lean::inc(x_3);
x_5 = lean::cnstr_get(x_1, 1);
lean::inc(x_5);
lean::dec(x_1);
x_8 = _l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main(x_0, x_3);
x_9 = _l_s4_lean_s6_string_s6_mangle(x_5);
x_10 = _l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main_s11___closed__1;
x_11 = lean::string_append(x_8, x_10);
x_12 = lean::string_length(x_9);
x_13 = _l_s3_nat_s4_repr(x_12);
x_14 = lean::string_append(x_11, x_13);
lean::dec(x_13);
x_16 = _l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main_s11___closed__2;
x_17 = lean::string_append(x_14, x_16);
x_18 = lean::string_append(x_17, x_9);
lean::dec(x_9);
return x_18;
}
default:
{
obj* x_20; obj* x_22; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_31;
x_20 = lean::cnstr_get(x_1, 0);
lean::inc(x_20);
x_22 = lean::cnstr_get(x_1, 1);
lean::inc(x_22);
lean::dec(x_1);
x_25 = _l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main(x_0, x_20);
x_26 = _l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main_s11___closed__2;
x_27 = lean::string_append(x_25, x_26);
x_28 = _l_s3_nat_s4_repr(x_22);
x_29 = lean::string_append(x_27, x_28);
lean::dec(x_28);
x_31 = lean::string_append(x_29, x_26);
return x_31;
}
}
}
}
obj* _init__l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main_s11___closed__1() {
{
obj* x_0;
x_0 = lean::mk_string("_s");
return x_0;
}
}
obj* _init__l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main_s11___closed__2() {
{
obj* x_0;
x_0 = lean::mk_string("_");
return x_0;
}
}
obj* _l_s9___private_1205956357__s4_name_s11_mangle__aux(obj* x_0, obj* x_1) {
{
obj* x_2;
x_2 = _l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main(x_0, x_1);
return x_2;
}
}
obj* _l_s4_lean_s4_name_s6_mangle(obj* x_0, obj* x_1) {
{
obj* x_2;
x_2 = _l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main(x_1, x_0);
return x_2;
}
}
obj* _l_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main(obj* x_0, obj* x_1, obj* x_2) {
{
obj* x_3; obj* x_4;
x_3 = lean::mk_nat_obj(0u);
x_4 = lean::nat_dec_eq(x_0, x_3);
if (lean::obj_tag(x_4) == 0)
{
obj* x_6; obj* x_7; obj* x_10; obj* x_11; obj* x_12; obj* x_15; unsigned x_16;
lean::dec(x_4);
x_6 = lean::mk_nat_obj(1u);
x_7 = lean::nat_sub(x_0, x_6);
lean::dec(x_6);
lean::dec(x_0);
x_10 = lean::mk_nat_obj(95u);
x_11 = lean::mk_nat_obj(55296u);
x_12 = lean::nat_dec_lt(x_10, x_11);
lean::dec(x_11);
lean::inc(x_2);
x_15 = _l_s4_lean_s6_parser_s13_monad__parsec_s3_eoi_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__6(x_2);
if (lean::obj_tag(x_12) == 0)
{
obj* x_18; obj* x_19;
x_18 = lean::mk_nat_obj(57343u);
x_19 = lean::nat_dec_lt(x_18, x_10);
lean::dec(x_18);
if (lean::obj_tag(x_19) == 0)
{
unsigned x_22;
lean::dec(x_19);
x_22 = lean::unbox_uint32(x_3);
x_16 = x_22;
goto lbl_17;
}
else
{
obj* x_24; obj* x_25;
lean::dec(x_19);
x_24 = lean::mk_nat_obj(1114112u);
x_25 = lean::nat_dec_lt(x_10, x_24);
lean::dec(x_24);
if (lean::obj_tag(x_25) == 0)
{
unsigned x_28;
lean::dec(x_25);
x_28 = lean::unbox_uint32(x_3);
x_16 = x_28;
goto lbl_17;
}
else
{
unsigned x_30;
lean::dec(x_25);
x_30 = lean::unbox_uint32(x_10);
x_16 = x_30;
goto lbl_17;
}
}
}
else
{
unsigned x_31;
x_31 = lean::unbox_uint32(x_10);
x_16 = x_31;
goto lbl_17;
}
lbl_17:
{
obj* x_32;
if (lean::obj_tag(x_15) == 0)
{
obj* x_34; obj* x_36; obj* x_38; obj* x_39; obj* x_42; obj* x_43;
x_34 = lean::cnstr_get(x_15, 1);
lean::inc(x_34);
x_36 = lean::cnstr_get(x_15, 2);
lean::inc(x_36);
if (lean::is_shared(x_15)) {
lean::dec(x_15);
x_38 = lean::box(0);
} else {
lean::cnstr_release(x_15, 0);
lean::cnstr_release(x_15, 1);
lean::cnstr_release(x_15, 2);
x_38 = x_15;
}
x_39 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
lean::inc(x_39);
lean::inc(x_1);
if (lean::is_scalar(x_38)) {
x_42 = lean::alloc_cnstr(0, 3, 0);
} else {
x_42 = x_38;
}
lean::cnstr_set(x_42, 0, x_1);
lean::cnstr_set(x_42, 1, x_34);
lean::cnstr_set(x_42, 2, x_39);
x_43 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_36, x_42);
x_32 = x_43;
goto lbl_33;
}
else
{
obj* x_44; unsigned char x_46; obj* x_47; obj* x_48; obj* x_49;
x_44 = lean::cnstr_get(x_15, 0);
lean::inc(x_44);
x_46 = lean::cnstr_get_scalar<unsigned char>(x_15, sizeof(void*)*1);
if (lean::is_shared(x_15)) {
lean::dec(x_15);
x_47 = lean::box(0);
} else {
lean::cnstr_release(x_15, 0);
x_47 = x_15;
}
if (lean::is_scalar(x_47)) {
x_48 = lean::alloc_cnstr(1, 1, 1);
} else {
x_48 = x_47;
}
lean::cnstr_set(x_48, 0, x_44);
lean::cnstr_set_scalar(x_48, sizeof(void*)*1, x_46);
x_49 = x_48;
x_32 = x_49;
goto lbl_33;
}
lbl_33:
{
if (lean::obj_tag(x_32) == 0)
{
lean::dec(x_12);
lean::dec(x_7);
lean::dec(x_10);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
return x_32;
}
else
{
obj* x_56; unsigned char x_58; obj* x_59; obj* x_60; unsigned char x_61;
x_56 = lean::cnstr_get(x_32, 0);
lean::inc(x_56);
x_58 = lean::cnstr_get_scalar<unsigned char>(x_32, sizeof(void*)*1);
if (x_58 == 0)
{
obj* x_64; obj* x_65; obj* x_69;
lean::dec(x_32);
x_64 = _l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main_s11___closed__1;
x_65 = _l_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s11___closed__1;
lean::inc(x_2);
lean::inc(x_65);
lean::inc(x_64);
x_69 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__1(x_64, x_65, x_2);
if (lean::obj_tag(x_69) == 0)
{
obj* x_70; obj* x_72; obj* x_74; obj* x_75;
x_70 = lean::cnstr_get(x_69, 1);
lean::inc(x_70);
x_72 = lean::cnstr_get(x_69, 2);
lean::inc(x_72);
if (lean::is_shared(x_69)) {
lean::dec(x_69);
x_74 = lean::box(0);
} else {
lean::cnstr_release(x_69, 0);
lean::cnstr_release(x_69, 1);
lean::cnstr_release(x_69, 2);
x_74 = x_69;
}
x_75 = _l_s4_lean_s6_parser_s13_monad__parsec_s3_num_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__2(x_70);
if (lean::obj_tag(x_75) == 0)
{
obj* x_76; obj* x_78; obj* x_80; unsigned x_83;
x_76 = lean::cnstr_get(x_75, 0);
lean::inc(x_76);
x_78 = lean::cnstr_get(x_75, 1);
lean::inc(x_78);
x_80 = lean::cnstr_get(x_75, 2);
lean::inc(x_80);
lean::dec(x_75);
if (lean::obj_tag(x_12) == 0)
{
obj* x_86; obj* x_87;
lean::dec(x_12);
x_86 = lean::mk_nat_obj(57343u);
x_87 = lean::nat_dec_lt(x_86, x_10);
lean::dec(x_86);
if (lean::obj_tag(x_87) == 0)
{
unsigned x_91;
lean::dec(x_87);
lean::dec(x_10);
x_91 = lean::unbox_uint32(x_3);
lean::dec(x_3);
x_83 = x_91;
goto lbl_84;
}
else
{
obj* x_94; obj* x_95;
lean::dec(x_87);
x_94 = lean::mk_nat_obj(1114112u);
x_95 = lean::nat_dec_lt(x_10, x_94);
lean::dec(x_94);
if (lean::obj_tag(x_95) == 0)
{
unsigned x_99;
lean::dec(x_95);
lean::dec(x_10);
x_99 = lean::unbox_uint32(x_3);
lean::dec(x_3);
x_83 = x_99;
goto lbl_84;
}
else
{
unsigned x_103;
lean::dec(x_95);
lean::dec(x_3);
x_103 = lean::unbox_uint32(x_10);
lean::dec(x_10);
x_83 = x_103;
goto lbl_84;
}
}
}
else
{
unsigned x_107;
lean::dec(x_12);
lean::dec(x_3);
x_107 = lean::unbox_uint32(x_10);
lean::dec(x_10);
x_83 = x_107;
goto lbl_84;
}
lbl_84:
{
obj* x_109;
x_109 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__1(x_83, x_78);
if (lean::obj_tag(x_109) == 0)
{
obj* x_110; obj* x_112; obj* x_115;
x_110 = lean::cnstr_get(x_109, 1);
lean::inc(x_110);
x_112 = lean::cnstr_get(x_109, 2);
lean::inc(x_112);
lean::dec(x_109);
x_115 = _l_s4_lean_s6_parser_s13_monad__parsec_s4_take_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__18(x_76, x_110);
if (lean::obj_tag(x_115) == 0)
{
obj* x_116; obj* x_118; obj* x_120; obj* x_123; obj* x_124; obj* x_126; obj* x_127;
x_116 = lean::cnstr_get(x_115, 0);
lean::inc(x_116);
x_118 = lean::cnstr_get(x_115, 1);
lean::inc(x_118);
x_120 = lean::cnstr_get(x_115, 2);
lean::inc(x_120);
lean::dec(x_115);
x_123 = _l_s4_lean_s6_string_s8_demangle(x_116);
x_124 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
lean::inc(x_124);
if (lean::is_scalar(x_74)) {
x_126 = lean::alloc_cnstr(0, 3, 0);
} else {
x_126 = x_74;
}
lean::cnstr_set(x_126, 0, x_123);
lean::cnstr_set(x_126, 1, x_118);
lean::cnstr_set(x_126, 2, x_124);
x_127 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_120, x_126);
if (lean::obj_tag(x_127) == 0)
{
obj* x_128; obj* x_130; obj* x_132;
x_128 = lean::cnstr_get(x_127, 0);
lean::inc(x_128);
x_130 = lean::cnstr_get(x_127, 1);
lean::inc(x_130);
x_132 = lean::cnstr_get(x_127, 2);
lean::inc(x_132);
lean::dec(x_127);
if (lean::obj_tag(x_128) == 0)
{
obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140;
lean::dec(x_128);
x_136 = _l_s13_match__failed_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__19(x_130);
x_137 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_132, x_136);
x_138 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_112, x_137);
x_139 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_80, x_138);
x_140 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_72, x_139);
if (lean::obj_tag(x_140) == 0)
{
obj* x_144;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
x_144 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_140);
return x_144;
}
else
{
obj* x_145; unsigned char x_147;
x_145 = lean::cnstr_get(x_140, 0);
lean::inc(x_145);
x_147 = lean::cnstr_get_scalar<unsigned char>(x_140, sizeof(void*)*1);
x_59 = x_140;
x_60 = x_145;
x_61 = x_147;
goto lbl_62;
}
}
else
{
obj* x_148; obj* x_152; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158;
x_148 = lean::cnstr_get(x_128, 0);
lean::inc(x_148);
lean::dec(x_128);
lean::inc(x_1);
x_152 = lean::alloc_cnstr(1, 2, 0);
lean::cnstr_set(x_152, 0, x_1);
lean::cnstr_set(x_152, 1, x_148);
lean::inc(x_7);
x_154 = _l_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main(x_7, x_152, x_130);
x_155 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_132, x_154);
x_156 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_112, x_155);
x_157 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_80, x_156);
x_158 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_72, x_157);
if (lean::obj_tag(x_158) == 0)
{
obj* x_162;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
x_162 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_158);
return x_162;
}
else
{
obj* x_163; unsigned char x_165;
x_163 = lean::cnstr_get(x_158, 0);
lean::inc(x_163);
x_165 = lean::cnstr_get_scalar<unsigned char>(x_158, sizeof(void*)*1);
x_59 = x_158;
x_60 = x_163;
x_61 = x_165;
goto lbl_62;
}
}
}
else
{
obj* x_166; unsigned char x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174;
x_166 = lean::cnstr_get(x_127, 0);
lean::inc(x_166);
x_168 = lean::cnstr_get_scalar<unsigned char>(x_127, sizeof(void*)*1);
if (lean::is_shared(x_127)) {
lean::dec(x_127);
x_169 = lean::box(0);
} else {
lean::cnstr_release(x_127, 0);
x_169 = x_127;
}
if (lean::is_scalar(x_169)) {
x_170 = lean::alloc_cnstr(1, 1, 1);
} else {
x_170 = x_169;
}
lean::cnstr_set(x_170, 0, x_166);
lean::cnstr_set_scalar(x_170, sizeof(void*)*1, x_168);
x_171 = x_170;
x_172 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_112, x_171);
x_173 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_80, x_172);
x_174 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_72, x_173);
if (lean::obj_tag(x_174) == 0)
{
obj* x_178;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
x_178 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_174);
return x_178;
}
else
{
obj* x_179; unsigned char x_181;
x_179 = lean::cnstr_get(x_174, 0);
lean::inc(x_179);
x_181 = lean::cnstr_get_scalar<unsigned char>(x_174, sizeof(void*)*1);
x_59 = x_174;
x_60 = x_179;
x_61 = x_181;
goto lbl_62;
}
}
}
else
{
obj* x_183; unsigned char x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191;
lean::dec(x_74);
x_183 = lean::cnstr_get(x_115, 0);
lean::inc(x_183);
x_185 = lean::cnstr_get_scalar<unsigned char>(x_115, sizeof(void*)*1);
if (lean::is_shared(x_115)) {
lean::dec(x_115);
x_186 = lean::box(0);
} else {
lean::cnstr_release(x_115, 0);
x_186 = x_115;
}
if (lean::is_scalar(x_186)) {
x_187 = lean::alloc_cnstr(1, 1, 1);
} else {
x_187 = x_186;
}
lean::cnstr_set(x_187, 0, x_183);
lean::cnstr_set_scalar(x_187, sizeof(void*)*1, x_185);
x_188 = x_187;
x_189 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_112, x_188);
x_190 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_80, x_189);
x_191 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_72, x_190);
if (lean::obj_tag(x_191) == 0)
{
obj* x_195;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
x_195 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_191);
return x_195;
}
else
{
obj* x_196; unsigned char x_198;
x_196 = lean::cnstr_get(x_191, 0);
lean::inc(x_196);
x_198 = lean::cnstr_get_scalar<unsigned char>(x_191, sizeof(void*)*1);
x_59 = x_191;
x_60 = x_196;
x_61 = x_198;
goto lbl_62;
}
}
}
else
{
obj* x_201; unsigned char x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208;
lean::dec(x_74);
lean::dec(x_76);
x_201 = lean::cnstr_get(x_109, 0);
lean::inc(x_201);
x_203 = lean::cnstr_get_scalar<unsigned char>(x_109, sizeof(void*)*1);
if (lean::is_shared(x_109)) {
lean::dec(x_109);
x_204 = lean::box(0);
} else {
lean::cnstr_release(x_109, 0);
x_204 = x_109;
}
if (lean::is_scalar(x_204)) {
x_205 = lean::alloc_cnstr(1, 1, 1);
} else {
x_205 = x_204;
}
lean::cnstr_set(x_205, 0, x_201);
lean::cnstr_set_scalar(x_205, sizeof(void*)*1, x_203);
x_206 = x_205;
x_207 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_80, x_206);
x_208 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_72, x_207);
if (lean::obj_tag(x_208) == 0)
{
obj* x_212;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
x_212 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_208);
return x_212;
}
else
{
obj* x_213; unsigned char x_215;
x_213 = lean::cnstr_get(x_208, 0);
lean::inc(x_213);
x_215 = lean::cnstr_get_scalar<unsigned char>(x_208, sizeof(void*)*1);
x_59 = x_208;
x_60 = x_213;
x_61 = x_215;
goto lbl_62;
}
}
}
}
else
{
obj* x_220; unsigned char x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226;
lean::dec(x_12);
lean::dec(x_74);
lean::dec(x_10);
lean::dec(x_3);
x_220 = lean::cnstr_get(x_75, 0);
lean::inc(x_220);
x_222 = lean::cnstr_get_scalar<unsigned char>(x_75, sizeof(void*)*1);
if (lean::is_shared(x_75)) {
lean::dec(x_75);
x_223 = lean::box(0);
} else {
lean::cnstr_release(x_75, 0);
x_223 = x_75;
}
if (lean::is_scalar(x_223)) {
x_224 = lean::alloc_cnstr(1, 1, 1);
} else {
x_224 = x_223;
}
lean::cnstr_set(x_224, 0, x_220);
lean::cnstr_set_scalar(x_224, sizeof(void*)*1, x_222);
x_225 = x_224;
x_226 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_72, x_225);
if (lean::obj_tag(x_226) == 0)
{
obj* x_230;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
x_230 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_226);
return x_230;
}
else
{
obj* x_231; unsigned char x_233;
x_231 = lean::cnstr_get(x_226, 0);
lean::inc(x_231);
x_233 = lean::cnstr_get_scalar<unsigned char>(x_226, sizeof(void*)*1);
x_59 = x_226;
x_60 = x_231;
x_61 = x_233;
goto lbl_62;
}
}
}
else
{
obj* x_237; unsigned char x_239; obj* x_240; obj* x_242; obj* x_243;
lean::dec(x_12);
lean::dec(x_10);
lean::dec(x_3);
x_237 = lean::cnstr_get(x_69, 0);
lean::inc(x_237);
x_239 = lean::cnstr_get_scalar<unsigned char>(x_69, sizeof(void*)*1);
if (lean::is_shared(x_69)) {
lean::dec(x_69);
x_240 = lean::box(0);
} else {
lean::cnstr_release(x_69, 0);
x_240 = x_69;
}
lean::inc(x_237);
if (lean::is_scalar(x_240)) {
x_242 = lean::alloc_cnstr(1, 1, 1);
} else {
x_242 = x_240;
}
lean::cnstr_set(x_242, 0, x_237);
lean::cnstr_set_scalar(x_242, sizeof(void*)*1, x_239);
x_243 = x_242;
x_59 = x_243;
x_60 = x_237;
x_61 = x_239;
goto lbl_62;
}
}
else
{
lean::dec(x_12);
lean::dec(x_7);
lean::dec(x_10);
lean::dec(x_1);
lean::dec(x_2);
lean::dec(x_3);
lean::dec(x_56);
return x_32;
}
lbl_62:
{
if (x_61 == 0)
{
obj* x_252;
lean::dec(x_59);
x_252 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__1(x_16, x_2);
if (lean::obj_tag(x_252) == 0)
{
obj* x_253; obj* x_255; obj* x_258;
x_253 = lean::cnstr_get(x_252, 1);
lean::inc(x_253);
x_255 = lean::cnstr_get(x_252, 2);
lean::inc(x_255);
lean::dec(x_252);
x_258 = _l_s4_lean_s6_parser_s13_monad__parsec_s3_num_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__2(x_253);
if (lean::obj_tag(x_258) == 0)
{
obj* x_259; obj* x_261; obj* x_263; obj* x_266;
x_259 = lean::cnstr_get(x_258, 0);
lean::inc(x_259);
x_261 = lean::cnstr_get(x_258, 1);
lean::inc(x_261);
x_263 = lean::cnstr_get(x_258, 2);
lean::inc(x_263);
lean::dec(x_258);
x_266 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__1(x_16, x_261);
if (lean::obj_tag(x_266) == 0)
{
obj* x_267; obj* x_269; obj* x_272; obj* x_273; obj* x_274; obj* x_275; obj* x_276; obj* x_277; obj* x_278;
x_267 = lean::cnstr_get(x_266, 1);
lean::inc(x_267);
x_269 = lean::cnstr_get(x_266, 2);
lean::inc(x_269);
lean::dec(x_266);
x_272 = lean::alloc_cnstr(2, 2, 0);
lean::cnstr_set(x_272, 0, x_1);
lean::cnstr_set(x_272, 1, x_259);
x_273 = _l_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main(x_7, x_272, x_267);
x_274 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_269, x_273);
x_275 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_263, x_274);
x_276 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_255, x_275);
x_277 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_60, x_276);
x_278 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_277);
return x_278;
}
else
{
obj* x_282; unsigned char x_284; obj* x_285; obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291;
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_259);
x_282 = lean::cnstr_get(x_266, 0);
lean::inc(x_282);
x_284 = lean::cnstr_get_scalar<unsigned char>(x_266, sizeof(void*)*1);
if (lean::is_shared(x_266)) {
lean::dec(x_266);
x_285 = lean::box(0);
} else {
lean::cnstr_release(x_266, 0);
x_285 = x_266;
}
if (lean::is_scalar(x_285)) {
x_286 = lean::alloc_cnstr(1, 1, 1);
} else {
x_286 = x_285;
}
lean::cnstr_set(x_286, 0, x_282);
lean::cnstr_set_scalar(x_286, sizeof(void*)*1, x_284);
x_287 = x_286;
x_288 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_263, x_287);
x_289 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_255, x_288);
x_290 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_60, x_289);
x_291 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_290);
return x_291;
}
}
else
{
obj* x_294; unsigned char x_296; obj* x_297; obj* x_298; obj* x_299; obj* x_300; obj* x_301; obj* x_302;
lean::dec(x_7);
lean::dec(x_1);
x_294 = lean::cnstr_get(x_258, 0);
lean::inc(x_294);
x_296 = lean::cnstr_get_scalar<unsigned char>(x_258, sizeof(void*)*1);
if (lean::is_shared(x_258)) {
lean::dec(x_258);
x_297 = lean::box(0);
} else {
lean::cnstr_release(x_258, 0);
x_297 = x_258;
}
if (lean::is_scalar(x_297)) {
x_298 = lean::alloc_cnstr(1, 1, 1);
} else {
x_298 = x_297;
}
lean::cnstr_set(x_298, 0, x_294);
lean::cnstr_set_scalar(x_298, sizeof(void*)*1, x_296);
x_299 = x_298;
x_300 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_255, x_299);
x_301 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_60, x_300);
x_302 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_301);
return x_302;
}
}
else
{
obj* x_305; unsigned char x_307; obj* x_308; obj* x_309; obj* x_310; obj* x_311; obj* x_312;
lean::dec(x_7);
lean::dec(x_1);
x_305 = lean::cnstr_get(x_252, 0);
lean::inc(x_305);
x_307 = lean::cnstr_get_scalar<unsigned char>(x_252, sizeof(void*)*1);
if (lean::is_shared(x_252)) {
lean::dec(x_252);
x_308 = lean::box(0);
} else {
lean::cnstr_release(x_252, 0);
x_308 = x_252;
}
if (lean::is_scalar(x_308)) {
x_309 = lean::alloc_cnstr(1, 1, 1);
} else {
x_309 = x_308;
}
lean::cnstr_set(x_309, 0, x_305);
lean::cnstr_set_scalar(x_309, sizeof(void*)*1, x_307);
x_310 = x_309;
x_311 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_60, x_310);
x_312 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_311);
return x_312;
}
}
else
{
obj* x_317;
lean::dec(x_60);
lean::dec(x_7);
lean::dec(x_1);
lean::dec(x_2);
x_317 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_59);
return x_317;
}
}
}
}
}
}
else
{
obj* x_321; obj* x_323;
lean::dec(x_4);
lean::dec(x_0);
lean::dec(x_3);
x_321 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
lean::inc(x_321);
x_323 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_323, 0, x_1);
lean::cnstr_set(x_323, 1, x_2);
lean::cnstr_set(x_323, 2, x_321);
return x_323;
}
}
}
obj* _init__l_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s11___closed__1() {
{
obj* x_0; obj* x_1; obj* x_2;
x_0 = lean::mk_string("_s");
x_1 = _l_s6_string_s5_quote(x_0);
x_2 = lean::alloc_closure(reinterpret_cast<void*>(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1);
lean::closure_set(x_2, 0, x_1);
return x_2;
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__1(unsigned x_0, obj* x_1) {
{
unsigned char x_2;
x_2 = lean::string_iterator_has_next(x_1);
if (x_2 == 0)
{
obj* x_3; obj* x_4; obj* x_5; obj* x_9;
x_3 = lean::alloc_cnstr(0, 0, 0);
;
x_4 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1;
x_5 = _l_s5_mjoin_s6___rarg_s11___closed__1;
lean::inc(x_3);
lean::inc(x_5);
lean::inc(x_4);
x_9 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(x_4, x_5, x_3, x_3, x_1);
if (lean::obj_tag(x_9) == 0)
{
obj* x_10; obj* x_12; obj* x_14;
x_10 = lean::cnstr_get(x_9, 0);
lean::inc(x_10);
x_12 = lean::cnstr_get(x_9, 1);
lean::inc(x_12);
x_14 = lean::cnstr_get(x_9, 2);
lean::inc(x_14);
if (lean::obj_tag(x_14) == 0)
{
lean::dec(x_12);
lean::dec(x_14);
lean::dec(x_5);
lean::dec(x_10);
return x_9;
}
else
{
obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27;
lean::dec(x_9);
x_21 = lean::cnstr_get(x_14, 0);
lean::inc(x_21);
if (lean::is_shared(x_14)) {
lean::dec(x_14);
x_23 = lean::box(0);
} else {
lean::cnstr_release(x_14, 0);
x_23 = x_14;
}
lean::inc(x_5);
x_25 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_25, 0, x_5);
lean::closure_set(x_25, 1, x_21);
if (lean::is_scalar(x_23)) {
x_26 = lean::alloc_cnstr(1, 1, 0);
} else {
x_26 = x_23;
}
lean::cnstr_set(x_26, 0, x_25);
x_27 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_27, 0, x_10);
lean::cnstr_set(x_27, 1, x_12);
lean::cnstr_set(x_27, 2, x_26);
return x_27;
}
}
else
{
obj* x_28; unsigned char x_30;
x_28 = lean::cnstr_get(x_9, 0);
lean::inc(x_28);
x_30 = lean::cnstr_get_scalar<unsigned char>(x_9, sizeof(void*)*1);
if (x_30 == 0)
{
obj* x_32; obj* x_34; obj* x_36; obj* x_39; obj* x_40; obj* x_43; obj* x_44; obj* x_45;
lean::dec(x_9);
x_32 = lean::cnstr_get(x_28, 0);
lean::inc(x_32);
x_34 = lean::cnstr_get(x_28, 1);
lean::inc(x_34);
x_36 = lean::cnstr_get(x_28, 2);
lean::inc(x_36);
lean::inc(x_5);
x_39 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_39, 0, x_5);
lean::closure_set(x_39, 1, x_36);
x_40 = lean::cnstr_get(x_28, 3);
lean::inc(x_40);
lean::dec(x_28);
x_43 = lean::alloc_cnstr(0, 4, 0);
lean::cnstr_set(x_43, 0, x_32);
lean::cnstr_set(x_43, 1, x_34);
lean::cnstr_set(x_43, 2, x_39);
lean::cnstr_set(x_43, 3, x_40);
x_44 = lean::alloc_cnstr(1, 1, 1);
lean::cnstr_set(x_44, 0, x_43);
lean::cnstr_set_scalar(x_44, sizeof(void*)*1, x_30);
x_45 = x_44;
return x_45;
}
else
{
lean::dec(x_5);
lean::dec(x_28);
return x_9;
}
}
}
else
{
unsigned x_48; obj* x_49; obj* x_50; obj* x_51;
x_48 = lean::string_iterator_curr(x_1);
x_49 = lean::box_uint32(x_48);
x_50 = lean::box_uint32(x_0);
x_51 = lean::nat_dec_eq(x_49, x_50);
lean::dec(x_50);
if (lean::obj_tag(x_51) == 0)
{
obj* x_55; obj* x_56; obj* x_58; obj* x_60; obj* x_61; obj* x_62; obj* x_65;
lean::dec(x_49);
lean::dec(x_51);
x_55 = _l_s4_char_s11_quote__core(x_48);
x_56 = _l_s4_char_s9_has__repr_s11___closed__1;
lean::inc(x_56);
x_58 = lean::string_append(x_56, x_55);
lean::dec(x_55);
x_60 = lean::string_append(x_58, x_56);
x_61 = lean::alloc_cnstr(0, 0, 0);
;
x_62 = _l_s5_mjoin_s6___rarg_s11___closed__1;
lean::inc(x_61);
lean::inc(x_62);
x_65 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(x_60, x_62, x_61, x_61, x_1);
if (lean::obj_tag(x_65) == 0)
{
obj* x_66; obj* x_68; obj* x_70;
x_66 = lean::cnstr_get(x_65, 0);
lean::inc(x_66);
x_68 = lean::cnstr_get(x_65, 1);
lean::inc(x_68);
x_70 = lean::cnstr_get(x_65, 2);
lean::inc(x_70);
if (lean::obj_tag(x_70) == 0)
{
lean::dec(x_68);
lean::dec(x_70);
lean::dec(x_62);
lean::dec(x_66);
return x_65;
}
else
{
obj* x_77; obj* x_79; obj* x_81; obj* x_82; obj* x_83;
lean::dec(x_65);
x_77 = lean::cnstr_get(x_70, 0);
lean::inc(x_77);
if (lean::is_shared(x_70)) {
lean::dec(x_70);
x_79 = lean::box(0);
} else {
lean::cnstr_release(x_70, 0);
x_79 = x_70;
}
lean::inc(x_62);
x_81 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_81, 0, x_62);
lean::closure_set(x_81, 1, x_77);
if (lean::is_scalar(x_79)) {
x_82 = lean::alloc_cnstr(1, 1, 0);
} else {
x_82 = x_79;
}
lean::cnstr_set(x_82, 0, x_81);
x_83 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_83, 0, x_66);
lean::cnstr_set(x_83, 1, x_68);
lean::cnstr_set(x_83, 2, x_82);
return x_83;
}
}
else
{
obj* x_84; unsigned char x_86;
x_84 = lean::cnstr_get(x_65, 0);
lean::inc(x_84);
x_86 = lean::cnstr_get_scalar<unsigned char>(x_65, sizeof(void*)*1);
if (x_86 == 0)
{
obj* x_88; obj* x_90; obj* x_92; obj* x_95; obj* x_96; obj* x_99; obj* x_100; obj* x_101;
lean::dec(x_65);
x_88 = lean::cnstr_get(x_84, 0);
lean::inc(x_88);
x_90 = lean::cnstr_get(x_84, 1);
lean::inc(x_90);
x_92 = lean::cnstr_get(x_84, 2);
lean::inc(x_92);
lean::inc(x_62);
x_95 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_95, 0, x_62);
lean::closure_set(x_95, 1, x_92);
x_96 = lean::cnstr_get(x_84, 3);
lean::inc(x_96);
lean::dec(x_84);
x_99 = lean::alloc_cnstr(0, 4, 0);
lean::cnstr_set(x_99, 0, x_88);
lean::cnstr_set(x_99, 1, x_90);
lean::cnstr_set(x_99, 2, x_95);
lean::cnstr_set(x_99, 3, x_96);
x_100 = lean::alloc_cnstr(1, 1, 1);
lean::cnstr_set(x_100, 0, x_99);
lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_86);
x_101 = x_100;
return x_101;
}
else
{
lean::dec(x_84);
lean::dec(x_62);
return x_65;
}
}
}
else
{
obj* x_105; obj* x_106; obj* x_107;
lean::dec(x_51);
x_105 = lean::string_iterator_next(x_1);
x_106 = lean::alloc_cnstr(0, 0, 0);
;
x_107 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_107, 0, x_49);
lean::cnstr_set(x_107, 1, x_105);
lean::cnstr_set(x_107, 2, x_106);
return x_107;
}
}
}
}
obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__5(obj* x_0, obj* x_1, obj* x_2) {
{
obj* x_3; obj* x_4;
x_3 = lean::mk_nat_obj(0u);
x_4 = lean::nat_dec_eq(x_0, x_3);
lean::dec(x_3);
if (lean::obj_tag(x_4) == 0)
{
unsigned char x_7;
lean::dec(x_4);
x_7 = lean::string_iterator_has_next(x_2);
if (x_7 == 0)
{
obj* x_9;
lean::dec(x_0);
x_9 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_9;
}
else
{
unsigned x_10; unsigned char x_11;
x_10 = lean::string_iterator_curr(x_2);
x_11 = _l_s4_char_s9_is__digit(x_10);
if (x_11 == 0)
{
obj* x_13;
lean::dec(x_0);
x_13 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_13;
}
else
{
obj* x_14; obj* x_15; obj* x_18; obj* x_19; obj* x_20;
x_14 = lean::mk_nat_obj(1u);
x_15 = lean::nat_sub(x_0, x_14);
lean::dec(x_14);
lean::dec(x_0);
x_18 = lean::string_push(x_1, x_10);
x_19 = lean::string_iterator_next(x_2);
x_20 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__5(x_15, x_18, x_19);
return x_20;
}
}
}
else
{
obj* x_23;
lean::dec(x_4);
lean::dec(x_0);
x_23 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_23;
}
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__4(unsigned x_0, obj* x_1) {
{
obj* x_2; obj* x_4; obj* x_5; obj* x_6;
x_2 = _l_s6_string_s4_join_s11___closed__1;
lean::inc(x_2);
x_4 = lean::string_push(x_2, x_0);
x_5 = lean::string_iterator_remaining(x_1);
x_6 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__5(x_5, x_4, x_1);
return x_6;
}
}
obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__7(obj* x_0, obj* x_1, obj* x_2) {
{
obj* x_3; obj* x_4;
x_3 = lean::mk_nat_obj(0u);
x_4 = lean::nat_dec_eq(x_0, x_3);
lean::dec(x_3);
if (lean::obj_tag(x_4) == 0)
{
unsigned char x_7;
lean::dec(x_4);
x_7 = lean::string_iterator_has_next(x_2);
if (x_7 == 0)
{
obj* x_9;
lean::dec(x_0);
x_9 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_9;
}
else
{
unsigned x_10; unsigned char x_11;
x_10 = lean::string_iterator_curr(x_2);
x_11 = _l_s4_char_s9_is__digit(x_10);
if (x_11 == 0)
{
obj* x_13;
lean::dec(x_0);
x_13 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_13;
}
else
{
obj* x_14; obj* x_15; obj* x_18; obj* x_19; obj* x_20;
x_14 = lean::mk_nat_obj(1u);
x_15 = lean::nat_sub(x_0, x_14);
lean::dec(x_14);
lean::dec(x_0);
x_18 = lean::string_push(x_1, x_10);
x_19 = lean::string_iterator_next(x_2);
x_20 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__7(x_15, x_18, x_19);
return x_20;
}
}
}
else
{
obj* x_23;
lean::dec(x_4);
lean::dec(x_0);
x_23 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_23;
}
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__6(unsigned x_0, obj* x_1) {
{
obj* x_2; obj* x_4; obj* x_5; obj* x_6;
x_2 = _l_s6_string_s4_join_s11___closed__1;
lean::inc(x_2);
x_4 = lean::string_push(x_2, x_0);
x_5 = lean::string_iterator_remaining(x_1);
x_6 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__7(x_5, x_4, x_1);
return x_6;
}
}
obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__9(obj* x_0, obj* x_1, obj* x_2) {
{
obj* x_3; obj* x_4;
x_3 = lean::mk_nat_obj(0u);
x_4 = lean::nat_dec_eq(x_0, x_3);
lean::dec(x_3);
if (lean::obj_tag(x_4) == 0)
{
unsigned char x_7;
lean::dec(x_4);
x_7 = lean::string_iterator_has_next(x_2);
if (x_7 == 0)
{
obj* x_9;
lean::dec(x_0);
x_9 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_9;
}
else
{
unsigned x_10; unsigned char x_11;
x_10 = lean::string_iterator_curr(x_2);
x_11 = _l_s4_char_s9_is__digit(x_10);
if (x_11 == 0)
{
obj* x_13;
lean::dec(x_0);
x_13 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_13;
}
else
{
obj* x_14; obj* x_15; obj* x_18; obj* x_19; obj* x_20;
x_14 = lean::mk_nat_obj(1u);
x_15 = lean::nat_sub(x_0, x_14);
lean::dec(x_14);
lean::dec(x_0);
x_18 = lean::string_push(x_1, x_10);
x_19 = lean::string_iterator_next(x_2);
x_20 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__9(x_15, x_18, x_19);
return x_20;
}
}
}
else
{
obj* x_23;
lean::dec(x_4);
lean::dec(x_0);
x_23 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_23;
}
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__8(unsigned x_0, obj* x_1) {
{
obj* x_2; obj* x_4; obj* x_5; obj* x_6;
x_2 = _l_s6_string_s4_join_s11___closed__1;
lean::inc(x_2);
x_4 = lean::string_push(x_2, x_0);
x_5 = lean::string_iterator_remaining(x_1);
x_6 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__9(x_5, x_4, x_1);
return x_6;
}
}
obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__11(obj* x_0, obj* x_1, obj* x_2) {
{
obj* x_3; obj* x_4;
x_3 = lean::mk_nat_obj(0u);
x_4 = lean::nat_dec_eq(x_0, x_3);
lean::dec(x_3);
if (lean::obj_tag(x_4) == 0)
{
unsigned char x_7;
lean::dec(x_4);
x_7 = lean::string_iterator_has_next(x_2);
if (x_7 == 0)
{
obj* x_9;
lean::dec(x_0);
x_9 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_9;
}
else
{
unsigned x_10; unsigned char x_11;
x_10 = lean::string_iterator_curr(x_2);
x_11 = _l_s4_char_s9_is__digit(x_10);
if (x_11 == 0)
{
obj* x_13;
lean::dec(x_0);
x_13 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_13;
}
else
{
obj* x_14; obj* x_15; obj* x_18; obj* x_19; obj* x_20;
x_14 = lean::mk_nat_obj(1u);
x_15 = lean::nat_sub(x_0, x_14);
lean::dec(x_14);
lean::dec(x_0);
x_18 = lean::string_push(x_1, x_10);
x_19 = lean::string_iterator_next(x_2);
x_20 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__11(x_15, x_18, x_19);
return x_20;
}
}
}
else
{
obj* x_23;
lean::dec(x_4);
lean::dec(x_0);
x_23 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_23;
}
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__10(unsigned x_0, obj* x_1) {
{
obj* x_2; obj* x_4; obj* x_5; obj* x_6;
x_2 = _l_s6_string_s4_join_s11___closed__1;
lean::inc(x_2);
x_4 = lean::string_push(x_2, x_0);
x_5 = lean::string_iterator_remaining(x_1);
x_6 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__11(x_5, x_4, x_1);
return x_6;
}
}
obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__13(obj* x_0, obj* x_1, obj* x_2) {
{
obj* x_3; obj* x_4;
x_3 = lean::mk_nat_obj(0u);
x_4 = lean::nat_dec_eq(x_0, x_3);
lean::dec(x_3);
if (lean::obj_tag(x_4) == 0)
{
unsigned char x_7;
lean::dec(x_4);
x_7 = lean::string_iterator_has_next(x_2);
if (x_7 == 0)
{
obj* x_9;
lean::dec(x_0);
x_9 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_9;
}
else
{
unsigned x_10; unsigned char x_11;
x_10 = lean::string_iterator_curr(x_2);
x_11 = _l_s4_char_s9_is__digit(x_10);
if (x_11 == 0)
{
obj* x_13;
lean::dec(x_0);
x_13 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_13;
}
else
{
obj* x_14; obj* x_15; obj* x_18; obj* x_19; obj* x_20;
x_14 = lean::mk_nat_obj(1u);
x_15 = lean::nat_sub(x_0, x_14);
lean::dec(x_14);
lean::dec(x_0);
x_18 = lean::string_push(x_1, x_10);
x_19 = lean::string_iterator_next(x_2);
x_20 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__13(x_15, x_18, x_19);
return x_20;
}
}
}
else
{
obj* x_23;
lean::dec(x_4);
lean::dec(x_0);
x_23 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_23;
}
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__12(unsigned x_0, obj* x_1) {
{
obj* x_2; obj* x_4; obj* x_5; obj* x_6;
x_2 = _l_s6_string_s4_join_s11___closed__1;
lean::inc(x_2);
x_4 = lean::string_push(x_2, x_0);
x_5 = lean::string_iterator_remaining(x_1);
x_6 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__13(x_5, x_4, x_1);
return x_6;
}
}
obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__15(obj* x_0, obj* x_1, obj* x_2) {
{
obj* x_3; obj* x_4;
x_3 = lean::mk_nat_obj(0u);
x_4 = lean::nat_dec_eq(x_0, x_3);
lean::dec(x_3);
if (lean::obj_tag(x_4) == 0)
{
unsigned char x_7;
lean::dec(x_4);
x_7 = lean::string_iterator_has_next(x_2);
if (x_7 == 0)
{
obj* x_9;
lean::dec(x_0);
x_9 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_9;
}
else
{
unsigned x_10; unsigned char x_11;
x_10 = lean::string_iterator_curr(x_2);
x_11 = _l_s4_char_s9_is__digit(x_10);
if (x_11 == 0)
{
obj* x_13;
lean::dec(x_0);
x_13 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_13;
}
else
{
obj* x_14; obj* x_15; obj* x_18; obj* x_19; obj* x_20;
x_14 = lean::mk_nat_obj(1u);
x_15 = lean::nat_sub(x_0, x_14);
lean::dec(x_14);
lean::dec(x_0);
x_18 = lean::string_push(x_1, x_10);
x_19 = lean::string_iterator_next(x_2);
x_20 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__15(x_15, x_18, x_19);
return x_20;
}
}
}
else
{
obj* x_23;
lean::dec(x_4);
lean::dec(x_0);
x_23 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_23;
}
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__14(unsigned x_0, obj* x_1) {
{
obj* x_2; obj* x_4; obj* x_5; obj* x_6;
x_2 = _l_s6_string_s4_join_s11___closed__1;
lean::inc(x_2);
x_4 = lean::string_push(x_2, x_0);
x_5 = lean::string_iterator_remaining(x_1);
x_6 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__15(x_5, x_4, x_1);
return x_6;
}
}
obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__17(obj* x_0, obj* x_1, obj* x_2) {
{
obj* x_3; obj* x_4;
x_3 = lean::mk_nat_obj(0u);
x_4 = lean::nat_dec_eq(x_0, x_3);
lean::dec(x_3);
if (lean::obj_tag(x_4) == 0)
{
unsigned char x_7;
lean::dec(x_4);
x_7 = lean::string_iterator_has_next(x_2);
if (x_7 == 0)
{
obj* x_9;
lean::dec(x_0);
x_9 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_9;
}
else
{
unsigned x_10; unsigned char x_11;
x_10 = lean::string_iterator_curr(x_2);
x_11 = _l_s4_char_s9_is__digit(x_10);
if (x_11 == 0)
{
obj* x_13;
lean::dec(x_0);
x_13 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_13;
}
else
{
obj* x_14; obj* x_15; obj* x_18; obj* x_19; obj* x_20;
x_14 = lean::mk_nat_obj(1u);
x_15 = lean::nat_sub(x_0, x_14);
lean::dec(x_14);
lean::dec(x_0);
x_18 = lean::string_push(x_1, x_10);
x_19 = lean::string_iterator_next(x_2);
x_20 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__17(x_15, x_18, x_19);
return x_20;
}
}
}
else
{
obj* x_23;
lean::dec(x_4);
lean::dec(x_0);
x_23 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2);
return x_23;
}
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__16(obj* x_0, obj* x_1) {
{
unsigned x_2; obj* x_4; obj* x_6; obj* x_7; obj* x_8;
x_2 = lean::string_iterator_curr(x_0);
lean::dec(x_0);
x_4 = _l_s6_string_s4_join_s11___closed__1;
lean::inc(x_4);
x_6 = lean::string_push(x_4, x_2);
x_7 = lean::string_iterator_remaining(x_1);
x_8 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__17(x_7, x_6, x_1);
return x_8;
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__3(obj* x_0) {
{
unsigned char x_1;
x_1 = lean::string_iterator_has_next(x_0);
if (x_1 == 0)
{
obj* x_2; obj* x_3; obj* x_4; obj* x_8;
x_2 = lean::alloc_cnstr(0, 0, 0);
;
x_3 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1;
x_4 = _l_s5_mjoin_s6___rarg_s11___closed__1;
lean::inc(x_2);
lean::inc(x_4);
lean::inc(x_3);
x_8 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(x_3, x_4, x_2, x_2, x_0);
if (lean::obj_tag(x_8) == 0)
{
obj* x_9; obj* x_11; obj* x_13;
x_9 = lean::cnstr_get(x_8, 0);
lean::inc(x_9);
x_11 = lean::cnstr_get(x_8, 1);
lean::inc(x_11);
x_13 = lean::cnstr_get(x_8, 2);
lean::inc(x_13);
if (lean::obj_tag(x_13) == 0)
{
lean::dec(x_4);
if (lean::obj_tag(x_8) == 0)
{
unsigned x_17; obj* x_19; obj* x_20;
lean::dec(x_8);
x_17 = lean::unbox_uint32(x_9);
lean::dec(x_9);
x_19 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__4(x_17, x_11);
x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_13, x_19);
return x_20;
}
else
{
unsigned char x_23; obj* x_24; obj* x_25; obj* x_26;
lean::dec(x_13);
lean::dec(x_11);
x_23 = lean::cnstr_get_scalar<unsigned char>(x_8, sizeof(void*)*1);
if (lean::is_shared(x_8)) {
lean::dec(x_8);
x_24 = lean::box(0);
} else {
lean::cnstr_release(x_8, 0);
x_24 = x_8;
}
if (lean::is_scalar(x_24)) {
x_25 = lean::alloc_cnstr(1, 1, 1);
} else {
x_25 = x_24;
}
lean::cnstr_set(x_25, 0, x_9);
lean::cnstr_set_scalar(x_25, sizeof(void*)*1, x_23);
x_26 = x_25;
return x_26;
}
}
else
{
obj* x_28; obj* x_30; obj* x_32; obj* x_33; unsigned x_34; obj* x_36; obj* x_37;
lean::dec(x_8);
x_28 = lean::cnstr_get(x_13, 0);
lean::inc(x_28);
if (lean::is_shared(x_13)) {
lean::dec(x_13);
x_30 = lean::box(0);
} else {
lean::cnstr_release(x_13, 0);
x_30 = x_13;
}
lean::inc(x_4);
x_32 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_32, 0, x_4);
lean::closure_set(x_32, 1, x_28);
if (lean::is_scalar(x_30)) {
x_33 = lean::alloc_cnstr(1, 1, 0);
} else {
x_33 = x_30;
}
lean::cnstr_set(x_33, 0, x_32);
x_34 = lean::unbox_uint32(x_9);
lean::dec(x_9);
x_36 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__6(x_34, x_11);
x_37 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_33, x_36);
return x_37;
}
}
else
{
obj* x_38; unsigned char x_40;
x_38 = lean::cnstr_get(x_8, 0);
lean::inc(x_38);
x_40 = lean::cnstr_get_scalar<unsigned char>(x_8, sizeof(void*)*1);
if (x_40 == 0)
{
obj* x_42; obj* x_44; obj* x_46; obj* x_49; obj* x_50; obj* x_53; obj* x_54; obj* x_55;
lean::dec(x_8);
x_42 = lean::cnstr_get(x_38, 0);
lean::inc(x_42);
x_44 = lean::cnstr_get(x_38, 1);
lean::inc(x_44);
x_46 = lean::cnstr_get(x_38, 2);
lean::inc(x_46);
lean::inc(x_4);
x_49 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_49, 0, x_4);
lean::closure_set(x_49, 1, x_46);
x_50 = lean::cnstr_get(x_38, 3);
lean::inc(x_50);
lean::dec(x_38);
x_53 = lean::alloc_cnstr(0, 4, 0);
lean::cnstr_set(x_53, 0, x_42);
lean::cnstr_set(x_53, 1, x_44);
lean::cnstr_set(x_53, 2, x_49);
lean::cnstr_set(x_53, 3, x_50);
x_54 = lean::alloc_cnstr(1, 1, 1);
lean::cnstr_set(x_54, 0, x_53);
lean::cnstr_set_scalar(x_54, sizeof(void*)*1, x_40);
x_55 = x_54;
return x_55;
}
else
{
lean::dec(x_4);
if (lean::obj_tag(x_8) == 0)
{
obj* x_57; obj* x_59; unsigned x_62; obj* x_64; obj* x_65;
x_57 = lean::cnstr_get(x_8, 1);
lean::inc(x_57);
x_59 = lean::cnstr_get(x_8, 2);
lean::inc(x_59);
lean::dec(x_8);
x_62 = lean::unbox_uint32(x_38);
lean::dec(x_38);
x_64 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__8(x_62, x_57);
x_65 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_59, x_64);
return x_65;
}
else
{
obj* x_66; obj* x_67; obj* x_68;
if (lean::is_shared(x_8)) {
lean::dec(x_8);
x_66 = lean::box(0);
} else {
lean::cnstr_release(x_8, 0);
x_66 = x_8;
}
if (lean::is_scalar(x_66)) {
x_67 = lean::alloc_cnstr(1, 1, 1);
} else {
x_67 = x_66;
}
lean::cnstr_set(x_67, 0, x_38);
lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_40);
x_68 = x_67;
return x_68;
}
}
}
}
else
{
unsigned x_69; unsigned char x_70;
x_69 = lean::string_iterator_curr(x_0);
x_70 = _l_s4_char_s9_is__digit(x_69);
if (x_70 == 0)
{
obj* x_71; obj* x_72; obj* x_74; obj* x_76; obj* x_77; obj* x_78; obj* x_81;
x_71 = _l_s4_char_s11_quote__core(x_69);
x_72 = _l_s4_char_s9_has__repr_s11___closed__1;
lean::inc(x_72);
x_74 = lean::string_append(x_72, x_71);
lean::dec(x_71);
x_76 = lean::string_append(x_74, x_72);
x_77 = lean::alloc_cnstr(0, 0, 0);
;
x_78 = _l_s5_mjoin_s6___rarg_s11___closed__1;
lean::inc(x_77);
lean::inc(x_78);
x_81 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__3_s6___rarg(x_76, x_78, x_77, x_77, x_0);
if (lean::obj_tag(x_81) == 0)
{
obj* x_82; obj* x_84; obj* x_86;
x_82 = lean::cnstr_get(x_81, 0);
lean::inc(x_82);
x_84 = lean::cnstr_get(x_81, 1);
lean::inc(x_84);
x_86 = lean::cnstr_get(x_81, 2);
lean::inc(x_86);
if (lean::obj_tag(x_86) == 0)
{
lean::dec(x_78);
if (lean::obj_tag(x_81) == 0)
{
unsigned x_90; obj* x_92; obj* x_93;
lean::dec(x_81);
x_90 = lean::unbox_uint32(x_82);
lean::dec(x_82);
x_92 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__10(x_90, x_84);
x_93 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_86, x_92);
return x_93;
}
else
{
unsigned char x_96; obj* x_97; obj* x_98; obj* x_99;
lean::dec(x_84);
lean::dec(x_86);
x_96 = lean::cnstr_get_scalar<unsigned char>(x_81, sizeof(void*)*1);
if (lean::is_shared(x_81)) {
lean::dec(x_81);
x_97 = lean::box(0);
} else {
lean::cnstr_release(x_81, 0);
x_97 = x_81;
}
if (lean::is_scalar(x_97)) {
x_98 = lean::alloc_cnstr(1, 1, 1);
} else {
x_98 = x_97;
}
lean::cnstr_set(x_98, 0, x_82);
lean::cnstr_set_scalar(x_98, sizeof(void*)*1, x_96);
x_99 = x_98;
return x_99;
}
}
else
{
obj* x_101; obj* x_103; obj* x_105; obj* x_106; unsigned x_107; obj* x_109; obj* x_110;
lean::dec(x_81);
x_101 = lean::cnstr_get(x_86, 0);
lean::inc(x_101);
if (lean::is_shared(x_86)) {
lean::dec(x_86);
x_103 = lean::box(0);
} else {
lean::cnstr_release(x_86, 0);
x_103 = x_86;
}
lean::inc(x_78);
x_105 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_105, 0, x_78);
lean::closure_set(x_105, 1, x_101);
if (lean::is_scalar(x_103)) {
x_106 = lean::alloc_cnstr(1, 1, 0);
} else {
x_106 = x_103;
}
lean::cnstr_set(x_106, 0, x_105);
x_107 = lean::unbox_uint32(x_82);
lean::dec(x_82);
x_109 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__12(x_107, x_84);
x_110 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_106, x_109);
return x_110;
}
}
else
{
obj* x_111; unsigned char x_113;
x_111 = lean::cnstr_get(x_81, 0);
lean::inc(x_111);
x_113 = lean::cnstr_get_scalar<unsigned char>(x_81, sizeof(void*)*1);
if (x_113 == 0)
{
obj* x_115; obj* x_117; obj* x_119; obj* x_122; obj* x_123; obj* x_126; obj* x_127; obj* x_128;
lean::dec(x_81);
x_115 = lean::cnstr_get(x_111, 0);
lean::inc(x_115);
x_117 = lean::cnstr_get(x_111, 1);
lean::inc(x_117);
x_119 = lean::cnstr_get(x_111, 2);
lean::inc(x_119);
lean::inc(x_78);
x_122 = lean::alloc_closure(reinterpret_cast<void*>(_l_s8_function_s4_comp_s6___rarg), 3, 2);
lean::closure_set(x_122, 0, x_78);
lean::closure_set(x_122, 1, x_119);
x_123 = lean::cnstr_get(x_111, 3);
lean::inc(x_123);
lean::dec(x_111);
x_126 = lean::alloc_cnstr(0, 4, 0);
lean::cnstr_set(x_126, 0, x_115);
lean::cnstr_set(x_126, 1, x_117);
lean::cnstr_set(x_126, 2, x_122);
lean::cnstr_set(x_126, 3, x_123);
x_127 = lean::alloc_cnstr(1, 1, 1);
lean::cnstr_set(x_127, 0, x_126);
lean::cnstr_set_scalar(x_127, sizeof(void*)*1, x_113);
x_128 = x_127;
return x_128;
}
else
{
lean::dec(x_78);
if (lean::obj_tag(x_81) == 0)
{
obj* x_130; obj* x_132; unsigned x_135; obj* x_137; obj* x_138;
x_130 = lean::cnstr_get(x_81, 1);
lean::inc(x_130);
x_132 = lean::cnstr_get(x_81, 2);
lean::inc(x_132);
lean::dec(x_81);
x_135 = lean::unbox_uint32(x_111);
lean::dec(x_111);
x_137 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__14(x_135, x_130);
x_138 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_132, x_137);
return x_138;
}
else
{
obj* x_139; obj* x_140; obj* x_141;
if (lean::is_shared(x_81)) {
lean::dec(x_81);
x_139 = lean::box(0);
} else {
lean::cnstr_release(x_81, 0);
x_139 = x_81;
}
if (lean::is_scalar(x_139)) {
x_140 = lean::alloc_cnstr(1, 1, 1);
} else {
x_140 = x_139;
}
lean::cnstr_set(x_140, 0, x_111);
lean::cnstr_set_scalar(x_140, sizeof(void*)*1, x_113);
x_141 = x_140;
return x_141;
}
}
}
}
else
{
obj* x_143; obj* x_144; obj* x_145; obj* x_146;
lean::inc(x_0);
x_143 = lean::string_iterator_next(x_0);
x_144 = lean::alloc_cnstr(0, 0, 0);
;
x_145 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__16(x_0, x_143);
x_146 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_144, x_145);
return x_146;
}
}
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s3_num_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__2(obj* x_0) {
{
obj* x_1;
x_1 = _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__3(x_0);
if (lean::obj_tag(x_1) == 0)
{
obj* x_2; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13;
x_2 = lean::cnstr_get(x_1, 0);
lean::inc(x_2);
x_4 = lean::cnstr_get(x_1, 1);
lean::inc(x_4);
x_6 = lean::cnstr_get(x_1, 2);
lean::inc(x_6);
if (lean::is_shared(x_1)) {
lean::dec(x_1);
x_8 = lean::box(0);
} else {
lean::cnstr_release(x_1, 0);
lean::cnstr_release(x_1, 1);
lean::cnstr_release(x_1, 2);
x_8 = x_1;
}
x_9 = _l_s6_string_s7_to__nat(x_2);
x_10 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
lean::inc(x_10);
if (lean::is_scalar(x_8)) {
x_12 = lean::alloc_cnstr(0, 3, 0);
} else {
x_12 = x_8;
}
lean::cnstr_set(x_12, 0, x_9);
lean::cnstr_set(x_12, 1, x_4);
lean::cnstr_set(x_12, 2, x_10);
x_13 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_6, x_12);
return x_13;
}
else
{
obj* x_14; unsigned char x_16; obj* x_17; obj* x_18; obj* x_19;
x_14 = lean::cnstr_get(x_1, 0);
lean::inc(x_14);
x_16 = lean::cnstr_get_scalar<unsigned char>(x_1, sizeof(void*)*1);
if (lean::is_shared(x_1)) {
lean::dec(x_1);
x_17 = lean::box(0);
} else {
lean::cnstr_release(x_1, 0);
x_17 = x_1;
}
if (lean::is_scalar(x_17)) {
x_18 = lean::alloc_cnstr(1, 1, 1);
} else {
x_18 = x_17;
}
lean::cnstr_set(x_18, 0, x_14);
lean::cnstr_set_scalar(x_18, sizeof(void*)*1, x_16);
x_19 = x_18;
return x_19;
}
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s4_take_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__18(obj* x_0, obj* x_1) {
{
obj* x_2; obj* x_3;
x_2 = lean::mk_nat_obj(0u);
x_3 = lean::nat_dec_eq(x_0, x_2);
lean::dec(x_2);
if (lean::obj_tag(x_3) == 0)
{
obj* x_6; obj* x_8;
lean::dec(x_3);
x_6 = _l_s6_string_s4_join_s11___closed__1;
lean::inc(x_6);
x_8 = _l_s9___private_127590107__s9_take__aux_s6___main_s6___rarg(x_0, x_6, x_1);
return x_8;
}
else
{
obj* x_11; obj* x_12; obj* x_15;
lean::dec(x_0);
lean::dec(x_3);
x_11 = _l_s6_string_s4_join_s11___closed__1;
x_12 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1;
lean::inc(x_12);
lean::inc(x_11);
x_15 = lean::alloc_cnstr(0, 3, 0);
lean::cnstr_set(x_15, 0, x_11);
lean::cnstr_set(x_15, 1, x_1);
lean::cnstr_set(x_15, 2, x_12);
return x_15;
}
}
}
obj* _l_s13_match__failed_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__19(obj* x_0) {
{
obj* x_1; obj* x_2; obj* x_3; obj* x_7; unsigned char x_8; obj* x_9; obj* x_10;
x_1 = _l_s13_match__failed_s6___rarg_s11___closed__1;
x_2 = _l_s5_mjoin_s6___rarg_s11___closed__1;
x_3 = _l_s4_lean_s6_parser_s9_parsec__t_s11_monad__fail_s6___rarg_s11___closed__1;
lean::inc(x_3);
lean::inc(x_2);
lean::inc(x_1);
x_7 = lean::alloc_cnstr(0, 4, 0);
lean::cnstr_set(x_7, 0, x_0);
lean::cnstr_set(x_7, 1, x_1);
lean::cnstr_set(x_7, 2, x_2);
lean::cnstr_set(x_7, 3, x_3);
x_8 = 0;
x_9 = lean::alloc_cnstr(1, 1, 1);
lean::cnstr_set(x_9, 0, x_7);
lean::cnstr_set_scalar(x_9, sizeof(void*)*1, x_8);
x_10 = x_9;
return x_10;
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__1_s7___boxed(obj* x_0, obj* x_1) {
{
unsigned x_2; obj* x_3;
x_2 = lean::unbox_uint32(x_0);
x_3 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__1(x_2, x_1);
return x_3;
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__4_s7___boxed(obj* x_0, obj* x_1) {
{
unsigned x_2; obj* x_3;
x_2 = lean::unbox_uint32(x_0);
x_3 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__4(x_2, x_1);
return x_3;
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__6_s7___boxed(obj* x_0, obj* x_1) {
{
unsigned x_2; obj* x_3;
x_2 = lean::unbox_uint32(x_0);
x_3 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__6(x_2, x_1);
return x_3;
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__8_s7___boxed(obj* x_0, obj* x_1) {
{
unsigned x_2; obj* x_3;
x_2 = lean::unbox_uint32(x_0);
x_3 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s9___spec__8(x_2, x_1);
return x_3;
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__10_s7___boxed(obj* x_0, obj* x_1) {
{
unsigned x_2; obj* x_3;
x_2 = lean::unbox_uint32(x_0);
x_3 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__10(x_2, x_1);
return x_3;
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__12_s7___boxed(obj* x_0, obj* x_1) {
{
unsigned x_2; obj* x_3;
x_2 = lean::unbox_uint32(x_0);
x_3 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__12(x_2, x_1);
return x_3;
}
}
obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__14_s7___boxed(obj* x_0, obj* x_1) {
{
unsigned x_2; obj* x_3;
x_2 = lean::unbox_uint32(x_0);
x_3 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s10___spec__14(x_2, x_1);
return x_3;
}
}
obj* _l_s9___private_4217055689__s25_parse__mangled__name__aux(obj* x_0, obj* x_1, obj* x_2) {
{
obj* x_3;
x_3 = _l_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main(x_0, x_1, x_2);
return x_3;
}
}
obj* _l_s9___private_74862231__s20_parse__mangled__name(obj* x_0, obj* x_1) {
{
obj* x_3; obj* x_4; obj* x_5;
lean::inc(x_0);
x_3 = _l_s6_string_s5_quote(x_0);
x_4 = lean::alloc_closure(reinterpret_cast<void*>(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1);
lean::closure_set(x_4, 0, x_3);
x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__1(x_0, x_4, x_1);
if (lean::obj_tag(x_5) == 0)
{
obj* x_6; obj* x_8; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17;
x_6 = lean::cnstr_get(x_5, 1);
lean::inc(x_6);
x_8 = lean::cnstr_get(x_5, 2);
lean::inc(x_8);
lean::dec(x_5);
x_11 = lean::string_iterator_remaining(x_6);
x_12 = lean::alloc_cnstr(0, 0, 0);
;
x_13 = _l_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main(x_11, x_12, x_6);
x_14 = _l_s4_lean_s6_parser_s13_monad__parsec_s3_eoi_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__6_s11___closed__1;
lean::inc(x_14);
x_16 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_14, x_13);
x_17 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_8, x_16);
return x_17;
}
else
{
obj* x_18; unsigned char x_20; obj* x_21; obj* x_22; obj* x_23;
x_18 = lean::cnstr_get(x_5, 0);
lean::inc(x_18);
x_20 = lean::cnstr_get_scalar<unsigned char>(x_5, sizeof(void*)*1);
if (lean::is_shared(x_5)) {
lean::dec(x_5);
x_21 = lean::box(0);
} else {
lean::cnstr_release(x_5, 0);
x_21 = x_5;
}
if (lean::is_scalar(x_21)) {
x_22 = lean::alloc_cnstr(1, 1, 1);
} else {
x_22 = x_21;
}
lean::cnstr_set(x_22, 0, x_18);
lean::cnstr_set_scalar(x_22, sizeof(void*)*1, x_20);
x_23 = x_22;
return x_23;
}
}
}
obj* _l_s4_lean_s4_name_s8_demangle(obj* x_0, obj* x_1) {
{
obj* x_2; obj* x_3; obj* x_5;
x_2 = lean::alloc_closure(reinterpret_cast<void*>(_l_s9___private_74862231__s20_parse__mangled__name), 2, 1);
lean::closure_set(x_2, 0, x_1);
x_3 = _l_s6_string_s4_join_s11___closed__1;
lean::inc(x_3);
x_5 = _l_s4_lean_s6_parser_s9_parsec__t_s3_run_s4___at_s4_lean_s6_parser_s6_parsec_s5_parse_s9___spec__1_s6___rarg(x_2, x_0, x_3);
if (lean::obj_tag(x_5) == 0)
{
obj* x_7;
lean::dec(x_5);
x_7 = lean::alloc_cnstr(0, 0, 0);
;
return x_7;
}
else
{
obj* x_8; obj* x_11;
x_8 = lean::cnstr_get(x_5, 0);
lean::inc(x_8);
lean::dec(x_5);
x_11 = lean::alloc_cnstr(1, 1, 0);
lean::cnstr_set(x_11, 0, x_8);
return x_11;
}
}
}
void _l_initialize__l_s4_init_s4_lean_s4_name();
void _l_initialize__l_s4_init_s4_lean_s6_parser_s15_string__literal();
static bool _G_initialized = false;
void _l_initialize__l_s4_init_s4_lean_s14_name__mangling() {
if (_G_initialized) return;
_G_initialized = true;
_l_initialize__l_s4_init_s4_lean_s4_name();
_l_initialize__l_s4_init_s4_lean_s6_parser_s15_string__literal();
_l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__1 = _init__l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__1();
_l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__2 = _init__l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__2();
_l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__3 = _init__l_s9___private_3255790009__s6_string_s11_mangle__aux_s6___main_s11___closed__3();
_l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__1 = _init__l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__1();
_l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__2 = _init__l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__2();
_l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__3 = _init__l_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s11___closed__3();
_l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1 = _init__l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__2_s11___closed__1();
_l_s4_lean_s6_parser_s13_monad__parsec_s3_eoi_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__6_s11___closed__1 = _init__l_s4_lean_s6_parser_s13_monad__parsec_s3_eoi_s4___at_s9___private_1496486805__s27_parse__mangled__string__aux_s6___main_s9___spec__6_s11___closed__1();
_l_s4_lean_s6_string_s8_demangle_s11___closed__1 = _init__l_s4_lean_s6_string_s8_demangle_s11___closed__1();
_l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main_s11___closed__1 = _init__l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main_s11___closed__1();
_l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main_s11___closed__2 = _init__l_s9___private_1205956357__s4_name_s11_mangle__aux_s6___main_s11___closed__2();
_l_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s11___closed__1 = _init__l_s9___private_4217055689__s25_parse__mangled__name__aux_s6___main_s11___closed__1();
}