// 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; 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*); obj* _l_s13_match__failed_s6___rarg_s11___closed__1; 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*); 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*); 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*); 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; 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; 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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(_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(_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(_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(_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(_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(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(_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(_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(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(_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(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(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(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(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(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(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(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(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(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(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(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(_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(_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(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(_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(_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(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(_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(_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(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(_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_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(_l_s2_id_s6___rarg), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(_l_s8_function_s4_comp_s6___rarg), 3, 2); lean::closure_set(x_1, 0, x_0); lean::closure_set(x_1, 1, x_0); x_2 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_2, 0, x_1); return x_2; } } 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(_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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(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(_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(_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(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(_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(_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(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(_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(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(_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(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(_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(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(_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(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(_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(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(_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(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(_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(); }