// Lean compiler output // Module: init.lean.parser.token // Imports: init.lean.parser.combinators init.lean.parser.string_literal #include "runtime/object.h" #include "runtime/apply.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_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__3(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__1_s11___lambda__1_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__4; obj* _l_s4_lean_s6_parser_s8_raw__str_s4_lean_s6_parser_s9_has__view_s6___rarg_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_symbol(obj*); unsigned char _l_s4_lean_s6_parser_s6_syntax_s12_is__of__kind_s6___main(obj*, obj*); obj* _l_s4_lean_s6_parser_s6_symbol_s6_tokens_s6___rarg(obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__5(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3(obj*); obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s6___rarg(obj*); obj* _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3_s11___closed__1; obj* _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__2; obj* _l_s4_lean_s6_parser_s6_symbol_s13_view__default(obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s11___lambda__1(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s8_raw__str_s13_view__default_s6___rarg(obj*, obj*, obj*, obj*, unsigned char); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens; obj* _l_s4_lean_s6_parser_s8_id__part_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__1(obj*, obj*, obj*); obj* _l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__7_s6___rarg(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s8_function_s4_comp_s6___rarg(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__2_s7___boxed(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__4(unsigned, unsigned, obj*, obj*, obj*); obj* _l_s9___private_2012034129__s15_whitespace__aux_s6___main_s11___closed__3; obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s6___rarg_s11___lambda__1(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__1_s7___boxed(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s6_string_s7_to__nat(obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__9(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s3_any_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__2(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27; unsigned char _l_s4_lean_s13_is__id__first(unsigned); obj* _l_s4_lean_s6_parser_s14_with__trailing_s4___at_s4_lean_s6_parser_s5_token_s9___spec__3(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s17_symbol__or__ident_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__19_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s6_number_s9_has__view; obj* _l_s4_lean_s6_parser_s16_basic__parser__m_s5_monad; obj* _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___lambda__1_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_combinators_s15_longest__choice_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__8(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_combinators_s4_node_s4_view_s6___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__4_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__5(obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__hex__lit_s9___spec__3(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__15(obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__1; obj* _l_s4_lean_s6_parser_s15_unicode__symbol(obj*); obj* _l_s4_lean_s6_parser_s8_no__kind; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__1(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__4(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s17_detail__ident_x27(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_as__substring_s6___rarg_s11___lambda__3(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s16_basic__parser__m_s4_lean_s6_parser_s13_monad__parsec; obj* _l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__1_s11___lambda__1(unsigned char, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s15_take__while_x27_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__5(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s15_take__while_x27_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__2_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__15(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__2; obj* _l_s6_string_s4_trim(obj*); obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_whitespace_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__1(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s15_parse__hex__lit_s9___spec__1(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__6(unsigned, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_combinators_s4_many_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__6(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg(obj*, obj*, obj*, obj*, obj*, unsigned char); obj* _l_s4_lean_s6_parser_s15_unicode__symbol_s4_lean_s6_parser_s9_has__view_s6___rarg(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__10(obj*); obj* _l_s4_lean_s6_parser_s10_whitespace(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s11___closed__1; obj* _l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__8(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s6___rarg_s11___lambda__1_s11___closed__1; obj* _l_s4_lean_s6_parser_s8_raw__str_s13_view__default(obj*); obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__3_s7___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__1(obj*); obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__5_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__1(unsigned, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__6_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_number_s6_parser_s6_tokens(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__9(obj*); obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__1_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s9_reader__t_s11_alternative_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s7_indexed_s6___rarg_s11___lambda__1_s11___closed__1; obj* _l_s9___private_580269747__s8_str__aux_s6___main(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s4_list_s4_cons_s6_tokens_s6___rarg(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_syntax_s8_as__node_s6___main(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_foldl_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__20_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s16_basic__parser__m_s11_alternative; obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__3_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s4_trie_s13_match__prefix_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s6_symbol_s6_tokens(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__1(unsigned, obj*, obj*, obj*); obj* _l_s6_string_s8_iterator_s5_nextn_s6___main(obj*, obj*); obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__3(obj*); obj* _l_s4_lean_s6_parser_s16_basic__parser__m_s13_monad__except; obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__18(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__12(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__4(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s3_raw_s6_tokens(obj*, obj*, obj*, obj*, obj*, obj*, unsigned char); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__1(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__6_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_rec__t_s4_lean_s6_parser_s13_monad__parsec_s6___rarg(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s4_curr_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__2(obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__3(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s9_substring_s10_of__string(obj*); unsigned char _l_s4_lean_s21_is__id__begin__escape(unsigned); obj* _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__1; obj* _l_s4_lean_s6_parser_s8_raw__str_s4_lean_s6_parser_s11_has__tokens_s7___boxed(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s10_number_x27(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___lambda__2(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__3; obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__16(obj*, obj*, obj*); obj* _l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s17_detail__ident_x27_s9___spec__1(obj*); obj* _l_s4_lean_s6_parser_s6_number_s4_view_s7_to__nat_s6___main(obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view; obj* _l_s9_reader__t_s6_orelse_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__1_s6___rarg(obj*, obj*, obj*, obj*, obj*); 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_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__11(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser(obj*, obj*, obj*); obj* _l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__5(obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s11___lambda__2(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view(obj*); obj* _l_s4_lean_s6_parser_s11_combinators_s10_seq__right_s4_view_s6___rarg(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__8_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s8_raw__str_s4_lean_s6_parser_s11_has__tokens(obj*, obj*, obj*, obj*, obj*, unsigned char); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__2(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__3_s6___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s9___private_3693562977__s8_run__aux_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__3_s7___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__2(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s10_number_x27_s10___spec__12_s6___rarg(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_digit_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__8(obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__7(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__2; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__5(obj*, obj*, obj*); obj* _l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__1(obj*); obj* _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__6; obj* _l_s4_char_s11_quote__core(unsigned); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__6(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s9___private_2012034129__s15_whitespace__aux_s6___main(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_combinators_s8_optional_s4___at_s4_lean_s6_parser_s17_detail__ident_x27_s9___spec__2(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__2_s6___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s6_option_s9_to__monad_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__2_s6___rarg(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s15_parse__hex__lit(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__1(obj*, obj*, obj*); obj* _l_s4_true_s9_decidable; obj* _l_s6_option_s3_map_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__12_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s11_combinators_s11_choice__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__16(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_detail__ident_s9_has__view; obj* _l_s6_option_s3_get_s6___main_s4___at_s4_lean_s6_parser_s3_run_s9___spec__2(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__4(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s14_longest__match_s4___at_s4_lean_s6_parser_s10_number_x27_s10___spec__10(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__2(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__5_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_string__lit_s13_has__view_x27_s11___lambda__2(obj*); obj* _l_s4_list_s6_mfoldr_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s10___spec__13(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s3_any_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__5(obj*); obj* _l_s5_mjoin_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__2(obj*); obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s11_string__lit_s13_has__view_x27_s11___lambda__1(obj*); obj* _l_s4_lean_s6_parser_s7_indexed(obj*); obj* _l_s4_lean_s6_parser_s10_number_x27_s11___lambda__3(obj*, obj*, obj*, obj*); obj* _l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__5_s6___rarg(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s6___rarg(obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__7_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s15_parse__oct__lit(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__9_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__9(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix; obj* _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s14_many1__aux_x27_s6___main_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__2_s7___boxed(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s17_symbol__or__ident_s4_view_s6___rarg(obj*, obj*); obj* _l_s2_id_s6___rarg(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__1_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part; obj* _l_s4_lean_s6_parser_s11_string__lit; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__3(obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__8(obj*, obj*, obj*, obj*); obj* _l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__1_s6___rarg(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view(obj*); obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg(obj*, obj*, obj*, obj*, obj*, unsigned char); obj* _l_s4_lean_s6_parser_s13_detail__ident_s6_parser(obj*, obj*, obj*); unsigned char _l_s4_char_s9_is__digit(unsigned); obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s6_tokens(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__6_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view_s6___rarg(obj*); obj* _l_s4_lean_s6_parser_s6_number_s6_parser_s4_view_s6___rarg_s11___closed__1; unsigned char _l_s4_lean_s12_is__id__rest(unsigned); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s15_take__while_x27_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__5_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__4_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__4; obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s5_token_s9___spec__1(obj*, obj*, obj*); obj* _l_s6_option_s9_to__monad_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__2(obj*); obj* _l_s4_lean_s6_parser_s7_indexed_s6___rarg_s11___lambda__1(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_as__substring_s6___rarg_s11___lambda__2(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s15_string__lit_x27_s11___closed__1; obj* _l_s4_lean_s6_parser_s6_rec__t_s3_run_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s23_number__or__string__lit(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s15_take__while_x27_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__2(obj*); obj* _l_s9___private_1297690757__s10_many1__aux_s6___main_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__6_s6___rarg(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_foldl_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__20(obj*, unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__7(obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__1_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s9_reader__t_s5_monad_s6___rarg(obj*); obj* _l_s4_lean_s6_parser_s17_symbol__or__ident_s6___rarg_s11___lambda__1(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_string__lit_s13_has__view_x27; obj* _l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__3(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__9(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__6(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__2_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__hex__lit_s9___spec__2_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s15_unicode__symbol_s13_view__default(obj*); obj* _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__2(obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___lambda__3(obj*, obj*, obj*, obj*); obj* _l_s9___private_3229416877__s21_update__trailing__lst(obj*, obj*); obj* _l_s9___private_3229416877__s16_update__trailing_s6___main(obj*, obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s5_token_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__14_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s6_symbol_s13_view__default_s6___rarg(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__1(obj*, obj*, obj*, obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__7(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__3(obj*); obj* _l_s4_lean_s6_parser_s15_string__lit_x27(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s12_symbol__core_s6___rarg(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s19_parse__quoted__char_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__3(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21_s11___lambda__2_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__6(obj*, unsigned char, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__13_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s6_option_s13_get__or__else_s6___main_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s15_unicode__symbol_s4_lean_s6_parser_s11_has__tokens_s6___rarg(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__6(obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__3(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s19_parse__quoted__char_s6___rarg_s11___lambda__7_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__1_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s17_symbol__or__ident_s6_tokens(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__13(unsigned, obj*, obj*, obj*); obj* _l_s9_reader__t_s6_orelse_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__1(obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__13(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__3(unsigned char, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s8_raw__str_s4_lean_s6_parser_s9_has__view_s6___rarg(obj*, obj*, obj*, obj*, unsigned char); obj* _l_s4_lean_s6_parser_s7_indexed_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__2_s7___boxed(obj*, obj*, obj*, obj*); unsigned char _l_s4_lean_s19_is__id__end__escape(unsigned); obj* _l_s4_lean_s6_parser_s15_unicode__symbol_s4_lean_s6_parser_s11_has__tokens(obj*, obj*); obj* _l_s4_lean_s6_parser_s15_unicode__symbol_s13_view__default_s6___rarg(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s17_symbol__or__ident(obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(obj*); obj* _l_s4_lean_s6_parser_s28_detail__ident__part__escaped; obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__4_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s6_number_s6_parser_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__1(obj*); obj* _l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___closed__1; obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__4_s11___closed__2; obj* _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s7___boxed(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s9_has__view; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s6___rarg(obj*, obj*, obj*, obj*); unsigned char _l_s4_char_s9_is__alpha(unsigned); obj* _l_s4_lean_s6_parser_s3_raw_s6_tokens_s7___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_combinators_s7_any__of_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__2(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__2_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27_s11___lambda__1_s11___closed__1; obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__7(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__1(unsigned, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__4(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__3(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s10_number_x27_s10___spec__11(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27_s11___lambda__1(obj*); obj* _l_s9___private_3602054007__s18_mk__consume__token(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__1(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s4_curr_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__2_s6___rarg(obj*, obj*); obj* _l_s4_char_s9_has__repr_s11___closed__1; obj* _l_s4_lean_s4_name_s10_to__string_s11___closed__1; obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__2_s7___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_peek__token(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__17_s6___rarg(obj*, obj*); obj* _l_s4_lean_s17_id__begin__escape; obj* _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__2(obj*); obj* _l_s4_lean_s6_parser_s8_raw__str(obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__14(obj*, obj*, obj*); obj* _l_s4_list_s10_enum__from_s6___main_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__2(obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__7(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__6_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s4_view_s6___rarg(obj*); obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s11___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s12_symbol__core(obj*); obj* _l_s9___private_1765190339__s13_to__nat__core_s6___main(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_number_s6_parser(obj*); obj* _l_s4_lean_s6_parser_s9_try__view_s4___at_s4_lean_s6_parser_s6_number_s6_parser_s9___spec__1(obj*); obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__14(obj*); obj* _l_s4_lean_s6_parser_s6_number_s6_parser_s6___rarg(obj*); obj* _l_s4_lean_s6_parser_s10_number_x27_s11___lambda__1(obj*, obj*, obj*, obj*); obj* _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s9_observing_s4___at_s4_lean_s6_parser_s11_peek__token_s9___spec__2(obj*, obj*, obj*); obj* _l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg(obj*, obj*, obj*, obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__5(obj*, obj*, obj*); obj* _l_s9___private_3229416877__s21_update__trailing__lst_s6___main(obj*, obj*); obj* _l_s4_lean_s6_parser_s6_number_s6_parser_s4_view_s6___rarg(obj*); obj* _l_s9___private_3693562977__s8_run__aux_s6___main_s6___rarg(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1_s11___closed__2; obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__13(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__6(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__15_s6___rarg(obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__11(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__4_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s12_symbol__core_s6___rarg_s11___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__2_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__9(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s8_raw__str_s6___rarg(obj*, obj*, obj*, obj*, unsigned char); obj* _l_s4_lean_s6_parser_s8_raw__str_s4_lean_s6_parser_s9_has__view(obj*); unsigned char _l_s6_string_s9_is__empty(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__13(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21_s11___lambda__2(unsigned, unsigned, obj*, obj*, obj*); obj* _l_s9___private_2012034129__s15_whitespace__aux_s6___main_s11___closed__2; obj* _l_s4_lean_s6_parser_s7_indexed_s6___rarg(obj*, obj*, obj*); obj* _l_s9___private_1741613153__s13_to__nat__base(obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__22(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s10_number_x27_s11___lambda__2(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s15_unicode__symbol_s6___rarg(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s11_has__tokens; obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__5(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1(obj*); obj* _l_s4_list_s6_mfoldl_s6___main_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s10___spec__10(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__10_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__6(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___closed__1; obj* _l_s4_lean_s6_parser_s6_number_s4_view_s7_of__nat(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__19(obj*); obj* _l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___closed__2; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__4(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___lambda__1(unsigned char, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s17_detail__ident_x27_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__6_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__4_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s17_detail__ident_x27_s9___spec__1_s6___rarg(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21_s11___lambda__1_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__2(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__hex__lit_s9___spec__2(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_symbol_s4_view(obj*); obj* _l_s4_list_s7_reverse_s6___rarg(obj*); obj* _l_s4_lean_s6_parser_s5_ident_s6_parser(obj*); obj* _l_s9___private_2012034129__s15_whitespace__aux_s6___main_s11___closed__1; obj* _l_s4_lean_s6_parser_s6_number_s4_view_s7_to__nat(obj*); obj* _l_s4_lean_s6_parser_s3_raw_s4_view(obj*); obj* _l_s4_lean_s6_parser_s5_token(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(obj*, obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__2(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__10(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s14_many1__aux_x27_s6___main_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__2(unsigned, unsigned, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21_s7___boxed(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s6_rbnode_s4_find_s6___main_s4___at_s4_lean_s6_parser_s10_token__map_s6_insert_s9___spec__2_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__4_s11___closed__1; obj* _l_s6_string_s4_join_s11___closed__1; obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s9_has__view; obj* _l_s4_lean_s6_parser_s6_rec__t_s7_recurse_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__8(unsigned char, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__1_s11___closed__1; obj* _l_s9___private_4089500695__s27_finish__comment__block__aux(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__17(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s7_failure_s4___at_s4_lean_s6_parser_s5_token_s9___spec__4(obj*, obj*); obj* _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__2_s11___closed__1; obj* _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__3; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__12(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__3; obj* _l_s4_lean_s6_parser_s9_parsec__t_s5_merge_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_as__substring_s6___rarg_s11___lambda__1(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s19_parse__quoted__char_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__6(obj*); obj* _l_s4_lean_s6_parser_s12_match__token_s11___lambda__1(obj*); obj* _l_s4_lean_s6_parser_s9_try__view_s4___at_s4_lean_s6_parser_s11_string__lit_s6_parser_s9___spec__1(obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__18(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__19(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__23_s6___rarg(obj*, obj*); obj* _l_s9_reader__t_s13_monad__except_s6___rarg(obj*); obj* _l_s4_list_s3_map_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__9(obj*); obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser(obj*); obj* _l_s4_list_s5_foldl_s6___main_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__3(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s17_id__part__escaped_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__10(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s12_mk__raw__res(obj*, obj*); obj* _l_s9___private_3229416877__s16_update__trailing(obj*, obj*); obj* _l_s4_lean_s6_parser_s6_number_s6_parser_s6___rarg_s11___lambda__1(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__2_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__2; obj* _l_s4_lean_s6_parser_s13_as__substring_s6___rarg(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__2(obj*, unsigned char, obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s9___private_2012034129__s15_whitespace__aux(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s7_failure_s4___at_s4_lean_s6_parser_s5_token_s9___spec__4_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg(obj*); obj* _l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s6_tokens(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__8(obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__10(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s11_peek__token_s9___spec__1(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__23(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__17(obj*); obj* _l_s3_nat_s4_repr(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21(unsigned, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s10_number_x27_s11___lambda__4(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___closed__1; obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__20(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__1(unsigned, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__4(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s15_id__end__escape; obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1_s11___closed__1; obj* _l_s4_lean_s6_parser_s22_parse__string__literal_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__1(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__21(obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__3(obj*, obj*, obj*); obj* _l_s4_list_s6_mfoldl_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__9(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__2(unsigned, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__25(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__12_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__2(unsigned, unsigned, obj*, obj*, obj*); obj* _l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__7(obj*, obj*); obj* _l_s9___private_2038417741__s20_mk__consumed__result_s6___rarg(unsigned char, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__15(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_symbol_s6___rarg(obj*, obj*, obj*); unsigned char _l_s4_char_s14_is__whitespace(unsigned); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_left__over_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s8_raw__str_s13_view__default_s6___rarg_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__26(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s12_symbol__core_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s10_raw__ident_s6_parser(obj*); obj* _l_s9___private_3519775105__s9_ident_x27(obj*, obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__14(obj*, obj*, obj*); obj* _l_s4_list_s3_map_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__9_s11___lambda__1(obj*, obj*, obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__7(obj*, obj*, obj*); obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__1_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__1_s11___closed__1; obj* _l_s4_list_s6_mfoldr_s6___main_s4___at_s4_lean_s6_parser_s13_monad__parsec_s14_longest__match_s9___spec__2_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view_s6___rarg_s11___closed__2; obj* _l_s4_lean_s6_parser_s10_number_x27_s11___closed__1; 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_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__1(obj*); obj* _l_s4_lean_s6_parser_s17_id__part__default_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__3(obj*, obj*, obj*); obj* _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__6_s7___boxed(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s11_combinators_s7_any__of_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__2(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_number_s6_parser_s4_view_s6___rarg_s11___closed__2; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__12(obj*); obj* _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__3(obj*, unsigned char, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__5(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1(obj*); obj* _l_s4_lean_s6_parser_s11_combinators_s11_monad__lift_s4_view_s6___rarg(obj*, obj*, obj*); obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__4(obj*); obj* _l_s4_lean_s6_parser_s17_symbol__or__ident_s4_view(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__1(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s12_match__token_s11___closed__1; obj* _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__2_s11___closed__1; obj* _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1(obj*); obj* _l_s4_lean_s6_parser_s13_as__substring(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__3_s6___rarg(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s15_string__lit_x27_s11___lambda__1(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1(obj*); obj* _l_s4_lean_s6_parser_s8_raw__str_s6___rarg_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__3(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s15_unicode__symbol_s4_lean_s6_parser_s9_has__view(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__2(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_rec__t_s7_recurse_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__8_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg_s7___boxed(obj*, obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__21_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__10_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__5; obj* _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__2_s11___closed__2; obj* _l_s9___private_3693562977__s8_run__aux_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__3(obj*, obj*, obj*, unsigned char, obj*, obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__16(obj*, obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__11(obj*, obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__24(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_number_s13_has__view_x27; obj* _l_s4_lean_s6_parser_s11_string__lit_s9_has__view; obj* _l_s4_lean_s6_parser_s11_combinators_s7_any__of_s4_view_s6___rarg(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s3_raw(obj*); obj* _l_s4_lean_s6_parser_s15_parse__bin__lit(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__17_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__1(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s9_observing_s4___at_s4_lean_s6_parser_s5_token_s9___spec__2(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s22_parse__string__literal_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__1(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s4_view(obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__12(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_number; obj* _l_s4_lean_s6_parser_s14_with__trailing(obj*); obj* _l_s4_lean_s6_parser_s11_token__cont(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s12_match__token_s11___closed__2; obj* _l_s4_lean_s6_parser_s12_match__token(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__9_s6___rarg(obj*, obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__5(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__19_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__2(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s22_finish__comment__block(obj*, obj*, obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__5(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s10_number_x27_s10___spec__12(obj*); obj* _l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2(obj*, obj*); obj* _l_s4_lean_s6_parser_s6_tokens(obj*, obj*); obj* _l_s4_lean_s6_parser_s13_detail__ident; obj* _l_s4_lean_s6_parser_s9_substring_s10_to__string(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__6(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__4(unsigned, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s6_symbol_s4_view_s6___rarg(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__25_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__4(obj*, obj*, obj*, unsigned, obj*); obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__3_s6___rarg(obj*, obj*); obj* _l_s4_lean_s4_name_s12_has__dec__eq_s6___main(obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s7_failure_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s6_number_s6_parser_s4_view(obj*); obj* _l_s4_lean_s6_parser_s11_combinators_s11_choice__aux_s6___main_s6___rarg_s11___closed__1; obj* _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s9_has__view; obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2_s11___closed__1; obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__8(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s14_with__trailing_s6___rarg(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__1_s7___boxed(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27_s11___lambda__2(obj*); obj* _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__2(obj*, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21_s11___lambda__1(unsigned, obj*, obj*, obj*); obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__7(obj*, obj*, obj*); obj* _l_s6_string_s5_quote(obj*); obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__13_s7___boxed(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27; obj* _l_s5_dlist_s9_singleton_s6___rarg(obj*, obj*); obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s6_tokens(obj*, obj*); obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__1(obj*, unsigned char, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__1(unsigned, obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___closed__2; obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s6___rarg_s11___lambda__1(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___closed__2; obj* _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1(obj*); obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s6___rarg(obj*); obj* _l_s9___private_1765190339__s13_to__nat__core(obj*, obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2_s11___closed__2; obj* _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__3_s7___boxed(obj*, obj*, obj*); obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2(obj*); obj* _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27; obj* _l_s4_lean_s6_parser_s12_match__token(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; x_3 = lean::cnstr_get(x_0, 1); lean::inc(x_3); lean::dec(x_0); lean::inc(x_1); x_7 = _l_s4_lean_s6_parser_s4_trie_s13_match__prefix_s6___rarg(x_3, x_1); x_8 = _l_s4_lean_s6_parser_s12_match__token_s11___closed__1; lean::inc(x_8); x_10 = _l_s6_option_s3_map_s6___rarg(x_8, x_7); x_11 = _l_s4_lean_s6_parser_s12_match__token_s11___closed__2; lean::inc(x_11); x_13 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_13, 0, x_10); lean::cnstr_set(x_13, 1, x_1); lean::cnstr_set(x_13, 2, x_11); x_14 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_14, 0, x_13); lean::cnstr_set(x_14, 1, x_2); return x_14; } } obj* _init__l_s4_lean_s6_parser_s12_match__token_s11___closed__1() { { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s12_match__token_s11___lambda__1), 1, 0); return x_0; } } obj* _init__l_s4_lean_s6_parser_s12_match__token_s11___closed__2() { { obj* x_0; obj* x_1; obj* x_2; obj* x_3; 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_closure(reinterpret_cast(_l_s8_function_s4_comp_s6___rarg), 3, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); x_3 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_3, 0, x_2); return x_3; } } obj* _l_s4_lean_s6_parser_s12_match__token_s11___lambda__1(obj* x_0) { { obj* x_1; x_1 = lean::cnstr_get(x_0, 1); lean::inc(x_1); lean::dec(x_0); return x_1; } } obj* _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_5; obj* x_6; x_5 = lean::mk_nat_obj(0u); x_6 = lean::nat_dec_eq(x_1, x_5); lean::dec(x_5); if (lean::obj_tag(x_6) == 0) { obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_22; obj* x_23; obj* x_25; lean::dec(x_6); x_9 = lean::mk_nat_obj(1u); x_10 = lean::nat_sub(x_1, x_9); lean::dec(x_1); x_12 = lean::nat_dec_eq(x_0, x_9); x_16 = _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__3; x_17 = _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__4; lean::inc(x_3); lean::inc(x_2); lean::inc(x_17); lean::inc(x_16); x_22 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__3(x_16, x_17, x_2, x_3, x_4); x_23 = lean::cnstr_get(x_22, 0); lean::inc(x_23); x_25 = lean::cnstr_get(x_22, 1); lean::inc(x_25); lean::dec(x_22); if (lean::obj_tag(x_23) == 0) { obj* x_28; obj* x_30; obj* x_33; obj* x_36; obj* x_37; obj* x_39; obj* x_42; x_28 = lean::cnstr_get(x_23, 1); lean::inc(x_28); x_30 = lean::cnstr_get(x_23, 2); lean::inc(x_30); lean::dec(x_23); x_33 = lean::nat_add(x_0, x_9); lean::inc(x_2); lean::inc(x_10); x_36 = _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main(x_33, x_10, x_2, x_28, x_25); x_37 = lean::cnstr_get(x_36, 0); lean::inc(x_37); x_39 = lean::cnstr_get(x_36, 1); lean::inc(x_39); lean::dec(x_36); x_42 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_30, x_37); x_13 = x_42; x_14 = x_39; goto lbl_15; } else { obj* x_43; unsigned char x_45; obj* x_46; obj* x_47; obj* x_48; x_43 = lean::cnstr_get(x_23, 0); lean::inc(x_43); x_45 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); if (lean::is_shared(x_23)) { lean::dec(x_23); x_46 = lean::box(0); } else { lean::cnstr_release(x_23, 0); x_46 = x_23; } if (lean::is_scalar(x_46)) { x_47 = lean::alloc_cnstr(1, 1, 1); } else { x_47 = x_46; } lean::cnstr_set(x_47, 0, x_43); lean::cnstr_set_scalar(x_47, sizeof(void*)*1, x_45); x_48 = x_47; x_13 = x_48; x_14 = x_25; goto lbl_15; } lbl_15: { if (lean::obj_tag(x_13) == 0) { obj* x_55; lean::dec(x_10); lean::dec(x_12); lean::dec(x_9); lean::dec(x_0); lean::dec(x_2); lean::dec(x_3); x_55 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_55, 0, x_13); lean::cnstr_set(x_55, 1, x_14); return x_55; } else { obj* x_56; unsigned char x_58; obj* x_59; obj* x_60; x_56 = lean::cnstr_get(x_13, 0); lean::inc(x_56); x_58 = lean::cnstr_get_scalar(x_13, sizeof(void*)*1); if (x_58 == 0) { obj* x_63; obj* x_64; obj* x_69; obj* x_70; obj* x_72; lean::dec(x_13); x_63 = _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__1; x_64 = _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__2; lean::inc(x_3); lean::inc(x_2); lean::inc(x_64); lean::inc(x_63); x_69 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__3(x_63, x_64, x_2, x_3, x_14); x_70 = lean::cnstr_get(x_69, 0); lean::inc(x_70); x_72 = lean::cnstr_get(x_69, 1); lean::inc(x_72); lean::dec(x_69); if (lean::obj_tag(x_70) == 0) { obj* x_75; obj* x_77; obj* x_79; x_75 = lean::cnstr_get(x_70, 1); lean::inc(x_75); x_77 = lean::cnstr_get(x_70, 2); 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); lean::cnstr_release(x_70, 1); lean::cnstr_release(x_70, 2); x_79 = x_70; } if (lean::obj_tag(x_12) == 0) { obj* x_82; obj* x_86; obj* x_87; obj* x_89; obj* x_92; lean::dec(x_12); lean::dec(x_79); x_82 = lean::nat_sub(x_0, x_9); lean::dec(x_9); lean::inc(x_2); lean::inc(x_10); x_86 = _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main(x_82, x_10, x_2, x_75, x_72); x_87 = lean::cnstr_get(x_86, 0); lean::inc(x_87); x_89 = lean::cnstr_get(x_86, 1); lean::inc(x_89); lean::dec(x_86); x_92 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_77, x_87); x_59 = x_92; x_60 = x_89; goto lbl_61; } else { unsigned char x_95; obj* x_96; obj* x_97; obj* x_99; obj* x_100; lean::dec(x_12); lean::dec(x_9); x_95 = 0; x_96 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; x_97 = lean::box(x_95); lean::inc(x_96); if (lean::is_scalar(x_79)) { x_99 = lean::alloc_cnstr(0, 3, 0); } else { x_99 = x_79; } lean::cnstr_set(x_99, 0, x_97); lean::cnstr_set(x_99, 1, x_75); lean::cnstr_set(x_99, 2, x_96); x_100 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_77, x_99); x_59 = x_100; x_60 = x_72; goto lbl_61; } } else { obj* x_103; unsigned char x_105; obj* x_106; obj* x_107; obj* x_108; lean::dec(x_12); lean::dec(x_9); x_103 = lean::cnstr_get(x_70, 0); lean::inc(x_103); x_105 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); if (lean::is_shared(x_70)) { lean::dec(x_70); x_106 = lean::box(0); } else { lean::cnstr_release(x_70, 0); x_106 = x_70; } if (lean::is_scalar(x_106)) { x_107 = lean::alloc_cnstr(1, 1, 1); } else { x_107 = x_106; } lean::cnstr_set(x_107, 0, x_103); lean::cnstr_set_scalar(x_107, sizeof(void*)*1, x_105); x_108 = x_107; x_59 = x_108; x_60 = x_72; goto lbl_61; } } else { obj* x_116; lean::dec(x_10); lean::dec(x_12); lean::dec(x_9); lean::dec(x_0); lean::dec(x_2); lean::dec(x_3); lean::dec(x_56); x_116 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_116, 0, x_13); lean::cnstr_set(x_116, 1, x_14); return x_116; } lbl_61: { if (lean::obj_tag(x_59) == 0) { obj* x_121; obj* x_122; lean::dec(x_10); lean::dec(x_0); lean::dec(x_2); lean::dec(x_3); x_121 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_59); x_122 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_122, 0, x_121); lean::cnstr_set(x_122, 1, x_60); return x_122; } else { obj* x_123; unsigned char x_125; x_123 = lean::cnstr_get(x_59, 0); lean::inc(x_123); x_125 = lean::cnstr_get_scalar(x_59, sizeof(void*)*1); if (x_125 == 0) { obj* x_128; obj* x_129; obj* x_131; obj* x_133; lean::dec(x_59); lean::inc(x_2); x_128 = _l_s4_lean_s6_parser_s13_monad__parsec_s3_any_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__2(x_2, x_3, x_60); x_129 = lean::cnstr_get(x_128, 0); lean::inc(x_129); x_131 = lean::cnstr_get(x_128, 1); lean::inc(x_131); if (lean::is_shared(x_128)) { lean::dec(x_128); x_133 = lean::box(0); } else { lean::cnstr_release(x_128, 0); lean::cnstr_release(x_128, 1); x_133 = x_128; } if (lean::obj_tag(x_129) == 0) { obj* x_134; obj* x_136; obj* x_139; obj* x_140; obj* x_142; obj* x_145; obj* x_146; obj* x_147; obj* x_148; x_134 = lean::cnstr_get(x_129, 1); lean::inc(x_134); x_136 = lean::cnstr_get(x_129, 2); lean::inc(x_136); lean::dec(x_129); x_139 = _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main(x_0, x_10, x_2, x_134, x_131); x_140 = lean::cnstr_get(x_139, 0); lean::inc(x_140); x_142 = lean::cnstr_get(x_139, 1); lean::inc(x_142); lean::dec(x_139); x_145 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_136, x_140); x_146 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_123, x_145); x_147 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_146); if (lean::is_scalar(x_133)) { x_148 = lean::alloc_cnstr(0, 2, 0); } else { x_148 = x_133; } lean::cnstr_set(x_148, 0, x_147); lean::cnstr_set(x_148, 1, x_142); return x_148; } else { obj* x_152; unsigned char x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; lean::dec(x_10); lean::dec(x_0); lean::dec(x_2); x_152 = lean::cnstr_get(x_129, 0); lean::inc(x_152); x_154 = lean::cnstr_get_scalar(x_129, sizeof(void*)*1); if (lean::is_shared(x_129)) { lean::dec(x_129); x_155 = lean::box(0); } else { lean::cnstr_release(x_129, 0); x_155 = x_129; } if (lean::is_scalar(x_155)) { x_156 = lean::alloc_cnstr(1, 1, 1); } else { x_156 = x_155; } lean::cnstr_set(x_156, 0, x_152); lean::cnstr_set_scalar(x_156, sizeof(void*)*1, x_154); x_157 = x_156; x_158 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_123, x_157); x_159 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_158); if (lean::is_scalar(x_133)) { x_160 = lean::alloc_cnstr(0, 2, 0); } else { x_160 = x_133; } lean::cnstr_set(x_160, 0, x_159); lean::cnstr_set(x_160, 1, x_131); return x_160; } } else { obj* x_166; obj* x_167; lean::dec(x_10); lean::dec(x_123); lean::dec(x_0); lean::dec(x_2); lean::dec(x_3); x_166 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_56, x_59); x_167 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_167, 0, x_166); lean::cnstr_set(x_167, 1, x_60); return x_167; } } } } } } else { obj* x_171; obj* x_172; obj* x_173; obj* x_177; lean::dec(x_6); lean::dec(x_0); lean::dec(x_1); x_171 = lean::box(0); x_172 = _l_s9___private_1297690757__s10_many1__aux_s6___main_s6___rarg_s11___closed__1; x_173 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_171); lean::inc(x_173); lean::inc(x_172); x_177 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_172, x_173, x_171, x_171, x_2, x_3, x_4); return x_177; } } } obj* _init__l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__1() { { obj* x_0; x_0 = lean::mk_string("-/"); return x_0; } } obj* _init__l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__2() { { 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* _init__l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__3() { { obj* x_0; x_0 = lean::mk_string("/-"); return x_0; } } obj* _init__l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__4() { { 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_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { { obj* x_8; obj* x_9; unsigned char x_10; obj* x_11; obj* x_12; obj* x_13; lean::dec(x_4); x_8 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_2, x_5); x_9 = lean::alloc_cnstr(0, 4, 0); lean::cnstr_set(x_9, 0, x_8); lean::cnstr_set(x_9, 1, x_0); lean::cnstr_set(x_9, 2, x_1); lean::cnstr_set(x_9, 3, x_3); x_10 = 0; x_11 = lean::alloc_cnstr(1, 1, 1); lean::cnstr_set(x_11, 0, x_9); lean::cnstr_set_scalar(x_11, sizeof(void*)*1, x_10); x_12 = x_11; x_13 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_13, 0, x_12); lean::cnstr_set(x_13, 1, x_6); return x_13; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1(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_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg), 7, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s3_any_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__2(obj* x_0, obj* x_1, obj* x_2) { { unsigned char x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { obj* x_4; obj* x_5; obj* x_6; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_19; x_4 = lean::box(0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_6 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); x_10 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); x_11 = lean::cnstr_get(x_10, 0); lean::inc(x_11); x_13 = lean::cnstr_get(x_10, 1); lean::inc(x_13); if (lean::is_shared(x_10)) { lean::dec(x_10); x_15 = lean::box(0); } else { lean::cnstr_release(x_10, 0); lean::cnstr_release(x_10, 1); x_15 = x_10; } x_16 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_16); x_18 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_11); if (lean::is_scalar(x_15)) { x_19 = lean::alloc_cnstr(0, 2, 0); } else { x_19 = x_15; } lean::cnstr_set(x_19, 0, x_18); lean::cnstr_set(x_19, 1, x_13); return x_19; } else { unsigned x_20; obj* x_21; x_20 = lean::string_iterator_curr(x_1); x_21 = _l_s4_true_s9_decidable; if (lean::obj_tag(x_21) == 0) { obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_33; obj* x_34; obj* x_36; obj* x_38; obj* x_39; obj* x_41; obj* x_42; lean::dec(x_21); x_23 = _l_s4_char_s11_quote__core(x_20); x_24 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_24); x_26 = lean::string_append(x_24, x_23); lean::dec(x_23); x_28 = lean::string_append(x_26, x_24); x_29 = lean::box(0); x_30 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_29); lean::inc(x_30); x_33 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_28, x_30, x_29, x_29, x_0, x_1, x_2); x_34 = lean::cnstr_get(x_33, 0); lean::inc(x_34); x_36 = lean::cnstr_get(x_33, 1); lean::inc(x_36); if (lean::is_shared(x_33)) { lean::dec(x_33); x_38 = lean::box(0); } else { lean::cnstr_release(x_33, 0); lean::cnstr_release(x_33, 1); x_38 = x_33; } x_39 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_39); x_41 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_39, x_34); if (lean::is_scalar(x_38)) { x_42 = lean::alloc_cnstr(0, 2, 0); } else { x_42 = x_38; } lean::cnstr_set(x_42, 0, x_41); lean::cnstr_set(x_42, 1, x_36); return x_42; } else { obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; lean::dec(x_0); lean::dec(x_21); x_45 = lean::string_iterator_next(x_1); x_46 = lean::box(0); x_47 = lean::box_uint32(x_20); x_48 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_48, 0, x_47); lean::cnstr_set(x_48, 1, x_45); lean::cnstr_set(x_48, 2, x_46); x_49 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_49, 0, x_48); lean::cnstr_set(x_49, 1, x_2); return x_49; } } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned char x_7; lean::dec(x_2); lean::inc(x_0); x_7 = _l_s6_string_s9_is__empty(x_0); if (x_7 == 0) { obj* x_8; obj* x_10; obj* x_12; x_8 = lean::string_length(x_0); lean::inc(x_0); x_10 = lean::string_mk_iterator(x_0); lean::inc(x_3); x_12 = _l_s9___private_580269747__s8_str__aux_s6___main(x_8, x_10, x_3); if (lean::obj_tag(x_12) == 0) { obj* x_15; obj* x_16; obj* x_18; unsigned char x_19; obj* x_20; obj* x_21; obj* x_22; lean::dec(x_12); lean::dec(x_0); x_15 = lean::box(0); x_16 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_16); x_18 = lean::alloc_cnstr(0, 4, 0); lean::cnstr_set(x_18, 0, x_3); lean::cnstr_set(x_18, 1, x_16); lean::cnstr_set(x_18, 2, x_1); lean::cnstr_set(x_18, 3, x_15); x_19 = 0; x_20 = lean::alloc_cnstr(1, 1, 1); lean::cnstr_set(x_20, 0, x_18); lean::cnstr_set_scalar(x_20, sizeof(void*)*1, x_19); x_21 = x_20; x_22 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_22, 0, x_21); lean::cnstr_set(x_22, 1, x_4); return x_22; } else { obj* x_25; obj* x_28; obj* x_29; obj* x_30; lean::dec(x_1); lean::dec(x_3); x_25 = lean::cnstr_get(x_12, 0); lean::inc(x_25); lean::dec(x_12); x_28 = lean::box(0); x_29 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_29, 0, x_0); lean::cnstr_set(x_29, 1, x_25); lean::cnstr_set(x_29, 2, x_28); x_30 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_30, 0, x_29); lean::cnstr_set(x_30, 1, x_4); return x_30; } } else { obj* x_33; obj* x_34; obj* x_37; obj* x_38; lean::dec(x_0); lean::dec(x_1); x_33 = _l_s6_string_s4_join_s11___closed__1; x_34 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_34); lean::inc(x_33); x_37 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_37, 0, x_33); lean::cnstr_set(x_37, 1, x_3); lean::cnstr_set(x_37, 2, x_34); x_38 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_38, 0, x_37); lean::cnstr_set(x_38, 1, x_4); return x_38; } } } obj* _l_s9___private_4089500695__s27_finish__comment__block__aux(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_5; x_5 = _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main(x_0, x_1, x_2, x_3, x_4); return x_5; } } obj* _l_s4_lean_s6_parser_s22_finish__comment__block(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_6; obj* x_9; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; x_4 = lean::string_iterator_remaining(x_2); x_5 = lean::mk_nat_obj(1u); x_6 = lean::nat_add(x_4, x_5); lean::dec(x_5); lean::dec(x_4); x_9 = _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main(x_0, x_6, x_1, x_2, x_3); x_10 = lean::cnstr_get(x_9, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_9, 1); lean::inc(x_12); if (lean::is_shared(x_9)) { lean::dec(x_9); x_14 = lean::box(0); } else { lean::cnstr_release(x_9, 0); lean::cnstr_release(x_9, 1); x_14 = x_9; } x_15 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__1; lean::inc(x_15); x_17 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_10, x_15); x_18 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_18); x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_18, x_17); if (lean::is_scalar(x_14)) { x_21 = lean::alloc_cnstr(0, 2, 0); } else { x_21 = x_14; } lean::cnstr_set(x_21, 0, x_20); lean::cnstr_set(x_21, 1, x_12); return x_21; } } obj* _init__l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__1() { { obj* x_0; obj* x_1; x_0 = lean::mk_string("end of comment block"); 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* _init__l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2() { { 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_2012034129__s15_whitespace__aux_s6___main(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; x_4 = lean::mk_nat_obj(0u); x_5 = lean::nat_dec_eq(x_0, x_4); lean::dec(x_4); if (lean::obj_tag(x_5) == 0) { obj* x_9; obj* x_10; obj* x_12; obj* x_14; lean::dec(x_5); lean::inc(x_1); x_9 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_whitespace_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__1(x_1, x_2, x_3); x_10 = lean::cnstr_get(x_9, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_9, 1); lean::inc(x_12); if (lean::is_shared(x_9)) { lean::dec(x_9); x_14 = lean::box(0); } else { lean::cnstr_release(x_9, 0); lean::cnstr_release(x_9, 1); x_14 = x_9; } if (lean::obj_tag(x_10) == 0) { obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_32; obj* x_33; obj* x_35; x_15 = lean::cnstr_get(x_10, 1); lean::inc(x_15); x_17 = lean::cnstr_get(x_10, 2); lean::inc(x_17); if (lean::is_shared(x_10)) { lean::dec(x_10); x_19 = lean::box(0); } else { lean::cnstr_release(x_10, 0); lean::cnstr_release(x_10, 1); lean::cnstr_release(x_10, 2); x_19 = x_10; } x_20 = lean::mk_nat_obj(1u); x_21 = lean::nat_sub(x_0, x_20); lean::dec(x_0); x_26 = _l_s9___private_2012034129__s15_whitespace__aux_s6___main_s11___closed__2; x_27 = _l_s9___private_2012034129__s15_whitespace__aux_s6___main_s11___closed__3; lean::inc(x_15); lean::inc(x_1); lean::inc(x_27); lean::inc(x_26); x_32 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__3(x_26, x_27, x_1, x_15, x_12); x_33 = lean::cnstr_get(x_32, 0); lean::inc(x_33); x_35 = lean::cnstr_get(x_32, 1); lean::inc(x_35); lean::dec(x_32); if (lean::obj_tag(x_33) == 0) { obj* x_38; obj* x_40; obj* x_43; obj* x_44; obj* x_46; obj* x_49; x_38 = lean::cnstr_get(x_33, 1); lean::inc(x_38); x_40 = lean::cnstr_get(x_33, 2); lean::inc(x_40); lean::dec(x_33); x_43 = _l_s4_lean_s6_parser_s13_monad__parsec_s15_take__while_x27_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__5_s6___rarg(x_38, x_35); x_44 = lean::cnstr_get(x_43, 0); lean::inc(x_44); x_46 = lean::cnstr_get(x_43, 1); lean::inc(x_46); lean::dec(x_43); x_49 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_40, x_44); if (lean::obj_tag(x_49) == 0) { obj* x_50; obj* x_52; obj* x_57; obj* x_58; obj* x_60; obj* x_63; x_50 = lean::cnstr_get(x_49, 1); lean::inc(x_50); x_52 = lean::cnstr_get(x_49, 2); lean::inc(x_52); lean::dec(x_49); lean::inc(x_1); lean::inc(x_21); x_57 = _l_s9___private_2012034129__s15_whitespace__aux_s6___main(x_21, x_1, x_50, x_46); x_58 = lean::cnstr_get(x_57, 0); lean::inc(x_58); x_60 = lean::cnstr_get(x_57, 1); lean::inc(x_60); lean::dec(x_57); x_63 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_52, x_58); x_23 = x_63; x_24 = x_60; goto lbl_25; } else { obj* x_64; unsigned char x_66; obj* x_67; obj* x_68; obj* x_69; x_64 = lean::cnstr_get(x_49, 0); lean::inc(x_64); x_66 = lean::cnstr_get_scalar(x_49, sizeof(void*)*1); if (lean::is_shared(x_49)) { lean::dec(x_49); x_67 = lean::box(0); } else { lean::cnstr_release(x_49, 0); x_67 = x_49; } if (lean::is_scalar(x_67)) { x_68 = lean::alloc_cnstr(1, 1, 1); } else { x_68 = x_67; } lean::cnstr_set(x_68, 0, x_64); lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_66); x_69 = x_68; x_23 = x_69; x_24 = x_46; goto lbl_25; } } else { obj* x_70; unsigned char x_72; obj* x_73; obj* x_74; obj* x_75; x_70 = lean::cnstr_get(x_33, 0); lean::inc(x_70); x_72 = lean::cnstr_get_scalar(x_33, sizeof(void*)*1); if (lean::is_shared(x_33)) { lean::dec(x_33); x_73 = lean::box(0); } else { lean::cnstr_release(x_33, 0); x_73 = x_33; } if (lean::is_scalar(x_73)) { x_74 = lean::alloc_cnstr(1, 1, 1); } else { x_74 = x_73; } lean::cnstr_set(x_74, 0, x_70); lean::cnstr_set_scalar(x_74, sizeof(void*)*1, x_72); x_75 = x_74; x_23 = x_75; x_24 = x_35; goto lbl_25; } lbl_25: { if (lean::obj_tag(x_23) == 0) { obj* x_81; obj* x_82; lean::dec(x_15); lean::dec(x_1); lean::dec(x_19); lean::dec(x_20); lean::dec(x_21); x_81 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_23); if (lean::is_scalar(x_14)) { x_82 = lean::alloc_cnstr(0, 2, 0); } else { x_82 = x_14; } lean::cnstr_set(x_82, 0, x_81); lean::cnstr_set(x_82, 1, x_24); return x_82; } else { obj* x_83; unsigned char x_85; obj* x_86; obj* x_87; x_83 = lean::cnstr_get(x_23, 0); lean::inc(x_83); x_85 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); if (x_85 == 0) { obj* x_90; obj* x_91; obj* x_96; obj* x_97; obj* x_99; lean::dec(x_23); x_90 = _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__3; x_91 = _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__4; lean::inc(x_15); lean::inc(x_1); lean::inc(x_91); lean::inc(x_90); x_96 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__3(x_90, x_91, x_1, x_15, x_24); x_97 = lean::cnstr_get(x_96, 0); lean::inc(x_97); x_99 = lean::cnstr_get(x_96, 1); lean::inc(x_99); lean::dec(x_96); if (lean::obj_tag(x_97) == 0) { obj* x_102; obj* x_104; obj* x_106; obj* x_109; obj* x_110; obj* x_112; x_102 = lean::cnstr_get(x_97, 1); lean::inc(x_102); x_104 = lean::cnstr_get(x_97, 2); lean::inc(x_104); if (lean::is_shared(x_97)) { lean::dec(x_97); x_106 = lean::box(0); } else { lean::cnstr_release(x_97, 0); lean::cnstr_release(x_97, 1); lean::cnstr_release(x_97, 2); x_106 = x_97; } lean::inc(x_102); lean::inc(x_1); x_109 = _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__4(x_1, x_102, x_99); x_110 = lean::cnstr_get(x_109, 0); lean::inc(x_110); x_112 = lean::cnstr_get(x_109, 1); lean::inc(x_112); lean::dec(x_109); if (lean::obj_tag(x_110) == 0) { obj* x_115; obj* x_117; obj* x_119; unsigned char x_122; x_115 = lean::cnstr_get(x_110, 0); lean::inc(x_115); x_117 = lean::cnstr_get(x_110, 1); lean::inc(x_117); x_119 = lean::cnstr_get(x_110, 2); lean::inc(x_119); lean::dec(x_110); x_122 = lean::unbox(x_115); lean::dec(x_115); if (x_122 == 0) { obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_132; obj* x_133; obj* x_135; obj* x_138; obj* x_139; obj* x_141; obj* x_142; obj* x_143; lean::dec(x_106); x_125 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_125, 0, x_102); x_126 = lean::box(0); x_127 = _l_s9___private_2012034129__s15_whitespace__aux_s6___main_s11___closed__1; x_128 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_1); lean::inc(x_128); lean::inc(x_127); x_132 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_127, x_128, x_125, x_126, x_1, x_117, x_112); x_133 = lean::cnstr_get(x_132, 0); lean::inc(x_133); x_135 = lean::cnstr_get(x_132, 1); lean::inc(x_135); lean::dec(x_132); x_138 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_119, x_133); x_139 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_139); x_141 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_139, x_138); x_142 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_104, x_141); x_143 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_142); x_86 = x_143; x_87 = x_135; goto lbl_88; } else { unsigned char x_145; obj* x_146; obj* x_147; obj* x_149; obj* x_150; obj* x_152; obj* x_153; obj* x_154; lean::dec(x_102); x_145 = 0; x_146 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; x_147 = lean::box(x_145); lean::inc(x_146); if (lean::is_scalar(x_106)) { x_149 = lean::alloc_cnstr(0, 3, 0); } else { x_149 = x_106; } lean::cnstr_set(x_149, 0, x_147); lean::cnstr_set(x_149, 1, x_117); lean::cnstr_set(x_149, 2, x_146); x_150 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_119, x_149); lean::inc(x_146); x_152 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_146, x_150); x_153 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_104, x_152); x_154 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_153); x_86 = x_154; x_87 = x_112; goto lbl_88; } } else { obj* x_157; unsigned char x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_165; obj* x_166; obj* x_167; lean::dec(x_106); lean::dec(x_102); x_157 = lean::cnstr_get(x_110, 0); lean::inc(x_157); x_159 = lean::cnstr_get_scalar(x_110, sizeof(void*)*1); if (lean::is_shared(x_110)) { lean::dec(x_110); x_160 = lean::box(0); } else { lean::cnstr_release(x_110, 0); x_160 = x_110; } if (lean::is_scalar(x_160)) { x_161 = lean::alloc_cnstr(1, 1, 1); } else { x_161 = x_160; } lean::cnstr_set(x_161, 0, x_157); lean::cnstr_set_scalar(x_161, sizeof(void*)*1, x_159); x_162 = x_161; x_163 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_163); x_165 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_163, x_162); x_166 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_104, x_165); x_167 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_166); x_86 = x_167; x_87 = x_112; goto lbl_88; } } else { obj* x_168; obj* x_170; unsigned char x_171; obj* x_172; obj* x_173; x_168 = lean::cnstr_get(x_97, 0); lean::inc(x_168); if (lean::is_shared(x_97)) { lean::dec(x_97); x_170 = lean::box(0); } else { lean::cnstr_release(x_97, 0); x_170 = x_97; } x_171 = 0; if (lean::is_scalar(x_170)) { x_172 = lean::alloc_cnstr(1, 1, 1); } else { x_172 = x_170; } lean::cnstr_set(x_172, 0, x_168); lean::cnstr_set_scalar(x_172, sizeof(void*)*1, x_171); x_173 = x_172; x_86 = x_173; x_87 = x_99; goto lbl_88; } } else { obj* x_181; obj* x_182; lean::dec(x_14); lean::dec(x_15); lean::dec(x_83); lean::dec(x_1); lean::dec(x_19); lean::dec(x_20); lean::dec(x_21); x_181 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_23); x_182 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_182, 0, x_181); lean::cnstr_set(x_182, 1, x_24); return x_182; } lbl_88: { if (lean::obj_tag(x_86) == 0) { obj* x_183; obj* x_185; obj* x_189; obj* x_190; obj* x_192; obj* x_195; x_183 = lean::cnstr_get(x_86, 1); lean::inc(x_183); x_185 = lean::cnstr_get(x_86, 2); lean::inc(x_185); lean::dec(x_86); lean::inc(x_1); x_189 = _l_s4_lean_s6_parser_s22_finish__comment__block(x_20, x_1, x_183, x_87); x_190 = lean::cnstr_get(x_189, 0); lean::inc(x_190); x_192 = lean::cnstr_get(x_189, 1); lean::inc(x_192); lean::dec(x_189); x_195 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_185, x_190); if (lean::obj_tag(x_195) == 0) { obj* x_196; obj* x_198; obj* x_201; obj* x_202; obj* x_204; obj* x_207; x_196 = lean::cnstr_get(x_195, 1); lean::inc(x_196); x_198 = lean::cnstr_get(x_195, 2); lean::inc(x_198); lean::dec(x_195); x_201 = _l_s9___private_2012034129__s15_whitespace__aux_s6___main(x_21, x_1, x_196, x_192); x_202 = lean::cnstr_get(x_201, 0); lean::inc(x_202); x_204 = lean::cnstr_get(x_201, 1); lean::inc(x_204); lean::dec(x_201); x_207 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_198, x_202); if (lean::obj_tag(x_207) == 0) { obj* x_210; obj* x_211; obj* x_212; lean::dec(x_15); lean::dec(x_19); x_210 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_83, x_207); x_211 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_210); if (lean::is_scalar(x_14)) { x_212 = lean::alloc_cnstr(0, 2, 0); } else { x_212 = x_14; } lean::cnstr_set(x_212, 0, x_211); lean::cnstr_set(x_212, 1, x_204); return x_212; } else { obj* x_213; unsigned char x_215; x_213 = lean::cnstr_get(x_207, 0); lean::inc(x_213); x_215 = lean::cnstr_get_scalar(x_207, sizeof(void*)*1); if (x_215 == 0) { obj* x_217; obj* x_220; obj* x_222; obj* x_223; obj* x_226; obj* x_227; unsigned char x_228; obj* x_229; obj* x_230; obj* x_231; obj* x_232; lean::dec(x_207); x_217 = lean::cnstr_get(x_213, 2); lean::inc(x_217); lean::dec(x_213); x_220 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_220); x_222 = lean::alloc_closure(reinterpret_cast(_l_s8_function_s4_comp_s6___rarg), 3, 2); lean::closure_set(x_222, 0, x_217); lean::closure_set(x_222, 1, x_220); x_223 = lean::cnstr_get(x_83, 2); lean::inc(x_223); lean::dec(x_83); x_226 = lean::alloc_closure(reinterpret_cast(_l_s8_function_s4_comp_s6___rarg), 3, 2); lean::closure_set(x_226, 0, x_223); lean::closure_set(x_226, 1, x_222); x_227 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_227, 0, x_226); x_228 = 0; x_229 = lean::box(x_228); if (lean::is_scalar(x_19)) { x_230 = lean::alloc_cnstr(0, 3, 0); } else { x_230 = x_19; } lean::cnstr_set(x_230, 0, x_229); lean::cnstr_set(x_230, 1, x_15); lean::cnstr_set(x_230, 2, x_227); x_231 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_230); if (lean::is_scalar(x_14)) { x_232 = lean::alloc_cnstr(0, 2, 0); } else { x_232 = x_14; } lean::cnstr_set(x_232, 0, x_231); lean::cnstr_set(x_232, 1, x_204); return x_232; } else { obj* x_236; obj* x_237; obj* x_238; lean::dec(x_213); lean::dec(x_15); lean::dec(x_19); x_236 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_83, x_207); x_237 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_236); if (lean::is_scalar(x_14)) { x_238 = lean::alloc_cnstr(0, 2, 0); } else { x_238 = x_14; } lean::cnstr_set(x_238, 0, x_237); lean::cnstr_set(x_238, 1, x_204); return x_238; } } } else { obj* x_241; unsigned char x_243; obj* x_244; lean::dec(x_1); lean::dec(x_21); x_241 = lean::cnstr_get(x_195, 0); lean::inc(x_241); x_243 = lean::cnstr_get_scalar(x_195, sizeof(void*)*1); if (lean::is_shared(x_195)) { lean::dec(x_195); x_244 = lean::box(0); } else { lean::cnstr_release(x_195, 0); x_244 = x_195; } if (x_243 == 0) { obj* x_246; obj* x_249; obj* x_251; obj* x_252; obj* x_255; obj* x_256; unsigned char x_257; obj* x_258; obj* x_259; obj* x_260; obj* x_261; lean::dec(x_244); x_246 = lean::cnstr_get(x_241, 2); lean::inc(x_246); lean::dec(x_241); x_249 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_249); x_251 = lean::alloc_closure(reinterpret_cast(_l_s8_function_s4_comp_s6___rarg), 3, 2); lean::closure_set(x_251, 0, x_246); lean::closure_set(x_251, 1, x_249); x_252 = lean::cnstr_get(x_83, 2); lean::inc(x_252); lean::dec(x_83); x_255 = lean::alloc_closure(reinterpret_cast(_l_s8_function_s4_comp_s6___rarg), 3, 2); lean::closure_set(x_255, 0, x_252); lean::closure_set(x_255, 1, x_251); x_256 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_256, 0, x_255); x_257 = 0; x_258 = lean::box(x_257); if (lean::is_scalar(x_19)) { x_259 = lean::alloc_cnstr(0, 3, 0); } else { x_259 = x_19; } lean::cnstr_set(x_259, 0, x_258); lean::cnstr_set(x_259, 1, x_15); lean::cnstr_set(x_259, 2, x_256); x_260 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_259); if (lean::is_scalar(x_14)) { x_261 = lean::alloc_cnstr(0, 2, 0); } else { x_261 = x_14; } lean::cnstr_set(x_261, 0, x_260); lean::cnstr_set(x_261, 1, x_192); return x_261; } else { obj* x_264; obj* x_265; obj* x_266; obj* x_267; obj* x_268; lean::dec(x_15); lean::dec(x_19); if (lean::is_scalar(x_244)) { x_264 = lean::alloc_cnstr(1, 1, 1); } else { x_264 = x_244; } lean::cnstr_set(x_264, 0, x_241); lean::cnstr_set_scalar(x_264, sizeof(void*)*1, x_243); x_265 = x_264; x_266 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_83, x_265); x_267 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_266); if (lean::is_scalar(x_14)) { x_268 = lean::alloc_cnstr(0, 2, 0); } else { x_268 = x_14; } lean::cnstr_set(x_268, 0, x_267); lean::cnstr_set(x_268, 1, x_192); return x_268; } } } else { obj* x_272; unsigned char x_274; obj* x_275; lean::dec(x_1); lean::dec(x_20); lean::dec(x_21); x_272 = lean::cnstr_get(x_86, 0); lean::inc(x_272); x_274 = lean::cnstr_get_scalar(x_86, sizeof(void*)*1); if (lean::is_shared(x_86)) { lean::dec(x_86); x_275 = lean::box(0); } else { lean::cnstr_release(x_86, 0); x_275 = x_86; } if (x_274 == 0) { obj* x_277; obj* x_280; obj* x_282; obj* x_283; obj* x_286; obj* x_287; unsigned char x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; lean::dec(x_275); x_277 = lean::cnstr_get(x_272, 2); lean::inc(x_277); lean::dec(x_272); x_280 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_280); x_282 = lean::alloc_closure(reinterpret_cast(_l_s8_function_s4_comp_s6___rarg), 3, 2); lean::closure_set(x_282, 0, x_277); lean::closure_set(x_282, 1, x_280); x_283 = lean::cnstr_get(x_83, 2); lean::inc(x_283); lean::dec(x_83); x_286 = lean::alloc_closure(reinterpret_cast(_l_s8_function_s4_comp_s6___rarg), 3, 2); lean::closure_set(x_286, 0, x_283); lean::closure_set(x_286, 1, x_282); x_287 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_287, 0, x_286); x_288 = 0; x_289 = lean::box(x_288); if (lean::is_scalar(x_19)) { x_290 = lean::alloc_cnstr(0, 3, 0); } else { x_290 = x_19; } lean::cnstr_set(x_290, 0, x_289); lean::cnstr_set(x_290, 1, x_15); lean::cnstr_set(x_290, 2, x_287); x_291 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_290); if (lean::is_scalar(x_14)) { x_292 = lean::alloc_cnstr(0, 2, 0); } else { x_292 = x_14; } lean::cnstr_set(x_292, 0, x_291); lean::cnstr_set(x_292, 1, x_87); return x_292; } else { obj* x_295; obj* x_296; obj* x_297; obj* x_298; obj* x_299; lean::dec(x_15); lean::dec(x_19); if (lean::is_scalar(x_275)) { x_295 = lean::alloc_cnstr(1, 1, 1); } else { x_295 = x_275; } lean::cnstr_set(x_295, 0, x_272); lean::cnstr_set_scalar(x_295, sizeof(void*)*1, x_274); x_296 = x_295; x_297 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_83, x_296); x_298 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_297); if (lean::is_scalar(x_14)) { x_299 = lean::alloc_cnstr(0, 2, 0); } else { x_299 = x_14; } lean::cnstr_set(x_299, 0, x_298); lean::cnstr_set(x_299, 1, x_87); return x_299; } } } } } } else { obj* x_302; unsigned char x_304; obj* x_305; obj* x_306; obj* x_307; obj* x_308; lean::dec(x_0); lean::dec(x_1); x_302 = lean::cnstr_get(x_10, 0); lean::inc(x_302); x_304 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); if (lean::is_shared(x_10)) { lean::dec(x_10); x_305 = lean::box(0); } else { lean::cnstr_release(x_10, 0); x_305 = x_10; } if (lean::is_scalar(x_305)) { x_306 = lean::alloc_cnstr(1, 1, 1); } else { x_306 = x_305; } lean::cnstr_set(x_306, 0, x_302); lean::cnstr_set_scalar(x_306, sizeof(void*)*1, x_304); x_307 = x_306; if (lean::is_scalar(x_14)) { x_308 = lean::alloc_cnstr(0, 2, 0); } else { x_308 = x_14; } lean::cnstr_set(x_308, 0, x_307); lean::cnstr_set(x_308, 1, x_12); return x_308; } } else { obj* x_311; obj* x_312; obj* x_313; obj* x_317; lean::dec(x_5); lean::dec(x_0); x_311 = lean::box(0); x_312 = _l_s9___private_1297690757__s10_many1__aux_s6___main_s6___rarg_s11___closed__1; x_313 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_311); lean::inc(x_313); lean::inc(x_312); x_317 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_312, x_313, x_311, x_311, x_1, x_2, x_3); return x_317; } } } obj* _init__l_s9___private_2012034129__s15_whitespace__aux_s6___main_s11___closed__1() { { obj* x_0; x_0 = lean::mk_string("input"); return x_0; } } obj* _init__l_s9___private_2012034129__s15_whitespace__aux_s6___main_s11___closed__2() { { obj* x_0; x_0 = lean::mk_string("--"); return x_0; } } obj* _init__l_s9___private_2012034129__s15_whitespace__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_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__3(obj* x_0, unsigned char 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_2038417741__s20_mk__consumed__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_s14_is__whitespace(x_10); if (x_11 == 0) { obj* x_13; lean::dec(x_0); x_13 = _l_s9___private_2038417741__s20_mk__consumed__result_s6___rarg(x_1, x_2); return x_13; } else { obj* x_14; obj* x_15; obj* x_18; unsigned char 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_iterator_next(x_2); x_19 = 1; x_20 = _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__3(x_15, x_19, x_18); return x_20; } } } else { obj* x_23; lean::dec(x_4); lean::dec(x_0); x_23 = _l_s9___private_2038417741__s20_mk__consumed__result_s6___rarg(x_1, x_2); return x_23; } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s15_take__while_x27_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__2_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; unsigned char x_3; obj* x_4; obj* x_5; x_2 = lean::string_iterator_remaining(x_0); x_3 = 0; x_4 = _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__3(x_2, x_3, x_0); x_5 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_5, 0, x_4); lean::cnstr_set(x_5, 1, x_1); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s15_take__while_x27_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__2(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_s15_take__while_x27_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__2_s6___rarg), 2, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_whitespace_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__1(obj* x_0, obj* x_1, obj* x_2) { { obj* x_4; lean::dec(x_0); x_4 = _l_s4_lean_s6_parser_s13_monad__parsec_s15_take__while_x27_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__2_s6___rarg(x_1, x_2); return x_4; } } obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__4(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_8; obj* x_9; obj* x_11; obj* x_13; x_3 = _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__4_s11___closed__1; x_4 = _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__4_s11___closed__2; lean::inc(x_1); lean::inc(x_4); lean::inc(x_3); x_8 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__3(x_3, x_4, x_0, x_1, x_2); x_9 = lean::cnstr_get(x_8, 0); lean::inc(x_9); x_11 = lean::cnstr_get(x_8, 1); lean::inc(x_11); if (lean::is_shared(x_8)) { lean::dec(x_8); x_13 = lean::box(0); } else { lean::cnstr_release(x_8, 0); lean::cnstr_release(x_8, 1); x_13 = x_8; } if (lean::obj_tag(x_9) == 0) { obj* x_14; obj* x_16; obj* x_18; unsigned char x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_24; x_14 = lean::cnstr_get(x_9, 1); lean::inc(x_14); x_16 = lean::cnstr_get(x_9, 2); lean::inc(x_16); if (lean::is_shared(x_9)) { lean::dec(x_9); x_18 = lean::box(0); } else { lean::cnstr_release(x_9, 0); lean::cnstr_release(x_9, 1); lean::cnstr_release(x_9, 2); x_18 = x_9; } x_19 = 0; x_20 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; x_21 = lean::box(x_19); lean::inc(x_20); if (lean::is_scalar(x_18)) { x_23 = lean::alloc_cnstr(0, 3, 0); } else { x_23 = x_18; } lean::cnstr_set(x_23, 0, x_21); lean::cnstr_set(x_23, 1, x_14); lean::cnstr_set(x_23, 2, x_20); x_24 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_23); if (lean::obj_tag(x_24) == 0) { if (lean::obj_tag(x_24) == 0) { obj* x_25; obj* x_27; obj* x_29; obj* x_30; x_25 = lean::cnstr_get(x_24, 0); lean::inc(x_25); if (lean::is_shared(x_24)) { lean::dec(x_24); x_27 = lean::box(0); } else { lean::cnstr_release(x_24, 0); lean::cnstr_release(x_24, 1); lean::cnstr_release(x_24, 2); x_27 = x_24; } lean::inc(x_20); if (lean::is_scalar(x_27)) { x_29 = lean::alloc_cnstr(0, 3, 0); } else { x_29 = x_27; } lean::cnstr_set(x_29, 0, x_25); lean::cnstr_set(x_29, 1, x_1); lean::cnstr_set(x_29, 2, x_20); if (lean::is_scalar(x_13)) { x_30 = lean::alloc_cnstr(0, 2, 0); } else { x_30 = x_13; } lean::cnstr_set(x_30, 0, x_29); lean::cnstr_set(x_30, 1, x_11); return x_30; } else { obj* x_33; lean::dec(x_1); lean::dec(x_20); if (lean::is_scalar(x_13)) { x_33 = lean::alloc_cnstr(0, 2, 0); } else { x_33 = x_13; } lean::cnstr_set(x_33, 0, x_24); lean::cnstr_set(x_33, 1, x_11); return x_33; } } else { unsigned char x_35; obj* x_36; obj* x_38; obj* x_39; lean::dec(x_24); x_35 = 1; x_36 = lean::box(x_35); lean::inc(x_20); x_38 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_38, 0, x_36); lean::cnstr_set(x_38, 1, x_1); lean::cnstr_set(x_38, 2, x_20); if (lean::is_scalar(x_13)) { x_39 = lean::alloc_cnstr(0, 2, 0); } else { x_39 = x_13; } lean::cnstr_set(x_39, 0, x_38); lean::cnstr_set(x_39, 1, x_11); return x_39; } } else { unsigned char x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; lean::dec(x_9); x_41 = 1; x_42 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; x_43 = lean::box(x_41); lean::inc(x_42); x_45 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_45, 0, x_43); lean::cnstr_set(x_45, 1, x_1); lean::cnstr_set(x_45, 2, x_42); if (lean::is_scalar(x_13)) { x_46 = lean::alloc_cnstr(0, 2, 0); } else { x_46 = x_13; } lean::cnstr_set(x_46, 0, x_45); lean::cnstr_set(x_46, 1, x_11); return x_46; } } } obj* _init__l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__4_s11___closed__1() { { obj* x_0; x_0 = lean::mk_string("-"); return x_0; } } obj* _init__l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__4_s11___closed__2() { { 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_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__6(obj* x_0, unsigned char 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) { unsigned char x_6; lean::dec(x_4); x_6 = lean::string_iterator_has_next(x_2); if (x_6 == 0) { obj* x_9; lean::dec(x_0); lean::dec(x_3); x_9 = _l_s9___private_2038417741__s20_mk__consumed__result_s6___rarg(x_1, x_2); return x_9; } else { obj* x_10; obj* x_11; unsigned x_14; obj* x_15; obj* x_16; obj* x_17; x_10 = lean::mk_nat_obj(1u); x_11 = lean::nat_sub(x_0, x_10); lean::dec(x_10); lean::dec(x_0); x_14 = lean::string_iterator_curr(x_2); x_15 = lean::mk_nat_obj(10u); x_16 = lean::mk_nat_obj(55296u); x_17 = lean::nat_dec_lt(x_15, x_16); lean::dec(x_16); if (lean::obj_tag(x_17) == 0) { obj* x_20; obj* x_21; lean::dec(x_17); x_20 = lean::mk_nat_obj(57343u); x_21 = lean::nat_dec_lt(x_20, x_15); lean::dec(x_20); if (lean::obj_tag(x_21) == 0) { obj* x_25; obj* x_26; lean::dec(x_15); lean::dec(x_21); x_25 = lean::box_uint32(x_14); x_26 = lean::nat_dec_eq(x_25, x_3); lean::dec(x_3); lean::dec(x_25); if (lean::obj_tag(x_26) == 0) { obj* x_30; unsigned char x_31; obj* x_32; lean::dec(x_26); x_30 = lean::string_iterator_next(x_2); x_31 = 1; x_32 = _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__6(x_11, x_31, x_30); return x_32; } else { obj* x_35; lean::dec(x_11); lean::dec(x_26); x_35 = _l_s9___private_2038417741__s20_mk__consumed__result_s6___rarg(x_1, x_2); return x_35; } } else { obj* x_37; obj* x_38; lean::dec(x_21); x_37 = lean::mk_nat_obj(1114112u); x_38 = lean::nat_dec_lt(x_15, x_37); lean::dec(x_37); if (lean::obj_tag(x_38) == 0) { obj* x_42; obj* x_43; lean::dec(x_15); lean::dec(x_38); x_42 = lean::box_uint32(x_14); x_43 = lean::nat_dec_eq(x_42, x_3); lean::dec(x_3); lean::dec(x_42); if (lean::obj_tag(x_43) == 0) { obj* x_47; unsigned char x_48; obj* x_49; lean::dec(x_43); x_47 = lean::string_iterator_next(x_2); x_48 = 1; x_49 = _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__6(x_11, x_48, x_47); return x_49; } else { obj* x_52; lean::dec(x_11); lean::dec(x_43); x_52 = _l_s9___private_2038417741__s20_mk__consumed__result_s6___rarg(x_1, x_2); return x_52; } } else { obj* x_55; obj* x_56; lean::dec(x_38); lean::dec(x_3); x_55 = lean::box_uint32(x_14); x_56 = lean::nat_dec_eq(x_55, x_15); lean::dec(x_15); lean::dec(x_55); if (lean::obj_tag(x_56) == 0) { obj* x_60; unsigned char x_61; obj* x_62; lean::dec(x_56); x_60 = lean::string_iterator_next(x_2); x_61 = 1; x_62 = _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__6(x_11, x_61, x_60); return x_62; } else { obj* x_65; lean::dec(x_11); lean::dec(x_56); x_65 = _l_s9___private_2038417741__s20_mk__consumed__result_s6___rarg(x_1, x_2); return x_65; } } } } else { obj* x_68; obj* x_69; lean::dec(x_3); lean::dec(x_17); x_68 = lean::box_uint32(x_14); x_69 = lean::nat_dec_eq(x_68, x_15); lean::dec(x_15); lean::dec(x_68); if (lean::obj_tag(x_69) == 0) { obj* x_73; unsigned char x_74; obj* x_75; lean::dec(x_69); x_73 = lean::string_iterator_next(x_2); x_74 = 1; x_75 = _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__6(x_11, x_74, x_73); return x_75; } else { obj* x_78; lean::dec(x_11); lean::dec(x_69); x_78 = _l_s9___private_2038417741__s20_mk__consumed__result_s6___rarg(x_1, x_2); return x_78; } } } } else { obj* x_82; lean::dec(x_4); lean::dec(x_0); lean::dec(x_3); x_82 = _l_s9___private_2038417741__s20_mk__consumed__result_s6___rarg(x_1, x_2); return x_82; } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s15_take__while_x27_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__5_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; unsigned char x_3; obj* x_4; obj* x_5; x_2 = lean::string_iterator_remaining(x_0); x_3 = 0; x_4 = _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__6(x_2, x_3, x_0); x_5 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_5, 0, x_4); lean::cnstr_set(x_5, 1, x_1); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s15_take__while_x27_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__5(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_s15_take__while_x27_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__5_s6___rarg), 2, 0); return x_2; } } obj* _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__3_s7___boxed(obj* x_0, obj* x_1, obj* x_2) { { unsigned char x_3; obj* x_4; x_3 = lean::unbox(x_1); x_4 = _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__3(x_0, x_3, x_2); return x_4; } } obj* _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__6_s7___boxed(obj* x_0, obj* x_1, obj* x_2) { { unsigned char x_3; obj* x_4; x_3 = lean::unbox(x_1); x_4 = _l_s9___private_1695453085__s20_take__while__aux_x27_s6___main_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__6(x_0, x_3, x_2); return x_4; } } obj* _l_s9___private_2012034129__s15_whitespace__aux(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; x_4 = _l_s9___private_2012034129__s15_whitespace__aux_s6___main(x_0, x_1, x_2, x_3); return x_4; } } obj* _l_s4_lean_s6_parser_s10_whitespace(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_5; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; x_3 = lean::string_iterator_remaining(x_1); x_4 = lean::mk_nat_obj(1u); x_5 = lean::nat_add(x_3, x_4); lean::dec(x_4); lean::dec(x_3); x_8 = _l_s9___private_2012034129__s15_whitespace__aux_s6___main(x_5, x_0, x_1, x_2); x_9 = lean::cnstr_get(x_8, 0); lean::inc(x_9); x_11 = lean::cnstr_get(x_8, 1); lean::inc(x_11); if (lean::is_shared(x_8)) { lean::dec(x_8); x_13 = lean::box(0); } else { lean::cnstr_release(x_8, 0); lean::cnstr_release(x_8, 1); x_13 = x_8; } x_14 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_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_9); x_17 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_17); x_19 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_16, x_17); if (lean::is_scalar(x_13)) { x_20 = lean::alloc_cnstr(0, 2, 0); } else { x_20 = x_13; } lean::cnstr_set(x_20, 0, x_19); lean::cnstr_set(x_20, 1, x_11); return x_20; } } obj* _l_s4_lean_s6_parser_s13_as__substring_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_15; obj* x_16; lean::dec(x_2); x_5 = lean::cnstr_get(x_0, 1); lean::inc(x_5); x_7 = lean::cnstr_get(x_1, 0); lean::inc(x_7); lean::dec(x_1); x_10 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_left__over_s6___rarg_s11___closed__1; lean::inc(x_10); x_12 = lean::apply_2(x_7, lean::box(0), x_10); lean::inc(x_12); lean::inc(x_5); x_15 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s13_as__substring_s6___rarg_s11___lambda__3), 5, 4); lean::closure_set(x_15, 0, x_0); lean::closure_set(x_15, 1, x_5); lean::closure_set(x_15, 2, x_12); lean::closure_set(x_15, 3, x_3); x_16 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_12, x_15); return x_16; } } obj* _l_s4_lean_s6_parser_s13_as__substring_s6___rarg_s11___lambda__1(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_6; obj* x_9; obj* x_10; x_3 = lean::cnstr_get(x_0, 0); lean::inc(x_3); lean::dec(x_0); x_6 = lean::cnstr_get(x_3, 1); lean::inc(x_6); lean::dec(x_3); x_9 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_9, 0, x_1); lean::cnstr_set(x_9, 1, x_2); x_10 = lean::apply_2(x_6, lean::box(0), x_9); return x_10; } } obj* _l_s4_lean_s6_parser_s13_as__substring_s6___rarg_s11___lambda__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_6; obj* x_7; lean::dec(x_4); x_6 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s13_as__substring_s6___rarg_s11___lambda__1), 3, 2); lean::closure_set(x_6, 0, x_0); lean::closure_set(x_6, 1, x_1); x_7 = lean::apply_4(x_2, lean::box(0), lean::box(0), x_3, x_6); return x_7; } } obj* _l_s4_lean_s6_parser_s13_as__substring_s6___rarg_s11___lambda__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_6; obj* x_7; lean::inc(x_1); x_6 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s13_as__substring_s6___rarg_s11___lambda__2), 5, 4); lean::closure_set(x_6, 0, x_0); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_1); lean::closure_set(x_6, 3, x_2); x_7 = lean::apply_4(x_1, lean::box(0), lean::box(0), x_3, x_6); return x_7; } } obj* _l_s4_lean_s6_parser_s13_as__substring(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s13_as__substring_s6___rarg), 4, 0); return x_2; } } obj* _l_s9___private_3229416877__s16_update__trailing_s6___main(obj* x_0, obj* x_1) { { switch (lean::obj_tag(x_1)) { case 0: { obj* x_2; obj* x_4; obj* x_6; obj* x_8; x_2 = lean::cnstr_get(x_1, 0); lean::inc(x_2); x_4 = lean::cnstr_get(x_2, 0); lean::inc(x_4); x_6 = lean::cnstr_get(x_2, 1); lean::inc(x_6); if (lean::is_shared(x_2)) { lean::dec(x_2); x_8 = lean::box(0); } else { lean::cnstr_release(x_2, 0); lean::cnstr_release(x_2, 1); x_8 = x_2; } if (lean::obj_tag(x_4) == 0) { lean::dec(x_6); lean::dec(x_8); lean::dec(x_0); lean::dec(x_4); return x_1; } else { obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_22; obj* x_23; obj* x_24; obj* x_25; lean::dec(x_1); x_14 = lean::cnstr_get(x_4, 0); lean::inc(x_14); if (lean::is_shared(x_4)) { lean::dec(x_4); x_16 = lean::box(0); } else { lean::cnstr_release(x_4, 0); x_16 = x_4; } x_17 = lean::cnstr_get(x_14, 0); lean::inc(x_17); x_19 = lean::cnstr_get(x_14, 1); lean::inc(x_19); lean::dec(x_14); x_22 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_22, 0, x_17); lean::cnstr_set(x_22, 1, x_19); lean::cnstr_set(x_22, 2, x_0); if (lean::is_scalar(x_16)) { x_23 = lean::alloc_cnstr(1, 1, 0); } else { x_23 = x_16; } lean::cnstr_set(x_23, 0, x_22); if (lean::is_scalar(x_8)) { x_24 = lean::alloc_cnstr(0, 2, 0); } else { x_24 = x_8; } lean::cnstr_set(x_24, 0, x_23); lean::cnstr_set(x_24, 1, x_6); x_25 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_25, 0, x_24); return x_25; } } case 1: { obj* x_26; obj* x_28; obj* x_30; obj* x_32; obj* x_34; obj* x_36; obj* x_38; x_26 = lean::cnstr_get(x_1, 0); lean::inc(x_26); x_28 = lean::cnstr_get(x_26, 0); lean::inc(x_28); x_30 = lean::cnstr_get(x_26, 1); lean::inc(x_30); x_32 = lean::cnstr_get(x_26, 2); lean::inc(x_32); x_34 = lean::cnstr_get(x_26, 3); lean::inc(x_34); x_36 = lean::cnstr_get(x_26, 4); lean::inc(x_36); if (lean::is_shared(x_26)) { lean::dec(x_26); x_38 = lean::box(0); } else { lean::cnstr_release(x_26, 0); lean::cnstr_release(x_26, 1); lean::cnstr_release(x_26, 2); lean::cnstr_release(x_26, 3); lean::cnstr_release(x_26, 4); x_38 = x_26; } if (lean::obj_tag(x_28) == 0) { lean::dec(x_32); lean::dec(x_34); lean::dec(x_36); lean::dec(x_38); lean::dec(x_0); lean::dec(x_28); lean::dec(x_30); return x_1; } else { obj* x_47; obj* x_49; obj* x_50; obj* x_52; obj* x_55; obj* x_56; obj* x_57; obj* x_58; lean::dec(x_1); x_47 = lean::cnstr_get(x_28, 0); lean::inc(x_47); if (lean::is_shared(x_28)) { lean::dec(x_28); x_49 = lean::box(0); } else { lean::cnstr_release(x_28, 0); x_49 = x_28; } x_50 = lean::cnstr_get(x_47, 0); lean::inc(x_50); x_52 = lean::cnstr_get(x_47, 1); lean::inc(x_52); lean::dec(x_47); x_55 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_55, 0, x_50); lean::cnstr_set(x_55, 1, x_52); lean::cnstr_set(x_55, 2, x_0); if (lean::is_scalar(x_49)) { x_56 = lean::alloc_cnstr(1, 1, 0); } else { x_56 = x_49; } lean::cnstr_set(x_56, 0, x_55); if (lean::is_scalar(x_38)) { x_57 = lean::alloc_cnstr(0, 5, 0); } else { x_57 = x_38; } lean::cnstr_set(x_57, 0, x_56); lean::cnstr_set(x_57, 1, x_30); lean::cnstr_set(x_57, 2, x_32); lean::cnstr_set(x_57, 3, x_34); lean::cnstr_set(x_57, 4, x_36); x_58 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_58, 0, x_57); return x_58; } } case 2: { obj* x_59; obj* x_61; obj* x_62; obj* x_64; obj* x_66; obj* x_67; obj* x_70; obj* x_71; x_59 = lean::cnstr_get(x_1, 0); lean::inc(x_59); if (lean::is_shared(x_1)) { lean::dec(x_1); x_61 = lean::box(0); } else { lean::cnstr_release(x_1, 0); x_61 = x_1; } x_62 = lean::cnstr_get(x_59, 0); lean::inc(x_62); x_64 = lean::cnstr_get(x_59, 1); lean::inc(x_64); x_66 = _l_s9___private_3229416877__s21_update__trailing__lst_s6___main(x_0, x_64); x_67 = lean::cnstr_get(x_59, 2); lean::inc(x_67); lean::dec(x_59); x_70 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_70, 0, x_62); lean::cnstr_set(x_70, 1, x_66); lean::cnstr_set(x_70, 2, x_67); if (lean::is_scalar(x_61)) { x_71 = lean::alloc_cnstr(2, 1, 0); } else { x_71 = x_61; } lean::cnstr_set(x_71, 0, x_70); return x_71; } default: { lean::dec(x_0); return x_1; } } } } obj* _l_s9___private_3229416877__s21_update__trailing__lst_s6___main(obj* x_0, obj* x_1) { { if (lean::obj_tag(x_1) == 0) { lean::dec(x_0); return x_1; } else { obj* x_3; obj* x_5; obj* x_7; x_3 = lean::cnstr_get(x_1, 0); lean::inc(x_3); x_5 = lean::cnstr_get(x_1, 1); lean::inc(x_5); if (lean::is_shared(x_1)) { lean::dec(x_1); x_7 = lean::box(0); } else { lean::cnstr_release(x_1, 0); lean::cnstr_release(x_1, 1); x_7 = x_1; } if (lean::obj_tag(x_5) == 0) { obj* x_8; obj* x_9; x_8 = _l_s9___private_3229416877__s16_update__trailing_s6___main(x_0, x_3); if (lean::is_scalar(x_7)) { x_9 = lean::alloc_cnstr(1, 2, 0); } else { x_9 = x_7; } lean::cnstr_set(x_9, 0, x_8); lean::cnstr_set(x_9, 1, x_5); return x_9; } else { obj* x_10; obj* x_11; x_10 = _l_s9___private_3229416877__s21_update__trailing__lst_s6___main(x_0, x_5); if (lean::is_scalar(x_7)) { x_11 = lean::alloc_cnstr(1, 2, 0); } else { x_11 = x_7; } lean::cnstr_set(x_11, 0, x_3); lean::cnstr_set(x_11, 1, x_10); return x_11; } } } } obj* _l_s9___private_3229416877__s16_update__trailing(obj* x_0, obj* x_1) { { obj* x_2; x_2 = _l_s9___private_3229416877__s16_update__trailing_s6___main(x_0, x_1); return x_2; } } obj* _l_s9___private_3229416877__s21_update__trailing__lst(obj* x_0, obj* x_1) { { obj* x_2; x_2 = _l_s9___private_3229416877__s21_update__trailing__lst_s6___main(x_0, x_1); return x_2; } } obj* _l_s4_lean_s6_parser_s14_with__trailing_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; lean::dec(x_1); x_5 = lean::cnstr_get(x_0, 1); lean::inc(x_5); x_7 = _l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___closed__1; lean::inc(x_7); x_9 = lean::apply_2(x_2, lean::box(0), x_7); x_10 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__3), 3, 2); lean::closure_set(x_10, 0, x_0); lean::closure_set(x_10, 1, x_3); x_11 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_9, x_10); return x_11; } } obj* _init__l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_2; obj* x_3; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__1), 2, 0); x_1 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__1_s6___rarg), 4, 1); lean::closure_set(x_1, 0, x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__2), 4, 0); x_3 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_3, 0, x_1); lean::closure_set(x_3, 1, x_2); return x_3; } } obj* _l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__1(obj* x_0, obj* x_1) { { obj* x_2; obj* x_5; obj* x_6; x_2 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_2); lean::inc(x_0); x_5 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_5, 0, x_0); lean::cnstr_set(x_5, 1, x_0); lean::cnstr_set(x_5, 2, x_2); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_1); return x_6; } } obj* _l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_7; obj* x_9; x_4 = _l_s4_lean_s6_parser_s10_whitespace(x_1, x_2, x_3); x_5 = lean::cnstr_get(x_4, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_4, 1); lean::inc(x_7); if (lean::is_shared(x_4)) { lean::dec(x_4); x_9 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); x_9 = x_4; } if (lean::obj_tag(x_5) == 0) { obj* x_10; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; x_10 = lean::cnstr_get(x_5, 1); lean::inc(x_10); x_12 = lean::cnstr_get(x_5, 2); lean::inc(x_12); if (lean::is_shared(x_5)) { lean::dec(x_5); x_14 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); x_14 = x_5; } lean::inc(x_10); x_16 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_16, 0, x_0); lean::cnstr_set(x_16, 1, x_10); x_17 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_17); if (lean::is_scalar(x_14)) { x_19 = lean::alloc_cnstr(0, 3, 0); } else { x_19 = x_14; } lean::cnstr_set(x_19, 0, x_16); lean::cnstr_set(x_19, 1, x_10); lean::cnstr_set(x_19, 2, x_17); x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_12, x_19); if (lean::is_scalar(x_9)) { x_21 = lean::alloc_cnstr(0, 2, 0); } else { x_21 = x_9; } lean::cnstr_set(x_21, 0, x_20); lean::cnstr_set(x_21, 1, x_7); return x_21; } else { obj* x_23; unsigned char x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; lean::dec(x_0); x_23 = lean::cnstr_get(x_5, 0); lean::inc(x_23); x_25 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); if (lean::is_shared(x_5)) { lean::dec(x_5); x_26 = lean::box(0); } else { lean::cnstr_release(x_5, 0); x_26 = x_5; } if (lean::is_scalar(x_26)) { x_27 = lean::alloc_cnstr(1, 1, 1); } else { x_27 = x_26; } lean::cnstr_set(x_27, 0, x_23); lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); x_28 = x_27; if (lean::is_scalar(x_9)) { x_29 = lean::alloc_cnstr(0, 2, 0); } else { x_29 = x_9; } lean::cnstr_set(x_29, 0, x_28); lean::cnstr_set(x_29, 1, x_7); return x_29; } } } obj* _l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__3(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_6; obj* x_9; obj* x_10; x_3 = lean::cnstr_get(x_0, 0); lean::inc(x_3); lean::dec(x_0); x_6 = lean::cnstr_get(x_3, 1); lean::inc(x_6); lean::dec(x_3); x_9 = _l_s9___private_3229416877__s16_update__trailing_s6___main(x_2, x_1); x_10 = lean::apply_2(x_6, lean::box(0), x_9); return x_10; } } obj* _l_s4_lean_s6_parser_s14_with__trailing(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s14_with__trailing_s6___rarg), 4, 0); return x_2; } } obj* _l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__1_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; lean::dec(x_1); x_5 = lean::apply_2(x_0, x_2, x_3); return x_5; } } obj* _l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__1(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__1_s6___rarg), 4, 0); return x_2; } } obj* _l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_6; obj* x_7; obj* x_9; obj* x_11; lean::inc(x_2); x_6 = lean::apply_3(x_0, x_2, x_3, x_4); x_7 = lean::cnstr_get(x_6, 0); lean::inc(x_7); x_9 = lean::cnstr_get(x_6, 1); lean::inc(x_9); if (lean::is_shared(x_6)) { lean::dec(x_6); x_11 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); x_11 = x_6; } if (lean::obj_tag(x_7) == 0) { obj* x_12; obj* x_14; obj* x_16; obj* x_19; obj* x_20; obj* x_22; obj* x_25; obj* x_26; x_12 = lean::cnstr_get(x_7, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_7, 1); lean::inc(x_14); x_16 = lean::cnstr_get(x_7, 2); lean::inc(x_16); lean::dec(x_7); x_19 = lean::apply_4(x_1, x_12, x_2, x_14, x_9); x_20 = lean::cnstr_get(x_19, 0); lean::inc(x_20); x_22 = lean::cnstr_get(x_19, 1); lean::inc(x_22); lean::dec(x_19); x_25 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_20); if (lean::is_scalar(x_11)) { x_26 = lean::alloc_cnstr(0, 2, 0); } else { x_26 = x_11; } lean::cnstr_set(x_26, 0, x_25); lean::cnstr_set(x_26, 1, x_22); return x_26; } else { obj* x_29; unsigned char x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; lean::dec(x_1); lean::dec(x_2); x_29 = lean::cnstr_get(x_7, 0); lean::inc(x_29); x_31 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); if (lean::is_shared(x_7)) { lean::dec(x_7); x_32 = lean::box(0); } else { lean::cnstr_release(x_7, 0); x_32 = x_7; } if (lean::is_scalar(x_32)) { x_33 = lean::alloc_cnstr(1, 1, 1); } else { x_33 = x_32; } lean::cnstr_set(x_33, 0, x_29); lean::cnstr_set_scalar(x_33, sizeof(void*)*1, x_31); x_34 = x_33; if (lean::is_scalar(x_11)) { x_35 = lean::alloc_cnstr(0, 2, 0); } else { x_35 = x_11; } lean::cnstr_set(x_35, 0, x_34); lean::cnstr_set(x_35, 1, x_9); return x_35; } } } obj* _l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2(obj* x_0, obj* x_1) { { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 0); return x_4; } } obj* _l_s4_lean_s6_parser_s12_mk__raw__res(obj* x_0, obj* x_1) { { obj* x_4; obj* x_7; obj* x_8; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; lean::inc(x_1); lean::inc(x_0); x_4 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_4, 0, x_0); lean::cnstr_set(x_4, 1, x_1); lean::inc(x_0); lean::inc(x_0); x_7 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_7, 0, x_0); lean::cnstr_set(x_7, 1, x_0); x_8 = lean::string_iterator_offset(x_0); lean::dec(x_0); lean::inc(x_1); x_11 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_11, 0, x_1); lean::cnstr_set(x_11, 1, x_1); x_12 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_12, 0, x_7); lean::cnstr_set(x_12, 1, x_8); lean::cnstr_set(x_12, 2, x_11); x_13 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_13, 0, x_12); x_14 = _l_s4_lean_s6_parser_s9_substring_s10_to__string(x_4); x_15 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_15, 0, x_13); lean::cnstr_set(x_15, 1, x_14); x_16 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_16, 0, x_15); return x_16; } } obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, unsigned char x_5) { { obj* x_7; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_17; obj* x_18; lean::dec(x_3); x_7 = lean::cnstr_get(x_0, 1); lean::inc(x_7); x_9 = lean::cnstr_get(x_1, 0); lean::inc(x_9); x_11 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_left__over_s6___rarg_s11___closed__1; lean::inc(x_11); x_13 = lean::apply_2(x_9, lean::box(0), x_11); x_14 = lean::box(x_5); lean::inc(x_13); lean::inc(x_7); x_17 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__3_s7___boxed), 8, 7); lean::closure_set(x_17, 0, x_14); lean::closure_set(x_17, 1, x_0); lean::closure_set(x_17, 2, x_1); lean::closure_set(x_17, 3, x_2); lean::closure_set(x_17, 4, x_7); lean::closure_set(x_17, 5, x_13); lean::closure_set(x_17, 6, x_4); x_18 = lean::apply_4(x_7, lean::box(0), lean::box(0), x_13, x_17); return x_18; } } obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__1(obj* x_0, unsigned char x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { obj* x_6; x_6 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_0, x_5); if (x_1 == 0) { obj* x_9; obj* x_12; obj* x_15; lean::dec(x_4); lean::dec(x_3); x_9 = lean::cnstr_get(x_2, 0); lean::inc(x_9); lean::dec(x_2); x_12 = lean::cnstr_get(x_9, 1); lean::inc(x_12); lean::dec(x_9); x_15 = lean::apply_2(x_12, lean::box(0), x_6); return x_15; } else { obj* x_16; x_16 = _l_s4_lean_s6_parser_s14_with__trailing_s6___rarg(x_2, x_3, x_4, x_6); return x_16; } } } obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__2(obj* x_0, unsigned char x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { { obj* x_9; obj* x_10; obj* x_11; lean::dec(x_7); x_9 = lean::box(x_1); x_10 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__1_s7___boxed), 6, 5); lean::closure_set(x_10, 0, x_0); lean::closure_set(x_10, 1, x_9); lean::closure_set(x_10, 2, x_2); lean::closure_set(x_10, 3, x_3); lean::closure_set(x_10, 4, x_4); x_11 = lean::apply_4(x_5, lean::box(0), lean::box(0), x_6, x_10); return x_11; } } obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__3(unsigned char x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { { obj* x_8; obj* x_10; obj* x_11; x_8 = lean::box(x_0); lean::inc(x_4); x_10 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__2_s7___boxed), 8, 7); lean::closure_set(x_10, 0, x_7); lean::closure_set(x_10, 1, x_8); lean::closure_set(x_10, 2, x_1); lean::closure_set(x_10, 3, x_2); lean::closure_set(x_10, 4, x_3); lean::closure_set(x_10, 5, x_4); lean::closure_set(x_10, 6, x_5); x_11 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_6, x_10); return x_11; } } obj* _l_s4_lean_s6_parser_s3_raw(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s3_raw_s6___rarg_s7___boxed), 6, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { unsigned char x_6; obj* x_7; x_6 = lean::unbox(x_5); x_7 = _l_s4_lean_s6_parser_s3_raw_s6___rarg(x_0, x_1, x_2, x_3, x_4, x_6); return x_7; } } obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__1_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { unsigned char x_6; obj* x_7; x_6 = lean::unbox(x_1); x_7 = _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__1(x_0, x_6, x_2, x_3, x_4, x_5); return x_7; } } obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__2_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { { unsigned char x_8; obj* x_9; x_8 = lean::unbox(x_1); x_9 = _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__2(x_0, x_8, x_2, x_3, x_4, x_5, x_6, x_7); return x_9; } } obj* _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__3_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { { unsigned char x_8; obj* x_9; x_8 = lean::unbox(x_0); x_9 = _l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__3(x_8, x_1, x_2, x_3, x_4, x_5, x_6, x_7); return x_9; } } obj* _l_s4_lean_s6_parser_s3_raw_s6_tokens(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, unsigned char x_6) { { obj* x_13; lean::dec(x_5); lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); lean::dec(x_1); lean::dec(x_0); x_13 = lean::box(0); return x_13; } } obj* _l_s4_lean_s6_parser_s3_raw_s6_tokens_s7___boxed(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; x_7 = lean::unbox(x_6); x_8 = _l_s4_lean_s6_parser_s3_raw_s6_tokens(x_0, x_1, x_2, x_3, x_4, x_5, x_7); return x_8; } } obj* _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, unsigned char x_5) { { obj* x_11; obj* x_12; obj* x_15; lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); lean::dec(x_1); lean::dec(x_0); x_11 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___closed__1; x_12 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___closed__2; lean::inc(x_12); lean::inc(x_11); x_15 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_15, 0, x_11); lean::cnstr_set(x_15, 1, x_12); return x_15; } } obj* _init__l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___closed__1() { { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__1), 1, 0); return x_0; } } obj* _init__l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___closed__2() { { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3), 1, 0); return x_0; } } obj* _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__1(obj* x_0) { { switch (lean::obj_tag(x_0)) { case 0: { obj* x_1; obj* x_4; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); lean::dec(x_0); x_4 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_4, 0, x_1); return x_4; } case 1: { obj* x_6; lean::dec(x_0); x_6 = lean::box(0); return x_6; } case 2: { obj* x_8; lean::dec(x_0); x_8 = lean::box(0); return x_8; } default: { obj* x_10; lean::dec(x_0); x_10 = lean::box(0); return x_10; } } } } obj* _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__2(obj* x_0) { { obj* x_1; x_1 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3(obj* x_0) { { obj* x_1; obj* x_3; obj* x_4; obj* x_5; x_1 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3_s11___closed__1; lean::inc(x_1); x_3 = _l_s6_option_s3_map_s6___rarg(x_1, x_0); x_4 = lean::box(3); x_5 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_3, x_4); return x_5; } } obj* _init__l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3_s11___closed__1() { { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__2), 1, 0); return x_0; } } obj* _l_s4_lean_s6_parser_s3_raw_s4_view(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s7___boxed), 6, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { unsigned char x_6; obj* x_7; x_6 = lean::unbox(x_5); x_7 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg(x_0, x_1, x_2, x_3, x_4, x_6); return x_7; } } obj* _l_s4_lean_s6_parser_s8_raw__str_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, unsigned char x_4) { { obj* x_6; obj* x_7; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_21; obj* x_22; lean::inc(x_3); x_6 = _l_s6_string_s5_quote(x_3); x_7 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_7, 0, x_6); lean::inc(x_1); lean::inc(x_0); x_10 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s6___rarg(x_0, x_1, x_3, x_7); x_11 = lean::cnstr_get(x_0, 1); lean::inc(x_11); x_13 = lean::cnstr_get(x_1, 0); lean::inc(x_13); x_15 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_left__over_s6___rarg_s11___closed__1; lean::inc(x_15); x_17 = lean::apply_2(x_13, lean::box(0), x_15); x_18 = lean::box(x_4); lean::inc(x_17); lean::inc(x_11); x_21 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s3_raw_s6___rarg_s11___lambda__3_s7___boxed), 8, 7); lean::closure_set(x_21, 0, x_18); lean::closure_set(x_21, 1, x_0); lean::closure_set(x_21, 2, x_1); lean::closure_set(x_21, 3, x_2); lean::closure_set(x_21, 4, x_11); lean::closure_set(x_21, 5, x_17); lean::closure_set(x_21, 6, x_10); x_22 = lean::apply_4(x_11, lean::box(0), lean::box(0), x_17, x_21); return x_22; } } obj* _l_s4_lean_s6_parser_s8_raw__str(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s8_raw__str_s6___rarg_s7___boxed), 5, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s8_raw__str_s6___rarg_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned char x_5; obj* x_6; x_5 = lean::unbox(x_4); x_6 = _l_s4_lean_s6_parser_s8_raw__str_s6___rarg(x_0, x_1, x_2, x_3, x_5); return x_6; } } obj* _l_s4_lean_s6_parser_s8_raw__str_s4_lean_s6_parser_s9_has__view_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, unsigned char x_4) { { obj* x_6; obj* x_7; obj* x_10; obj* x_11; lean::inc(x_3); x_6 = _l_s6_string_s5_quote(x_3); x_7 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_7, 0, x_6); lean::inc(x_1); lean::inc(x_0); x_10 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s6___rarg(x_0, x_1, x_3, x_7); x_11 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg(x_0, x_1, x_2, lean::box(0), x_10, x_4); return x_11; } } obj* _l_s4_lean_s6_parser_s8_raw__str_s4_lean_s6_parser_s9_has__view(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s8_raw__str_s4_lean_s6_parser_s9_has__view_s6___rarg_s7___boxed), 5, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s8_raw__str_s4_lean_s6_parser_s9_has__view_s6___rarg_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned char x_5; obj* x_6; x_5 = lean::unbox(x_4); x_6 = _l_s4_lean_s6_parser_s8_raw__str_s4_lean_s6_parser_s9_has__view_s6___rarg(x_0, x_1, x_2, x_3, x_5); return x_6; } } obj* _l_s4_lean_s6_parser_s8_raw__str_s4_lean_s6_parser_s11_has__tokens(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, unsigned char x_5) { { obj* x_11; lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); lean::dec(x_1); lean::dec(x_0); x_11 = lean::box(0); return x_11; } } obj* _l_s4_lean_s6_parser_s8_raw__str_s4_lean_s6_parser_s11_has__tokens_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { unsigned char x_6; obj* x_7; x_6 = lean::unbox(x_5); x_7 = _l_s4_lean_s6_parser_s8_raw__str_s4_lean_s6_parser_s11_has__tokens(x_0, x_1, x_2, x_3, x_4, x_6); return x_7; } } obj* _l_s4_lean_s6_parser_s8_raw__str_s13_view__default_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, unsigned char x_4) { { obj* x_9; lean::dec(x_3); lean::dec(x_2); lean::dec(x_1); lean::dec(x_0); x_9 = lean::box(0); return x_9; } } obj* _l_s4_lean_s6_parser_s8_raw__str_s13_view__default(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s8_raw__str_s13_view__default_s6___rarg_s7___boxed), 5, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s8_raw__str_s13_view__default_s6___rarg_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned char x_5; obj* x_6; x_5 = lean::unbox(x_4); x_6 = _l_s4_lean_s6_parser_s8_raw__str_s13_view__default_s6___rarg(x_0, x_1, x_2, x_3, x_5); return x_6; } } obj* _init__l_s4_lean_s6_parser_s28_detail__ident__part__escaped() { { obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("lean"); x_2 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); x_3 = lean::mk_string("parser"); x_4 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_4, 0, x_2); lean::cnstr_set(x_4, 1, x_3); x_5 = lean::mk_string("detail_ident_part_escaped"); x_6 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_6, 0, x_4); lean::cnstr_set(x_6, 1, x_5); return x_6; } } obj* _init__l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27_s11___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27_s11___lambda__2), 1, 0); x_2 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); return x_2; } } obj* _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27_s11___lambda__1(obj* x_0) { { obj* x_1; obj* x_2; obj* x_4; x_4 = _l_s4_lean_s6_parser_s6_syntax_s8_as__node_s6___main(x_0); if (lean::obj_tag(x_4) == 0) { obj* x_6; lean::dec(x_4); x_6 = _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_6); return x_6; } else { obj* x_8; obj* x_11; x_8 = lean::cnstr_get(x_4, 0); lean::inc(x_8); lean::dec(x_4); x_11 = lean::cnstr_get(x_8, 1); lean::inc(x_11); lean::dec(x_8); if (lean::obj_tag(x_11) == 0) { obj* x_14; x_14 = lean::box(3); x_1 = x_11; x_2 = x_14; goto lbl_3; } else { obj* x_15; obj* x_17; x_15 = lean::cnstr_get(x_11, 0); lean::inc(x_15); x_17 = lean::cnstr_get(x_11, 1); lean::inc(x_17); lean::dec(x_11); x_1 = x_17; x_2 = x_15; goto lbl_3; } } lbl_3: { obj* x_20; switch (lean::obj_tag(x_2)) { case 0: { obj* x_22; obj* x_25; x_22 = lean::cnstr_get(x_2, 0); lean::inc(x_22); lean::dec(x_2); x_25 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_25, 0, x_22); x_20 = x_25; goto lbl_21; } case 1: { obj* x_27; lean::dec(x_2); x_27 = lean::box(0); x_20 = x_27; goto lbl_21; } case 2: { obj* x_29; lean::dec(x_2); x_29 = lean::box(0); x_20 = x_29; goto lbl_21; } default: { obj* x_31; lean::dec(x_2); x_31 = lean::box(0); x_20 = x_31; goto lbl_21; } } lbl_21: { obj* x_32; obj* x_33; obj* x_35; obj* x_36; if (lean::obj_tag(x_1) == 0) { obj* x_38; x_38 = lean::box(3); x_35 = x_1; x_36 = x_38; goto lbl_37; } else { obj* x_39; obj* x_41; x_39 = lean::cnstr_get(x_1, 0); lean::inc(x_39); x_41 = lean::cnstr_get(x_1, 1); lean::inc(x_41); lean::dec(x_1); x_35 = x_41; x_36 = x_39; goto lbl_37; } lbl_34: { switch (lean::obj_tag(x_33)) { case 0: { obj* x_44; obj* x_47; obj* x_48; x_44 = lean::cnstr_get(x_33, 0); lean::inc(x_44); lean::dec(x_33); x_47 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_47, 0, x_44); x_48 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_48, 0, x_20); lean::cnstr_set(x_48, 1, x_32); lean::cnstr_set(x_48, 2, x_47); return x_48; } case 1: { obj* x_50; obj* x_51; lean::dec(x_33); x_50 = lean::box(0); x_51 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_51, 0, x_20); lean::cnstr_set(x_51, 1, x_32); lean::cnstr_set(x_51, 2, x_50); return x_51; } case 2: { obj* x_53; obj* x_54; lean::dec(x_33); x_53 = lean::box(0); x_54 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_54, 0, x_20); lean::cnstr_set(x_54, 1, x_32); lean::cnstr_set(x_54, 2, x_53); return x_54; } default: { obj* x_56; obj* x_57; lean::dec(x_33); x_56 = lean::box(0); x_57 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_57, 0, x_20); lean::cnstr_set(x_57, 1, x_32); lean::cnstr_set(x_57, 2, x_56); return x_57; } } } lbl_37: { switch (lean::obj_tag(x_36)) { case 0: { obj* x_58; obj* x_61; x_58 = lean::cnstr_get(x_36, 0); lean::inc(x_58); lean::dec(x_36); x_61 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_61, 0, x_58); if (lean::obj_tag(x_35) == 0) { obj* x_63; obj* x_64; lean::dec(x_35); x_63 = lean::box(0); x_64 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_64, 0, x_20); lean::cnstr_set(x_64, 1, x_61); lean::cnstr_set(x_64, 2, x_63); return x_64; } else { obj* x_65; x_65 = lean::cnstr_get(x_35, 0); lean::inc(x_65); lean::dec(x_35); x_32 = x_61; x_33 = x_65; goto lbl_34; } } case 1: { obj* x_69; lean::dec(x_36); x_69 = lean::box(0); if (lean::obj_tag(x_35) == 0) { obj* x_72; lean::dec(x_35); lean::inc(x_69); x_72 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_72, 0, x_20); lean::cnstr_set(x_72, 1, x_69); lean::cnstr_set(x_72, 2, x_69); return x_72; } else { obj* x_73; x_73 = lean::cnstr_get(x_35, 0); lean::inc(x_73); lean::dec(x_35); x_32 = x_69; x_33 = x_73; goto lbl_34; } } case 2: { obj* x_77; lean::dec(x_36); x_77 = lean::box(0); if (lean::obj_tag(x_35) == 0) { obj* x_80; lean::dec(x_35); lean::inc(x_77); x_80 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_80, 0, x_20); lean::cnstr_set(x_80, 1, x_77); lean::cnstr_set(x_80, 2, x_77); return x_80; } else { obj* x_81; x_81 = lean::cnstr_get(x_35, 0); lean::inc(x_81); lean::dec(x_35); x_32 = x_77; x_33 = x_81; goto lbl_34; } } default: { obj* x_85; lean::dec(x_36); x_85 = lean::box(0); if (lean::obj_tag(x_35) == 0) { obj* x_88; lean::dec(x_35); lean::inc(x_85); x_88 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_88, 0, x_20); lean::cnstr_set(x_88, 1, x_85); lean::cnstr_set(x_88, 2, x_85); return x_88; } else { obj* x_89; x_89 = lean::cnstr_get(x_35, 0); lean::inc(x_89); lean::dec(x_35); x_32 = x_85; x_33 = x_89; goto lbl_34; } } } } } } } } obj* _init__l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27_s11___lambda__1_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_3; obj* x_4; x_3 = lean::box(0); x_4 = lean::box(3); x_0 = x_3; x_1 = x_4; goto lbl_2; lbl_2: { obj* x_5; switch (lean::obj_tag(x_1)) { case 0: { obj* x_7; obj* x_10; x_7 = lean::cnstr_get(x_1, 0); lean::inc(x_7); lean::dec(x_1); x_10 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_10, 0, x_7); x_5 = x_10; goto lbl_6; } case 1: { obj* x_12; lean::dec(x_1); x_12 = lean::box(0); x_5 = x_12; goto lbl_6; } case 2: { obj* x_14; lean::dec(x_1); x_14 = lean::box(0); x_5 = x_14; goto lbl_6; } default: { obj* x_16; lean::dec(x_1); x_16 = lean::box(0); x_5 = x_16; goto lbl_6; } } lbl_6: { obj* x_17; obj* x_18; obj* x_20; obj* x_21; if (lean::obj_tag(x_0) == 0) { obj* x_23; x_23 = lean::box(3); x_20 = x_0; x_21 = x_23; goto lbl_22; } else { obj* x_24; obj* x_26; x_24 = lean::cnstr_get(x_0, 0); lean::inc(x_24); x_26 = lean::cnstr_get(x_0, 1); lean::inc(x_26); lean::dec(x_0); x_20 = x_26; x_21 = x_24; goto lbl_22; } lbl_19: { switch (lean::obj_tag(x_18)) { case 0: { obj* x_29; obj* x_32; obj* x_33; x_29 = lean::cnstr_get(x_18, 0); lean::inc(x_29); lean::dec(x_18); x_32 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_32, 0, x_29); x_33 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_33, 0, x_5); lean::cnstr_set(x_33, 1, x_17); lean::cnstr_set(x_33, 2, x_32); return x_33; } case 1: { obj* x_35; obj* x_36; lean::dec(x_18); x_35 = lean::box(0); x_36 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_36, 0, x_5); lean::cnstr_set(x_36, 1, x_17); lean::cnstr_set(x_36, 2, x_35); return x_36; } case 2: { obj* x_38; obj* x_39; lean::dec(x_18); x_38 = lean::box(0); x_39 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_39, 0, x_5); lean::cnstr_set(x_39, 1, x_17); lean::cnstr_set(x_39, 2, x_38); return x_39; } default: { obj* x_41; obj* x_42; lean::dec(x_18); x_41 = lean::box(0); x_42 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_42, 0, x_5); lean::cnstr_set(x_42, 1, x_17); lean::cnstr_set(x_42, 2, x_41); return x_42; } } } lbl_22: { switch (lean::obj_tag(x_21)) { case 0: { obj* x_43; obj* x_46; x_43 = lean::cnstr_get(x_21, 0); lean::inc(x_43); lean::dec(x_21); x_46 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_46, 0, x_43); if (lean::obj_tag(x_20) == 0) { obj* x_48; obj* x_49; lean::dec(x_20); x_48 = lean::box(0); x_49 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_49, 0, x_5); lean::cnstr_set(x_49, 1, x_46); lean::cnstr_set(x_49, 2, x_48); return x_49; } else { obj* x_50; x_50 = lean::cnstr_get(x_20, 0); lean::inc(x_50); lean::dec(x_20); x_17 = x_46; x_18 = x_50; goto lbl_19; } } case 1: { obj* x_54; lean::dec(x_21); x_54 = lean::box(0); if (lean::obj_tag(x_20) == 0) { obj* x_57; lean::dec(x_20); lean::inc(x_54); x_57 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_57, 0, x_5); lean::cnstr_set(x_57, 1, x_54); lean::cnstr_set(x_57, 2, x_54); return x_57; } else { obj* x_58; x_58 = lean::cnstr_get(x_20, 0); lean::inc(x_58); lean::dec(x_20); x_17 = x_54; x_18 = x_58; goto lbl_19; } } case 2: { obj* x_62; lean::dec(x_21); x_62 = lean::box(0); if (lean::obj_tag(x_20) == 0) { obj* x_65; lean::dec(x_20); lean::inc(x_62); x_65 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_65, 0, x_5); lean::cnstr_set(x_65, 1, x_62); lean::cnstr_set(x_65, 2, x_62); return x_65; } else { obj* x_66; x_66 = lean::cnstr_get(x_20, 0); lean::inc(x_66); lean::dec(x_20); x_17 = x_62; x_18 = x_66; goto lbl_19; } } default: { obj* x_70; lean::dec(x_21); x_70 = lean::box(0); if (lean::obj_tag(x_20) == 0) { obj* x_73; lean::dec(x_20); lean::inc(x_70); x_73 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_73, 0, x_5); lean::cnstr_set(x_73, 1, x_70); lean::cnstr_set(x_73, 2, x_70); return x_73; } else { obj* x_74; x_74 = lean::cnstr_get(x_20, 0); lean::inc(x_74); lean::dec(x_20); x_17 = x_70; x_18 = x_74; goto lbl_19; } } } } } } } } obj* _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27_s11___lambda__2(obj* x_0) { { obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); lean::inc(x_3); x_5 = lean::cnstr_get(x_0, 2); lean::inc(x_5); lean::dec(x_0); x_8 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3_s11___closed__1; lean::inc(x_8); x_10 = _l_s6_option_s3_map_s6___rarg(x_8, x_1); x_11 = lean::box(3); lean::inc(x_11); x_13 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_10, x_11); lean::inc(x_8); x_15 = _l_s6_option_s3_map_s6___rarg(x_8, x_3); lean::inc(x_11); x_17 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_15, x_11); lean::inc(x_8); x_19 = _l_s6_option_s3_map_s6___rarg(x_8, x_5); x_20 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_19, x_11); x_21 = lean::box(0); x_22 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_22, 0, x_20); lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_23, 0, x_17); lean::cnstr_set(x_23, 1, x_22); x_24 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_24, 0, x_13); lean::cnstr_set(x_24, 1, x_23); x_25 = _l_s4_lean_s6_parser_s28_detail__ident__part__escaped; lean::inc(x_25); x_27 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_25, x_24); return x_27; } } obj* _init__l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s9_has__view() { { obj* x_0; x_0 = _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27; lean::inc(x_0); return x_0; } } obj* _init__l_s4_lean_s6_parser_s19_detail__ident__part() { { obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("lean"); x_2 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); x_3 = lean::mk_string("parser"); x_4 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_4, 0, x_2); lean::cnstr_set(x_4, 1, x_3); x_5 = lean::mk_string("detail_ident_part"); x_6 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_6, 0, x_4); lean::cnstr_set(x_6, 1, x_5); return x_6; } } obj* _init__l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2), 1, 0); x_2 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); return x_2; } } obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1(obj* x_0) { { obj* x_1; obj* x_2; obj* x_4; x_4 = _l_s4_lean_s6_parser_s6_syntax_s8_as__node_s6___main(x_0); if (lean::obj_tag(x_4) == 0) { obj* x_6; lean::dec(x_4); x_6 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_6); return x_6; } else { obj* x_8; obj* x_11; obj* x_13; obj* x_16; obj* x_18; x_8 = lean::cnstr_get(x_4, 0); lean::inc(x_8); lean::dec(x_4); x_11 = lean::cnstr_get(x_8, 0); lean::inc(x_11); x_13 = lean::cnstr_get(x_8, 1); lean::inc(x_13); lean::dec(x_8); x_16 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__3; lean::inc(x_16); x_18 = _l_s4_lean_s4_name_s12_has__dec__eq_s6___main(x_11, x_16); if (lean::obj_tag(x_18) == 0) { obj* x_21; lean::dec(x_18); lean::dec(x_13); x_21 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_21); return x_21; } else { lean::dec(x_18); if (lean::obj_tag(x_13) == 0) { obj* x_25; lean::dec(x_13); x_25 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_25); return x_25; } else { obj* x_27; obj* x_29; x_27 = lean::cnstr_get(x_13, 0); lean::inc(x_27); x_29 = lean::cnstr_get(x_13, 1); lean::inc(x_29); lean::dec(x_13); if (lean::obj_tag(x_29) == 0) { obj* x_33; lean::dec(x_29); x_33 = _l_s4_lean_s6_parser_s6_syntax_s8_as__node_s6___main(x_27); if (lean::obj_tag(x_33) == 0) { obj* x_35; lean::dec(x_33); x_35 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_35); return x_35; } else { obj* x_37; obj* x_40; obj* x_42; x_37 = lean::cnstr_get(x_33, 0); lean::inc(x_37); lean::dec(x_33); x_40 = lean::cnstr_get(x_37, 0); lean::inc(x_40); x_42 = lean::cnstr_get(x_37, 1); lean::inc(x_42); lean::dec(x_37); switch (lean::obj_tag(x_40)) { case 0: { obj* x_47; lean::dec(x_40); lean::dec(x_42); x_47 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_47); return x_47; } case 1: { obj* x_51; lean::dec(x_40); lean::dec(x_42); x_51 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_51); return x_51; } default: { obj* x_53; obj* x_55; obj* x_58; obj* x_59; x_53 = lean::cnstr_get(x_40, 0); lean::inc(x_53); x_55 = lean::cnstr_get(x_40, 1); lean::inc(x_55); lean::dec(x_40); x_58 = lean::box(0); x_59 = _l_s4_lean_s4_name_s12_has__dec__eq_s6___main(x_53, x_58); if (lean::obj_tag(x_59) == 0) { obj* x_63; lean::dec(x_55); lean::dec(x_42); lean::dec(x_59); x_63 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_63); return x_63; } else { lean::dec(x_59); if (lean::obj_tag(x_42) == 0) { obj* x_68; lean::dec(x_55); lean::dec(x_42); x_68 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_68); return x_68; } else { obj* x_70; obj* x_72; x_70 = lean::cnstr_get(x_42, 0); lean::inc(x_70); x_72 = lean::cnstr_get(x_42, 1); lean::inc(x_72); lean::dec(x_42); if (lean::obj_tag(x_72) == 0) { lean::dec(x_72); x_1 = x_70; x_2 = x_55; goto lbl_3; } else { obj* x_79; lean::dec(x_70); lean::dec(x_72); lean::dec(x_55); x_79 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_79); return x_79; } } } } } } } else { obj* x_83; lean::dec(x_29); lean::dec(x_27); x_83 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_83); return x_83; } } } } lbl_3: { obj* x_85; obj* x_86; x_85 = lean::mk_nat_obj(0u); x_86 = lean::nat_dec_eq(x_2, x_85); lean::dec(x_85); lean::dec(x_2); if (lean::obj_tag(x_86) == 0) { lean::dec(x_86); switch (lean::obj_tag(x_1)) { case 0: { obj* x_90; obj* x_93; obj* x_94; x_90 = lean::cnstr_get(x_1, 0); lean::inc(x_90); lean::dec(x_1); x_93 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_93, 0, x_90); x_94 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_94, 0, x_93); return x_94; } case 1: { obj* x_96; lean::dec(x_1); x_96 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_96); return x_96; } case 2: { obj* x_99; lean::dec(x_1); x_99 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_99); return x_99; } default: { obj* x_102; lean::dec(x_1); x_102 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_102); return x_102; } } } else { obj* x_105; obj* x_106; obj* x_108; obj* x_109; lean::dec(x_86); x_105 = _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s9_has__view; x_106 = lean::cnstr_get(x_105, 0); lean::inc(x_106); x_108 = lean::apply_1(x_106, x_1); x_109 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_109, 0, x_108); return x_109; } } } } obj* _init__l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__1() { { obj* x_0; obj* x_1; x_0 = lean::box(0); x_1 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init__l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__2() { { obj* x_0; obj* x_1; obj* x_3; obj* x_4; x_3 = lean::box(3); x_4 = lean::mk_nat_obj(0u); x_0 = x_3; x_1 = x_4; goto lbl_2; lbl_2: { obj* x_5; obj* x_6; x_5 = lean::mk_nat_obj(0u); x_6 = lean::nat_dec_eq(x_1, x_5); lean::dec(x_5); lean::dec(x_1); if (lean::obj_tag(x_6) == 0) { lean::dec(x_6); switch (lean::obj_tag(x_0)) { case 0: { obj* x_10; obj* x_13; obj* x_14; x_10 = lean::cnstr_get(x_0, 0); lean::inc(x_10); lean::dec(x_0); x_13 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_13, 0, x_10); x_14 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_14, 0, x_13); return x_14; } case 1: { obj* x_16; lean::dec(x_0); x_16 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_16); return x_16; } case 2: { obj* x_19; lean::dec(x_0); x_19 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_19); return x_19; } default: { obj* x_22; lean::dec(x_0); x_22 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_22); return x_22; } } } else { obj* x_25; obj* x_26; obj* x_28; obj* x_29; lean::dec(x_6); x_25 = _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s9_has__view; x_26 = lean::cnstr_get(x_25, 0); lean::inc(x_26); x_28 = lean::apply_1(x_26, x_0); x_29 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_29, 0, x_28); return x_29; } } } } obj* _init__l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__3() { { obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("lean"); x_2 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); x_3 = lean::mk_string("parser"); x_4 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_4, 0, x_2); lean::cnstr_set(x_4, 1, x_3); x_5 = lean::mk_string("detail_ident_part"); x_6 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_6, 0, x_4); lean::cnstr_set(x_6, 1, x_5); return x_6; } } obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2(obj* x_0) { { obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); x_5 = _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s9_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); lean::inc(x_1); x_10 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_10, 0, x_8); lean::cnstr_set(x_10, 1, x_1); x_11 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2_s11___closed__1; lean::inc(x_11); x_13 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_11, x_10); x_14 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_14, 0, x_13); lean::cnstr_set(x_14, 1, x_1); x_15 = _l_s4_lean_s6_parser_s19_detail__ident__part; lean::inc(x_15); x_17 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_15, x_14); return x_17; } else { obj* x_18; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; x_18 = lean::cnstr_get(x_0, 0); lean::inc(x_18); lean::dec(x_0); x_21 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3_s11___closed__1; lean::inc(x_21); x_23 = _l_s6_option_s3_map_s6___rarg(x_21, x_18); x_24 = lean::box(3); x_25 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_23, x_24); lean::inc(x_1); x_27 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_27, 0, x_25); lean::cnstr_set(x_27, 1, x_1); x_28 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2_s11___closed__2; lean::inc(x_28); x_30 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_28, x_27); x_31 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_31, 0, x_30); lean::cnstr_set(x_31, 1, x_1); x_32 = _l_s4_lean_s6_parser_s19_detail__ident__part; lean::inc(x_32); x_34 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_32, x_31); return x_34; } } } obj* _init__l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::box(0); x_1 = lean::mk_nat_obj(0u); x_2 = lean::alloc_cnstr(2, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); return x_2; } } obj* _init__l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2_s11___closed__2() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::box(0); x_1 = lean::mk_nat_obj(1u); x_2 = lean::alloc_cnstr(2, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); return x_2; } } obj* _init__l_s4_lean_s6_parser_s19_detail__ident__part_s9_has__view() { { obj* x_0; x_0 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27; lean::inc(x_0); return x_0; } } obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_7; x_3 = _l_s4_lean_s6_parser_s19_detail__ident__part; x_4 = _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___closed__1; lean::inc(x_4); lean::inc(x_3); x_7 = _l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__8(x_3, x_4, x_0, x_1, x_2); return x_7; } } obj* _init__l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___closed__1() { { obj* x_0; obj* x_1; unsigned x_2; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; unsigned x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; x_0 = lean::mk_string(""); x_1 = _l_s4_lean_s17_id__begin__escape; x_2 = lean::unbox_uint32(x_1); lean::inc(x_0); x_4 = lean::string_push(x_0, x_2); lean::inc(x_4); x_6 = _l_s6_string_s5_quote(x_4); x_7 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_7, 0, x_6); x_8 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__1), 2, 0); x_9 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__1_s6___rarg), 4, 1); lean::closure_set(x_9, 0, x_8); x_10 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___lambda__1), 6, 2); lean::closure_set(x_10, 0, x_4); lean::closure_set(x_10, 1, x_7); lean::inc(x_9); x_12 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_12, 0, x_9); lean::closure_set(x_12, 1, x_10); x_13 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___lambda__2), 4, 0); lean::inc(x_9); x_15 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_15, 0, x_9); lean::closure_set(x_15, 1, x_13); x_16 = _l_s4_lean_s15_id__end__escape; x_17 = lean::unbox_uint32(x_16); x_18 = lean::string_push(x_0, x_17); lean::inc(x_18); x_20 = _l_s6_string_s5_quote(x_18); x_21 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_21, 0, x_20); x_22 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___lambda__1), 6, 2); lean::closure_set(x_22, 0, x_18); lean::closure_set(x_22, 1, x_21); lean::inc(x_9); x_24 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_24, 0, x_9); lean::closure_set(x_24, 1, x_22); x_25 = lean::box(0); lean::inc(x_25); x_27 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_27, 0, x_24); lean::cnstr_set(x_27, 1, x_25); x_28 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_28, 0, x_15); lean::cnstr_set(x_28, 1, x_27); x_29 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_29, 0, x_12); lean::cnstr_set(x_29, 1, x_28); x_30 = _l_s4_lean_s6_parser_s28_detail__ident__part__escaped; lean::inc(x_30); x_32 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__8), 5, 2); lean::closure_set(x_32, 0, x_30); lean::closure_set(x_32, 1, x_29); x_33 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___lambda__3), 4, 0); x_34 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_34, 0, x_9); lean::closure_set(x_34, 1, x_33); lean::inc(x_25); x_36 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_36, 0, x_34); lean::cnstr_set(x_36, 1, x_25); x_37 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_37, 0, x_32); lean::cnstr_set(x_37, 1, x_36); x_38 = lean::mk_nat_obj(0u); x_39 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_combinators_s11_choice__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__16), 5, 2); lean::closure_set(x_39, 0, x_37); lean::closure_set(x_39, 1, x_38); x_40 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_40, 0, x_39); lean::cnstr_set(x_40, 1, x_25); return x_40; } } obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { obj* x_6; obj* x_7; obj* x_9; obj* x_11; x_6 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__3(x_0, x_1, x_3, x_4, x_5); x_7 = lean::cnstr_get(x_6, 0); lean::inc(x_7); x_9 = lean::cnstr_get(x_6, 1); lean::inc(x_9); if (lean::is_shared(x_6)) { lean::dec(x_6); x_11 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); x_11 = x_6; } if (lean::obj_tag(x_7) == 0) { obj* x_12; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; x_12 = lean::cnstr_get(x_7, 1); lean::inc(x_12); x_14 = lean::cnstr_get(x_7, 2); lean::inc(x_14); if (lean::is_shared(x_7)) { lean::dec(x_7); x_16 = lean::box(0); } else { lean::cnstr_release(x_7, 0); lean::cnstr_release(x_7, 1); lean::cnstr_release(x_7, 2); x_16 = x_7; } lean::inc(x_12); x_18 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_2, x_12); x_19 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_19); if (lean::is_scalar(x_16)) { x_21 = lean::alloc_cnstr(0, 3, 0); } else { x_21 = x_16; } lean::cnstr_set(x_21, 0, x_18); lean::cnstr_set(x_21, 1, x_12); lean::cnstr_set(x_21, 2, x_19); x_22 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_14, x_21); if (lean::is_scalar(x_11)) { x_23 = lean::alloc_cnstr(0, 2, 0); } else { x_23 = x_11; } lean::cnstr_set(x_23, 0, x_22); lean::cnstr_set(x_23, 1, x_9); return x_23; } else { obj* x_25; unsigned char x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; lean::dec(x_2); x_25 = lean::cnstr_get(x_7, 0); lean::inc(x_25); x_27 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); if (lean::is_shared(x_7)) { lean::dec(x_7); x_28 = lean::box(0); } else { lean::cnstr_release(x_7, 0); x_28 = x_7; } if (lean::is_scalar(x_28)) { x_29 = lean::alloc_cnstr(1, 1, 1); } else { x_29 = x_28; } lean::cnstr_set(x_29, 0, x_25); lean::cnstr_set_scalar(x_29, sizeof(void*)*1, x_27); x_30 = x_29; if (lean::is_scalar(x_11)) { x_31 = lean::alloc_cnstr(0, 2, 0); } else { x_31 = x_11; } lean::cnstr_set(x_31, 0, x_30); lean::cnstr_set(x_31, 1, x_9); return x_31; } } } obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___lambda__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_7; obj* x_9; x_4 = _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__1(x_1, x_2, x_3); x_5 = lean::cnstr_get(x_4, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_4, 1); lean::inc(x_7); if (lean::is_shared(x_4)) { lean::dec(x_4); x_9 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); x_9 = x_4; } if (lean::obj_tag(x_5) == 0) { obj* x_10; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; x_10 = lean::cnstr_get(x_5, 1); lean::inc(x_10); x_12 = lean::cnstr_get(x_5, 2); lean::inc(x_12); if (lean::is_shared(x_5)) { lean::dec(x_5); x_14 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); x_14 = x_5; } lean::inc(x_10); x_16 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_0, x_10); x_17 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_17); if (lean::is_scalar(x_14)) { x_19 = lean::alloc_cnstr(0, 3, 0); } else { x_19 = x_14; } lean::cnstr_set(x_19, 0, x_16); lean::cnstr_set(x_19, 1, x_10); lean::cnstr_set(x_19, 2, x_17); x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_12, x_19); if (lean::is_scalar(x_9)) { x_21 = lean::alloc_cnstr(0, 2, 0); } else { x_21 = x_9; } lean::cnstr_set(x_21, 0, x_20); lean::cnstr_set(x_21, 1, x_7); return x_21; } else { obj* x_23; unsigned char x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; lean::dec(x_0); x_23 = lean::cnstr_get(x_5, 0); lean::inc(x_23); x_25 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); if (lean::is_shared(x_5)) { lean::dec(x_5); x_26 = lean::box(0); } else { lean::cnstr_release(x_5, 0); x_26 = x_5; } if (lean::is_scalar(x_26)) { x_27 = lean::alloc_cnstr(1, 1, 1); } else { x_27 = x_26; } lean::cnstr_set(x_27, 0, x_23); lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); x_28 = x_27; if (lean::is_scalar(x_9)) { x_29 = lean::alloc_cnstr(0, 2, 0); } else { x_29 = x_9; } lean::cnstr_set(x_29, 0, x_28); lean::cnstr_set(x_29, 1, x_7); return x_29; } } } obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___lambda__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; unsigned char x_7; x_7 = lean::string_iterator_has_next(x_2); if (x_7 == 0) { obj* x_8; obj* x_9; obj* x_10; obj* x_14; obj* x_15; obj* x_17; obj* x_20; obj* x_22; x_8 = lean::box(0); x_9 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_10 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); x_14 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_9, x_10, x_8, x_8, x_1, x_2, x_3); x_15 = lean::cnstr_get(x_14, 0); lean::inc(x_15); x_17 = lean::cnstr_get(x_14, 1); lean::inc(x_17); lean::dec(x_14); x_20 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_20); x_22 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_20, x_15); if (lean::obj_tag(x_22) == 0) { obj* x_23; obj* x_25; obj* x_28; obj* x_29; obj* x_31; obj* x_34; x_23 = lean::cnstr_get(x_22, 1); lean::inc(x_23); x_25 = lean::cnstr_get(x_22, 2); lean::inc(x_25); lean::dec(x_22); x_28 = _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__10_s6___rarg(x_23, x_17); x_29 = lean::cnstr_get(x_28, 0); lean::inc(x_29); x_31 = lean::cnstr_get(x_28, 1); lean::inc(x_31); lean::dec(x_28); x_34 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_25, x_29); x_4 = x_34; x_5 = x_31; goto lbl_6; } else { obj* x_35; unsigned char x_37; obj* x_38; obj* x_39; obj* x_40; x_35 = lean::cnstr_get(x_22, 0); lean::inc(x_35); x_37 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); if (lean::is_shared(x_22)) { lean::dec(x_22); x_38 = lean::box(0); } else { lean::cnstr_release(x_22, 0); x_38 = x_22; } if (lean::is_scalar(x_38)) { x_39 = lean::alloc_cnstr(1, 1, 1); } else { x_39 = x_38; } lean::cnstr_set(x_39, 0, x_35); lean::cnstr_set_scalar(x_39, sizeof(void*)*1, x_37); x_40 = x_39; x_4 = x_40; x_5 = x_17; goto lbl_6; } } else { unsigned x_41; unsigned char x_42; x_41 = lean::string_iterator_curr(x_2); x_42 = _l_s4_lean_s13_is__id__first(x_41); if (x_42 == 0) { obj* x_43; obj* x_44; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_53; obj* x_54; obj* x_56; obj* x_59; obj* x_61; x_43 = _l_s4_char_s11_quote__core(x_41); x_44 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_44); x_46 = lean::string_append(x_44, x_43); lean::dec(x_43); x_48 = lean::string_append(x_46, x_44); x_49 = lean::box(0); x_50 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_49); lean::inc(x_50); x_53 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_48, x_50, x_49, x_49, x_1, x_2, x_3); x_54 = lean::cnstr_get(x_53, 0); lean::inc(x_54); x_56 = lean::cnstr_get(x_53, 1); lean::inc(x_56); lean::dec(x_53); x_59 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_59); x_61 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_59, x_54); if (lean::obj_tag(x_61) == 0) { obj* x_62; obj* x_64; obj* x_67; obj* x_68; obj* x_70; obj* x_73; x_62 = lean::cnstr_get(x_61, 1); lean::inc(x_62); x_64 = lean::cnstr_get(x_61, 2); lean::inc(x_64); lean::dec(x_61); x_67 = _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__12_s6___rarg(x_62, x_56); x_68 = lean::cnstr_get(x_67, 0); lean::inc(x_68); x_70 = lean::cnstr_get(x_67, 1); lean::inc(x_70); lean::dec(x_67); x_73 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_64, x_68); x_4 = x_73; x_5 = x_70; goto lbl_6; } else { obj* x_74; unsigned char x_76; obj* x_77; obj* x_78; obj* x_79; x_74 = lean::cnstr_get(x_61, 0); lean::inc(x_74); x_76 = lean::cnstr_get_scalar(x_61, sizeof(void*)*1); if (lean::is_shared(x_61)) { lean::dec(x_61); x_77 = lean::box(0); } else { lean::cnstr_release(x_61, 0); x_77 = x_61; } if (lean::is_scalar(x_77)) { x_78 = lean::alloc_cnstr(1, 1, 1); } else { x_78 = x_77; } lean::cnstr_set(x_78, 0, x_74); lean::cnstr_set_scalar(x_78, sizeof(void*)*1, x_76); x_79 = x_78; x_4 = x_79; x_5 = x_56; goto lbl_6; } } else { obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_88; obj* x_89; lean::dec(x_1); x_81 = lean::string_iterator_next(x_2); x_82 = _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__14_s6___rarg(x_81, x_3); x_83 = lean::cnstr_get(x_82, 0); lean::inc(x_83); x_85 = lean::cnstr_get(x_82, 1); lean::inc(x_85); lean::dec(x_82); x_88 = lean::box(0); x_89 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_88, x_83); x_4 = x_89; x_5 = x_85; goto lbl_6; } } lbl_6: { if (lean::obj_tag(x_4) == 0) { obj* x_90; obj* x_92; obj* x_94; obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_101; x_90 = lean::cnstr_get(x_4, 1); lean::inc(x_90); x_92 = lean::cnstr_get(x_4, 2); lean::inc(x_92); if (lean::is_shared(x_4)) { lean::dec(x_4); x_94 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); lean::cnstr_release(x_4, 2); x_94 = x_4; } lean::inc(x_90); x_96 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_0, x_90); x_97 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_97); if (lean::is_scalar(x_94)) { x_99 = lean::alloc_cnstr(0, 3, 0); } else { x_99 = x_94; } lean::cnstr_set(x_99, 0, x_96); lean::cnstr_set(x_99, 1, x_90); lean::cnstr_set(x_99, 2, x_97); x_100 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_92, x_99); x_101 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_101, 0, x_100); lean::cnstr_set(x_101, 1, x_5); return x_101; } else { obj* x_103; unsigned char x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; lean::dec(x_0); x_103 = lean::cnstr_get(x_4, 0); lean::inc(x_103); x_105 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); if (lean::is_shared(x_4)) { lean::dec(x_4); x_106 = lean::box(0); } else { lean::cnstr_release(x_4, 0); x_106 = x_4; } if (lean::is_scalar(x_106)) { x_107 = lean::alloc_cnstr(1, 1, 1); } else { x_107 = x_106; } lean::cnstr_set(x_107, 0, x_103); lean::cnstr_set_scalar(x_107, sizeof(void*)*1, x_105); x_108 = x_107; x_109 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_109, 0, x_108); lean::cnstr_set(x_109, 1, x_5); return x_109; } } } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__3(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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__3(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__2(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__3(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__5(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; lean::dec(x_1); x_5 = lean::string_iterator_curr(x_0); lean::dec(x_0); x_7 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_7); x_9 = lean::string_push(x_7, x_5); x_10 = lean::string_iterator_remaining(x_2); x_11 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__5(x_10, x_9, x_2); x_12 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_12, 0, x_11); lean::cnstr_set(x_12, 1, x_3); return x_12; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__7(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__6(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__7(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__1(obj* x_0, obj* x_1, obj* x_2) { { unsigned char x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { obj* x_4; obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; x_4 = lean::box(0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_6 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); x_11 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); x_12 = lean::cnstr_get(x_11, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_11, 1); lean::inc(x_14); if (lean::is_shared(x_11)) { lean::dec(x_11); x_16 = lean::box(0); } else { lean::cnstr_release(x_11, 0); lean::cnstr_release(x_11, 1); x_16 = x_11; } x_17 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_17); x_19 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_12); if (lean::obj_tag(x_19) == 0) { obj* x_20; obj* x_22; obj* x_24; unsigned x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; x_20 = lean::cnstr_get(x_19, 0); lean::inc(x_20); x_22 = lean::cnstr_get(x_19, 1); lean::inc(x_22); x_24 = lean::cnstr_get(x_19, 2); lean::inc(x_24); lean::dec(x_19); x_27 = lean::unbox_uint32(x_20); lean::dec(x_20); x_29 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__2(x_27, x_0, x_22, x_14); x_30 = lean::cnstr_get(x_29, 0); lean::inc(x_30); x_32 = lean::cnstr_get(x_29, 1); lean::inc(x_32); lean::dec(x_29); x_35 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_24, x_30); if (lean::is_scalar(x_16)) { x_36 = lean::alloc_cnstr(0, 2, 0); } else { x_36 = x_16; } lean::cnstr_set(x_36, 0, x_35); lean::cnstr_set(x_36, 1, x_32); return x_36; } else { obj* x_38; unsigned char x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; lean::dec(x_0); x_38 = lean::cnstr_get(x_19, 0); lean::inc(x_38); x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); if (lean::is_shared(x_19)) { lean::dec(x_19); x_41 = lean::box(0); } else { lean::cnstr_release(x_19, 0); x_41 = x_19; } if (lean::is_scalar(x_41)) { x_42 = lean::alloc_cnstr(1, 1, 1); } else { x_42 = x_41; } lean::cnstr_set(x_42, 0, x_38); lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); x_43 = x_42; if (lean::is_scalar(x_16)) { x_44 = lean::alloc_cnstr(0, 2, 0); } else { x_44 = x_16; } lean::cnstr_set(x_44, 0, x_43); lean::cnstr_set(x_44, 1, x_14); return x_44; } } else { unsigned x_45; unsigned char x_46; x_45 = lean::string_iterator_curr(x_1); x_46 = _l_s4_lean_s19_is__id__end__escape(x_45); if (x_46 == 0) { obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; lean::inc(x_1); x_48 = lean::string_iterator_next(x_1); x_49 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__4(x_1, x_0, x_48, x_2); x_50 = lean::cnstr_get(x_49, 0); lean::inc(x_50); x_52 = lean::cnstr_get(x_49, 1); lean::inc(x_52); if (lean::is_shared(x_49)) { lean::dec(x_49); x_54 = lean::box(0); } else { lean::cnstr_release(x_49, 0); lean::cnstr_release(x_49, 1); x_54 = x_49; } x_55 = lean::box(0); x_56 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_55, x_50); if (lean::is_scalar(x_54)) { x_57 = lean::alloc_cnstr(0, 2, 0); } else { x_57 = x_54; } lean::cnstr_set(x_57, 0, x_56); lean::cnstr_set(x_57, 1, x_52); return x_57; } else { obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; x_58 = _l_s4_char_s11_quote__core(x_45); x_59 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_59); x_61 = lean::string_append(x_59, x_58); lean::dec(x_58); x_63 = lean::string_append(x_61, x_59); x_64 = lean::box(0); x_65 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_64); lean::inc(x_65); x_69 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_63, x_65, x_64, x_64, x_0, x_1, x_2); x_70 = lean::cnstr_get(x_69, 0); lean::inc(x_70); x_72 = lean::cnstr_get(x_69, 1); 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); x_74 = x_69; } x_75 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_75); x_77 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_75, x_70); if (lean::obj_tag(x_77) == 0) { obj* x_78; obj* x_80; obj* x_82; unsigned x_85; obj* x_87; obj* x_88; obj* x_90; obj* x_93; obj* x_94; x_78 = lean::cnstr_get(x_77, 0); lean::inc(x_78); x_80 = lean::cnstr_get(x_77, 1); lean::inc(x_80); x_82 = lean::cnstr_get(x_77, 2); lean::inc(x_82); lean::dec(x_77); x_85 = lean::unbox_uint32(x_78); lean::dec(x_78); x_87 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__6(x_85, x_0, x_80, x_72); x_88 = lean::cnstr_get(x_87, 0); lean::inc(x_88); x_90 = lean::cnstr_get(x_87, 1); lean::inc(x_90); lean::dec(x_87); x_93 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_82, x_88); if (lean::is_scalar(x_74)) { x_94 = lean::alloc_cnstr(0, 2, 0); } else { x_94 = x_74; } lean::cnstr_set(x_94, 0, x_93); lean::cnstr_set(x_94, 1, x_90); return x_94; } else { obj* x_96; unsigned char x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; lean::dec(x_0); x_96 = lean::cnstr_get(x_77, 0); lean::inc(x_96); x_98 = lean::cnstr_get_scalar(x_77, sizeof(void*)*1); if (lean::is_shared(x_77)) { lean::dec(x_77); x_99 = lean::box(0); } else { lean::cnstr_release(x_77, 0); x_99 = x_77; } if (lean::is_scalar(x_99)) { x_100 = lean::alloc_cnstr(1, 1, 1); } else { x_100 = x_99; } lean::cnstr_set(x_100, 0, x_96); lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_98); x_101 = x_100; if (lean::is_scalar(x_74)) { x_102 = lean::alloc_cnstr(0, 2, 0); } else { x_102 = x_74; } lean::cnstr_set(x_102, 0, x_101); lean::cnstr_set(x_102, 1, x_72); return x_102; } } } } } obj* _l_s4_list_s6_mfoldl_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__9(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { if (lean::obj_tag(x_2) == 0) { obj* x_9; obj* x_11; obj* x_12; lean::dec(x_0); lean::dec(x_2); lean::dec(x_3); x_9 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_9); x_11 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_11, 0, x_1); lean::cnstr_set(x_11, 1, x_4); lean::cnstr_set(x_11, 2, x_9); x_12 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_12, 0, x_11); lean::cnstr_set(x_12, 1, x_5); return x_12; } else { obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_22; obj* x_23; obj* x_25; x_13 = lean::cnstr_get(x_2, 0); lean::inc(x_13); x_15 = lean::cnstr_get(x_2, 1); lean::inc(x_15); if (lean::is_shared(x_2)) { lean::dec(x_2); x_17 = lean::box(0); } else { lean::cnstr_release(x_2, 0); lean::cnstr_release(x_2, 1); x_17 = x_2; } lean::inc(x_3); x_22 = lean::apply_3(x_13, x_3, x_4, x_5); x_23 = lean::cnstr_get(x_22, 0); lean::inc(x_23); x_25 = lean::cnstr_get(x_22, 1); lean::inc(x_25); lean::dec(x_22); if (lean::obj_tag(x_23) == 0) { x_18 = x_23; x_19 = x_25; goto lbl_20; } else { obj* x_28; unsigned char x_30; obj* x_31; x_28 = lean::cnstr_get(x_23, 0); lean::inc(x_28); x_30 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); 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; } if (lean::obj_tag(x_1) == 0) { if (x_30 == 0) { unsigned char x_32; obj* x_33; obj* x_34; x_32 = 0; if (lean::is_scalar(x_31)) { x_33 = lean::alloc_cnstr(1, 1, 1); } else { x_33 = x_31; } lean::cnstr_set(x_33, 0, x_28); lean::cnstr_set_scalar(x_33, sizeof(void*)*1, x_32); x_34 = x_33; x_18 = x_34; x_19 = x_25; goto lbl_20; } else { obj* x_35; obj* x_36; if (lean::is_scalar(x_31)) { x_35 = lean::alloc_cnstr(1, 1, 1); } else { x_35 = x_31; } lean::cnstr_set(x_35, 0, x_28); lean::cnstr_set_scalar(x_35, sizeof(void*)*1, x_30); x_36 = x_35; x_18 = x_36; x_19 = x_25; goto lbl_20; } } else { obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_44; obj* x_46; obj* x_49; obj* x_51; obj* x_52; obj* x_53; x_37 = lean::cnstr_get(x_28, 3); lean::inc(x_37); x_39 = _l_s6_option_s3_get_s6___main_s4___at_s4_lean_s6_parser_s3_run_s9___spec__2(x_37); lean::inc(x_1); x_41 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_41, 0, x_39); lean::cnstr_set(x_41, 1, x_1); x_42 = lean::cnstr_get(x_28, 0); lean::inc(x_42); x_44 = lean::cnstr_get(x_28, 1); lean::inc(x_44); x_46 = lean::cnstr_get(x_28, 2); lean::inc(x_46); lean::dec(x_28); x_49 = _l_s4_list_s7_reverse_s6___rarg(x_41); lean::inc(x_0); x_51 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_0, x_49); x_52 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_52, 0, x_51); 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_46); lean::cnstr_set(x_53, 3, x_52); if (x_30 == 0) { unsigned char x_54; obj* x_55; obj* x_56; x_54 = 0; if (lean::is_scalar(x_31)) { x_55 = lean::alloc_cnstr(1, 1, 1); } else { x_55 = x_31; } lean::cnstr_set(x_55, 0, x_53); lean::cnstr_set_scalar(x_55, sizeof(void*)*1, x_54); x_56 = x_55; x_18 = x_56; x_19 = x_25; goto lbl_20; } else { obj* x_57; obj* x_58; if (lean::is_scalar(x_31)) { x_57 = lean::alloc_cnstr(1, 1, 1); } else { x_57 = x_31; } lean::cnstr_set(x_57, 0, x_53); lean::cnstr_set_scalar(x_57, sizeof(void*)*1, x_30); x_58 = x_57; x_18 = x_58; x_19 = x_25; goto lbl_20; } } } lbl_20: { if (lean::obj_tag(x_18) == 0) { obj* x_59; obj* x_61; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_69; obj* x_70; x_59 = lean::cnstr_get(x_18, 0); lean::inc(x_59); x_61 = lean::cnstr_get(x_18, 1); lean::inc(x_61); x_63 = lean::cnstr_get(x_18, 2); lean::inc(x_63); if (lean::is_shared(x_18)) { lean::dec(x_18); x_65 = lean::box(0); } else { lean::cnstr_release(x_18, 0); lean::cnstr_release(x_18, 1); lean::cnstr_release(x_18, 2); x_65 = x_18; } if (lean::is_scalar(x_17)) { x_66 = lean::alloc_cnstr(1, 2, 0); } else { x_66 = x_17; } lean::cnstr_set(x_66, 0, x_59); lean::cnstr_set(x_66, 1, x_1); x_67 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_67); if (lean::is_scalar(x_65)) { x_69 = lean::alloc_cnstr(0, 3, 0); } else { x_69 = x_65; } lean::cnstr_set(x_69, 0, x_66); lean::cnstr_set(x_69, 1, x_61); lean::cnstr_set(x_69, 2, x_67); x_70 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_63, x_69); if (lean::obj_tag(x_70) == 0) { obj* x_71; obj* x_73; obj* x_75; obj* x_78; obj* x_79; obj* x_81; obj* x_83; obj* x_84; obj* x_85; x_71 = lean::cnstr_get(x_70, 0); lean::inc(x_71); x_73 = lean::cnstr_get(x_70, 1); lean::inc(x_73); x_75 = lean::cnstr_get(x_70, 2); lean::inc(x_75); lean::dec(x_70); x_78 = _l_s4_list_s6_mfoldl_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__9(x_0, x_71, x_15, x_3, x_73, x_19); x_79 = lean::cnstr_get(x_78, 0); lean::inc(x_79); x_81 = lean::cnstr_get(x_78, 1); lean::inc(x_81); if (lean::is_shared(x_78)) { lean::dec(x_78); x_83 = lean::box(0); } else { lean::cnstr_release(x_78, 0); lean::cnstr_release(x_78, 1); x_83 = x_78; } x_84 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_75, x_79); if (lean::is_scalar(x_83)) { x_85 = lean::alloc_cnstr(0, 2, 0); } else { x_85 = x_83; } lean::cnstr_set(x_85, 0, x_84); lean::cnstr_set(x_85, 1, x_81); return x_85; } else { obj* x_89; unsigned char x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; lean::dec(x_15); lean::dec(x_0); lean::dec(x_3); x_89 = lean::cnstr_get(x_70, 0); lean::inc(x_89); x_91 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); if (lean::is_shared(x_70)) { lean::dec(x_70); x_92 = lean::box(0); } else { lean::cnstr_release(x_70, 0); x_92 = x_70; } if (lean::is_scalar(x_92)) { x_93 = lean::alloc_cnstr(1, 1, 1); } else { x_93 = x_92; } lean::cnstr_set(x_93, 0, x_89); lean::cnstr_set_scalar(x_93, sizeof(void*)*1, x_91); x_94 = x_93; x_95 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_95, 0, x_94); lean::cnstr_set(x_95, 1, x_19); return x_95; } } else { obj* x_101; unsigned char x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; lean::dec(x_15); lean::dec(x_0); lean::dec(x_1); lean::dec(x_3); lean::dec(x_17); x_101 = lean::cnstr_get(x_18, 0); lean::inc(x_101); x_103 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); if (lean::is_shared(x_18)) { lean::dec(x_18); x_104 = lean::box(0); } else { lean::cnstr_release(x_18, 0); x_104 = x_18; } if (lean::is_scalar(x_104)) { x_105 = lean::alloc_cnstr(1, 1, 1); } else { x_105 = x_104; } lean::cnstr_set(x_105, 0, x_101); lean::cnstr_set_scalar(x_105, sizeof(void*)*1, x_103); x_106 = x_105; x_107 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_107, 0, x_106); lean::cnstr_set(x_107, 1, x_19); return x_107; } } } } } obj* _l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__8(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_12; x_5 = lean::box(0); lean::inc(x_0); x_7 = _l_s4_list_s6_mfoldl_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__9(x_0, x_5, x_1, x_2, x_3, x_4); x_8 = lean::cnstr_get(x_7, 0); lean::inc(x_8); x_10 = lean::cnstr_get(x_7, 1); lean::inc(x_10); if (lean::is_shared(x_7)) { lean::dec(x_7); x_12 = lean::box(0); } else { lean::cnstr_release(x_7, 0); lean::cnstr_release(x_7, 1); x_12 = x_7; } if (lean::obj_tag(x_8) == 0) { obj* x_13; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; x_13 = lean::cnstr_get(x_8, 0); lean::inc(x_13); x_15 = lean::cnstr_get(x_8, 1); lean::inc(x_15); x_17 = lean::cnstr_get(x_8, 2); lean::inc(x_17); if (lean::is_shared(x_8)) { lean::dec(x_8); x_19 = lean::box(0); } else { lean::cnstr_release(x_8, 0); lean::cnstr_release(x_8, 1); lean::cnstr_release(x_8, 2); x_19 = x_8; } x_20 = _l_s4_list_s7_reverse_s6___rarg(x_13); x_21 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_0, x_20); x_22 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_22); if (lean::is_scalar(x_19)) { x_24 = lean::alloc_cnstr(0, 3, 0); } else { x_24 = x_19; } lean::cnstr_set(x_24, 0, x_21); lean::cnstr_set(x_24, 1, x_15); lean::cnstr_set(x_24, 2, x_22); x_25 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_24); if (lean::is_scalar(x_12)) { x_26 = lean::alloc_cnstr(0, 2, 0); } else { x_26 = x_12; } lean::cnstr_set(x_26, 0, x_25); lean::cnstr_set(x_26, 1, x_10); return x_26; } else { obj* x_28; unsigned char x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; lean::dec(x_0); x_28 = lean::cnstr_get(x_8, 0); lean::inc(x_28); x_30 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); if (lean::is_shared(x_8)) { lean::dec(x_8); x_31 = lean::box(0); } else { lean::cnstr_release(x_8, 0); x_31 = x_8; } if (lean::is_scalar(x_31)) { x_32 = lean::alloc_cnstr(1, 1, 1); } else { x_32 = x_31; } lean::cnstr_set(x_32, 0, x_28); lean::cnstr_set_scalar(x_32, sizeof(void*)*1, x_30); x_33 = x_32; if (lean::is_scalar(x_12)) { x_34 = lean::alloc_cnstr(0, 2, 0); } else { x_34 = x_12; } lean::cnstr_set(x_34, 0, x_33); lean::cnstr_set(x_34, 1, x_10); return x_34; } } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_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_lean_s12_is__id__rest(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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__10_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; obj* x_5; obj* x_6; x_2 = lean::string_iterator_remaining(x_0); x_3 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_3); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__11(x_2, x_3, x_0); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_1); return x_6; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__10(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__10_s6___rarg), 2, 0); return x_2; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_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_lean_s12_is__id__rest(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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__12_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; obj* x_5; obj* x_6; x_2 = lean::string_iterator_remaining(x_0); x_3 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_3); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__13(x_2, x_3, x_0); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_1); return x_6; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__12(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__12_s6___rarg), 2, 0); return x_2; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_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_lean_s12_is__id__rest(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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__14_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; obj* x_5; obj* x_6; x_2 = lean::string_iterator_remaining(x_0); x_3 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_3); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__15(x_2, x_3, x_0); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_1); return x_6; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__14(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__14_s6___rarg), 2, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s11_combinators_s11_choice__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__16(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { if (lean::obj_tag(x_0) == 0) { obj* x_7; obj* x_8; obj* x_9; obj* x_13; lean::dec(x_0); lean::dec(x_1); x_7 = lean::box(0); x_8 = _l_s4_lean_s6_parser_s11_combinators_s11_choice__aux_s6___main_s6___rarg_s11___closed__1; x_9 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_7); lean::inc(x_9); lean::inc(x_8); x_13 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_8, x_9, x_7, x_7, x_2, x_3, x_4); return x_13; } else { obj* x_14; obj* x_16; obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_28; x_14 = lean::cnstr_get(x_0, 0); lean::inc(x_14); x_16 = lean::cnstr_get(x_0, 1); lean::inc(x_16); if (lean::is_shared(x_0)) { lean::dec(x_0); x_18 = lean::box(0); } else { lean::cnstr_release(x_0, 0); lean::cnstr_release(x_0, 1); x_18 = x_0; } lean::inc(x_3); lean::inc(x_2); x_21 = lean::apply_3(x_14, x_2, x_3, x_4); x_22 = lean::cnstr_get(x_21, 0); lean::inc(x_22); x_24 = lean::cnstr_get(x_21, 1); lean::inc(x_24); if (lean::is_shared(x_21)) { lean::dec(x_21); x_26 = lean::box(0); } else { lean::cnstr_release(x_21, 0); lean::cnstr_release(x_21, 1); x_26 = x_21; } x_27 = lean::mk_nat_obj(1u); x_28 = lean::nat_add(x_1, x_27); lean::dec(x_27); if (lean::obj_tag(x_22) == 0) { obj* x_30; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_44; obj* x_45; x_30 = lean::cnstr_get(x_22, 0); lean::inc(x_30); x_32 = lean::cnstr_get(x_22, 1); lean::inc(x_32); x_34 = lean::cnstr_get(x_22, 2); lean::inc(x_34); if (lean::is_shared(x_22)) { lean::dec(x_22); x_36 = lean::box(0); } else { lean::cnstr_release(x_22, 0); lean::cnstr_release(x_22, 1); lean::cnstr_release(x_22, 2); x_36 = x_22; } x_37 = lean::box(0); lean::inc(x_37); x_39 = lean::alloc_cnstr(2, 2, 0); lean::cnstr_set(x_39, 0, x_37); lean::cnstr_set(x_39, 1, x_1); if (lean::is_scalar(x_18)) { x_40 = lean::alloc_cnstr(1, 2, 0); } else { x_40 = x_18; } lean::cnstr_set(x_40, 0, x_30); lean::cnstr_set(x_40, 1, x_37); x_41 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_39, x_40); x_42 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_42); if (lean::is_scalar(x_36)) { x_44 = lean::alloc_cnstr(0, 3, 0); } else { x_44 = x_36; } lean::cnstr_set(x_44, 0, x_41); lean::cnstr_set(x_44, 1, x_32); lean::cnstr_set(x_44, 2, x_42); x_45 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_34, x_44); if (lean::obj_tag(x_45) == 0) { obj* x_50; lean::dec(x_2); lean::dec(x_3); lean::dec(x_16); lean::dec(x_28); if (lean::is_scalar(x_26)) { x_50 = lean::alloc_cnstr(0, 2, 0); } else { x_50 = x_26; } lean::cnstr_set(x_50, 0, x_45); lean::cnstr_set(x_50, 1, x_24); return x_50; } else { obj* x_51; unsigned char x_53; x_51 = lean::cnstr_get(x_45, 0); lean::inc(x_51); x_53 = lean::cnstr_get_scalar(x_45, sizeof(void*)*1); if (x_53 == 0) { obj* x_55; obj* x_56; obj* x_58; obj* x_61; obj* x_62; lean::dec(x_45); x_55 = _l_s4_lean_s6_parser_s11_combinators_s11_choice__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__16(x_16, x_28, x_2, x_3, x_24); x_56 = lean::cnstr_get(x_55, 0); lean::inc(x_56); x_58 = lean::cnstr_get(x_55, 1); lean::inc(x_58); lean::dec(x_55); x_61 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_51, x_56); if (lean::is_scalar(x_26)) { x_62 = lean::alloc_cnstr(0, 2, 0); } else { x_62 = x_26; } lean::cnstr_set(x_62, 0, x_61); lean::cnstr_set(x_62, 1, x_58); return x_62; } else { obj* x_68; lean::dec(x_51); lean::dec(x_2); lean::dec(x_3); lean::dec(x_16); lean::dec(x_28); if (lean::is_scalar(x_26)) { x_68 = lean::alloc_cnstr(0, 2, 0); } else { x_68 = x_26; } lean::cnstr_set(x_68, 0, x_45); lean::cnstr_set(x_68, 1, x_24); return x_68; } } } else { obj* x_71; unsigned char x_73; obj* x_74; lean::dec(x_1); lean::dec(x_18); x_71 = lean::cnstr_get(x_22, 0); lean::inc(x_71); x_73 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); if (lean::is_shared(x_22)) { lean::dec(x_22); x_74 = lean::box(0); } else { lean::cnstr_release(x_22, 0); x_74 = x_22; } if (x_73 == 0) { obj* x_76; obj* x_77; obj* x_79; obj* x_82; obj* x_83; lean::dec(x_74); x_76 = _l_s4_lean_s6_parser_s11_combinators_s11_choice__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__16(x_16, x_28, x_2, x_3, x_24); x_77 = lean::cnstr_get(x_76, 0); lean::inc(x_77); x_79 = lean::cnstr_get(x_76, 1); lean::inc(x_79); lean::dec(x_76); x_82 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_71, x_77); if (lean::is_scalar(x_26)) { x_83 = lean::alloc_cnstr(0, 2, 0); } else { x_83 = x_26; } lean::cnstr_set(x_83, 0, x_82); lean::cnstr_set(x_83, 1, x_79); return x_83; } else { obj* x_88; obj* x_89; obj* x_90; lean::dec(x_2); lean::dec(x_3); lean::dec(x_16); lean::dec(x_28); if (lean::is_scalar(x_74)) { x_88 = lean::alloc_cnstr(1, 1, 1); } else { x_88 = x_74; } lean::cnstr_set(x_88, 0, x_71); lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_73); x_89 = x_88; if (lean::is_scalar(x_26)) { x_90 = lean::alloc_cnstr(0, 2, 0); } else { x_90 = x_26; } lean::cnstr_set(x_90, 0, x_89); lean::cnstr_set(x_90, 1, x_24); return x_90; } } } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__2_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__2(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__6_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__6(x_4, x_1, x_2, x_3); return x_5; } } obj* _init__l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view() { { obj* x_0; obj* x_1; unsigned x_2; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; unsigned x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_53; x_0 = lean::mk_string(""); x_1 = _l_s4_lean_s17_id__begin__escape; x_2 = lean::unbox_uint32(x_1); lean::inc(x_0); x_4 = lean::string_push(x_0, x_2); lean::inc(x_4); x_6 = _l_s6_string_s5_quote(x_4); x_7 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_7, 0, x_6); x_8 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__1), 2, 0); x_9 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__1_s6___rarg), 4, 1); lean::closure_set(x_9, 0, x_8); x_10 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___lambda__1), 6, 2); lean::closure_set(x_10, 0, x_4); lean::closure_set(x_10, 1, x_7); lean::inc(x_9); x_12 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_12, 0, x_9); lean::closure_set(x_12, 1, x_10); x_13 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__1), 4, 0); lean::inc(x_9); x_15 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_15, 0, x_9); lean::closure_set(x_15, 1, x_13); x_16 = _l_s4_lean_s15_id__end__escape; x_17 = lean::unbox_uint32(x_16); x_18 = lean::string_push(x_0, x_17); lean::inc(x_18); x_20 = _l_s6_string_s5_quote(x_18); x_21 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_21, 0, x_20); x_22 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___lambda__1), 6, 2); lean::closure_set(x_22, 0, x_18); lean::closure_set(x_22, 1, x_21); lean::inc(x_9); x_24 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_24, 0, x_9); lean::closure_set(x_24, 1, x_22); x_25 = lean::box(0); lean::inc(x_25); x_27 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_27, 0, x_24); lean::cnstr_set(x_27, 1, x_25); x_28 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_28, 0, x_15); lean::cnstr_set(x_28, 1, x_27); x_29 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_29, 0, x_12); lean::cnstr_set(x_29, 1, x_28); x_30 = _l_s4_lean_s6_parser_s28_detail__ident__part__escaped; lean::inc(x_30); x_32 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__8), 5, 2); lean::closure_set(x_32, 0, x_30); lean::closure_set(x_32, 1, x_29); x_33 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__2), 4, 0); x_34 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_34, 0, x_9); lean::closure_set(x_34, 1, x_33); lean::inc(x_25); x_36 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_36, 0, x_34); lean::cnstr_set(x_36, 1, x_25); x_37 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_37, 0, x_32); lean::cnstr_set(x_37, 1, x_36); x_38 = lean::mk_nat_obj(0u); x_39 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_combinators_s11_choice__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__16), 5, 2); lean::closure_set(x_39, 0, x_37); lean::closure_set(x_39, 1, x_38); x_40 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_40, 0, x_39); lean::cnstr_set(x_40, 1, x_25); x_41 = _l_s4_lean_s6_parser_s16_basic__parser__m_s5_monad; x_42 = _l_s4_lean_s6_parser_s16_basic__parser__m_s13_monad__except; x_43 = _l_s4_lean_s6_parser_s16_basic__parser__m_s4_lean_s6_parser_s13_monad__parsec; x_44 = _l_s4_lean_s6_parser_s16_basic__parser__m_s11_alternative; x_45 = _l_s4_lean_s6_parser_s19_detail__ident__part; x_46 = _l_s4_lean_s6_parser_s19_detail__ident__part_s9_has__view; lean::inc(x_46); lean::inc(x_45); lean::inc(x_44); lean::inc(x_43); lean::inc(x_42); lean::inc(x_41); x_53 = _l_s4_lean_s6_parser_s11_combinators_s4_node_s4_view_s6___rarg(x_41, x_42, x_43, x_44, x_45, x_40, x_46); return x_53; } } obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_7; obj* x_9; x_4 = _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__1(x_1, x_2, x_3); x_5 = lean::cnstr_get(x_4, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_4, 1); lean::inc(x_7); if (lean::is_shared(x_4)) { lean::dec(x_4); x_9 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); x_9 = x_4; } if (lean::obj_tag(x_5) == 0) { obj* x_10; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; x_10 = lean::cnstr_get(x_5, 1); lean::inc(x_10); x_12 = lean::cnstr_get(x_5, 2); lean::inc(x_12); if (lean::is_shared(x_5)) { lean::dec(x_5); x_14 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); x_14 = x_5; } lean::inc(x_10); x_16 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_0, x_10); x_17 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_17); if (lean::is_scalar(x_14)) { x_19 = lean::alloc_cnstr(0, 3, 0); } else { x_19 = x_14; } lean::cnstr_set(x_19, 0, x_16); lean::cnstr_set(x_19, 1, x_10); lean::cnstr_set(x_19, 2, x_17); x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_12, x_19); if (lean::is_scalar(x_9)) { x_21 = lean::alloc_cnstr(0, 2, 0); } else { x_21 = x_9; } lean::cnstr_set(x_21, 0, x_20); lean::cnstr_set(x_21, 1, x_7); return x_21; } else { obj* x_23; unsigned char x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; lean::dec(x_0); x_23 = lean::cnstr_get(x_5, 0); lean::inc(x_23); x_25 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); if (lean::is_shared(x_5)) { lean::dec(x_5); x_26 = lean::box(0); } else { lean::cnstr_release(x_5, 0); x_26 = x_5; } if (lean::is_scalar(x_26)) { x_27 = lean::alloc_cnstr(1, 1, 1); } else { x_27 = x_26; } lean::cnstr_set(x_27, 0, x_23); lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); x_28 = x_27; if (lean::is_scalar(x_9)) { x_29 = lean::alloc_cnstr(0, 2, 0); } else { x_29 = x_9; } lean::cnstr_set(x_29, 0, x_28); lean::cnstr_set(x_29, 1, x_7); return x_29; } } } obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; unsigned char x_7; x_7 = lean::string_iterator_has_next(x_2); if (x_7 == 0) { obj* x_8; obj* x_9; obj* x_10; obj* x_14; obj* x_15; obj* x_17; obj* x_20; obj* x_22; x_8 = lean::box(0); x_9 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_10 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); x_14 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_9, x_10, x_8, x_8, x_1, x_2, x_3); x_15 = lean::cnstr_get(x_14, 0); lean::inc(x_15); x_17 = lean::cnstr_get(x_14, 1); lean::inc(x_17); lean::dec(x_14); x_20 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_20); x_22 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_20, x_15); if (lean::obj_tag(x_22) == 0) { obj* x_23; obj* x_25; obj* x_28; obj* x_29; obj* x_31; obj* x_34; x_23 = lean::cnstr_get(x_22, 1); lean::inc(x_23); x_25 = lean::cnstr_get(x_22, 2); lean::inc(x_25); lean::dec(x_22); x_28 = _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__8_s6___rarg(x_23, x_17); x_29 = lean::cnstr_get(x_28, 0); lean::inc(x_29); x_31 = lean::cnstr_get(x_28, 1); lean::inc(x_31); lean::dec(x_28); x_34 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_25, x_29); x_4 = x_34; x_5 = x_31; goto lbl_6; } else { obj* x_35; unsigned char x_37; obj* x_38; obj* x_39; obj* x_40; x_35 = lean::cnstr_get(x_22, 0); lean::inc(x_35); x_37 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); if (lean::is_shared(x_22)) { lean::dec(x_22); x_38 = lean::box(0); } else { lean::cnstr_release(x_22, 0); x_38 = x_22; } if (lean::is_scalar(x_38)) { x_39 = lean::alloc_cnstr(1, 1, 1); } else { x_39 = x_38; } lean::cnstr_set(x_39, 0, x_35); lean::cnstr_set_scalar(x_39, sizeof(void*)*1, x_37); x_40 = x_39; x_4 = x_40; x_5 = x_17; goto lbl_6; } } else { unsigned x_41; unsigned char x_42; x_41 = lean::string_iterator_curr(x_2); x_42 = _l_s4_lean_s13_is__id__first(x_41); if (x_42 == 0) { obj* x_43; obj* x_44; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_53; obj* x_54; obj* x_56; obj* x_59; obj* x_61; x_43 = _l_s4_char_s11_quote__core(x_41); x_44 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_44); x_46 = lean::string_append(x_44, x_43); lean::dec(x_43); x_48 = lean::string_append(x_46, x_44); x_49 = lean::box(0); x_50 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_49); lean::inc(x_50); x_53 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_48, x_50, x_49, x_49, x_1, x_2, x_3); x_54 = lean::cnstr_get(x_53, 0); lean::inc(x_54); x_56 = lean::cnstr_get(x_53, 1); lean::inc(x_56); lean::dec(x_53); x_59 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_59); x_61 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_59, x_54); if (lean::obj_tag(x_61) == 0) { obj* x_62; obj* x_64; obj* x_67; obj* x_68; obj* x_70; obj* x_73; x_62 = lean::cnstr_get(x_61, 1); lean::inc(x_62); x_64 = lean::cnstr_get(x_61, 2); lean::inc(x_64); lean::dec(x_61); x_67 = _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__10_s6___rarg(x_62, x_56); x_68 = lean::cnstr_get(x_67, 0); lean::inc(x_68); x_70 = lean::cnstr_get(x_67, 1); lean::inc(x_70); lean::dec(x_67); x_73 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_64, x_68); x_4 = x_73; x_5 = x_70; goto lbl_6; } else { obj* x_74; unsigned char x_76; obj* x_77; obj* x_78; obj* x_79; x_74 = lean::cnstr_get(x_61, 0); lean::inc(x_74); x_76 = lean::cnstr_get_scalar(x_61, sizeof(void*)*1); if (lean::is_shared(x_61)) { lean::dec(x_61); x_77 = lean::box(0); } else { lean::cnstr_release(x_61, 0); x_77 = x_61; } if (lean::is_scalar(x_77)) { x_78 = lean::alloc_cnstr(1, 1, 1); } else { x_78 = x_77; } lean::cnstr_set(x_78, 0, x_74); lean::cnstr_set_scalar(x_78, sizeof(void*)*1, x_76); x_79 = x_78; x_4 = x_79; x_5 = x_56; goto lbl_6; } } else { obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_88; obj* x_89; lean::dec(x_1); x_81 = lean::string_iterator_next(x_2); x_82 = _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__12_s6___rarg(x_81, x_3); x_83 = lean::cnstr_get(x_82, 0); lean::inc(x_83); x_85 = lean::cnstr_get(x_82, 1); lean::inc(x_85); lean::dec(x_82); x_88 = lean::box(0); x_89 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_88, x_83); x_4 = x_89; x_5 = x_85; goto lbl_6; } } lbl_6: { if (lean::obj_tag(x_4) == 0) { obj* x_90; obj* x_92; obj* x_94; obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_101; x_90 = lean::cnstr_get(x_4, 1); lean::inc(x_90); x_92 = lean::cnstr_get(x_4, 2); lean::inc(x_92); if (lean::is_shared(x_4)) { lean::dec(x_4); x_94 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); lean::cnstr_release(x_4, 2); x_94 = x_4; } lean::inc(x_90); x_96 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_0, x_90); x_97 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_97); if (lean::is_scalar(x_94)) { x_99 = lean::alloc_cnstr(0, 3, 0); } else { x_99 = x_94; } lean::cnstr_set(x_99, 0, x_96); lean::cnstr_set(x_99, 1, x_90); lean::cnstr_set(x_99, 2, x_97); x_100 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_92, x_99); x_101 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_101, 0, x_100); lean::cnstr_set(x_101, 1, x_5); return x_101; } else { obj* x_103; unsigned char x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; lean::dec(x_0); x_103 = lean::cnstr_get(x_4, 0); lean::inc(x_103); x_105 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); if (lean::is_shared(x_4)) { lean::dec(x_4); x_106 = lean::box(0); } else { lean::cnstr_release(x_4, 0); x_106 = x_4; } if (lean::is_scalar(x_106)) { x_107 = lean::alloc_cnstr(1, 1, 1); } else { x_107 = x_106; } lean::cnstr_set(x_107, 0, x_103); lean::cnstr_set_scalar(x_107, sizeof(void*)*1, x_105); x_108 = x_107; x_109 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_109, 0, x_108); lean::cnstr_set(x_109, 1, x_5); return x_109; } } } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__3(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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__3(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__2(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__3(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__5(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; lean::dec(x_1); x_5 = lean::string_iterator_curr(x_0); lean::dec(x_0); x_7 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_7); x_9 = lean::string_push(x_7, x_5); x_10 = lean::string_iterator_remaining(x_2); x_11 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__5(x_10, x_9, x_2); x_12 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_12, 0, x_11); lean::cnstr_set(x_12, 1, x_3); return x_12; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__7(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__6(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__7(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__1(obj* x_0, obj* x_1, obj* x_2) { { unsigned char x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { obj* x_4; obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; x_4 = lean::box(0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_6 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); x_11 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); x_12 = lean::cnstr_get(x_11, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_11, 1); lean::inc(x_14); if (lean::is_shared(x_11)) { lean::dec(x_11); x_16 = lean::box(0); } else { lean::cnstr_release(x_11, 0); lean::cnstr_release(x_11, 1); x_16 = x_11; } x_17 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_17); x_19 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_12); if (lean::obj_tag(x_19) == 0) { obj* x_20; obj* x_22; obj* x_24; unsigned x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; x_20 = lean::cnstr_get(x_19, 0); lean::inc(x_20); x_22 = lean::cnstr_get(x_19, 1); lean::inc(x_22); x_24 = lean::cnstr_get(x_19, 2); lean::inc(x_24); lean::dec(x_19); x_27 = lean::unbox_uint32(x_20); lean::dec(x_20); x_29 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__2(x_27, x_0, x_22, x_14); x_30 = lean::cnstr_get(x_29, 0); lean::inc(x_30); x_32 = lean::cnstr_get(x_29, 1); lean::inc(x_32); lean::dec(x_29); x_35 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_24, x_30); if (lean::is_scalar(x_16)) { x_36 = lean::alloc_cnstr(0, 2, 0); } else { x_36 = x_16; } lean::cnstr_set(x_36, 0, x_35); lean::cnstr_set(x_36, 1, x_32); return x_36; } else { obj* x_38; unsigned char x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; lean::dec(x_0); x_38 = lean::cnstr_get(x_19, 0); lean::inc(x_38); x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); if (lean::is_shared(x_19)) { lean::dec(x_19); x_41 = lean::box(0); } else { lean::cnstr_release(x_19, 0); x_41 = x_19; } if (lean::is_scalar(x_41)) { x_42 = lean::alloc_cnstr(1, 1, 1); } else { x_42 = x_41; } lean::cnstr_set(x_42, 0, x_38); lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); x_43 = x_42; if (lean::is_scalar(x_16)) { x_44 = lean::alloc_cnstr(0, 2, 0); } else { x_44 = x_16; } lean::cnstr_set(x_44, 0, x_43); lean::cnstr_set(x_44, 1, x_14); return x_44; } } else { unsigned x_45; unsigned char x_46; x_45 = lean::string_iterator_curr(x_1); x_46 = _l_s4_lean_s19_is__id__end__escape(x_45); if (x_46 == 0) { obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; lean::inc(x_1); x_48 = lean::string_iterator_next(x_1); x_49 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__4(x_1, x_0, x_48, x_2); x_50 = lean::cnstr_get(x_49, 0); lean::inc(x_50); x_52 = lean::cnstr_get(x_49, 1); lean::inc(x_52); if (lean::is_shared(x_49)) { lean::dec(x_49); x_54 = lean::box(0); } else { lean::cnstr_release(x_49, 0); lean::cnstr_release(x_49, 1); x_54 = x_49; } x_55 = lean::box(0); x_56 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_55, x_50); if (lean::is_scalar(x_54)) { x_57 = lean::alloc_cnstr(0, 2, 0); } else { x_57 = x_54; } lean::cnstr_set(x_57, 0, x_56); lean::cnstr_set(x_57, 1, x_52); return x_57; } else { obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; x_58 = _l_s4_char_s11_quote__core(x_45); x_59 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_59); x_61 = lean::string_append(x_59, x_58); lean::dec(x_58); x_63 = lean::string_append(x_61, x_59); x_64 = lean::box(0); x_65 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_64); lean::inc(x_65); x_69 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_63, x_65, x_64, x_64, x_0, x_1, x_2); x_70 = lean::cnstr_get(x_69, 0); lean::inc(x_70); x_72 = lean::cnstr_get(x_69, 1); 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); x_74 = x_69; } x_75 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_75); x_77 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_75, x_70); if (lean::obj_tag(x_77) == 0) { obj* x_78; obj* x_80; obj* x_82; unsigned x_85; obj* x_87; obj* x_88; obj* x_90; obj* x_93; obj* x_94; x_78 = lean::cnstr_get(x_77, 0); lean::inc(x_78); x_80 = lean::cnstr_get(x_77, 1); lean::inc(x_80); x_82 = lean::cnstr_get(x_77, 2); lean::inc(x_82); lean::dec(x_77); x_85 = lean::unbox_uint32(x_78); lean::dec(x_78); x_87 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__6(x_85, x_0, x_80, x_72); x_88 = lean::cnstr_get(x_87, 0); lean::inc(x_88); x_90 = lean::cnstr_get(x_87, 1); lean::inc(x_90); lean::dec(x_87); x_93 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_82, x_88); if (lean::is_scalar(x_74)) { x_94 = lean::alloc_cnstr(0, 2, 0); } else { x_94 = x_74; } lean::cnstr_set(x_94, 0, x_93); lean::cnstr_set(x_94, 1, x_90); return x_94; } else { obj* x_96; unsigned char x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; lean::dec(x_0); x_96 = lean::cnstr_get(x_77, 0); lean::inc(x_96); x_98 = lean::cnstr_get_scalar(x_77, sizeof(void*)*1); if (lean::is_shared(x_77)) { lean::dec(x_77); x_99 = lean::box(0); } else { lean::cnstr_release(x_77, 0); x_99 = x_77; } if (lean::is_scalar(x_99)) { x_100 = lean::alloc_cnstr(1, 1, 1); } else { x_100 = x_99; } lean::cnstr_set(x_100, 0, x_96); lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_98); x_101 = x_100; if (lean::is_scalar(x_74)) { x_102 = lean::alloc_cnstr(0, 2, 0); } else { x_102 = x_74; } lean::cnstr_set(x_102, 0, x_101); lean::cnstr_set(x_102, 1, x_72); return x_102; } } } } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_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_lean_s12_is__id__rest(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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__8_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; obj* x_5; obj* x_6; x_2 = lean::string_iterator_remaining(x_0); x_3 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_3); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__9(x_2, x_3, x_0); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_1); return x_6; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__8(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__8_s6___rarg), 2, 0); return x_2; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_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_lean_s12_is__id__rest(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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__10_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; obj* x_5; obj* x_6; x_2 = lean::string_iterator_remaining(x_0); x_3 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_3); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__11(x_2, x_3, x_0); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_1); return x_6; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__10(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__10_s6___rarg), 2, 0); return x_2; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_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_lean_s12_is__id__rest(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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__12_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; obj* x_5; obj* x_6; x_2 = lean::string_iterator_remaining(x_0); x_3 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_3); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__13(x_2, x_3, x_0); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_1); return x_6; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__12(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s10___spec__12_s6___rarg), 2, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__2_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__2(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__6_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__6(x_4, x_1, x_2, x_3); return x_5; } } obj* _init__l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens() { { obj* x_0; obj* x_1; unsigned x_2; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; unsigned x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_28; obj* x_31; obj* x_34; obj* x_35; obj* x_38; obj* x_39; obj* x_40; obj* x_43; obj* x_46; obj* x_47; obj* x_49; obj* x_52; obj* x_56; obj* x_58; obj* x_60; obj* x_61; obj* x_62; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_73; x_0 = lean::mk_string(""); x_1 = _l_s4_lean_s17_id__begin__escape; x_2 = lean::unbox_uint32(x_1); lean::inc(x_0); x_4 = lean::string_push(x_0, x_2); lean::inc(x_4); x_6 = _l_s6_string_s5_quote(x_4); x_7 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_7, 0, x_6); x_8 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__1), 2, 0); x_9 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__1_s6___rarg), 4, 1); lean::closure_set(x_9, 0, x_8); x_10 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___lambda__1), 6, 2); lean::closure_set(x_10, 0, x_4); lean::closure_set(x_10, 1, x_7); lean::inc(x_9); x_12 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_12, 0, x_9); lean::closure_set(x_12, 1, x_10); x_13 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s11___lambda__1), 4, 0); lean::inc(x_9); x_15 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_15, 0, x_9); lean::closure_set(x_15, 1, x_13); x_16 = _l_s4_lean_s15_id__end__escape; x_17 = lean::unbox_uint32(x_16); x_18 = lean::string_push(x_0, x_17); lean::inc(x_18); x_20 = _l_s6_string_s5_quote(x_18); x_21 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_21, 0, x_20); x_22 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___lambda__1), 6, 2); lean::closure_set(x_22, 0, x_18); lean::closure_set(x_22, 1, x_21); lean::inc(x_9); x_24 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_24, 0, x_9); lean::closure_set(x_24, 1, x_22); x_25 = lean::box(0); lean::inc(x_25); lean::inc(x_24); x_28 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_28, 0, x_24); lean::cnstr_set(x_28, 1, x_25); lean::inc(x_28); lean::inc(x_15); x_31 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_31, 0, x_15); lean::cnstr_set(x_31, 1, x_28); lean::inc(x_31); lean::inc(x_12); x_34 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_34, 0, x_12); lean::cnstr_set(x_34, 1, x_31); x_35 = _l_s4_lean_s6_parser_s28_detail__ident__part__escaped; lean::inc(x_34); lean::inc(x_35); x_38 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__8), 5, 2); lean::closure_set(x_38, 0, x_35); lean::closure_set(x_38, 1, x_34); x_39 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s11___lambda__2), 4, 0); x_40 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_40, 0, x_9); lean::closure_set(x_40, 1, x_39); lean::inc(x_25); lean::inc(x_40); x_43 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_43, 0, x_40); lean::cnstr_set(x_43, 1, x_25); lean::inc(x_43); lean::inc(x_38); x_46 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_46, 0, x_38); lean::cnstr_set(x_46, 1, x_43); x_47 = lean::mk_nat_obj(0u); lean::inc(x_46); x_49 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_combinators_s11_choice__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s10___spec__16), 5, 2); lean::closure_set(x_49, 0, x_46); lean::closure_set(x_49, 1, x_47); lean::inc(x_25); lean::inc(x_49); x_52 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_52, 0, x_49); lean::cnstr_set(x_52, 1, x_25); lean::inc(x_25); lean::inc(x_25); lean::inc(x_25); x_56 = _l_s4_lean_s6_parser_s4_list_s4_cons_s6_tokens_s6___rarg(x_24, x_25, x_25, x_25); lean::inc(x_25); x_58 = _l_s4_lean_s6_parser_s4_list_s4_cons_s6_tokens_s6___rarg(x_15, x_28, x_25, x_56); lean::inc(x_25); x_60 = _l_s4_lean_s6_parser_s4_list_s4_cons_s6_tokens_s6___rarg(x_12, x_31, x_25, x_58); x_61 = _l_s4_lean_s6_parser_s6_tokens(lean::box(0), x_34); x_62 = lean::apply_1(x_61, x_60); lean::inc(x_25); lean::inc(x_25); lean::inc(x_25); x_66 = _l_s4_lean_s6_parser_s4_list_s4_cons_s6_tokens_s6___rarg(x_40, x_25, x_25, x_25); x_67 = _l_s4_lean_s6_parser_s4_list_s4_cons_s6_tokens_s6___rarg(x_38, x_43, x_62, x_66); x_68 = _l_s4_lean_s6_parser_s6_tokens(lean::box(0), x_46); x_69 = lean::apply_1(x_68, x_67); lean::inc(x_25); x_71 = _l_s4_lean_s6_parser_s4_list_s4_cons_s6_tokens_s6___rarg(x_49, x_25, x_69, x_25); x_72 = _l_s4_lean_s6_parser_s6_tokens(lean::box(0), x_52); x_73 = lean::apply_1(x_72, x_71); return x_73; } } obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s11___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_7; obj* x_9; x_4 = _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__8(x_1, x_2, x_3); x_5 = lean::cnstr_get(x_4, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_4, 1); lean::inc(x_7); if (lean::is_shared(x_4)) { lean::dec(x_4); x_9 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); x_9 = x_4; } if (lean::obj_tag(x_5) == 0) { obj* x_10; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; x_10 = lean::cnstr_get(x_5, 1); lean::inc(x_10); x_12 = lean::cnstr_get(x_5, 2); lean::inc(x_12); if (lean::is_shared(x_5)) { lean::dec(x_5); x_14 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); x_14 = x_5; } lean::inc(x_10); x_16 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_0, x_10); x_17 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_17); if (lean::is_scalar(x_14)) { x_19 = lean::alloc_cnstr(0, 3, 0); } else { x_19 = x_14; } lean::cnstr_set(x_19, 0, x_16); lean::cnstr_set(x_19, 1, x_10); lean::cnstr_set(x_19, 2, x_17); x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_12, x_19); if (lean::is_scalar(x_9)) { x_21 = lean::alloc_cnstr(0, 2, 0); } else { x_21 = x_9; } lean::cnstr_set(x_21, 0, x_20); lean::cnstr_set(x_21, 1, x_7); return x_21; } else { obj* x_23; unsigned char x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; lean::dec(x_0); x_23 = lean::cnstr_get(x_5, 0); lean::inc(x_23); x_25 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); if (lean::is_shared(x_5)) { lean::dec(x_5); x_26 = lean::box(0); } else { lean::cnstr_release(x_5, 0); x_26 = x_5; } if (lean::is_scalar(x_26)) { x_27 = lean::alloc_cnstr(1, 1, 1); } else { x_27 = x_26; } lean::cnstr_set(x_27, 0, x_23); lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); x_28 = x_27; if (lean::is_scalar(x_9)) { x_29 = lean::alloc_cnstr(0, 2, 0); } else { x_29 = x_9; } lean::cnstr_set(x_29, 0, x_28); lean::cnstr_set(x_29, 1, x_7); return x_29; } } } obj* _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s11___lambda__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; unsigned char x_7; x_7 = lean::string_iterator_has_next(x_2); if (x_7 == 0) { obj* x_8; obj* x_9; obj* x_10; obj* x_14; obj* x_15; obj* x_17; obj* x_20; obj* x_22; x_8 = lean::box(0); x_9 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_10 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); x_14 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_9, x_10, x_8, x_8, x_1, x_2, x_3); x_15 = lean::cnstr_get(x_14, 0); lean::inc(x_15); x_17 = lean::cnstr_get(x_14, 1); lean::inc(x_17); lean::dec(x_14); x_20 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_20); x_22 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_20, x_15); if (lean::obj_tag(x_22) == 0) { obj* x_23; obj* x_25; obj* x_28; obj* x_29; obj* x_31; obj* x_34; x_23 = lean::cnstr_get(x_22, 1); lean::inc(x_23); x_25 = lean::cnstr_get(x_22, 2); lean::inc(x_25); lean::dec(x_22); x_28 = _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__21_s6___rarg(x_23, x_17); x_29 = lean::cnstr_get(x_28, 0); lean::inc(x_29); x_31 = lean::cnstr_get(x_28, 1); lean::inc(x_31); lean::dec(x_28); x_34 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_25, x_29); x_4 = x_34; x_5 = x_31; goto lbl_6; } else { obj* x_35; unsigned char x_37; obj* x_38; obj* x_39; obj* x_40; x_35 = lean::cnstr_get(x_22, 0); lean::inc(x_35); x_37 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); if (lean::is_shared(x_22)) { lean::dec(x_22); x_38 = lean::box(0); } else { lean::cnstr_release(x_22, 0); x_38 = x_22; } if (lean::is_scalar(x_38)) { x_39 = lean::alloc_cnstr(1, 1, 1); } else { x_39 = x_38; } lean::cnstr_set(x_39, 0, x_35); lean::cnstr_set_scalar(x_39, sizeof(void*)*1, x_37); x_40 = x_39; x_4 = x_40; x_5 = x_17; goto lbl_6; } } else { unsigned x_41; unsigned char x_42; x_41 = lean::string_iterator_curr(x_2); x_42 = _l_s4_lean_s13_is__id__first(x_41); if (x_42 == 0) { obj* x_43; obj* x_44; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_53; obj* x_54; obj* x_56; obj* x_59; obj* x_61; x_43 = _l_s4_char_s11_quote__core(x_41); x_44 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_44); x_46 = lean::string_append(x_44, x_43); lean::dec(x_43); x_48 = lean::string_append(x_46, x_44); x_49 = lean::box(0); x_50 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_49); lean::inc(x_50); x_53 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_48, x_50, x_49, x_49, x_1, x_2, x_3); x_54 = lean::cnstr_get(x_53, 0); lean::inc(x_54); x_56 = lean::cnstr_get(x_53, 1); lean::inc(x_56); lean::dec(x_53); x_59 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_59); x_61 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_59, x_54); if (lean::obj_tag(x_61) == 0) { obj* x_62; obj* x_64; obj* x_67; obj* x_68; obj* x_70; obj* x_73; x_62 = lean::cnstr_get(x_61, 1); lean::inc(x_62); x_64 = lean::cnstr_get(x_61, 2); lean::inc(x_64); lean::dec(x_61); x_67 = _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__23_s6___rarg(x_62, x_56); x_68 = lean::cnstr_get(x_67, 0); lean::inc(x_68); x_70 = lean::cnstr_get(x_67, 1); lean::inc(x_70); lean::dec(x_67); x_73 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_64, x_68); x_4 = x_73; x_5 = x_70; goto lbl_6; } else { obj* x_74; unsigned char x_76; obj* x_77; obj* x_78; obj* x_79; x_74 = lean::cnstr_get(x_61, 0); lean::inc(x_74); x_76 = lean::cnstr_get_scalar(x_61, sizeof(void*)*1); if (lean::is_shared(x_61)) { lean::dec(x_61); x_77 = lean::box(0); } else { lean::cnstr_release(x_61, 0); x_77 = x_61; } if (lean::is_scalar(x_77)) { x_78 = lean::alloc_cnstr(1, 1, 1); } else { x_78 = x_77; } lean::cnstr_set(x_78, 0, x_74); lean::cnstr_set_scalar(x_78, sizeof(void*)*1, x_76); x_79 = x_78; x_4 = x_79; x_5 = x_56; goto lbl_6; } } else { obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_88; obj* x_89; lean::dec(x_1); x_81 = lean::string_iterator_next(x_2); x_82 = _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__25_s6___rarg(x_81, x_3); x_83 = lean::cnstr_get(x_82, 0); lean::inc(x_83); x_85 = lean::cnstr_get(x_82, 1); lean::inc(x_85); lean::dec(x_82); x_88 = lean::box(0); x_89 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_88, x_83); x_4 = x_89; x_5 = x_85; goto lbl_6; } } lbl_6: { if (lean::obj_tag(x_4) == 0) { obj* x_90; obj* x_92; obj* x_94; obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_101; x_90 = lean::cnstr_get(x_4, 1); lean::inc(x_90); x_92 = lean::cnstr_get(x_4, 2); lean::inc(x_92); if (lean::is_shared(x_4)) { lean::dec(x_4); x_94 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); lean::cnstr_release(x_4, 2); x_94 = x_4; } lean::inc(x_90); x_96 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_0, x_90); x_97 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_97); if (lean::is_scalar(x_94)) { x_99 = lean::alloc_cnstr(0, 3, 0); } else { x_99 = x_94; } lean::cnstr_set(x_99, 0, x_96); lean::cnstr_set(x_99, 1, x_90); lean::cnstr_set(x_99, 2, x_97); x_100 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_92, x_99); x_101 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_101, 0, x_100); lean::cnstr_set(x_101, 1, x_5); return x_101; } else { obj* x_103; unsigned char x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; lean::dec(x_0); x_103 = lean::cnstr_get(x_4, 0); lean::inc(x_103); x_105 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); if (lean::is_shared(x_4)) { lean::dec(x_4); x_106 = lean::box(0); } else { lean::cnstr_release(x_4, 0); x_106 = x_4; } if (lean::is_scalar(x_106)) { x_107 = lean::alloc_cnstr(1, 1, 1); } else { x_107 = x_106; } lean::cnstr_set(x_107, 0, x_103); lean::cnstr_set_scalar(x_107, sizeof(void*)*1, x_105); x_108 = x_107; x_109 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_109, 0, x_108); lean::cnstr_set(x_109, 1, x_5); return x_109; } } } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__3(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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__3(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__2(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__3(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__5(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; lean::dec(x_1); x_5 = lean::string_iterator_curr(x_0); lean::dec(x_0); x_7 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_7); x_9 = lean::string_push(x_7, x_5); x_10 = lean::string_iterator_remaining(x_2); x_11 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__5(x_10, x_9, x_2); x_12 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_12, 0, x_11); lean::cnstr_set(x_12, 1, x_3); return x_12; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__7(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__6(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__7(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__1(obj* x_0, obj* x_1, obj* x_2) { { unsigned char x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { obj* x_4; obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; x_4 = lean::box(0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_6 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); x_11 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); x_12 = lean::cnstr_get(x_11, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_11, 1); lean::inc(x_14); if (lean::is_shared(x_11)) { lean::dec(x_11); x_16 = lean::box(0); } else { lean::cnstr_release(x_11, 0); lean::cnstr_release(x_11, 1); x_16 = x_11; } x_17 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_17); x_19 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_12); if (lean::obj_tag(x_19) == 0) { obj* x_20; obj* x_22; obj* x_24; unsigned x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; x_20 = lean::cnstr_get(x_19, 0); lean::inc(x_20); x_22 = lean::cnstr_get(x_19, 1); lean::inc(x_22); x_24 = lean::cnstr_get(x_19, 2); lean::inc(x_24); lean::dec(x_19); x_27 = lean::unbox_uint32(x_20); lean::dec(x_20); x_29 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__2(x_27, x_0, x_22, x_14); x_30 = lean::cnstr_get(x_29, 0); lean::inc(x_30); x_32 = lean::cnstr_get(x_29, 1); lean::inc(x_32); lean::dec(x_29); x_35 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_24, x_30); if (lean::is_scalar(x_16)) { x_36 = lean::alloc_cnstr(0, 2, 0); } else { x_36 = x_16; } lean::cnstr_set(x_36, 0, x_35); lean::cnstr_set(x_36, 1, x_32); return x_36; } else { obj* x_38; unsigned char x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; lean::dec(x_0); x_38 = lean::cnstr_get(x_19, 0); lean::inc(x_38); x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); if (lean::is_shared(x_19)) { lean::dec(x_19); x_41 = lean::box(0); } else { lean::cnstr_release(x_19, 0); x_41 = x_19; } if (lean::is_scalar(x_41)) { x_42 = lean::alloc_cnstr(1, 1, 1); } else { x_42 = x_41; } lean::cnstr_set(x_42, 0, x_38); lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); x_43 = x_42; if (lean::is_scalar(x_16)) { x_44 = lean::alloc_cnstr(0, 2, 0); } else { x_44 = x_16; } lean::cnstr_set(x_44, 0, x_43); lean::cnstr_set(x_44, 1, x_14); return x_44; } } else { unsigned x_45; unsigned char x_46; x_45 = lean::string_iterator_curr(x_1); x_46 = _l_s4_lean_s19_is__id__end__escape(x_45); if (x_46 == 0) { obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; lean::inc(x_1); x_48 = lean::string_iterator_next(x_1); x_49 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__4(x_1, x_0, x_48, x_2); x_50 = lean::cnstr_get(x_49, 0); lean::inc(x_50); x_52 = lean::cnstr_get(x_49, 1); lean::inc(x_52); if (lean::is_shared(x_49)) { lean::dec(x_49); x_54 = lean::box(0); } else { lean::cnstr_release(x_49, 0); lean::cnstr_release(x_49, 1); x_54 = x_49; } x_55 = lean::box(0); x_56 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_55, x_50); if (lean::is_scalar(x_54)) { x_57 = lean::alloc_cnstr(0, 2, 0); } else { x_57 = x_54; } lean::cnstr_set(x_57, 0, x_56); lean::cnstr_set(x_57, 1, x_52); return x_57; } else { obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; x_58 = _l_s4_char_s11_quote__core(x_45); x_59 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_59); x_61 = lean::string_append(x_59, x_58); lean::dec(x_58); x_63 = lean::string_append(x_61, x_59); x_64 = lean::box(0); x_65 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_64); lean::inc(x_65); x_69 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_63, x_65, x_64, x_64, x_0, x_1, x_2); x_70 = lean::cnstr_get(x_69, 0); lean::inc(x_70); x_72 = lean::cnstr_get(x_69, 1); 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); x_74 = x_69; } x_75 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_75); x_77 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_75, x_70); if (lean::obj_tag(x_77) == 0) { obj* x_78; obj* x_80; obj* x_82; unsigned x_85; obj* x_87; obj* x_88; obj* x_90; obj* x_93; obj* x_94; x_78 = lean::cnstr_get(x_77, 0); lean::inc(x_78); x_80 = lean::cnstr_get(x_77, 1); lean::inc(x_80); x_82 = lean::cnstr_get(x_77, 2); lean::inc(x_82); lean::dec(x_77); x_85 = lean::unbox_uint32(x_78); lean::dec(x_78); x_87 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__6(x_85, x_0, x_80, x_72); x_88 = lean::cnstr_get(x_87, 0); lean::inc(x_88); x_90 = lean::cnstr_get(x_87, 1); lean::inc(x_90); lean::dec(x_87); x_93 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_82, x_88); if (lean::is_scalar(x_74)) { x_94 = lean::alloc_cnstr(0, 2, 0); } else { x_94 = x_74; } lean::cnstr_set(x_94, 0, x_93); lean::cnstr_set(x_94, 1, x_90); return x_94; } else { obj* x_96; unsigned char x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; lean::dec(x_0); x_96 = lean::cnstr_get(x_77, 0); lean::inc(x_96); x_98 = lean::cnstr_get_scalar(x_77, sizeof(void*)*1); if (lean::is_shared(x_77)) { lean::dec(x_77); x_99 = lean::box(0); } else { lean::cnstr_release(x_77, 0); x_99 = x_77; } if (lean::is_scalar(x_99)) { x_100 = lean::alloc_cnstr(1, 1, 1); } else { x_100 = x_99; } lean::cnstr_set(x_100, 0, x_96); lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_98); x_101 = x_100; if (lean::is_scalar(x_74)) { x_102 = lean::alloc_cnstr(0, 2, 0); } else { x_102 = x_74; } lean::cnstr_set(x_102, 0, x_101); lean::cnstr_set(x_102, 1, x_72); return x_102; } } } } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__10(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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__10(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__9(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__10(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__12(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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__12(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__11(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; lean::dec(x_1); x_5 = lean::string_iterator_curr(x_0); lean::dec(x_0); x_7 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_7); x_9 = lean::string_push(x_7, x_5); x_10 = lean::string_iterator_remaining(x_2); x_11 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__12(x_10, x_9, x_2); x_12 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_12, 0, x_11); lean::cnstr_set(x_12, 1, x_3); return x_12; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__14(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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__14(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__13(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__14(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__8(obj* x_0, obj* x_1, obj* x_2) { { unsigned char x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { obj* x_4; obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; x_4 = lean::box(0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_6 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); x_11 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); x_12 = lean::cnstr_get(x_11, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_11, 1); lean::inc(x_14); if (lean::is_shared(x_11)) { lean::dec(x_11); x_16 = lean::box(0); } else { lean::cnstr_release(x_11, 0); lean::cnstr_release(x_11, 1); x_16 = x_11; } x_17 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_17); x_19 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_12); if (lean::obj_tag(x_19) == 0) { obj* x_20; obj* x_22; obj* x_24; unsigned x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; x_20 = lean::cnstr_get(x_19, 0); lean::inc(x_20); x_22 = lean::cnstr_get(x_19, 1); lean::inc(x_22); x_24 = lean::cnstr_get(x_19, 2); lean::inc(x_24); lean::dec(x_19); x_27 = lean::unbox_uint32(x_20); lean::dec(x_20); x_29 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__9(x_27, x_0, x_22, x_14); x_30 = lean::cnstr_get(x_29, 0); lean::inc(x_30); x_32 = lean::cnstr_get(x_29, 1); lean::inc(x_32); lean::dec(x_29); x_35 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_24, x_30); if (lean::is_scalar(x_16)) { x_36 = lean::alloc_cnstr(0, 2, 0); } else { x_36 = x_16; } lean::cnstr_set(x_36, 0, x_35); lean::cnstr_set(x_36, 1, x_32); return x_36; } else { obj* x_38; unsigned char x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; lean::dec(x_0); x_38 = lean::cnstr_get(x_19, 0); lean::inc(x_38); x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); if (lean::is_shared(x_19)) { lean::dec(x_19); x_41 = lean::box(0); } else { lean::cnstr_release(x_19, 0); x_41 = x_19; } if (lean::is_scalar(x_41)) { x_42 = lean::alloc_cnstr(1, 1, 1); } else { x_42 = x_41; } lean::cnstr_set(x_42, 0, x_38); lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); x_43 = x_42; if (lean::is_scalar(x_16)) { x_44 = lean::alloc_cnstr(0, 2, 0); } else { x_44 = x_16; } lean::cnstr_set(x_44, 0, x_43); lean::cnstr_set(x_44, 1, x_14); return x_44; } } else { unsigned x_45; unsigned char x_46; x_45 = lean::string_iterator_curr(x_1); x_46 = _l_s4_lean_s19_is__id__end__escape(x_45); if (x_46 == 0) { obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; lean::inc(x_1); x_48 = lean::string_iterator_next(x_1); x_49 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__11(x_1, x_0, x_48, x_2); x_50 = lean::cnstr_get(x_49, 0); lean::inc(x_50); x_52 = lean::cnstr_get(x_49, 1); lean::inc(x_52); if (lean::is_shared(x_49)) { lean::dec(x_49); x_54 = lean::box(0); } else { lean::cnstr_release(x_49, 0); lean::cnstr_release(x_49, 1); x_54 = x_49; } x_55 = lean::box(0); x_56 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_55, x_50); if (lean::is_scalar(x_54)) { x_57 = lean::alloc_cnstr(0, 2, 0); } else { x_57 = x_54; } lean::cnstr_set(x_57, 0, x_56); lean::cnstr_set(x_57, 1, x_52); return x_57; } else { obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; x_58 = _l_s4_char_s11_quote__core(x_45); x_59 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_59); x_61 = lean::string_append(x_59, x_58); lean::dec(x_58); x_63 = lean::string_append(x_61, x_59); x_64 = lean::box(0); x_65 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_64); lean::inc(x_65); x_69 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_63, x_65, x_64, x_64, x_0, x_1, x_2); x_70 = lean::cnstr_get(x_69, 0); lean::inc(x_70); x_72 = lean::cnstr_get(x_69, 1); 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); x_74 = x_69; } x_75 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_75); x_77 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_75, x_70); if (lean::obj_tag(x_77) == 0) { obj* x_78; obj* x_80; obj* x_82; unsigned x_85; obj* x_87; obj* x_88; obj* x_90; obj* x_93; obj* x_94; x_78 = lean::cnstr_get(x_77, 0); lean::inc(x_78); x_80 = lean::cnstr_get(x_77, 1); lean::inc(x_80); x_82 = lean::cnstr_get(x_77, 2); lean::inc(x_82); lean::dec(x_77); x_85 = lean::unbox_uint32(x_78); lean::dec(x_78); x_87 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__13(x_85, x_0, x_80, x_72); x_88 = lean::cnstr_get(x_87, 0); lean::inc(x_88); x_90 = lean::cnstr_get(x_87, 1); lean::inc(x_90); lean::dec(x_87); x_93 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_82, x_88); if (lean::is_scalar(x_74)) { x_94 = lean::alloc_cnstr(0, 2, 0); } else { x_94 = x_74; } lean::cnstr_set(x_94, 0, x_93); lean::cnstr_set(x_94, 1, x_90); return x_94; } else { obj* x_96; unsigned char x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; lean::dec(x_0); x_96 = lean::cnstr_get(x_77, 0); lean::inc(x_96); x_98 = lean::cnstr_get_scalar(x_77, sizeof(void*)*1); if (lean::is_shared(x_77)) { lean::dec(x_77); x_99 = lean::box(0); } else { lean::cnstr_release(x_77, 0); x_99 = x_77; } if (lean::is_scalar(x_99)) { x_100 = lean::alloc_cnstr(1, 1, 1); } else { x_100 = x_99; } lean::cnstr_set(x_100, 0, x_96); lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_98); x_101 = x_100; if (lean::is_scalar(x_74)) { x_102 = lean::alloc_cnstr(0, 2, 0); } else { x_102 = x_74; } lean::cnstr_set(x_102, 0, x_101); lean::cnstr_set(x_102, 1, x_72); return x_102; } } } } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__16(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_lean_s12_is__id__rest(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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__16(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__15_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; obj* x_5; obj* x_6; x_2 = lean::string_iterator_remaining(x_0); x_3 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_3); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__16(x_2, x_3, x_0); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_1); return x_6; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__15(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__15_s6___rarg), 2, 0); return x_2; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__18(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_lean_s12_is__id__rest(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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__18(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__17_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; obj* x_5; obj* x_6; x_2 = lean::string_iterator_remaining(x_0); x_3 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_3); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__18(x_2, x_3, x_0); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_1); return x_6; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__17(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__17_s6___rarg), 2, 0); return x_2; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__20(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_lean_s12_is__id__rest(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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__20(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__19_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; obj* x_5; obj* x_6; x_2 = lean::string_iterator_remaining(x_0); x_3 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_3); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__20(x_2, x_3, x_0); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_1); return x_6; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__19(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__19_s6___rarg), 2, 0); return x_2; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__22(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_lean_s12_is__id__rest(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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__22(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__21_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; obj* x_5; obj* x_6; x_2 = lean::string_iterator_remaining(x_0); x_3 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_3); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__22(x_2, x_3, x_0); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_1); return x_6; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__21(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__21_s6___rarg), 2, 0); return x_2; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__24(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_lean_s12_is__id__rest(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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__24(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__23_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; obj* x_5; obj* x_6; x_2 = lean::string_iterator_remaining(x_0); x_3 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_3); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__24(x_2, x_3, x_0); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_1); return x_6; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__23(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__23_s6___rarg), 2, 0); return x_2; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__26(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_lean_s12_is__id__rest(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_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__26(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__25_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; obj* x_5; obj* x_6; x_2 = lean::string_iterator_remaining(x_0); x_3 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_3); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__26(x_2, x_3, x_0); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_1); return x_6; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__25(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_s11_take__while_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__25_s6___rarg), 2, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__2_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__2(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__6_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__6(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__9_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__9(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__13_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens_s10___spec__13(x_4, x_1, x_2, x_3); return x_5; } } obj* _init__l_s4_lean_s6_parser_s21_detail__ident__suffix() { { obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("lean"); x_2 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); x_3 = lean::mk_string("parser"); x_4 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_4, 0, x_2); lean::cnstr_set(x_4, 1, x_3); x_5 = lean::mk_string("detail_ident_suffix"); x_6 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_6, 0, x_4); lean::cnstr_set(x_6, 1, x_5); return x_6; } } obj* _init__l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__2), 1, 0); x_2 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); return x_2; } } obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__1(obj* x_0) { { obj* x_1; x_1 = _l_s4_lean_s6_parser_s6_syntax_s8_as__node_s6___main(x_0); if (lean::obj_tag(x_1) == 0) { obj* x_3; lean::dec(x_1); x_3 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_3); return x_3; } else { obj* x_5; obj* x_7; obj* x_8; x_5 = lean::cnstr_get(x_1, 0); lean::inc(x_5); if (lean::is_shared(x_1)) { lean::dec(x_1); x_7 = lean::box(0); } else { lean::cnstr_release(x_1, 0); x_7 = x_1; } x_8 = lean::cnstr_get(x_5, 1); lean::inc(x_8); lean::dec(x_5); if (lean::obj_tag(x_8) == 0) { lean::dec(x_7); if (lean::obj_tag(x_8) == 0) { obj* x_13; lean::dec(x_8); x_13 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_13); return x_13; } else { obj* x_15; obj* x_18; obj* x_19; x_15 = lean::cnstr_get(x_8, 0); lean::inc(x_15); lean::dec(x_8); x_18 = lean::box(0); x_19 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_19, 0, x_18); lean::cnstr_set(x_19, 1, x_15); return x_19; } } else { obj* x_20; obj* x_22; x_20 = lean::cnstr_get(x_8, 0); lean::inc(x_20); x_22 = lean::cnstr_get(x_8, 1); lean::inc(x_22); lean::dec(x_8); switch (lean::obj_tag(x_20)) { case 0: { obj* x_25; obj* x_28; x_25 = lean::cnstr_get(x_20, 0); lean::inc(x_25); lean::dec(x_20); if (lean::is_scalar(x_7)) { x_28 = lean::alloc_cnstr(1, 1, 0); } else { x_28 = x_7; } lean::cnstr_set(x_28, 0, x_25); if (lean::obj_tag(x_22) == 0) { obj* x_30; obj* x_31; lean::dec(x_22); x_30 = lean::box(3); x_31 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_31, 0, x_28); lean::cnstr_set(x_31, 1, x_30); return x_31; } else { obj* x_32; obj* x_35; x_32 = lean::cnstr_get(x_22, 0); lean::inc(x_32); lean::dec(x_22); x_35 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_35, 0, x_28); lean::cnstr_set(x_35, 1, x_32); return x_35; } } case 1: { lean::dec(x_7); lean::dec(x_20); if (lean::obj_tag(x_22) == 0) { obj* x_39; lean::dec(x_22); x_39 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_39); return x_39; } else { obj* x_41; obj* x_44; obj* x_45; x_41 = lean::cnstr_get(x_22, 0); lean::inc(x_41); lean::dec(x_22); x_44 = lean::box(0); x_45 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_45, 0, x_44); lean::cnstr_set(x_45, 1, x_41); return x_45; } } case 2: { lean::dec(x_7); lean::dec(x_20); if (lean::obj_tag(x_22) == 0) { obj* x_49; lean::dec(x_22); x_49 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_49); return x_49; } else { obj* x_51; obj* x_54; obj* x_55; x_51 = lean::cnstr_get(x_22, 0); lean::inc(x_51); lean::dec(x_22); x_54 = lean::box(0); x_55 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_55, 0, x_54); lean::cnstr_set(x_55, 1, x_51); return x_55; } } default: { lean::dec(x_7); lean::dec(x_20); if (lean::obj_tag(x_22) == 0) { obj* x_59; lean::dec(x_22); x_59 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_59); return x_59; } else { obj* x_61; obj* x_64; obj* x_65; x_61 = lean::cnstr_get(x_22, 0); lean::inc(x_61); lean::dec(x_22); x_64 = lean::box(0); x_65 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_65, 0, x_64); lean::cnstr_set(x_65, 1, x_61); return x_65; } } } } } } } obj* _init__l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__1_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::box(0); x_1 = lean::box(3); x_2 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); return x_2; } } obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__2(obj* x_0) { { obj* x_1; obj* x_3; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); lean::inc(x_3); lean::dec(x_0); x_6 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3_s11___closed__1; lean::inc(x_6); x_8 = _l_s6_option_s3_map_s6___rarg(x_6, x_1); x_9 = lean::box(3); x_10 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_8, x_9); x_11 = lean::box(0); x_12 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_12, 0, x_3); lean::cnstr_set(x_12, 1, x_11); x_13 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_13, 0, x_10); lean::cnstr_set(x_13, 1, x_12); x_14 = _l_s4_lean_s6_parser_s21_detail__ident__suffix; lean::inc(x_14); x_16 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_14, x_13); return x_16; } } obj* _init__l_s4_lean_s6_parser_s21_detail__ident__suffix_s9_has__view() { { obj* x_0; x_0 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27; lean::inc(x_0); return x_0; } } obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_6; unsigned x_8; x_4 = lean::mk_nat_obj(46u); x_5 = lean::mk_nat_obj(55296u); x_6 = lean::nat_dec_lt(x_4, x_5); lean::dec(x_5); if (lean::obj_tag(x_6) == 0) { obj* x_11; obj* x_12; lean::dec(x_6); x_11 = lean::mk_nat_obj(57343u); x_12 = lean::nat_dec_lt(x_11, x_4); lean::dec(x_11); if (lean::obj_tag(x_12) == 0) { obj* x_16; unsigned x_17; lean::dec(x_12); lean::dec(x_4); x_16 = lean::mk_nat_obj(0u); x_17 = lean::unbox_uint32(x_16); lean::dec(x_16); x_8 = x_17; goto lbl_9; } else { obj* x_20; obj* x_21; lean::dec(x_12); x_20 = lean::mk_nat_obj(1114112u); x_21 = lean::nat_dec_lt(x_4, x_20); lean::dec(x_20); if (lean::obj_tag(x_21) == 0) { obj* x_25; unsigned x_26; lean::dec(x_4); lean::dec(x_21); x_25 = lean::mk_nat_obj(0u); x_26 = lean::unbox_uint32(x_25); lean::dec(x_25); x_8 = x_26; goto lbl_9; } else { unsigned x_29; lean::dec(x_21); x_29 = lean::unbox_uint32(x_4); lean::dec(x_4); x_8 = x_29; goto lbl_9; } } } else { unsigned x_32; lean::dec(x_6); x_32 = lean::unbox_uint32(x_4); lean::dec(x_4); x_8 = x_32; goto lbl_9; } lbl_9: { obj* x_36; obj* x_37; obj* x_39; obj* x_41; obj* x_42; lean::inc(x_1); lean::inc(x_0); x_36 = _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__4(x_0, x_1, x_2, x_8, x_3); x_37 = lean::cnstr_get(x_36, 0); lean::inc(x_37); x_39 = lean::cnstr_get(x_36, 1); lean::inc(x_39); if (lean::is_shared(x_36)) { lean::dec(x_36); x_41 = lean::box(0); } else { lean::cnstr_release(x_36, 0); lean::cnstr_release(x_36, 1); x_41 = x_36; } x_42 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_37); if (lean::obj_tag(x_42) == 0) { obj* x_43; obj* x_45; obj* x_48; obj* x_49; obj* x_52; obj* x_53; obj* x_55; obj* x_58; obj* x_59; x_43 = lean::cnstr_get(x_42, 1); lean::inc(x_43); x_45 = lean::cnstr_get(x_42, 2); lean::inc(x_45); lean::dec(x_42); x_48 = _l_s4_lean_s6_parser_s21_detail__ident__suffix; x_49 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s11___closed__1; lean::inc(x_49); lean::inc(x_48); x_52 = _l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__9(x_48, x_49, x_0, x_1, x_43, x_39); x_53 = lean::cnstr_get(x_52, 0); lean::inc(x_53); x_55 = lean::cnstr_get(x_52, 1); lean::inc(x_55); lean::dec(x_52); x_58 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_45, x_53); if (lean::is_scalar(x_41)) { x_59 = lean::alloc_cnstr(0, 2, 0); } else { x_59 = x_41; } lean::cnstr_set(x_59, 0, x_58); lean::cnstr_set(x_59, 1, x_55); return x_59; } else { obj* x_62; unsigned char x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; lean::dec(x_0); lean::dec(x_1); x_62 = lean::cnstr_get(x_42, 0); lean::inc(x_62); x_64 = lean::cnstr_get_scalar(x_42, sizeof(void*)*1); if (lean::is_shared(x_42)) { lean::dec(x_42); x_65 = lean::box(0); } else { lean::cnstr_release(x_42, 0); x_65 = x_42; } if (lean::is_scalar(x_65)) { x_66 = lean::alloc_cnstr(1, 1, 1); } else { x_66 = x_65; } lean::cnstr_set(x_66, 0, x_62); lean::cnstr_set_scalar(x_66, sizeof(void*)*1, x_64); x_67 = x_66; if (lean::is_scalar(x_41)) { x_68 = lean::alloc_cnstr(0, 2, 0); } else { x_68 = x_41; } lean::cnstr_set(x_68, 0, x_67); lean::cnstr_set(x_68, 1, x_39); return x_68; } } } } obj* _init__l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; unsigned char x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; 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); x_3 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__1), 2, 0); x_4 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__1_s6___rarg), 4, 1); lean::closure_set(x_4, 0, x_3); x_5 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__5_s6___rarg), 5, 1); lean::closure_set(x_5, 0, x_4); x_6 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s11___lambda__1), 6, 1); lean::closure_set(x_6, 0, x_2); x_7 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__7_s6___rarg), 6, 2); lean::closure_set(x_7, 0, x_5); lean::closure_set(x_7, 1, x_6); x_8 = 0; x_9 = lean::box(x_8); x_10 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s6_rec__t_s7_recurse_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__8_s7___boxed), 5, 1); lean::closure_set(x_10, 0, x_9); x_11 = lean::box(0); x_12 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_12, 0, x_10); lean::cnstr_set(x_12, 1, x_11); x_13 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_13, 0, x_7); lean::cnstr_set(x_13, 1, x_12); return x_13; } } obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s11___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_13; x_6 = _l_s4_lean_s4_name_s10_to__string_s11___closed__1; lean::inc(x_6); x_8 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__6(x_6, x_0, x_2, x_3, x_4, x_5); x_9 = lean::cnstr_get(x_8, 0); lean::inc(x_9); x_11 = lean::cnstr_get(x_8, 1); lean::inc(x_11); if (lean::is_shared(x_8)) { lean::dec(x_8); x_13 = lean::box(0); } else { lean::cnstr_release(x_8, 0); lean::cnstr_release(x_8, 1); x_13 = x_8; } if (lean::obj_tag(x_9) == 0) { obj* x_14; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; x_14 = lean::cnstr_get(x_9, 1); lean::inc(x_14); x_16 = lean::cnstr_get(x_9, 2); lean::inc(x_16); if (lean::is_shared(x_9)) { lean::dec(x_9); x_18 = lean::box(0); } else { lean::cnstr_release(x_9, 0); lean::cnstr_release(x_9, 1); lean::cnstr_release(x_9, 2); x_18 = x_9; } lean::inc(x_14); x_20 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_1, x_14); x_21 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_21); if (lean::is_scalar(x_18)) { x_23 = lean::alloc_cnstr(0, 3, 0); } else { x_23 = x_18; } lean::cnstr_set(x_23, 0, x_20); lean::cnstr_set(x_23, 1, x_14); lean::cnstr_set(x_23, 2, x_21); x_24 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_23); if (lean::is_scalar(x_13)) { x_25 = lean::alloc_cnstr(0, 2, 0); } else { x_25 = x_13; } lean::cnstr_set(x_25, 0, x_24); lean::cnstr_set(x_25, 1, x_11); return x_25; } else { obj* x_27; unsigned char x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; lean::dec(x_1); x_27 = lean::cnstr_get(x_9, 0); lean::inc(x_27); x_29 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); if (lean::is_shared(x_9)) { lean::dec(x_9); x_30 = lean::box(0); } else { lean::cnstr_release(x_9, 0); x_30 = x_9; } if (lean::is_scalar(x_30)) { x_31 = lean::alloc_cnstr(1, 1, 1); } else { x_31 = x_30; } lean::cnstr_set(x_31, 0, x_27); lean::cnstr_set_scalar(x_31, sizeof(void*)*1, x_29); x_32 = x_31; if (lean::is_scalar(x_13)) { x_33 = lean::alloc_cnstr(0, 2, 0); } else { x_33 = x_13; } lean::cnstr_set(x_33, 0, x_32); lean::cnstr_set(x_33, 1, x_11); return x_33; } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__2_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { { obj* x_10; obj* x_11; unsigned char x_12; obj* x_13; obj* x_14; obj* x_15; lean::dec(x_5); lean::dec(x_4); x_10 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_2, x_6); x_11 = lean::alloc_cnstr(0, 4, 0); lean::cnstr_set(x_11, 0, x_10); lean::cnstr_set(x_11, 1, x_0); lean::cnstr_set(x_11, 2, x_1); lean::cnstr_set(x_11, 3, x_3); x_12 = 0; x_13 = lean::alloc_cnstr(1, 1, 1); lean::cnstr_set(x_13, 0, x_11); lean::cnstr_set_scalar(x_13, sizeof(void*)*1, x_12); x_14 = x_13; x_15 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_15, 0, x_14); lean::cnstr_set(x_15, 1, x_7); return x_15; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__2(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_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__2_s6___rarg), 8, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__1(unsigned x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned char x_5; x_5 = lean::string_iterator_has_next(x_3); if (x_5 == 0) { obj* x_6; obj* x_7; obj* x_8; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; x_6 = lean::box(0); x_7 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_8 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_6); lean::inc(x_8); lean::inc(x_7); x_12 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__2_s6___rarg(x_7, x_8, x_6, x_6, x_1, x_2, x_3, x_4); x_13 = lean::cnstr_get(x_12, 0); lean::inc(x_13); x_15 = lean::cnstr_get(x_12, 1); lean::inc(x_15); if (lean::is_shared(x_12)) { lean::dec(x_12); x_17 = lean::box(0); } else { lean::cnstr_release(x_12, 0); lean::cnstr_release(x_12, 1); x_17 = x_12; } x_18 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_18); x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_18, x_13); if (lean::is_scalar(x_17)) { x_21 = lean::alloc_cnstr(0, 2, 0); } else { x_21 = x_17; } lean::cnstr_set(x_21, 0, x_20); lean::cnstr_set(x_21, 1, x_15); return x_21; } else { unsigned x_22; obj* x_23; obj* x_24; obj* x_25; x_22 = lean::string_iterator_curr(x_3); x_23 = lean::box_uint32(x_22); x_24 = lean::box_uint32(x_0); x_25 = lean::nat_dec_eq(x_23, x_24); lean::dec(x_24); if (lean::obj_tag(x_25) == 0) { obj* x_29; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_39; obj* x_40; obj* x_42; obj* x_44; obj* x_45; obj* x_47; obj* x_48; lean::dec(x_25); lean::dec(x_23); x_29 = _l_s4_char_s11_quote__core(x_22); x_30 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_30); x_32 = lean::string_append(x_30, x_29); lean::dec(x_29); x_34 = lean::string_append(x_32, x_30); x_35 = lean::box(0); x_36 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_35); lean::inc(x_36); x_39 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__2_s6___rarg(x_34, x_36, x_35, x_35, x_1, x_2, x_3, x_4); x_40 = lean::cnstr_get(x_39, 0); lean::inc(x_40); x_42 = lean::cnstr_get(x_39, 1); lean::inc(x_42); if (lean::is_shared(x_39)) { lean::dec(x_39); x_44 = lean::box(0); } else { lean::cnstr_release(x_39, 0); lean::cnstr_release(x_39, 1); x_44 = x_39; } x_45 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_45); x_47 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_45, x_40); if (lean::is_scalar(x_44)) { x_48 = lean::alloc_cnstr(0, 2, 0); } else { x_48 = x_44; } lean::cnstr_set(x_48, 0, x_47); lean::cnstr_set(x_48, 1, x_42); return x_48; } else { obj* x_52; obj* x_53; obj* x_54; obj* x_55; lean::dec(x_25); lean::dec(x_1); lean::dec(x_2); x_52 = lean::string_iterator_next(x_3); x_53 = lean::box(0); x_54 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_54, 0, x_23); lean::cnstr_set(x_54, 1, x_52); lean::cnstr_set(x_54, 2, x_53); x_55 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_55, 0, x_54); lean::cnstr_set(x_55, 1, x_4); return x_55; } } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_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, obj* x_7) { { obj* x_10; obj* x_11; unsigned char x_12; obj* x_13; obj* x_14; obj* x_15; lean::dec(x_5); lean::dec(x_4); x_10 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_2, x_6); x_11 = lean::alloc_cnstr(0, 4, 0); lean::cnstr_set(x_11, 0, x_10); lean::cnstr_set(x_11, 1, x_0); lean::cnstr_set(x_11, 2, x_1); lean::cnstr_set(x_11, 3, x_3); x_12 = 0; x_13 = lean::alloc_cnstr(1, 1, 1); lean::cnstr_set(x_13, 0, x_11); lean::cnstr_set_scalar(x_13, sizeof(void*)*1, x_12); x_14 = x_13; x_15 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_15, 0, x_14); lean::cnstr_set(x_15, 1, x_7); return x_15; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_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_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__3_s6___rarg), 8, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__4(obj* x_0, obj* x_1, obj* x_2, unsigned x_3, obj* x_4) { { obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; lean::inc(x_2); lean::inc(x_1); lean::inc(x_0); x_11 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__1(x_3, x_0, x_1, x_2, x_4); x_12 = lean::cnstr_get(x_11, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_11, 1); lean::inc(x_14); lean::dec(x_11); if (lean::obj_tag(x_12) == 0) { obj* x_17; obj* x_19; obj* x_21; obj* x_22; unsigned x_23; obj* x_27; obj* x_28; obj* x_30; x_17 = lean::cnstr_get(x_12, 1); lean::inc(x_17); x_19 = lean::cnstr_get(x_12, 2); lean::inc(x_19); if (lean::is_shared(x_12)) { lean::dec(x_12); x_21 = lean::box(0); } else { lean::cnstr_release(x_12, 0); lean::cnstr_release(x_12, 1); lean::cnstr_release(x_12, 2); x_21 = x_12; } x_22 = _l_s4_lean_s17_id__begin__escape; x_23 = lean::unbox_uint32(x_22); lean::inc(x_17); lean::inc(x_1); lean::inc(x_0); x_27 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__1(x_23, x_0, x_1, x_17, x_14); x_28 = lean::cnstr_get(x_27, 0); lean::inc(x_28); x_30 = lean::cnstr_get(x_27, 1); lean::inc(x_30); lean::dec(x_27); if (lean::obj_tag(x_28) == 0) { obj* x_37; lean::dec(x_17); lean::dec(x_21); lean::dec(x_0); lean::dec(x_1); x_37 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_28); x_5 = x_37; x_6 = x_30; goto lbl_7; } else { obj* x_38; unsigned char x_40; x_38 = lean::cnstr_get(x_28, 0); lean::inc(x_38); x_40 = lean::cnstr_get_scalar(x_28, sizeof(void*)*1); if (x_40 == 0) { unsigned char x_42; lean::dec(x_28); x_42 = lean::string_iterator_has_next(x_17); if (x_42 == 0) { obj* x_44; obj* x_45; obj* x_46; obj* x_50; obj* x_51; obj* x_53; obj* x_56; obj* x_58; obj* x_59; obj* x_60; lean::dec(x_21); x_44 = lean::box(0); x_45 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_46 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_44); lean::inc(x_46); lean::inc(x_45); x_50 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__3_s6___rarg(x_45, x_46, x_44, x_44, x_0, x_1, x_17, x_30); x_51 = lean::cnstr_get(x_50, 0); lean::inc(x_51); x_53 = lean::cnstr_get(x_50, 1); lean::inc(x_53); lean::dec(x_50); x_56 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_56); x_58 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_56, x_51); x_59 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_58); x_60 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_59); x_5 = x_60; x_6 = x_53; goto lbl_7; } else { unsigned x_61; unsigned char x_62; x_61 = lean::string_iterator_curr(x_17); x_62 = _l_s4_lean_s13_is__id__first(x_61); if (x_62 == 0) { obj* x_64; obj* x_65; obj* x_67; obj* x_69; obj* x_70; obj* x_71; obj* x_74; obj* x_75; obj* x_77; obj* x_80; obj* x_82; obj* x_83; obj* x_84; lean::dec(x_21); x_64 = _l_s4_char_s11_quote__core(x_61); x_65 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_65); x_67 = lean::string_append(x_65, x_64); lean::dec(x_64); x_69 = lean::string_append(x_67, x_65); x_70 = lean::box(0); x_71 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_70); lean::inc(x_71); x_74 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__3_s6___rarg(x_69, x_71, x_70, x_70, x_0, x_1, x_17, x_30); x_75 = lean::cnstr_get(x_74, 0); lean::inc(x_75); x_77 = lean::cnstr_get(x_74, 1); lean::inc(x_77); lean::dec(x_74); x_80 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_80); x_82 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_80, x_75); x_83 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_82); x_84 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_83); x_5 = x_84; x_6 = x_77; goto lbl_7; } else { obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; lean::dec(x_0); lean::dec(x_1); lean::dec(x_38); x_88 = lean::string_iterator_next(x_17); x_89 = lean::box(0); x_90 = lean::box_uint32(x_61); if (lean::is_scalar(x_21)) { x_91 = lean::alloc_cnstr(0, 3, 0); } else { x_91 = x_21; } lean::cnstr_set(x_91, 0, x_90); lean::cnstr_set(x_91, 1, x_88); lean::cnstr_set(x_91, 2, x_89); x_92 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_91); x_5 = x_92; x_6 = x_30; goto lbl_7; } } } else { obj* x_98; lean::dec(x_17); lean::dec(x_21); lean::dec(x_0); lean::dec(x_1); lean::dec(x_38); x_98 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_28); x_5 = x_98; x_6 = x_30; goto lbl_7; } } } else { obj* x_101; unsigned char x_103; obj* x_104; obj* x_105; obj* x_106; lean::dec(x_0); lean::dec(x_1); x_101 = lean::cnstr_get(x_12, 0); lean::inc(x_101); x_103 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); if (lean::is_shared(x_12)) { lean::dec(x_12); x_104 = lean::box(0); } else { lean::cnstr_release(x_12, 0); x_104 = x_12; } if (lean::is_scalar(x_104)) { x_105 = lean::alloc_cnstr(1, 1, 1); } else { x_105 = x_104; } lean::cnstr_set(x_105, 0, x_101); lean::cnstr_set_scalar(x_105, sizeof(void*)*1, x_103); x_106 = x_105; x_5 = x_106; x_6 = x_14; goto lbl_7; } lbl_7: { if (lean::obj_tag(x_5) == 0) { obj* x_107; obj* x_109; obj* x_110; obj* x_112; obj* x_113; x_107 = lean::cnstr_get(x_5, 0); lean::inc(x_107); if (lean::is_shared(x_5)) { lean::dec(x_5); x_109 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); x_109 = x_5; } x_110 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_110); if (lean::is_scalar(x_109)) { x_112 = lean::alloc_cnstr(0, 3, 0); } else { x_112 = x_109; } lean::cnstr_set(x_112, 0, x_107); lean::cnstr_set(x_112, 1, x_2); lean::cnstr_set(x_112, 2, x_110); x_113 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_113, 0, x_112); lean::cnstr_set(x_113, 1, x_6); return x_113; } else { obj* x_115; lean::dec(x_2); x_115 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_115, 0, x_5); lean::cnstr_set(x_115, 1, x_6); return x_115; } } } } obj* _l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__5_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_6; lean::dec(x_1); x_6 = lean::apply_3(x_0, x_2, x_3, x_4); return x_6; } } obj* _l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__5(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__5_s6___rarg), 5, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s9_str__core_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__6(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { unsigned char x_9; lean::dec(x_3); lean::dec(x_2); lean::inc(x_0); x_9 = _l_s6_string_s9_is__empty(x_0); if (x_9 == 0) { obj* x_10; obj* x_12; obj* x_14; x_10 = lean::string_length(x_0); lean::inc(x_0); x_12 = lean::string_mk_iterator(x_0); lean::inc(x_4); x_14 = _l_s9___private_580269747__s8_str__aux_s6___main(x_10, x_12, x_4); if (lean::obj_tag(x_14) == 0) { obj* x_17; obj* x_18; obj* x_20; unsigned char x_21; obj* x_22; obj* x_23; obj* x_24; lean::dec(x_14); lean::dec(x_0); x_17 = lean::box(0); x_18 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_18); x_20 = lean::alloc_cnstr(0, 4, 0); lean::cnstr_set(x_20, 0, x_4); lean::cnstr_set(x_20, 1, x_18); lean::cnstr_set(x_20, 2, x_1); lean::cnstr_set(x_20, 3, x_17); x_21 = 0; x_22 = lean::alloc_cnstr(1, 1, 1); lean::cnstr_set(x_22, 0, x_20); lean::cnstr_set_scalar(x_22, sizeof(void*)*1, x_21); x_23 = x_22; x_24 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_24, 0, x_23); lean::cnstr_set(x_24, 1, x_5); return x_24; } else { obj* x_27; obj* x_30; obj* x_31; obj* x_32; lean::dec(x_4); lean::dec(x_1); x_27 = lean::cnstr_get(x_14, 0); lean::inc(x_27); lean::dec(x_14); x_30 = lean::box(0); x_31 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_31, 0, x_0); lean::cnstr_set(x_31, 1, x_27); lean::cnstr_set(x_31, 2, x_30); x_32 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_32, 0, x_31); lean::cnstr_set(x_32, 1, x_5); return x_32; } } else { obj* x_35; obj* x_36; obj* x_39; obj* x_40; lean::dec(x_0); lean::dec(x_1); x_35 = _l_s6_string_s4_join_s11___closed__1; x_36 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_36); lean::inc(x_35); x_39 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_39, 0, x_35); lean::cnstr_set(x_39, 1, x_4); lean::cnstr_set(x_39, 2, x_36); x_40 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_40, 0, x_39); lean::cnstr_set(x_40, 1, x_5); return x_40; } } } obj* _l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__7_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { obj* x_8; obj* x_9; obj* x_11; obj* x_13; lean::inc(x_3); lean::inc(x_2); x_8 = lean::apply_4(x_0, x_2, x_3, x_4, x_5); x_9 = lean::cnstr_get(x_8, 0); lean::inc(x_9); x_11 = lean::cnstr_get(x_8, 1); lean::inc(x_11); if (lean::is_shared(x_8)) { lean::dec(x_8); x_13 = lean::box(0); } else { lean::cnstr_release(x_8, 0); lean::cnstr_release(x_8, 1); x_13 = x_8; } if (lean::obj_tag(x_9) == 0) { obj* x_14; obj* x_16; obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_27; obj* x_28; x_14 = lean::cnstr_get(x_9, 0); lean::inc(x_14); x_16 = lean::cnstr_get(x_9, 1); lean::inc(x_16); x_18 = lean::cnstr_get(x_9, 2); lean::inc(x_18); lean::dec(x_9); x_21 = lean::apply_5(x_1, x_14, x_2, x_3, x_16, x_11); x_22 = lean::cnstr_get(x_21, 0); lean::inc(x_22); x_24 = lean::cnstr_get(x_21, 1); lean::inc(x_24); lean::dec(x_21); x_27 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_18, x_22); if (lean::is_scalar(x_13)) { x_28 = lean::alloc_cnstr(0, 2, 0); } else { x_28 = x_13; } lean::cnstr_set(x_28, 0, x_27); lean::cnstr_set(x_28, 1, x_24); return x_28; } else { obj* x_32; unsigned char x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; lean::dec(x_1); lean::dec(x_2); lean::dec(x_3); x_32 = lean::cnstr_get(x_9, 0); lean::inc(x_32); x_34 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); if (lean::is_shared(x_9)) { lean::dec(x_9); x_35 = lean::box(0); } else { lean::cnstr_release(x_9, 0); x_35 = x_9; } if (lean::is_scalar(x_35)) { x_36 = lean::alloc_cnstr(1, 1, 1); } else { x_36 = x_35; } lean::cnstr_set(x_36, 0, x_32); lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_34); x_37 = x_36; if (lean::is_scalar(x_13)) { x_38 = lean::alloc_cnstr(0, 2, 0); } else { x_38 = x_13; } lean::cnstr_set(x_38, 0, x_37); lean::cnstr_set(x_38, 1, x_11); return x_38; } } } obj* _l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__7(obj* x_0, obj* x_1) { { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__7_s6___rarg), 6, 0); return x_4; } } obj* _l_s4_lean_s6_parser_s6_rec__t_s7_recurse_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__8(unsigned char x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; x_5 = lean::box(x_0); x_6 = lean::apply_4(x_1, x_5, x_2, x_3, x_4); x_7 = lean::cnstr_get(x_6, 0); lean::inc(x_7); x_9 = lean::cnstr_get(x_6, 1); lean::inc(x_9); if (lean::is_shared(x_6)) { lean::dec(x_6); x_11 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); x_11 = x_6; } x_12 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_12); x_14 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_12, x_7); if (lean::is_scalar(x_11)) { x_15 = lean::alloc_cnstr(0, 2, 0); } else { x_15 = x_11; } lean::cnstr_set(x_15, 0, x_14); lean::cnstr_set(x_15, 1, x_9); return x_15; } } obj* _l_s4_list_s6_mfoldl_s6___main_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s10___spec__10(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { { if (lean::obj_tag(x_2) == 0) { obj* x_11; obj* x_13; obj* x_14; lean::dec(x_4); lean::dec(x_0); lean::dec(x_2); lean::dec(x_3); x_11 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_11); x_13 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_13, 0, x_1); lean::cnstr_set(x_13, 1, x_5); lean::cnstr_set(x_13, 2, x_11); x_14 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_14, 0, x_13); lean::cnstr_set(x_14, 1, x_6); return x_14; } else { obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_25; obj* x_26; obj* x_28; x_15 = lean::cnstr_get(x_2, 0); lean::inc(x_15); x_17 = lean::cnstr_get(x_2, 1); lean::inc(x_17); if (lean::is_shared(x_2)) { lean::dec(x_2); x_19 = lean::box(0); } else { lean::cnstr_release(x_2, 0); lean::cnstr_release(x_2, 1); x_19 = x_2; } lean::inc(x_4); lean::inc(x_3); x_25 = lean::apply_4(x_15, x_3, x_4, x_5, x_6); x_26 = lean::cnstr_get(x_25, 0); lean::inc(x_26); x_28 = lean::cnstr_get(x_25, 1); lean::inc(x_28); lean::dec(x_25); if (lean::obj_tag(x_26) == 0) { x_20 = x_26; x_21 = x_28; goto lbl_22; } else { obj* x_31; unsigned char x_33; obj* x_34; x_31 = lean::cnstr_get(x_26, 0); lean::inc(x_31); x_33 = lean::cnstr_get_scalar(x_26, sizeof(void*)*1); if (lean::is_shared(x_26)) { lean::dec(x_26); x_34 = lean::box(0); } else { lean::cnstr_release(x_26, 0); x_34 = x_26; } if (lean::obj_tag(x_1) == 0) { if (x_33 == 0) { unsigned char x_35; obj* x_36; obj* x_37; x_35 = 0; if (lean::is_scalar(x_34)) { x_36 = lean::alloc_cnstr(1, 1, 1); } else { x_36 = x_34; } lean::cnstr_set(x_36, 0, x_31); lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_35); x_37 = x_36; x_20 = x_37; x_21 = x_28; goto lbl_22; } else { obj* x_38; obj* x_39; if (lean::is_scalar(x_34)) { x_38 = lean::alloc_cnstr(1, 1, 1); } else { x_38 = x_34; } lean::cnstr_set(x_38, 0, x_31); lean::cnstr_set_scalar(x_38, sizeof(void*)*1, x_33); x_39 = x_38; x_20 = x_39; x_21 = x_28; goto lbl_22; } } else { obj* x_40; obj* x_42; obj* x_44; obj* x_45; obj* x_47; obj* x_49; obj* x_52; obj* x_54; obj* x_55; obj* x_56; x_40 = lean::cnstr_get(x_31, 3); lean::inc(x_40); x_42 = _l_s6_option_s3_get_s6___main_s4___at_s4_lean_s6_parser_s3_run_s9___spec__2(x_40); lean::inc(x_1); x_44 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_44, 0, x_42); lean::cnstr_set(x_44, 1, x_1); x_45 = lean::cnstr_get(x_31, 0); lean::inc(x_45); x_47 = lean::cnstr_get(x_31, 1); lean::inc(x_47); x_49 = lean::cnstr_get(x_31, 2); lean::inc(x_49); lean::dec(x_31); x_52 = _l_s4_list_s7_reverse_s6___rarg(x_44); lean::inc(x_0); x_54 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_0, x_52); x_55 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_55, 0, x_54); x_56 = lean::alloc_cnstr(0, 4, 0); lean::cnstr_set(x_56, 0, x_45); lean::cnstr_set(x_56, 1, x_47); lean::cnstr_set(x_56, 2, x_49); lean::cnstr_set(x_56, 3, x_55); if (x_33 == 0) { unsigned char x_57; obj* x_58; obj* x_59; x_57 = 0; if (lean::is_scalar(x_34)) { x_58 = lean::alloc_cnstr(1, 1, 1); } else { x_58 = x_34; } lean::cnstr_set(x_58, 0, x_56); lean::cnstr_set_scalar(x_58, sizeof(void*)*1, x_57); x_59 = x_58; x_20 = x_59; x_21 = x_28; goto lbl_22; } else { obj* x_60; obj* x_61; if (lean::is_scalar(x_34)) { x_60 = lean::alloc_cnstr(1, 1, 1); } else { x_60 = x_34; } lean::cnstr_set(x_60, 0, x_56); lean::cnstr_set_scalar(x_60, sizeof(void*)*1, x_33); x_61 = x_60; x_20 = x_61; x_21 = x_28; goto lbl_22; } } } lbl_22: { if (lean::obj_tag(x_20) == 0) { obj* x_62; obj* x_64; obj* x_66; obj* x_68; obj* x_69; obj* x_70; obj* x_72; obj* x_73; x_62 = lean::cnstr_get(x_20, 0); lean::inc(x_62); x_64 = lean::cnstr_get(x_20, 1); lean::inc(x_64); x_66 = lean::cnstr_get(x_20, 2); lean::inc(x_66); if (lean::is_shared(x_20)) { lean::dec(x_20); x_68 = lean::box(0); } else { lean::cnstr_release(x_20, 0); lean::cnstr_release(x_20, 1); lean::cnstr_release(x_20, 2); x_68 = x_20; } if (lean::is_scalar(x_19)) { x_69 = lean::alloc_cnstr(1, 2, 0); } else { x_69 = x_19; } lean::cnstr_set(x_69, 0, x_62); lean::cnstr_set(x_69, 1, x_1); x_70 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_70); if (lean::is_scalar(x_68)) { x_72 = lean::alloc_cnstr(0, 3, 0); } else { x_72 = x_68; } lean::cnstr_set(x_72, 0, x_69); lean::cnstr_set(x_72, 1, x_64); lean::cnstr_set(x_72, 2, x_70); x_73 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_66, x_72); if (lean::obj_tag(x_73) == 0) { obj* x_74; obj* x_76; obj* x_78; obj* x_81; obj* x_82; obj* x_84; obj* x_86; obj* x_87; obj* x_88; x_74 = lean::cnstr_get(x_73, 0); lean::inc(x_74); x_76 = lean::cnstr_get(x_73, 1); lean::inc(x_76); x_78 = lean::cnstr_get(x_73, 2); lean::inc(x_78); lean::dec(x_73); x_81 = _l_s4_list_s6_mfoldl_s6___main_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s10___spec__10(x_0, x_74, x_17, x_3, x_4, x_76, x_21); x_82 = lean::cnstr_get(x_81, 0); lean::inc(x_82); x_84 = lean::cnstr_get(x_81, 1); lean::inc(x_84); if (lean::is_shared(x_81)) { lean::dec(x_81); x_86 = lean::box(0); } else { lean::cnstr_release(x_81, 0); lean::cnstr_release(x_81, 1); x_86 = x_81; } x_87 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_78, x_82); if (lean::is_scalar(x_86)) { x_88 = lean::alloc_cnstr(0, 2, 0); } else { x_88 = x_86; } lean::cnstr_set(x_88, 0, x_87); lean::cnstr_set(x_88, 1, x_84); return x_88; } else { obj* x_93; unsigned char x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; lean::dec(x_4); lean::dec(x_0); lean::dec(x_3); lean::dec(x_17); x_93 = lean::cnstr_get(x_73, 0); lean::inc(x_93); x_95 = lean::cnstr_get_scalar(x_73, sizeof(void*)*1); if (lean::is_shared(x_73)) { lean::dec(x_73); x_96 = lean::box(0); } else { lean::cnstr_release(x_73, 0); x_96 = x_73; } if (lean::is_scalar(x_96)) { x_97 = lean::alloc_cnstr(1, 1, 1); } else { x_97 = x_96; } lean::cnstr_set(x_97, 0, x_93); lean::cnstr_set_scalar(x_97, sizeof(void*)*1, x_95); x_98 = x_97; x_99 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_99, 0, x_98); lean::cnstr_set(x_99, 1, x_21); return x_99; } } else { obj* x_106; unsigned char x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; lean::dec(x_4); lean::dec(x_0); lean::dec(x_1); lean::dec(x_3); lean::dec(x_17); lean::dec(x_19); x_106 = lean::cnstr_get(x_20, 0); lean::inc(x_106); x_108 = lean::cnstr_get_scalar(x_20, sizeof(void*)*1); if (lean::is_shared(x_20)) { lean::dec(x_20); x_109 = lean::box(0); } else { lean::cnstr_release(x_20, 0); x_109 = x_20; } if (lean::is_scalar(x_109)) { x_110 = lean::alloc_cnstr(1, 1, 1); } else { x_110 = x_109; } lean::cnstr_set(x_110, 0, x_106); lean::cnstr_set_scalar(x_110, sizeof(void*)*1, x_108); x_111 = x_110; x_112 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_112, 0, x_111); lean::cnstr_set(x_112, 1, x_21); return x_112; } } } } } obj* _l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__9(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_13; x_6 = lean::box(0); lean::inc(x_0); x_8 = _l_s4_list_s6_mfoldl_s6___main_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s10___spec__10(x_0, x_6, x_1, x_2, x_3, x_4, x_5); x_9 = lean::cnstr_get(x_8, 0); lean::inc(x_9); x_11 = lean::cnstr_get(x_8, 1); lean::inc(x_11); if (lean::is_shared(x_8)) { lean::dec(x_8); x_13 = lean::box(0); } else { lean::cnstr_release(x_8, 0); lean::cnstr_release(x_8, 1); x_13 = x_8; } if (lean::obj_tag(x_9) == 0) { obj* x_14; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; x_14 = lean::cnstr_get(x_9, 0); lean::inc(x_14); x_16 = lean::cnstr_get(x_9, 1); lean::inc(x_16); x_18 = lean::cnstr_get(x_9, 2); lean::inc(x_18); if (lean::is_shared(x_9)) { lean::dec(x_9); x_20 = lean::box(0); } else { lean::cnstr_release(x_9, 0); lean::cnstr_release(x_9, 1); lean::cnstr_release(x_9, 2); x_20 = x_9; } x_21 = _l_s4_list_s7_reverse_s6___rarg(x_14); x_22 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_0, x_21); x_23 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_23); if (lean::is_scalar(x_20)) { x_25 = lean::alloc_cnstr(0, 3, 0); } else { x_25 = x_20; } lean::cnstr_set(x_25, 0, x_22); lean::cnstr_set(x_25, 1, x_16); lean::cnstr_set(x_25, 2, x_23); x_26 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_18, x_25); if (lean::is_scalar(x_13)) { x_27 = lean::alloc_cnstr(0, 2, 0); } else { x_27 = x_13; } lean::cnstr_set(x_27, 0, x_26); lean::cnstr_set(x_27, 1, x_11); return x_27; } else { obj* x_29; unsigned char x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; lean::dec(x_0); x_29 = lean::cnstr_get(x_9, 0); lean::inc(x_29); x_31 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); if (lean::is_shared(x_9)) { lean::dec(x_9); x_32 = lean::box(0); } else { lean::cnstr_release(x_9, 0); x_32 = x_9; } if (lean::is_scalar(x_32)) { x_33 = lean::alloc_cnstr(1, 1, 1); } else { x_33 = x_32; } lean::cnstr_set(x_33, 0, x_29); lean::cnstr_set_scalar(x_33, sizeof(void*)*1, x_31); x_34 = x_33; if (lean::is_scalar(x_13)) { x_35 = lean::alloc_cnstr(0, 2, 0); } else { x_35 = x_13; } lean::cnstr_set(x_35, 0, x_34); lean::cnstr_set(x_35, 1, x_11); return x_35; } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__1_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned x_5; obj* x_6; x_5 = lean::unbox_uint32(x_0); x_6 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__1(x_5, x_1, x_2, x_3, x_4); return x_6; } } obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__4_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned x_5; obj* x_6; x_5 = lean::unbox_uint32(x_3); x_6 = _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__4(x_0, x_1, x_2, x_5, x_4); return x_6; } } obj* _l_s4_lean_s6_parser_s6_rec__t_s7_recurse_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__8_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned char x_5; obj* x_6; x_5 = lean::unbox(x_0); x_6 = _l_s4_lean_s6_parser_s6_rec__t_s7_recurse_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__8(x_5, x_1, x_2, x_3, x_4); return x_6; } } obj* _init__l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view() { { obj* x_0; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_9; obj* x_10; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; unsigned char x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_35; obj* x_36; obj* x_40; x_0 = _l_s4_lean_s6_parser_s16_basic__parser__m_s5_monad; lean::inc(x_0); x_2 = _l_s9_reader__t_s5_monad_s6___rarg(x_0); x_3 = _l_s4_lean_s6_parser_s16_basic__parser__m_s13_monad__except; lean::inc(x_3); x_5 = _l_s9_reader__t_s13_monad__except_s6___rarg(x_3); x_6 = _l_s4_lean_s6_parser_s16_basic__parser__m_s4_lean_s6_parser_s13_monad__parsec; lean::inc(x_6); lean::inc(x_0); x_9 = _l_s4_lean_s6_parser_s6_rec__t_s4_lean_s6_parser_s13_monad__parsec_s6___rarg(x_0, lean::box(0), x_6); x_10 = _l_s4_lean_s6_parser_s16_basic__parser__m_s11_alternative; lean::inc(x_10); lean::inc(x_0); x_13 = _l_s9_reader__t_s11_alternative_s6___rarg(x_0, x_10); x_14 = lean::mk_nat_obj(46u); x_15 = lean::mk_nat_obj(55296u); x_16 = lean::nat_dec_lt(x_14, x_15); lean::dec(x_15); x_18 = lean::mk_string("."); x_19 = _l_s6_string_s5_quote(x_18); x_20 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_20, 0, x_19); x_21 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__1), 2, 0); x_22 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__1_s6___rarg), 4, 1); lean::closure_set(x_22, 0, x_21); x_23 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__5_s6___rarg), 5, 1); lean::closure_set(x_23, 0, x_22); x_24 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s11___lambda__1), 6, 1); lean::closure_set(x_24, 0, x_20); x_25 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__7_s6___rarg), 6, 2); lean::closure_set(x_25, 0, x_23); lean::closure_set(x_25, 1, x_24); x_26 = 0; x_27 = lean::box(x_26); x_28 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s6_rec__t_s7_recurse_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__8_s7___boxed), 5, 1); lean::closure_set(x_28, 0, x_27); x_29 = lean::box(0); x_30 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_30, 0, x_28); lean::cnstr_set(x_30, 1, x_29); x_31 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_31, 0, x_25); lean::cnstr_set(x_31, 1, x_30); x_32 = _l_s4_lean_s6_parser_s21_detail__ident__suffix; lean::inc(x_31); lean::inc(x_32); x_35 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__9), 6, 2); lean::closure_set(x_35, 0, x_32); lean::closure_set(x_35, 1, x_31); x_36 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s9_has__view; lean::inc(x_36); lean::inc(x_32); lean::inc(x_13); x_40 = _l_s4_lean_s6_parser_s11_combinators_s4_node_s4_view_s6___rarg(x_2, x_5, x_9, x_13, x_32, x_31, x_36); if (lean::obj_tag(x_16) == 0) { obj* x_42; obj* x_43; lean::dec(x_16); x_42 = lean::mk_nat_obj(57343u); x_43 = lean::nat_dec_lt(x_42, x_14); lean::dec(x_42); if (lean::obj_tag(x_43) == 0) { obj* x_47; obj* x_48; obj* x_49; lean::dec(x_14); lean::dec(x_43); x_47 = lean::mk_nat_obj(0u); x_48 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__1_s7___boxed), 5, 1); lean::closure_set(x_48, 0, x_47); x_49 = _l_s4_lean_s6_parser_s11_combinators_s10_seq__right_s4_view_s6___rarg(x_13, lean::box(0), lean::box(0), x_48, x_35, x_40); return x_49; } else { obj* x_51; obj* x_52; lean::dec(x_43); x_51 = lean::mk_nat_obj(1114112u); x_52 = lean::nat_dec_lt(x_14, x_51); lean::dec(x_51); if (lean::obj_tag(x_52) == 0) { obj* x_56; obj* x_57; obj* x_58; lean::dec(x_14); lean::dec(x_52); x_56 = lean::mk_nat_obj(0u); x_57 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__1_s7___boxed), 5, 1); lean::closure_set(x_57, 0, x_56); x_58 = _l_s4_lean_s6_parser_s11_combinators_s10_seq__right_s4_view_s6___rarg(x_13, lean::box(0), lean::box(0), x_57, x_35, x_40); return x_58; } else { obj* x_60; obj* x_61; lean::dec(x_52); x_60 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__1_s7___boxed), 5, 1); lean::closure_set(x_60, 0, x_14); x_61 = _l_s4_lean_s6_parser_s11_combinators_s10_seq__right_s4_view_s6___rarg(x_13, lean::box(0), lean::box(0), x_60, x_35, x_40); return x_61; } } } else { obj* x_63; obj* x_64; lean::dec(x_16); x_63 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__1_s7___boxed), 5, 1); lean::closure_set(x_63, 0, x_14); x_64 = _l_s4_lean_s6_parser_s11_combinators_s10_seq__right_s4_view_s6___rarg(x_13, lean::box(0), lean::box(0), x_63, x_35, x_40); return x_64; } } } obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__1(unsigned x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_12; x_5 = _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__1(x_0, x_1, x_2, x_3, x_4); x_6 = lean::cnstr_get(x_5, 0); lean::inc(x_6); x_8 = lean::cnstr_get(x_5, 1); lean::inc(x_8); if (lean::is_shared(x_5)) { lean::dec(x_5); x_10 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); x_10 = x_5; } x_11 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_6); if (lean::is_scalar(x_10)) { x_12 = lean::alloc_cnstr(0, 2, 0); } else { x_12 = x_10; } lean::cnstr_set(x_12, 0, x_11); lean::cnstr_set(x_12, 1, x_8); return x_12; } } obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__1(unsigned x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; lean::inc(x_3); lean::inc(x_2); lean::inc(x_1); x_11 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__1(x_0, x_1, x_2, x_3, x_4); x_12 = lean::cnstr_get(x_11, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_11, 1); lean::inc(x_14); lean::dec(x_11); if (lean::obj_tag(x_12) == 0) { obj* x_17; obj* x_19; obj* x_21; obj* x_22; unsigned x_23; obj* x_27; obj* x_28; obj* x_30; x_17 = lean::cnstr_get(x_12, 1); lean::inc(x_17); x_19 = lean::cnstr_get(x_12, 2); lean::inc(x_19); if (lean::is_shared(x_12)) { lean::dec(x_12); x_21 = lean::box(0); } else { lean::cnstr_release(x_12, 0); lean::cnstr_release(x_12, 1); lean::cnstr_release(x_12, 2); x_21 = x_12; } x_22 = _l_s4_lean_s17_id__begin__escape; x_23 = lean::unbox_uint32(x_22); lean::inc(x_17); lean::inc(x_2); lean::inc(x_1); x_27 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__1(x_23, x_1, x_2, x_17, x_14); x_28 = lean::cnstr_get(x_27, 0); lean::inc(x_28); x_30 = lean::cnstr_get(x_27, 1); lean::inc(x_30); lean::dec(x_27); if (lean::obj_tag(x_28) == 0) { obj* x_37; lean::dec(x_17); lean::dec(x_21); lean::dec(x_1); lean::dec(x_2); x_37 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_28); x_5 = x_37; x_6 = x_30; goto lbl_7; } else { obj* x_38; unsigned char x_40; x_38 = lean::cnstr_get(x_28, 0); lean::inc(x_38); x_40 = lean::cnstr_get_scalar(x_28, sizeof(void*)*1); if (x_40 == 0) { unsigned char x_42; lean::dec(x_28); x_42 = lean::string_iterator_has_next(x_17); if (x_42 == 0) { obj* x_44; obj* x_45; obj* x_46; obj* x_50; obj* x_51; obj* x_53; obj* x_56; obj* x_58; obj* x_59; obj* x_60; lean::dec(x_21); x_44 = lean::box(0); x_45 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_46 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_44); lean::inc(x_46); lean::inc(x_45); x_50 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__3_s6___rarg(x_45, x_46, x_44, x_44, x_1, x_2, x_17, x_30); x_51 = lean::cnstr_get(x_50, 0); lean::inc(x_51); x_53 = lean::cnstr_get(x_50, 1); lean::inc(x_53); lean::dec(x_50); x_56 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_56); x_58 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_56, x_51); x_59 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_58); x_60 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_59); x_5 = x_60; x_6 = x_53; goto lbl_7; } else { unsigned x_61; unsigned char x_62; x_61 = lean::string_iterator_curr(x_17); x_62 = _l_s4_lean_s13_is__id__first(x_61); if (x_62 == 0) { obj* x_64; obj* x_65; obj* x_67; obj* x_69; obj* x_70; obj* x_71; obj* x_74; obj* x_75; obj* x_77; obj* x_80; obj* x_82; obj* x_83; obj* x_84; lean::dec(x_21); x_64 = _l_s4_char_s11_quote__core(x_61); x_65 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_65); x_67 = lean::string_append(x_65, x_64); lean::dec(x_64); x_69 = lean::string_append(x_67, x_65); x_70 = lean::box(0); x_71 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_70); lean::inc(x_71); x_74 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__3_s6___rarg(x_69, x_71, x_70, x_70, x_1, x_2, x_17, x_30); x_75 = lean::cnstr_get(x_74, 0); lean::inc(x_75); x_77 = lean::cnstr_get(x_74, 1); lean::inc(x_77); lean::dec(x_74); x_80 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_80); x_82 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_80, x_75); x_83 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_82); x_84 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_83); x_5 = x_84; x_6 = x_77; goto lbl_7; } else { obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; lean::dec(x_1); lean::dec(x_2); lean::dec(x_38); x_88 = lean::string_iterator_next(x_17); x_89 = lean::box(0); x_90 = lean::box_uint32(x_61); if (lean::is_scalar(x_21)) { x_91 = lean::alloc_cnstr(0, 3, 0); } else { x_91 = x_21; } lean::cnstr_set(x_91, 0, x_90); lean::cnstr_set(x_91, 1, x_88); lean::cnstr_set(x_91, 2, x_89); x_92 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_91); x_5 = x_92; x_6 = x_30; goto lbl_7; } } } else { obj* x_98; lean::dec(x_17); lean::dec(x_21); lean::dec(x_1); lean::dec(x_2); lean::dec(x_38); x_98 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_28); x_5 = x_98; x_6 = x_30; goto lbl_7; } } } else { obj* x_101; unsigned char x_103; obj* x_104; obj* x_105; obj* x_106; lean::dec(x_1); lean::dec(x_2); x_101 = lean::cnstr_get(x_12, 0); lean::inc(x_101); x_103 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); if (lean::is_shared(x_12)) { lean::dec(x_12); x_104 = lean::box(0); } else { lean::cnstr_release(x_12, 0); x_104 = x_12; } if (lean::is_scalar(x_104)) { x_105 = lean::alloc_cnstr(1, 1, 1); } else { x_105 = x_104; } lean::cnstr_set(x_105, 0, x_101); lean::cnstr_set_scalar(x_105, sizeof(void*)*1, x_103); x_106 = x_105; x_5 = x_106; x_6 = x_14; goto lbl_7; } lbl_7: { if (lean::obj_tag(x_5) == 0) { obj* x_107; obj* x_109; obj* x_110; obj* x_112; obj* x_113; x_107 = lean::cnstr_get(x_5, 0); lean::inc(x_107); if (lean::is_shared(x_5)) { lean::dec(x_5); x_109 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); x_109 = x_5; } x_110 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_110); if (lean::is_scalar(x_109)) { x_112 = lean::alloc_cnstr(0, 3, 0); } else { x_112 = x_109; } lean::cnstr_set(x_112, 0, x_107); lean::cnstr_set(x_112, 1, x_3); lean::cnstr_set(x_112, 2, x_110); x_113 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_113, 0, x_112); lean::cnstr_set(x_113, 1, x_6); return x_113; } else { obj* x_115; lean::dec(x_3); x_115 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_115, 0, x_5); lean::cnstr_set(x_115, 1, x_6); return x_115; } } } } obj* _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__1_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned x_5; obj* x_6; x_5 = lean::unbox_uint32(x_0); x_6 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s11___lambda__1(x_5, x_1, x_2, x_3, x_4); return x_6; } } obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__1_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned x_5; obj* x_6; x_5 = lean::unbox_uint32(x_0); x_6 = _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view_s9___spec__1(x_5, x_1, x_2, x_3, x_4); return x_6; } } obj* _init__l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s11_has__tokens() { { obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; unsigned char x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_14; obj* x_17; obj* x_18; obj* x_21; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; 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); x_3 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__1), 2, 0); x_4 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__1_s6___rarg), 4, 1); lean::closure_set(x_4, 0, x_3); x_5 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__5_s6___rarg), 5, 1); lean::closure_set(x_5, 0, x_4); x_6 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s11___lambda__1), 6, 1); lean::closure_set(x_6, 0, x_2); x_7 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__7_s6___rarg), 6, 2); lean::closure_set(x_7, 0, x_5); lean::closure_set(x_7, 1, x_6); x_8 = 0; x_9 = lean::box(x_8); x_10 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s6_rec__t_s7_recurse_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__8_s7___boxed), 5, 1); lean::closure_set(x_10, 0, x_9); x_11 = lean::box(0); lean::inc(x_11); lean::inc(x_10); x_14 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_14, 0, x_10); lean::cnstr_set(x_14, 1, x_11); lean::inc(x_14); lean::inc(x_7); x_17 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_17, 0, x_7); lean::cnstr_set(x_17, 1, x_14); x_18 = _l_s4_lean_s6_parser_s21_detail__ident__suffix; lean::inc(x_17); lean::inc(x_18); x_21 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__9), 6, 2); lean::closure_set(x_21, 0, x_18); lean::closure_set(x_21, 1, x_17); lean::inc(x_11); lean::inc(x_11); lean::inc(x_11); x_25 = _l_s4_lean_s6_parser_s4_list_s4_cons_s6_tokens_s6___rarg(x_10, x_11, x_11, x_11); x_26 = _l_s4_lean_s6_parser_s4_list_s4_cons_s6_tokens_s6___rarg(x_7, x_14, x_11, x_25); x_27 = _l_s4_lean_s6_parser_s6_tokens(lean::box(0), x_17); x_28 = lean::apply_1(x_27, x_26); x_29 = _l_s4_lean_s6_parser_s6_tokens(lean::box(0), x_21); x_30 = lean::apply_1(x_29, x_28); return x_30; } } obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__1(unsigned x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; lean::inc(x_3); lean::inc(x_2); lean::inc(x_1); x_11 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__1(x_0, x_1, x_2, x_3, x_4); x_12 = lean::cnstr_get(x_11, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_11, 1); lean::inc(x_14); lean::dec(x_11); if (lean::obj_tag(x_12) == 0) { obj* x_17; obj* x_19; obj* x_21; obj* x_22; unsigned x_23; obj* x_27; obj* x_28; obj* x_30; x_17 = lean::cnstr_get(x_12, 1); lean::inc(x_17); x_19 = lean::cnstr_get(x_12, 2); lean::inc(x_19); if (lean::is_shared(x_12)) { lean::dec(x_12); x_21 = lean::box(0); } else { lean::cnstr_release(x_12, 0); lean::cnstr_release(x_12, 1); lean::cnstr_release(x_12, 2); x_21 = x_12; } x_22 = _l_s4_lean_s17_id__begin__escape; x_23 = lean::unbox_uint32(x_22); lean::inc(x_17); lean::inc(x_2); lean::inc(x_1); x_27 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__1(x_23, x_1, x_2, x_17, x_14); x_28 = lean::cnstr_get(x_27, 0); lean::inc(x_28); x_30 = lean::cnstr_get(x_27, 1); lean::inc(x_30); lean::dec(x_27); if (lean::obj_tag(x_28) == 0) { obj* x_37; lean::dec(x_17); lean::dec(x_21); lean::dec(x_1); lean::dec(x_2); x_37 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_28); x_5 = x_37; x_6 = x_30; goto lbl_7; } else { obj* x_38; unsigned char x_40; x_38 = lean::cnstr_get(x_28, 0); lean::inc(x_38); x_40 = lean::cnstr_get_scalar(x_28, sizeof(void*)*1); if (x_40 == 0) { unsigned char x_42; lean::dec(x_28); x_42 = lean::string_iterator_has_next(x_17); if (x_42 == 0) { obj* x_44; obj* x_45; obj* x_46; obj* x_50; obj* x_51; obj* x_53; obj* x_56; obj* x_58; obj* x_59; obj* x_60; lean::dec(x_21); x_44 = lean::box(0); x_45 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_46 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_44); lean::inc(x_46); lean::inc(x_45); x_50 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__3_s6___rarg(x_45, x_46, x_44, x_44, x_1, x_2, x_17, x_30); x_51 = lean::cnstr_get(x_50, 0); lean::inc(x_51); x_53 = lean::cnstr_get(x_50, 1); lean::inc(x_53); lean::dec(x_50); x_56 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_56); x_58 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_56, x_51); x_59 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_58); x_60 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_59); x_5 = x_60; x_6 = x_53; goto lbl_7; } else { unsigned x_61; unsigned char x_62; x_61 = lean::string_iterator_curr(x_17); x_62 = _l_s4_lean_s13_is__id__first(x_61); if (x_62 == 0) { obj* x_64; obj* x_65; obj* x_67; obj* x_69; obj* x_70; obj* x_71; obj* x_74; obj* x_75; obj* x_77; obj* x_80; obj* x_82; obj* x_83; obj* x_84; lean::dec(x_21); x_64 = _l_s4_char_s11_quote__core(x_61); x_65 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_65); x_67 = lean::string_append(x_65, x_64); lean::dec(x_64); x_69 = lean::string_append(x_67, x_65); x_70 = lean::box(0); x_71 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_70); lean::inc(x_71); x_74 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__3_s6___rarg(x_69, x_71, x_70, x_70, x_1, x_2, x_17, x_30); x_75 = lean::cnstr_get(x_74, 0); lean::inc(x_75); x_77 = lean::cnstr_get(x_74, 1); lean::inc(x_77); lean::dec(x_74); x_80 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_80); x_82 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_80, x_75); x_83 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_38, x_82); x_84 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_83); x_5 = x_84; x_6 = x_77; goto lbl_7; } else { obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; lean::dec(x_1); lean::dec(x_2); lean::dec(x_38); x_88 = lean::string_iterator_next(x_17); x_89 = lean::box(0); x_90 = lean::box_uint32(x_61); if (lean::is_scalar(x_21)) { x_91 = lean::alloc_cnstr(0, 3, 0); } else { x_91 = x_21; } lean::cnstr_set(x_91, 0, x_90); lean::cnstr_set(x_91, 1, x_88); lean::cnstr_set(x_91, 2, x_89); x_92 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_91); x_5 = x_92; x_6 = x_30; goto lbl_7; } } } else { obj* x_98; lean::dec(x_17); lean::dec(x_21); lean::dec(x_1); lean::dec(x_2); lean::dec(x_38); x_98 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_28); x_5 = x_98; x_6 = x_30; goto lbl_7; } } } else { obj* x_101; unsigned char x_103; obj* x_104; obj* x_105; obj* x_106; lean::dec(x_1); lean::dec(x_2); x_101 = lean::cnstr_get(x_12, 0); lean::inc(x_101); x_103 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); if (lean::is_shared(x_12)) { lean::dec(x_12); x_104 = lean::box(0); } else { lean::cnstr_release(x_12, 0); x_104 = x_12; } if (lean::is_scalar(x_104)) { x_105 = lean::alloc_cnstr(1, 1, 1); } else { x_105 = x_104; } lean::cnstr_set(x_105, 0, x_101); lean::cnstr_set_scalar(x_105, sizeof(void*)*1, x_103); x_106 = x_105; x_5 = x_106; x_6 = x_14; goto lbl_7; } lbl_7: { if (lean::obj_tag(x_5) == 0) { obj* x_107; obj* x_109; obj* x_110; obj* x_112; obj* x_113; x_107 = lean::cnstr_get(x_5, 0); lean::inc(x_107); if (lean::is_shared(x_5)) { lean::dec(x_5); x_109 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); x_109 = x_5; } x_110 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_110); if (lean::is_scalar(x_109)) { x_112 = lean::alloc_cnstr(0, 3, 0); } else { x_112 = x_109; } lean::cnstr_set(x_112, 0, x_107); lean::cnstr_set(x_112, 1, x_3); lean::cnstr_set(x_112, 2, x_110); x_113 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_113, 0, x_112); lean::cnstr_set(x_113, 1, x_6); return x_113; } else { obj* x_115; lean::dec(x_3); x_115 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_115, 0, x_5); lean::cnstr_set(x_115, 1, x_6); return x_115; } } } } obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__1_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned x_5; obj* x_6; x_5 = lean::unbox_uint32(x_0); x_6 = _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s11_has__tokens_s9___spec__1(x_5, x_1, x_2, x_3, x_4); return x_6; } } obj* _init__l_s4_lean_s6_parser_s13_detail__ident() { { obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("lean"); x_2 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); x_3 = lean::mk_string("parser"); x_4 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_4, 0, x_2); lean::cnstr_set(x_4, 1, x_3); x_5 = lean::mk_string("detail_ident"); x_6 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_6, 0, x_4); lean::cnstr_set(x_6, 1, x_5); return x_6; } } obj* _init__l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__2), 1, 0); x_2 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); return x_2; } } obj* _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1(obj* x_0) { { obj* x_1; obj* x_2; obj* x_4; x_4 = _l_s4_lean_s6_parser_s6_syntax_s8_as__node_s6___main(x_0); if (lean::obj_tag(x_4) == 0) { obj* x_6; lean::dec(x_4); x_6 = _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_6); return x_6; } else { obj* x_8; obj* x_11; x_8 = lean::cnstr_get(x_4, 0); lean::inc(x_8); lean::dec(x_4); x_11 = lean::cnstr_get(x_8, 1); lean::inc(x_11); lean::dec(x_8); if (lean::obj_tag(x_11) == 0) { obj* x_14; x_14 = lean::box(3); x_1 = x_11; x_2 = x_14; goto lbl_3; } else { obj* x_15; obj* x_17; x_15 = lean::cnstr_get(x_11, 0); lean::inc(x_15); x_17 = lean::cnstr_get(x_11, 1); lean::inc(x_17); lean::dec(x_11); x_1 = x_17; x_2 = x_15; goto lbl_3; } } lbl_3: { obj* x_20; obj* x_21; obj* x_23; x_20 = _l_s4_lean_s6_parser_s19_detail__ident__part_s9_has__view; x_21 = lean::cnstr_get(x_20, 0); lean::inc(x_21); x_23 = lean::apply_1(x_21, x_2); if (lean::obj_tag(x_1) == 0) { obj* x_25; obj* x_26; lean::dec(x_1); x_25 = lean::box(3); x_26 = _l_s4_lean_s6_parser_s6_syntax_s8_as__node_s6___main(x_25); if (lean::obj_tag(x_26) == 0) { obj* x_28; obj* x_30; lean::dec(x_26); x_28 = _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_28); x_30 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_30, 0, x_23); lean::cnstr_set(x_30, 1, x_28); return x_30; } else { obj* x_31; obj* x_33; obj* x_34; x_31 = lean::cnstr_get(x_26, 0); lean::inc(x_31); if (lean::is_shared(x_26)) { lean::dec(x_26); x_33 = lean::box(0); } else { lean::cnstr_release(x_26, 0); x_33 = x_26; } x_34 = lean::cnstr_get(x_31, 1); lean::inc(x_34); lean::dec(x_31); if (lean::obj_tag(x_34) == 0) { obj* x_39; obj* x_40; lean::dec(x_33); lean::dec(x_34); x_39 = lean::box(0); x_40 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_40, 0, x_23); lean::cnstr_set(x_40, 1, x_39); return x_40; } else { obj* x_41; obj* x_43; x_41 = lean::cnstr_get(x_34, 0); lean::inc(x_41); x_43 = lean::cnstr_get(x_34, 1); lean::inc(x_43); lean::dec(x_34); if (lean::obj_tag(x_43) == 0) { obj* x_47; obj* x_48; obj* x_50; obj* x_51; obj* x_52; lean::dec(x_43); x_47 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view; x_48 = lean::cnstr_get(x_47, 0); lean::inc(x_48); x_50 = lean::apply_1(x_48, x_41); if (lean::is_scalar(x_33)) { x_51 = lean::alloc_cnstr(1, 1, 0); } else { x_51 = x_33; } lean::cnstr_set(x_51, 0, x_50); x_52 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_52, 0, x_23); lean::cnstr_set(x_52, 1, x_51); return x_52; } else { obj* x_56; obj* x_58; lean::dec(x_41); lean::dec(x_43); lean::dec(x_33); x_56 = _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_56); x_58 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_58, 0, x_23); lean::cnstr_set(x_58, 1, x_56); return x_58; } } } } else { obj* x_59; obj* x_62; x_59 = lean::cnstr_get(x_1, 0); lean::inc(x_59); lean::dec(x_1); x_62 = _l_s4_lean_s6_parser_s6_syntax_s8_as__node_s6___main(x_59); if (lean::obj_tag(x_62) == 0) { obj* x_64; obj* x_66; lean::dec(x_62); x_64 = _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_64); x_66 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_66, 0, x_23); lean::cnstr_set(x_66, 1, x_64); return x_66; } else { obj* x_67; obj* x_69; obj* x_70; x_67 = lean::cnstr_get(x_62, 0); lean::inc(x_67); if (lean::is_shared(x_62)) { lean::dec(x_62); x_69 = lean::box(0); } else { lean::cnstr_release(x_62, 0); x_69 = x_62; } x_70 = lean::cnstr_get(x_67, 1); lean::inc(x_70); lean::dec(x_67); if (lean::obj_tag(x_70) == 0) { obj* x_75; obj* x_76; lean::dec(x_70); lean::dec(x_69); x_75 = lean::box(0); x_76 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_76, 0, x_23); lean::cnstr_set(x_76, 1, x_75); return x_76; } else { obj* x_77; obj* x_79; x_77 = lean::cnstr_get(x_70, 0); lean::inc(x_77); x_79 = lean::cnstr_get(x_70, 1); lean::inc(x_79); lean::dec(x_70); if (lean::obj_tag(x_79) == 0) { obj* x_83; obj* x_84; obj* x_86; obj* x_87; obj* x_88; lean::dec(x_79); x_83 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view; x_84 = lean::cnstr_get(x_83, 0); lean::inc(x_84); x_86 = lean::apply_1(x_84, x_77); if (lean::is_scalar(x_69)) { x_87 = lean::alloc_cnstr(1, 1, 0); } else { x_87 = x_69; } lean::cnstr_set(x_87, 0, x_86); x_88 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_88, 0, x_23); lean::cnstr_set(x_88, 1, x_87); return x_88; } else { obj* x_92; obj* x_94; lean::dec(x_77); lean::dec(x_69); lean::dec(x_79); x_92 = _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_92); x_94 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_94, 0, x_23); lean::cnstr_set(x_94, 1, x_92); return x_94; } } } } } } } obj* _init__l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; x_0 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::box(3); x_4 = lean::apply_1(x_1, x_3); x_5 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_5, 0, x_4); return x_5; } } obj* _init__l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__2() { { obj* x_0; obj* x_1; obj* x_3; obj* x_4; x_3 = lean::box(0); x_4 = lean::box(3); x_0 = x_3; x_1 = x_4; goto lbl_2; lbl_2: { obj* x_5; obj* x_6; obj* x_8; x_5 = _l_s4_lean_s6_parser_s19_detail__ident__part_s9_has__view; x_6 = lean::cnstr_get(x_5, 0); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_1); if (lean::obj_tag(x_0) == 0) { obj* x_10; obj* x_11; lean::dec(x_0); x_10 = lean::box(3); x_11 = _l_s4_lean_s6_parser_s6_syntax_s8_as__node_s6___main(x_10); if (lean::obj_tag(x_11) == 0) { obj* x_13; obj* x_15; lean::dec(x_11); x_13 = _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_13); x_15 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_15, 0, x_8); lean::cnstr_set(x_15, 1, x_13); return x_15; } else { obj* x_16; obj* x_18; obj* x_19; x_16 = lean::cnstr_get(x_11, 0); lean::inc(x_16); if (lean::is_shared(x_11)) { lean::dec(x_11); x_18 = lean::box(0); } else { lean::cnstr_release(x_11, 0); x_18 = x_11; } x_19 = lean::cnstr_get(x_16, 1); lean::inc(x_19); lean::dec(x_16); if (lean::obj_tag(x_19) == 0) { obj* x_24; obj* x_25; lean::dec(x_19); lean::dec(x_18); x_24 = lean::box(0); x_25 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_25, 0, x_8); lean::cnstr_set(x_25, 1, x_24); return x_25; } else { obj* x_26; obj* x_28; x_26 = lean::cnstr_get(x_19, 0); lean::inc(x_26); x_28 = lean::cnstr_get(x_19, 1); lean::inc(x_28); lean::dec(x_19); if (lean::obj_tag(x_28) == 0) { obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; lean::dec(x_28); x_32 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view; x_33 = lean::cnstr_get(x_32, 0); lean::inc(x_33); x_35 = lean::apply_1(x_33, x_26); if (lean::is_scalar(x_18)) { x_36 = lean::alloc_cnstr(1, 1, 0); } else { x_36 = x_18; } lean::cnstr_set(x_36, 0, x_35); x_37 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_37, 0, x_8); lean::cnstr_set(x_37, 1, x_36); return x_37; } else { obj* x_41; obj* x_43; lean::dec(x_18); lean::dec(x_26); lean::dec(x_28); x_41 = _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_41); x_43 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_43, 0, x_8); lean::cnstr_set(x_43, 1, x_41); return x_43; } } } } else { obj* x_44; obj* x_47; x_44 = lean::cnstr_get(x_0, 0); lean::inc(x_44); lean::dec(x_0); x_47 = _l_s4_lean_s6_parser_s6_syntax_s8_as__node_s6___main(x_44); if (lean::obj_tag(x_47) == 0) { obj* x_49; obj* x_51; lean::dec(x_47); x_49 = _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_49); x_51 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_51, 0, x_8); lean::cnstr_set(x_51, 1, x_49); return x_51; } else { obj* x_52; obj* x_54; obj* x_55; x_52 = lean::cnstr_get(x_47, 0); lean::inc(x_52); if (lean::is_shared(x_47)) { lean::dec(x_47); x_54 = lean::box(0); } else { lean::cnstr_release(x_47, 0); x_54 = x_47; } x_55 = lean::cnstr_get(x_52, 1); lean::inc(x_55); lean::dec(x_52); if (lean::obj_tag(x_55) == 0) { obj* x_60; obj* x_61; lean::dec(x_54); lean::dec(x_55); x_60 = lean::box(0); x_61 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_61, 0, x_8); lean::cnstr_set(x_61, 1, x_60); return x_61; } else { obj* x_62; obj* x_64; x_62 = lean::cnstr_get(x_55, 0); lean::inc(x_62); x_64 = lean::cnstr_get(x_55, 1); lean::inc(x_64); lean::dec(x_55); if (lean::obj_tag(x_64) == 0) { obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_73; lean::dec(x_64); x_68 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view; x_69 = lean::cnstr_get(x_68, 0); lean::inc(x_69); x_71 = lean::apply_1(x_69, x_62); if (lean::is_scalar(x_54)) { x_72 = lean::alloc_cnstr(1, 1, 0); } else { x_72 = x_54; } lean::cnstr_set(x_72, 0, x_71); x_73 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_73, 0, x_8); lean::cnstr_set(x_73, 1, x_72); return x_73; } else { obj* x_77; obj* x_79; lean::dec(x_62); lean::dec(x_64); lean::dec(x_54); x_77 = _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_77); x_79 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_79, 0, x_8); lean::cnstr_set(x_79, 1, x_77); return x_79; } } } } } } } obj* _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__2(obj* x_0) { { obj* x_1; obj* x_3; obj* x_6; obj* x_7; obj* x_9; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); lean::inc(x_3); lean::dec(x_0); x_6 = _l_s4_lean_s6_parser_s19_detail__ident__part_s9_has__view; x_7 = lean::cnstr_get(x_6, 1); lean::inc(x_7); x_9 = lean::apply_1(x_7, x_1); if (lean::obj_tag(x_3) == 0) { obj* x_11; obj* x_13; obj* x_14; obj* x_16; lean::dec(x_3); x_11 = _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__2_s11___closed__1; lean::inc(x_11); x_13 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_13, 0, x_9); lean::cnstr_set(x_13, 1, x_11); x_14 = _l_s4_lean_s6_parser_s13_detail__ident; lean::inc(x_14); x_16 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_14, x_13); return x_16; } else { obj* x_17; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; x_17 = lean::cnstr_get(x_3, 0); lean::inc(x_17); lean::dec(x_3); x_20 = lean::box(0); x_21 = _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view; x_22 = lean::cnstr_get(x_21, 1); lean::inc(x_22); x_24 = lean::apply_1(x_22, x_17); lean::inc(x_20); x_26 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_26, 0, x_24); lean::cnstr_set(x_26, 1, x_20); x_27 = _l_s4_lean_s6_parser_s8_no__kind; lean::inc(x_27); x_29 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_27, x_26); x_30 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_30, 0, x_29); lean::cnstr_set(x_30, 1, x_20); x_31 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_31, 0, x_9); lean::cnstr_set(x_31, 1, x_30); x_32 = _l_s4_lean_s6_parser_s13_detail__ident; lean::inc(x_32); x_34 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_32, x_31); return x_34; } } } obj* _init__l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__2_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_4; obj* x_5; x_0 = lean::box(0); x_1 = _l_s4_lean_s6_parser_s8_no__kind; lean::inc(x_0); lean::inc(x_1); x_4 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_1, x_0); x_5 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_5, 0, x_4); lean::cnstr_set(x_5, 1, x_0); return x_5; } } obj* _init__l_s4_lean_s6_parser_s13_detail__ident_s9_has__view() { { obj* x_0; x_0 = _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27; lean::inc(x_0); return x_0; } } obj* _l_s4_lean_s6_parser_s17_detail__ident_x27(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_8; x_4 = _l_s4_lean_s6_parser_s13_detail__ident; x_5 = _l_s4_lean_s6_parser_s17_detail__ident_x27_s11___closed__1; lean::inc(x_5); lean::inc(x_4); x_8 = _l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__9(x_4, x_5, x_0, x_1, x_2, x_3); return x_8; } } obj* _init__l_s4_lean_s6_parser_s17_detail__ident_x27_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser), 3, 0); x_1 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s17_detail__ident_x27_s9___spec__1_s6___rarg), 5, 1); lean::closure_set(x_1, 0, x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser), 4, 0); x_3 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_combinators_s8_optional_s4___at_s4_lean_s6_parser_s17_detail__ident_x27_s9___spec__2), 5, 1); lean::closure_set(x_3, 0, x_2); x_4 = lean::box(0); x_5 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_5, 0, x_3); lean::cnstr_set(x_5, 1, x_4); x_6 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_6, 0, x_1); lean::cnstr_set(x_6, 1, x_5); return x_6; } } obj* _l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s17_detail__ident_x27_s9___spec__1_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_6; lean::dec(x_1); x_6 = lean::apply_3(x_0, x_2, x_3, x_4); return x_6; } } obj* _l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s17_detail__ident_x27_s9___spec__1(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s17_detail__ident_x27_s9___spec__1_s6___rarg), 5, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s11_combinators_s8_optional_s4___at_s4_lean_s6_parser_s17_detail__ident_x27_s9___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_13; obj* x_14; obj* x_16; x_8 = lean::box(0); lean::inc(x_3); x_13 = lean::apply_4(x_0, x_1, x_2, x_3, x_4); x_14 = lean::cnstr_get(x_13, 0); lean::inc(x_14); x_16 = lean::cnstr_get(x_13, 1); lean::inc(x_16); lean::dec(x_13); if (lean::obj_tag(x_14) == 0) { if (lean::obj_tag(x_14) == 0) { obj* x_19; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; x_19 = lean::cnstr_get(x_14, 0); lean::inc(x_19); x_21 = lean::cnstr_get(x_14, 1); lean::inc(x_21); x_23 = lean::cnstr_get(x_14, 2); lean::inc(x_23); if (lean::is_shared(x_14)) { lean::dec(x_14); x_25 = lean::box(0); } else { lean::cnstr_release(x_14, 0); lean::cnstr_release(x_14, 1); lean::cnstr_release(x_14, 2); x_25 = x_14; } x_26 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_26, 0, x_19); x_27 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_27); if (lean::is_scalar(x_25)) { x_29 = lean::alloc_cnstr(0, 3, 0); } else { x_29 = x_25; } lean::cnstr_set(x_29, 0, x_26); lean::cnstr_set(x_29, 1, x_21); lean::cnstr_set(x_29, 2, x_27); x_30 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_23, x_29); x_9 = x_30; x_10 = x_16; goto lbl_11; } else { obj* x_31; unsigned char x_33; obj* x_34; obj* x_35; obj* x_36; x_31 = lean::cnstr_get(x_14, 0); lean::inc(x_31); x_33 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); if (lean::is_shared(x_14)) { lean::dec(x_14); x_34 = lean::box(0); } else { lean::cnstr_release(x_14, 0); x_34 = x_14; } if (lean::is_scalar(x_34)) { x_35 = lean::alloc_cnstr(1, 1, 1); } else { x_35 = x_34; } lean::cnstr_set(x_35, 0, x_31); lean::cnstr_set_scalar(x_35, sizeof(void*)*1, x_33); x_36 = x_35; x_9 = x_36; x_10 = x_16; goto lbl_11; } } else { obj* x_37; unsigned char x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_47; obj* x_50; obj* x_52; obj* x_53; obj* x_55; obj* x_56; obj* x_57; x_37 = lean::cnstr_get(x_14, 0); lean::inc(x_37); x_39 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); if (lean::is_shared(x_14)) { lean::dec(x_14); x_40 = lean::box(0); } else { lean::cnstr_release(x_14, 0); x_40 = x_14; } 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 = lean::cnstr_get(x_37, 3); lean::inc(x_47); lean::dec(x_37); x_50 = _l_s6_option_s3_get_s6___main_s4___at_s4_lean_s6_parser_s3_run_s9___spec__2(x_47); lean::inc(x_8); x_52 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_52, 0, x_50); lean::cnstr_set(x_52, 1, x_8); x_53 = _l_s4_lean_s6_parser_s8_no__kind; lean::inc(x_53); x_55 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_53, x_52); x_56 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_56, 0, x_55); x_57 = lean::alloc_cnstr(0, 4, 0); lean::cnstr_set(x_57, 0, x_41); lean::cnstr_set(x_57, 1, x_43); lean::cnstr_set(x_57, 2, x_45); lean::cnstr_set(x_57, 3, x_56); if (x_39 == 0) { unsigned char x_58; obj* x_59; obj* x_60; x_58 = 0; if (lean::is_scalar(x_40)) { x_59 = lean::alloc_cnstr(1, 1, 1); } else { x_59 = x_40; } lean::cnstr_set(x_59, 0, x_57); lean::cnstr_set_scalar(x_59, sizeof(void*)*1, x_58); x_60 = x_59; x_9 = x_60; x_10 = x_16; goto lbl_11; } else { obj* x_61; obj* x_62; if (lean::is_scalar(x_40)) { x_61 = lean::alloc_cnstr(1, 1, 1); } else { x_61 = x_40; } lean::cnstr_set(x_61, 0, x_57); lean::cnstr_set_scalar(x_61, sizeof(void*)*1, x_39); x_62 = x_61; x_9 = x_62; x_10 = x_16; goto lbl_11; } } lbl_7: { if (lean::obj_tag(x_5) == 0) { obj* x_63; obj* x_65; obj* x_67; obj* x_69; x_63 = lean::cnstr_get(x_5, 0); lean::inc(x_63); x_65 = lean::cnstr_get(x_5, 1); lean::inc(x_65); x_67 = lean::cnstr_get(x_5, 2); lean::inc(x_67); if (lean::is_shared(x_5)) { lean::dec(x_5); x_69 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); x_69 = x_5; } if (lean::obj_tag(x_63) == 0) { obj* x_71; obj* x_72; obj* x_75; obj* x_76; obj* x_77; lean::dec(x_63); x_71 = _l_s4_lean_s6_parser_s11_combinators_s4_many_s6___rarg_s11___closed__1; x_72 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_72); lean::inc(x_71); if (lean::is_scalar(x_69)) { x_75 = lean::alloc_cnstr(0, 3, 0); } else { x_75 = x_69; } lean::cnstr_set(x_75, 0, x_71); lean::cnstr_set(x_75, 1, x_65); lean::cnstr_set(x_75, 2, x_72); x_76 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_67, x_75); x_77 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_77, 0, x_76); lean::cnstr_set(x_77, 1, x_6); return x_77; } else { obj* x_78; obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_86; obj* x_88; obj* x_89; obj* x_90; x_78 = lean::cnstr_get(x_63, 0); lean::inc(x_78); lean::dec(x_63); x_81 = lean::box(0); x_82 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_82, 0, x_78); lean::cnstr_set(x_82, 1, x_81); x_83 = _l_s4_lean_s6_parser_s8_no__kind; lean::inc(x_83); x_85 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_83, x_82); x_86 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_86); if (lean::is_scalar(x_69)) { x_88 = lean::alloc_cnstr(0, 3, 0); } else { x_88 = x_69; } lean::cnstr_set(x_88, 0, x_85); lean::cnstr_set(x_88, 1, x_65); lean::cnstr_set(x_88, 2, x_86); x_89 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_67, x_88); x_90 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_90, 0, x_89); lean::cnstr_set(x_90, 1, x_6); return x_90; } } else { obj* x_91; unsigned char x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; x_91 = lean::cnstr_get(x_5, 0); lean::inc(x_91); x_93 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); if (lean::is_shared(x_5)) { lean::dec(x_5); x_94 = lean::box(0); } else { lean::cnstr_release(x_5, 0); x_94 = x_5; } if (lean::is_scalar(x_94)) { x_95 = lean::alloc_cnstr(1, 1, 1); } else { x_95 = x_94; } lean::cnstr_set(x_95, 0, x_91); lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_93); x_96 = x_95; x_97 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_97, 0, x_96); lean::cnstr_set(x_97, 1, x_6); return x_97; } } lbl_11: { if (lean::obj_tag(x_9) == 0) { lean::dec(x_8); lean::dec(x_3); x_5 = x_9; x_6 = x_10; goto lbl_7; } else { obj* x_100; unsigned char x_102; x_100 = lean::cnstr_get(x_9, 0); lean::inc(x_100); x_102 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); if (x_102 == 0) { obj* x_104; obj* x_107; obj* x_109; obj* x_110; obj* x_111; lean::dec(x_9); x_104 = lean::cnstr_get(x_100, 2); lean::inc(x_104); lean::dec(x_100); x_107 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_107); x_109 = lean::alloc_closure(reinterpret_cast(_l_s8_function_s4_comp_s6___rarg), 3, 2); lean::closure_set(x_109, 0, x_104); lean::closure_set(x_109, 1, x_107); x_110 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_110, 0, x_109); x_111 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_111, 0, x_8); lean::cnstr_set(x_111, 1, x_3); lean::cnstr_set(x_111, 2, x_110); x_5 = x_111; x_6 = x_10; goto lbl_7; } else { lean::dec(x_100); lean::dec(x_8); lean::dec(x_3); x_5 = x_9; x_6 = x_10; goto lbl_7; } } } } } obj* _l_s4_lean_s6_parser_s13_detail__ident_s6_parser(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_7; x_3 = _l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___closed__1; x_4 = _l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___closed__2; lean::inc(x_4); lean::inc(x_3); x_7 = _l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__1(x_3, x_4, x_0, x_1, x_2); return x_7; } } obj* _init__l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___closed__1() { { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s17_detail__ident_x27), 4, 0); return x_0; } } obj* _init__l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___closed__2() { { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___lambda__1_s7___boxed), 5, 0); return x_0; } } obj* _l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___lambda__1(unsigned char x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_5; obj* x_6; obj* x_9; x_5 = _l_s4_lean_s6_parser_s13_detail__ident; x_6 = _l_s4_lean_s6_parser_s17_detail__ident_x27_s11___closed__1; lean::inc(x_6); lean::inc(x_5); x_9 = _l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s9___spec__9(x_5, x_6, x_1, x_2, x_3, x_4); return x_9; } } obj* _l_s9___private_3693562977__s8_run__aux_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__3(obj* x_0, obj* x_1, obj* x_2, unsigned char x_3, obj* x_4, obj* x_5, obj* x_6) { { obj* x_7; obj* x_8; obj* x_9; x_7 = lean::box(x_3); x_8 = _l_s9___private_3693562977__s8_run__aux_s6___main_s6___rarg(x_0, x_1, x_2, x_7); x_9 = lean::apply_3(x_8, x_4, x_5, x_6); return x_9; } } obj* _l_s4_lean_s6_parser_s6_rec__t_s3_run_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { { obj* x_7; obj* x_8; x_7 = lean::alloc_closure(reinterpret_cast(_l_s9___private_3693562977__s8_run__aux_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__3_s7___boxed), 7, 3); lean::closure_set(x_7, 0, x_1); lean::closure_set(x_7, 1, x_2); lean::closure_set(x_7, 2, x_3); x_8 = lean::apply_4(x_0, x_7, x_4, x_5, x_6); return x_8; } } obj* _l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_5; obj* x_6; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; x_5 = lean::string_iterator_remaining(x_3); x_6 = lean::mk_nat_obj(1u); x_7 = lean::nat_add(x_5, x_6); lean::dec(x_6); lean::dec(x_5); x_10 = _l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__1_s11___closed__1; lean::inc(x_10); x_12 = _l_s4_lean_s6_parser_s6_rec__t_s3_run_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__2(x_0, x_10, x_1, x_7, x_2, x_3, x_4); x_13 = lean::cnstr_get(x_12, 0); lean::inc(x_13); x_15 = lean::cnstr_get(x_12, 1); lean::inc(x_15); if (lean::is_shared(x_12)) { lean::dec(x_12); x_17 = lean::box(0); } else { lean::cnstr_release(x_12, 0); lean::cnstr_release(x_12, 1); x_17 = x_12; } x_18 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_18); x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_18, x_13); if (lean::is_scalar(x_17)) { x_21 = lean::alloc_cnstr(0, 2, 0); } else { x_21 = x_17; } lean::cnstr_set(x_21, 0, x_20); lean::cnstr_set(x_21, 1, x_15); return x_21; } } obj* _init__l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__1_s11___closed__1() { { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__1_s11___lambda__1_s7___boxed), 4, 0); return x_0; } } obj* _l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__1_s11___lambda__1(unsigned char x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_6; obj* x_10; x_4 = lean::box(0); x_5 = _l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s6___rarg_s11___lambda__1_s11___closed__1; x_6 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); x_10 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_5, x_6, x_4, x_4, x_1, x_2, x_3); return x_10; } } obj* _l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___lambda__1_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned char x_5; obj* x_6; x_5 = lean::unbox(x_0); x_6 = _l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___lambda__1(x_5, x_1, x_2, x_3, x_4); return x_6; } } obj* _l_s9___private_3693562977__s8_run__aux_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__3_s7___boxed(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; x_7 = lean::unbox(x_3); x_8 = _l_s9___private_3693562977__s8_run__aux_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__3(x_0, x_1, x_2, x_7, x_4, x_5, x_6); return x_8; } } obj* _l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__1_s11___lambda__1_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned char x_4; obj* x_5; x_4 = lean::unbox(x_0); x_5 = _l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__1_s11___lambda__1(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s9___private_3519775105__s9_ident_x27(obj* x_0, obj* x_1, obj* x_2) { { obj* x_5; obj* x_6; obj* x_8; obj* x_10; lean::inc(x_1); lean::inc(x_0); x_5 = _l_s4_lean_s6_parser_s8_id__part_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__1(x_0, x_1, x_2); x_6 = lean::cnstr_get(x_5, 0); lean::inc(x_6); x_8 = lean::cnstr_get(x_5, 1); lean::inc(x_8); if (lean::is_shared(x_5)) { lean::dec(x_5); x_10 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); x_10 = x_5; } if (lean::obj_tag(x_6) == 0) { obj* x_11; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; unsigned x_22; x_11 = lean::cnstr_get(x_6, 0); lean::inc(x_11); x_13 = lean::cnstr_get(x_6, 1); lean::inc(x_13); x_15 = lean::cnstr_get(x_6, 2); lean::inc(x_15); if (lean::is_shared(x_6)) { lean::dec(x_6); x_17 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); lean::cnstr_release(x_6, 2); x_17 = x_6; } x_18 = lean::mk_nat_obj(46u); x_19 = lean::mk_nat_obj(55296u); x_20 = lean::nat_dec_lt(x_18, x_19); lean::dec(x_19); if (lean::obj_tag(x_20) == 0) { obj* x_25; obj* x_26; lean::dec(x_20); x_25 = lean::mk_nat_obj(57343u); x_26 = lean::nat_dec_lt(x_25, x_18); lean::dec(x_25); if (lean::obj_tag(x_26) == 0) { obj* x_30; unsigned x_31; lean::dec(x_18); lean::dec(x_26); x_30 = lean::mk_nat_obj(0u); x_31 = lean::unbox_uint32(x_30); lean::dec(x_30); x_22 = x_31; goto lbl_23; } else { obj* x_34; obj* x_35; lean::dec(x_26); x_34 = lean::mk_nat_obj(1114112u); x_35 = lean::nat_dec_lt(x_18, x_34); lean::dec(x_34); if (lean::obj_tag(x_35) == 0) { obj* x_39; unsigned x_40; lean::dec(x_18); lean::dec(x_35); x_39 = lean::mk_nat_obj(0u); x_40 = lean::unbox_uint32(x_39); lean::dec(x_39); x_22 = x_40; goto lbl_23; } else { unsigned x_43; lean::dec(x_35); x_43 = lean::unbox_uint32(x_18); lean::dec(x_18); x_22 = x_43; goto lbl_23; } } } else { unsigned x_46; lean::dec(x_20); x_46 = lean::unbox_uint32(x_18); lean::dec(x_18); x_22 = x_46; goto lbl_23; } lbl_23: { obj* x_48; obj* x_49; obj* x_51; x_48 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_foldl_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__20(x_11, x_22, x_0, x_13, x_8); x_49 = lean::cnstr_get(x_48, 0); lean::inc(x_49); x_51 = lean::cnstr_get(x_48, 1); lean::inc(x_51); lean::dec(x_48); if (lean::obj_tag(x_49) == 0) { obj* x_54; obj* x_56; obj* x_58; obj* x_63; obj* x_64; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_74; obj* x_75; obj* x_76; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_83; obj* x_84; x_54 = lean::cnstr_get(x_49, 0); lean::inc(x_54); x_56 = lean::cnstr_get(x_49, 1); lean::inc(x_56); x_58 = lean::cnstr_get(x_49, 2); lean::inc(x_58); lean::dec(x_49); lean::inc(x_1); lean::inc(x_1); x_63 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_63, 0, x_1); lean::cnstr_set(x_63, 1, x_1); x_64 = lean::string_iterator_offset(x_1); lean::inc(x_56); lean::inc(x_56); x_67 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_67, 0, x_56); lean::cnstr_set(x_67, 1, x_56); x_68 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_68, 0, x_63); lean::cnstr_set(x_68, 1, x_64); lean::cnstr_set(x_68, 2, x_67); x_69 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_69, 0, x_68); lean::inc(x_56); x_71 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_71, 0, x_1); lean::cnstr_set(x_71, 1, x_56); x_72 = lean::box(0); lean::inc(x_72); x_74 = lean::alloc_cnstr(0, 5, 0); lean::cnstr_set(x_74, 0, x_69); lean::cnstr_set(x_74, 1, x_71); lean::cnstr_set(x_74, 2, x_54); lean::cnstr_set(x_74, 3, x_72); lean::cnstr_set(x_74, 4, x_72); x_75 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_75, 0, x_74); x_76 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_76); if (lean::is_scalar(x_17)) { x_78 = lean::alloc_cnstr(0, 3, 0); } else { x_78 = x_17; } lean::cnstr_set(x_78, 0, x_75); lean::cnstr_set(x_78, 1, x_56); lean::cnstr_set(x_78, 2, x_76); x_79 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_58, x_78); x_80 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_79); x_81 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_81); x_83 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_81, x_80); if (lean::is_scalar(x_10)) { x_84 = lean::alloc_cnstr(0, 2, 0); } else { x_84 = x_10; } lean::cnstr_set(x_84, 0, x_83); lean::cnstr_set(x_84, 1, x_51); return x_84; } else { obj* x_87; unsigned char x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_96; obj* x_97; lean::dec(x_17); lean::dec(x_1); x_87 = lean::cnstr_get(x_49, 0); lean::inc(x_87); x_89 = lean::cnstr_get_scalar(x_49, sizeof(void*)*1); if (lean::is_shared(x_49)) { lean::dec(x_49); x_90 = lean::box(0); } else { lean::cnstr_release(x_49, 0); x_90 = x_49; } if (lean::is_scalar(x_90)) { x_91 = lean::alloc_cnstr(1, 1, 1); } else { x_91 = x_90; } lean::cnstr_set(x_91, 0, x_87); lean::cnstr_set_scalar(x_91, sizeof(void*)*1, x_89); x_92 = x_91; x_93 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_92); x_94 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_94); x_96 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_94, x_93); if (lean::is_scalar(x_10)) { x_97 = lean::alloc_cnstr(0, 2, 0); } else { x_97 = x_10; } lean::cnstr_set(x_97, 0, x_96); lean::cnstr_set(x_97, 1, x_51); return x_97; } } } else { obj* x_100; unsigned char x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_108; obj* x_109; lean::dec(x_0); lean::dec(x_1); x_100 = lean::cnstr_get(x_6, 0); lean::inc(x_100); x_102 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); if (lean::is_shared(x_6)) { lean::dec(x_6); x_103 = lean::box(0); } else { lean::cnstr_release(x_6, 0); x_103 = x_6; } if (lean::is_scalar(x_103)) { x_104 = lean::alloc_cnstr(1, 1, 1); } else { x_104 = x_103; } lean::cnstr_set(x_104, 0, x_100); lean::cnstr_set_scalar(x_104, sizeof(void*)*1, x_102); x_105 = x_104; x_106 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_106); x_108 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_106, x_105); if (lean::is_scalar(x_10)) { x_109 = lean::alloc_cnstr(0, 2, 0); } else { x_109 = x_10; } lean::cnstr_set(x_109, 0, x_108); lean::cnstr_set(x_109, 1, x_8); return x_109; } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s4_curr_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__2_s6___rarg(obj* x_0, obj* x_1) { { unsigned x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_7; x_2 = lean::string_iterator_curr(x_0); x_3 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; x_4 = lean::box_uint32(x_2); lean::inc(x_3); x_6 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_6, 0, x_4); lean::cnstr_set(x_6, 1, x_0); lean::cnstr_set(x_6, 2, x_3); x_7 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_7, 0, x_6); lean::cnstr_set(x_7, 1, x_1); return x_7; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s4_curr_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__2(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_s4_curr_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__2_s6___rarg), 2, 0); return x_2; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_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_lean_s12_is__id__rest(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_3519775105__s9_ident_x27_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_3519775105__s9_ident_x27_s9___spec__4(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__5(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_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_lean_s12_is__id__rest(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_3519775105__s9_ident_x27_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_3519775105__s9_ident_x27_s9___spec__6(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__7(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_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_lean_s12_is__id__rest(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_3519775105__s9_ident_x27_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_3519775105__s9_ident_x27_s9___spec__8(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; lean::dec(x_1); x_5 = lean::string_iterator_curr(x_0); lean::dec(x_0); x_7 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_7); x_9 = lean::string_push(x_7, x_5); x_10 = lean::string_iterator_remaining(x_2); x_11 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__9(x_10, x_9, x_2); x_12 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_12, 0, x_11); lean::cnstr_set(x_12, 1, x_3); return x_12; } } obj* _l_s4_lean_s6_parser_s17_id__part__default_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__3(obj* x_0, obj* x_1, obj* x_2) { { unsigned char x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { obj* x_4; obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; x_4 = lean::box(0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_6 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); x_11 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); x_12 = lean::cnstr_get(x_11, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_11, 1); lean::inc(x_14); if (lean::is_shared(x_11)) { lean::dec(x_11); x_16 = lean::box(0); } else { lean::cnstr_release(x_11, 0); lean::cnstr_release(x_11, 1); x_16 = x_11; } x_17 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_17); x_19 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_12); if (lean::obj_tag(x_19) == 0) { obj* x_20; obj* x_22; obj* x_24; unsigned x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; x_20 = lean::cnstr_get(x_19, 0); lean::inc(x_20); x_22 = lean::cnstr_get(x_19, 1); lean::inc(x_22); x_24 = lean::cnstr_get(x_19, 2); lean::inc(x_24); lean::dec(x_19); x_27 = lean::unbox_uint32(x_20); lean::dec(x_20); x_29 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__4(x_27, x_0, x_22, x_14); x_30 = lean::cnstr_get(x_29, 0); lean::inc(x_30); x_32 = lean::cnstr_get(x_29, 1); lean::inc(x_32); lean::dec(x_29); x_35 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_24, x_30); if (lean::is_scalar(x_16)) { x_36 = lean::alloc_cnstr(0, 2, 0); } else { x_36 = x_16; } lean::cnstr_set(x_36, 0, x_35); lean::cnstr_set(x_36, 1, x_32); return x_36; } else { obj* x_38; unsigned char x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; lean::dec(x_0); x_38 = lean::cnstr_get(x_19, 0); lean::inc(x_38); x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); if (lean::is_shared(x_19)) { lean::dec(x_19); x_41 = lean::box(0); } else { lean::cnstr_release(x_19, 0); x_41 = x_19; } if (lean::is_scalar(x_41)) { x_42 = lean::alloc_cnstr(1, 1, 1); } else { x_42 = x_41; } lean::cnstr_set(x_42, 0, x_38); lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); x_43 = x_42; if (lean::is_scalar(x_16)) { x_44 = lean::alloc_cnstr(0, 2, 0); } else { x_44 = x_16; } lean::cnstr_set(x_44, 0, x_43); lean::cnstr_set(x_44, 1, x_14); return x_44; } } else { unsigned x_45; unsigned char x_46; x_45 = lean::string_iterator_curr(x_1); x_46 = _l_s4_lean_s13_is__id__first(x_45); if (x_46 == 0) { obj* x_47; obj* x_48; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_66; x_47 = _l_s4_char_s11_quote__core(x_45); x_48 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_48); x_50 = lean::string_append(x_48, x_47); lean::dec(x_47); x_52 = lean::string_append(x_50, x_48); x_53 = lean::box(0); x_54 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_53); lean::inc(x_54); x_58 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_52, x_54, x_53, x_53, x_0, x_1, x_2); x_59 = lean::cnstr_get(x_58, 0); lean::inc(x_59); x_61 = lean::cnstr_get(x_58, 1); lean::inc(x_61); if (lean::is_shared(x_58)) { lean::dec(x_58); x_63 = lean::box(0); } else { lean::cnstr_release(x_58, 0); lean::cnstr_release(x_58, 1); x_63 = x_58; } x_64 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_64); x_66 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_64, x_59); if (lean::obj_tag(x_66) == 0) { obj* x_67; obj* x_69; obj* x_71; unsigned x_74; obj* x_76; obj* x_77; obj* x_79; obj* x_82; obj* x_83; x_67 = lean::cnstr_get(x_66, 0); lean::inc(x_67); x_69 = lean::cnstr_get(x_66, 1); lean::inc(x_69); x_71 = lean::cnstr_get(x_66, 2); lean::inc(x_71); lean::dec(x_66); x_74 = lean::unbox_uint32(x_67); lean::dec(x_67); x_76 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__6(x_74, x_0, x_69, x_61); x_77 = lean::cnstr_get(x_76, 0); lean::inc(x_77); x_79 = lean::cnstr_get(x_76, 1); lean::inc(x_79); lean::dec(x_76); x_82 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_71, x_77); if (lean::is_scalar(x_63)) { x_83 = lean::alloc_cnstr(0, 2, 0); } else { x_83 = x_63; } lean::cnstr_set(x_83, 0, x_82); lean::cnstr_set(x_83, 1, x_79); return x_83; } else { obj* x_85; unsigned char x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; lean::dec(x_0); x_85 = lean::cnstr_get(x_66, 0); lean::inc(x_85); x_87 = lean::cnstr_get_scalar(x_66, sizeof(void*)*1); if (lean::is_shared(x_66)) { lean::dec(x_66); x_88 = lean::box(0); } else { lean::cnstr_release(x_66, 0); x_88 = x_66; } if (lean::is_scalar(x_88)) { x_89 = lean::alloc_cnstr(1, 1, 1); } else { x_89 = x_88; } lean::cnstr_set(x_89, 0, x_85); lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_87); x_90 = x_89; if (lean::is_scalar(x_63)) { x_91 = lean::alloc_cnstr(0, 2, 0); } else { x_91 = x_63; } lean::cnstr_set(x_91, 0, x_90); lean::cnstr_set(x_91, 1, x_61); return x_91; } } else { obj* x_93; obj* x_94; obj* x_95; obj* x_97; obj* x_99; obj* x_100; obj* x_101; obj* x_102; lean::inc(x_1); x_93 = lean::string_iterator_next(x_1); x_94 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__8(x_1, x_0, x_93, x_2); x_95 = lean::cnstr_get(x_94, 0); lean::inc(x_95); x_97 = lean::cnstr_get(x_94, 1); lean::inc(x_97); if (lean::is_shared(x_94)) { lean::dec(x_94); x_99 = lean::box(0); } else { lean::cnstr_release(x_94, 0); lean::cnstr_release(x_94, 1); x_99 = x_94; } x_100 = lean::box(0); x_101 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_100, x_95); if (lean::is_scalar(x_99)) { x_102 = lean::alloc_cnstr(0, 2, 0); } else { x_102 = x_99; } lean::cnstr_set(x_102, 0, x_101); lean::cnstr_set(x_102, 1, x_97); return x_102; } } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned char x_4; x_4 = lean::string_iterator_has_next(x_2); if (x_4 == 0) { obj* x_5; obj* x_6; obj* x_7; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; x_5 = lean::box(0); x_6 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_7 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_5); lean::inc(x_7); lean::inc(x_6); x_11 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_6, x_7, x_5, x_5, x_1, x_2, x_3); x_12 = lean::cnstr_get(x_11, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_11, 1); lean::inc(x_14); if (lean::is_shared(x_11)) { lean::dec(x_11); x_16 = lean::box(0); } else { lean::cnstr_release(x_11, 0); lean::cnstr_release(x_11, 1); x_16 = x_11; } x_17 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_17); x_19 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_12); if (lean::is_scalar(x_16)) { x_20 = lean::alloc_cnstr(0, 2, 0); } else { x_20 = x_16; } lean::cnstr_set(x_20, 0, x_19); lean::cnstr_set(x_20, 1, x_14); return x_20; } else { unsigned x_21; obj* x_22; obj* x_23; obj* x_24; x_21 = lean::string_iterator_curr(x_2); x_22 = lean::box_uint32(x_21); x_23 = lean::box_uint32(x_0); x_24 = lean::nat_dec_eq(x_22, x_23); lean::dec(x_23); if (lean::obj_tag(x_24) == 0) { obj* x_28; obj* x_29; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_38; obj* x_39; obj* x_41; obj* x_43; obj* x_44; obj* x_46; obj* x_47; lean::dec(x_24); lean::dec(x_22); x_28 = _l_s4_char_s11_quote__core(x_21); x_29 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_29); x_31 = lean::string_append(x_29, x_28); lean::dec(x_28); x_33 = lean::string_append(x_31, x_29); x_34 = lean::box(0); x_35 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_34); lean::inc(x_35); x_38 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_33, x_35, x_34, x_34, x_1, x_2, x_3); x_39 = lean::cnstr_get(x_38, 0); lean::inc(x_39); x_41 = lean::cnstr_get(x_38, 1); lean::inc(x_41); if (lean::is_shared(x_38)) { lean::dec(x_38); x_43 = lean::box(0); } else { lean::cnstr_release(x_38, 0); lean::cnstr_release(x_38, 1); x_43 = x_38; } x_44 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_44); x_46 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_44, x_39); if (lean::is_scalar(x_43)) { x_47 = lean::alloc_cnstr(0, 2, 0); } else { x_47 = x_43; } lean::cnstr_set(x_47, 0, x_46); lean::cnstr_set(x_47, 1, x_41); return x_47; } else { obj* x_50; obj* x_51; obj* x_52; obj* x_53; lean::dec(x_24); lean::dec(x_1); x_50 = lean::string_iterator_next(x_2); x_51 = lean::box(0); x_52 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_52, 0, x_22); lean::cnstr_set(x_52, 1, x_50); lean::cnstr_set(x_52, 2, x_51); x_53 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_53, 0, x_52); lean::cnstr_set(x_53, 1, x_3); return x_53; } } } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__14(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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__14(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_3519775105__s9_ident_x27_s10___spec__13(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__14(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__16(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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__16(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_3519775105__s9_ident_x27_s10___spec__15(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; lean::dec(x_1); x_5 = lean::string_iterator_curr(x_0); lean::dec(x_0); x_7 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_7); x_9 = lean::string_push(x_7, x_5); x_10 = lean::string_iterator_remaining(x_2); x_11 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__16(x_10, x_9, x_2); x_12 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_12, 0, x_11); lean::cnstr_set(x_12, 1, x_3); return x_12; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__18(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_lean_s19_is__id__end__escape(x_10); if (x_11 == 0) { obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_18; x_12 = lean::mk_nat_obj(1u); x_13 = lean::nat_sub(x_0, x_12); lean::dec(x_12); lean::dec(x_0); x_16 = lean::string_push(x_1, x_10); x_17 = lean::string_iterator_next(x_2); x_18 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__18(x_13, x_16, x_17); return x_18; } else { obj* x_20; lean::dec(x_0); x_20 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); 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_3519775105__s9_ident_x27_s10___spec__17(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__18(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__12(obj* x_0, obj* x_1, obj* x_2) { { unsigned char x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { obj* x_4; obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; x_4 = lean::box(0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_6 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); x_11 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); x_12 = lean::cnstr_get(x_11, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_11, 1); lean::inc(x_14); if (lean::is_shared(x_11)) { lean::dec(x_11); x_16 = lean::box(0); } else { lean::cnstr_release(x_11, 0); lean::cnstr_release(x_11, 1); x_16 = x_11; } x_17 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_17); x_19 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_12); if (lean::obj_tag(x_19) == 0) { obj* x_20; obj* x_22; obj* x_24; unsigned x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; x_20 = lean::cnstr_get(x_19, 0); lean::inc(x_20); x_22 = lean::cnstr_get(x_19, 1); lean::inc(x_22); x_24 = lean::cnstr_get(x_19, 2); lean::inc(x_24); lean::dec(x_19); x_27 = lean::unbox_uint32(x_20); lean::dec(x_20); x_29 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__13(x_27, x_0, x_22, x_14); x_30 = lean::cnstr_get(x_29, 0); lean::inc(x_30); x_32 = lean::cnstr_get(x_29, 1); lean::inc(x_32); lean::dec(x_29); x_35 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_24, x_30); if (lean::is_scalar(x_16)) { x_36 = lean::alloc_cnstr(0, 2, 0); } else { x_36 = x_16; } lean::cnstr_set(x_36, 0, x_35); lean::cnstr_set(x_36, 1, x_32); return x_36; } else { obj* x_38; unsigned char x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; lean::dec(x_0); x_38 = lean::cnstr_get(x_19, 0); lean::inc(x_38); x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); if (lean::is_shared(x_19)) { lean::dec(x_19); x_41 = lean::box(0); } else { lean::cnstr_release(x_19, 0); x_41 = x_19; } if (lean::is_scalar(x_41)) { x_42 = lean::alloc_cnstr(1, 1, 1); } else { x_42 = x_41; } lean::cnstr_set(x_42, 0, x_38); lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); x_43 = x_42; if (lean::is_scalar(x_16)) { x_44 = lean::alloc_cnstr(0, 2, 0); } else { x_44 = x_16; } lean::cnstr_set(x_44, 0, x_43); lean::cnstr_set(x_44, 1, x_14); return x_44; } } else { unsigned x_45; unsigned char x_46; x_45 = lean::string_iterator_curr(x_1); x_46 = _l_s4_lean_s19_is__id__end__escape(x_45); if (x_46 == 0) { obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; lean::inc(x_1); x_48 = lean::string_iterator_next(x_1); x_49 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__15(x_1, x_0, x_48, x_2); x_50 = lean::cnstr_get(x_49, 0); lean::inc(x_50); x_52 = lean::cnstr_get(x_49, 1); lean::inc(x_52); if (lean::is_shared(x_49)) { lean::dec(x_49); x_54 = lean::box(0); } else { lean::cnstr_release(x_49, 0); lean::cnstr_release(x_49, 1); x_54 = x_49; } x_55 = lean::box(0); x_56 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_55, x_50); if (lean::is_scalar(x_54)) { x_57 = lean::alloc_cnstr(0, 2, 0); } else { x_57 = x_54; } lean::cnstr_set(x_57, 0, x_56); lean::cnstr_set(x_57, 1, x_52); return x_57; } else { obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; x_58 = _l_s4_char_s11_quote__core(x_45); x_59 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_59); x_61 = lean::string_append(x_59, x_58); lean::dec(x_58); x_63 = lean::string_append(x_61, x_59); x_64 = lean::box(0); x_65 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_64); lean::inc(x_65); x_69 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_63, x_65, x_64, x_64, x_0, x_1, x_2); x_70 = lean::cnstr_get(x_69, 0); lean::inc(x_70); x_72 = lean::cnstr_get(x_69, 1); 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); x_74 = x_69; } x_75 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_75); x_77 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_75, x_70); if (lean::obj_tag(x_77) == 0) { obj* x_78; obj* x_80; obj* x_82; unsigned x_85; obj* x_87; obj* x_88; obj* x_90; obj* x_93; obj* x_94; x_78 = lean::cnstr_get(x_77, 0); lean::inc(x_78); x_80 = lean::cnstr_get(x_77, 1); lean::inc(x_80); x_82 = lean::cnstr_get(x_77, 2); lean::inc(x_82); lean::dec(x_77); x_85 = lean::unbox_uint32(x_78); lean::dec(x_78); x_87 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__17(x_85, x_0, x_80, x_72); x_88 = lean::cnstr_get(x_87, 0); lean::inc(x_88); x_90 = lean::cnstr_get(x_87, 1); lean::inc(x_90); lean::dec(x_87); x_93 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_82, x_88); if (lean::is_scalar(x_74)) { x_94 = lean::alloc_cnstr(0, 2, 0); } else { x_94 = x_74; } lean::cnstr_set(x_94, 0, x_93); lean::cnstr_set(x_94, 1, x_90); return x_94; } else { obj* x_96; unsigned char x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; lean::dec(x_0); x_96 = lean::cnstr_get(x_77, 0); lean::inc(x_96); x_98 = lean::cnstr_get_scalar(x_77, sizeof(void*)*1); if (lean::is_shared(x_77)) { lean::dec(x_77); x_99 = lean::box(0); } else { lean::cnstr_release(x_77, 0); x_99 = x_77; } if (lean::is_scalar(x_99)) { x_100 = lean::alloc_cnstr(1, 1, 1); } else { x_100 = x_99; } lean::cnstr_set(x_100, 0, x_96); lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_98); x_101 = x_100; if (lean::is_scalar(x_74)) { x_102 = lean::alloc_cnstr(0, 2, 0); } else { x_102 = x_74; } lean::cnstr_set(x_102, 0, x_101); lean::cnstr_set(x_102, 1, x_72); return x_102; } } } } } obj* _l_s4_lean_s6_parser_s17_id__part__escaped_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__10(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; unsigned x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_11; x_3 = _l_s4_lean_s17_id__begin__escape; x_4 = lean::unbox_uint32(x_3); lean::inc(x_0); x_6 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_4, x_0, x_1, x_2); x_7 = lean::cnstr_get(x_6, 0); lean::inc(x_7); x_9 = lean::cnstr_get(x_6, 1); lean::inc(x_9); if (lean::is_shared(x_6)) { lean::dec(x_6); x_11 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); x_11 = x_6; } if (lean::obj_tag(x_7) == 0) { obj* x_12; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_24; x_12 = lean::cnstr_get(x_7, 1); lean::inc(x_12); x_14 = lean::cnstr_get(x_7, 2); lean::inc(x_14); if (lean::is_shared(x_7)) { lean::dec(x_7); x_16 = lean::box(0); } else { lean::cnstr_release(x_7, 0); lean::cnstr_release(x_7, 1); lean::cnstr_release(x_7, 2); x_16 = x_7; } lean::inc(x_0); x_18 = _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__12(x_0, x_12, x_9); x_19 = lean::cnstr_get(x_18, 0); lean::inc(x_19); x_21 = lean::cnstr_get(x_18, 1); lean::inc(x_21); lean::dec(x_18); x_24 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_14, x_19); if (lean::obj_tag(x_24) == 0) { obj* x_25; obj* x_27; obj* x_29; obj* x_32; unsigned x_33; obj* x_34; obj* x_35; obj* x_37; x_25 = lean::cnstr_get(x_24, 0); lean::inc(x_25); x_27 = lean::cnstr_get(x_24, 1); lean::inc(x_27); x_29 = lean::cnstr_get(x_24, 2); lean::inc(x_29); lean::dec(x_24); x_32 = _l_s4_lean_s15_id__end__escape; x_33 = lean::unbox_uint32(x_32); x_34 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_33, x_0, x_27, x_21); x_35 = lean::cnstr_get(x_34, 0); lean::inc(x_35); x_37 = lean::cnstr_get(x_34, 1); lean::inc(x_37); lean::dec(x_34); if (lean::obj_tag(x_35) == 0) { obj* x_40; obj* x_42; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_50; x_40 = lean::cnstr_get(x_35, 1); lean::inc(x_40); x_42 = lean::cnstr_get(x_35, 2); lean::inc(x_42); lean::dec(x_35); x_45 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_45); if (lean::is_scalar(x_16)) { x_47 = lean::alloc_cnstr(0, 3, 0); } else { x_47 = x_16; } lean::cnstr_set(x_47, 0, x_25); lean::cnstr_set(x_47, 1, x_40); lean::cnstr_set(x_47, 2, x_45); x_48 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_42, x_47); x_49 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_29, x_48); if (lean::is_scalar(x_11)) { x_50 = lean::alloc_cnstr(0, 2, 0); } else { x_50 = x_11; } lean::cnstr_set(x_50, 0, x_49); lean::cnstr_set(x_50, 1, x_37); return x_50; } else { obj* x_53; unsigned char x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; lean::dec(x_16); lean::dec(x_25); x_53 = lean::cnstr_get(x_35, 0); lean::inc(x_53); x_55 = lean::cnstr_get_scalar(x_35, sizeof(void*)*1); if (lean::is_shared(x_35)) { lean::dec(x_35); x_56 = lean::box(0); } else { lean::cnstr_release(x_35, 0); x_56 = x_35; } if (lean::is_scalar(x_56)) { x_57 = lean::alloc_cnstr(1, 1, 1); } else { x_57 = x_56; } lean::cnstr_set(x_57, 0, x_53); lean::cnstr_set_scalar(x_57, sizeof(void*)*1, x_55); x_58 = x_57; x_59 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_29, x_58); if (lean::is_scalar(x_11)) { x_60 = lean::alloc_cnstr(0, 2, 0); } else { x_60 = x_11; } lean::cnstr_set(x_60, 0, x_59); lean::cnstr_set(x_60, 1, x_37); return x_60; } } else { obj* x_63; unsigned char x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; lean::dec(x_16); lean::dec(x_0); x_63 = lean::cnstr_get(x_24, 0); lean::inc(x_63); x_65 = lean::cnstr_get_scalar(x_24, sizeof(void*)*1); if (lean::is_shared(x_24)) { lean::dec(x_24); x_66 = lean::box(0); } else { lean::cnstr_release(x_24, 0); x_66 = x_24; } 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_63); lean::cnstr_set_scalar(x_67, sizeof(void*)*1, x_65); x_68 = x_67; if (lean::is_scalar(x_11)) { x_69 = lean::alloc_cnstr(0, 2, 0); } else { x_69 = x_11; } lean::cnstr_set(x_69, 0, x_68); lean::cnstr_set(x_69, 1, x_21); return x_69; } } else { obj* x_71; unsigned char x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; lean::dec(x_0); x_71 = lean::cnstr_get(x_7, 0); lean::inc(x_71); x_73 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); if (lean::is_shared(x_7)) { lean::dec(x_7); x_74 = lean::box(0); } else { lean::cnstr_release(x_7, 0); x_74 = x_7; } if (lean::is_scalar(x_74)) { x_75 = lean::alloc_cnstr(1, 1, 1); } else { x_75 = x_74; } lean::cnstr_set(x_75, 0, x_71); lean::cnstr_set_scalar(x_75, sizeof(void*)*1, x_73); x_76 = x_75; if (lean::is_scalar(x_11)) { x_77 = lean::alloc_cnstr(0, 2, 0); } else { x_77 = x_11; } lean::cnstr_set(x_77, 0, x_76); lean::cnstr_set(x_77, 1, x_9); return x_77; } } } obj* _l_s4_lean_s6_parser_s8_id__part_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__1(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_6; obj* x_8; x_3 = _l_s4_lean_s6_parser_s13_monad__parsec_s4_curr_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__2_s6___rarg(x_1, x_2); x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_6 = lean::cnstr_get(x_3, 1); lean::inc(x_6); if (lean::is_shared(x_3)) { lean::dec(x_3); x_8 = lean::box(0); } else { lean::cnstr_release(x_3, 0); lean::cnstr_release(x_3, 1); x_8 = x_3; } if (lean::obj_tag(x_4) == 0) { obj* x_9; obj* x_11; obj* x_13; obj* x_15; unsigned x_16; unsigned char x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; x_9 = lean::cnstr_get(x_4, 0); lean::inc(x_9); x_11 = lean::cnstr_get(x_4, 1); lean::inc(x_11); x_13 = lean::cnstr_get(x_4, 2); lean::inc(x_13); if (lean::is_shared(x_4)) { lean::dec(x_4); x_15 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); lean::cnstr_release(x_4, 2); x_15 = x_4; } x_16 = lean::unbox_uint32(x_9); lean::dec(x_9); x_18 = _l_s4_lean_s21_is__id__begin__escape(x_16); x_19 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; x_20 = lean::box(x_18); lean::inc(x_19); if (lean::is_scalar(x_15)) { x_22 = lean::alloc_cnstr(0, 3, 0); } else { x_22 = x_15; } lean::cnstr_set(x_22, 0, x_20); lean::cnstr_set(x_22, 1, x_11); 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_13, x_22); if (lean::obj_tag(x_23) == 0) { obj* x_24; obj* x_26; obj* x_28; unsigned char x_31; x_24 = lean::cnstr_get(x_23, 0); lean::inc(x_24); x_26 = lean::cnstr_get(x_23, 1); lean::inc(x_26); x_28 = lean::cnstr_get(x_23, 2); lean::inc(x_28); lean::dec(x_23); x_31 = lean::unbox(x_24); lean::dec(x_24); if (x_31 == 0) { obj* x_33; obj* x_34; obj* x_36; obj* x_39; obj* x_40; x_33 = _l_s4_lean_s6_parser_s17_id__part__default_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__3(x_0, x_26, x_6); x_34 = lean::cnstr_get(x_33, 0); lean::inc(x_34); x_36 = lean::cnstr_get(x_33, 1); lean::inc(x_36); lean::dec(x_33); x_39 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_28, x_34); if (lean::is_scalar(x_8)) { x_40 = lean::alloc_cnstr(0, 2, 0); } else { x_40 = x_8; } lean::cnstr_set(x_40, 0, x_39); lean::cnstr_set(x_40, 1, x_36); return x_40; } else { obj* x_41; obj* x_42; obj* x_44; obj* x_47; obj* x_48; x_41 = _l_s4_lean_s6_parser_s17_id__part__escaped_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__10(x_0, x_26, x_6); x_42 = lean::cnstr_get(x_41, 0); lean::inc(x_42); x_44 = lean::cnstr_get(x_41, 1); lean::inc(x_44); lean::dec(x_41); x_47 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_28, x_42); if (lean::is_scalar(x_8)) { x_48 = lean::alloc_cnstr(0, 2, 0); } else { x_48 = x_8; } lean::cnstr_set(x_48, 0, x_47); lean::cnstr_set(x_48, 1, x_44); return x_48; } } else { obj* x_50; unsigned char x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; lean::dec(x_0); x_50 = lean::cnstr_get(x_23, 0); lean::inc(x_50); x_52 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); if (lean::is_shared(x_23)) { lean::dec(x_23); x_53 = lean::box(0); } else { lean::cnstr_release(x_23, 0); x_53 = x_23; } if (lean::is_scalar(x_53)) { x_54 = lean::alloc_cnstr(1, 1, 1); } else { x_54 = x_53; } lean::cnstr_set(x_54, 0, x_50); lean::cnstr_set_scalar(x_54, sizeof(void*)*1, x_52); x_55 = x_54; if (lean::is_scalar(x_8)) { x_56 = lean::alloc_cnstr(0, 2, 0); } else { x_56 = x_8; } lean::cnstr_set(x_56, 0, x_55); lean::cnstr_set(x_56, 1, x_6); return x_56; } } else { obj* x_58; unsigned char x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; lean::dec(x_0); x_58 = lean::cnstr_get(x_4, 0); lean::inc(x_58); x_60 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); if (lean::is_shared(x_4)) { lean::dec(x_4); x_61 = lean::box(0); } else { lean::cnstr_release(x_4, 0); x_61 = x_4; } if (lean::is_scalar(x_61)) { x_62 = lean::alloc_cnstr(1, 1, 1); } else { x_62 = x_61; } lean::cnstr_set(x_62, 0, x_58); lean::cnstr_set_scalar(x_62, sizeof(void*)*1, x_60); x_63 = x_62; if (lean::is_scalar(x_8)) { x_64 = lean::alloc_cnstr(0, 2, 0); } else { x_64 = x_8; } lean::cnstr_set(x_64, 0, x_63); lean::cnstr_set(x_64, 1, x_6); return x_64; } } } obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__19(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_9; obj* x_10; obj* x_12; lean::inc(x_2); lean::inc(x_1); x_9 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_0, x_1, x_2, x_3); x_10 = lean::cnstr_get(x_9, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_9, 1); lean::inc(x_12); lean::dec(x_9); if (lean::obj_tag(x_10) == 0) { obj* x_15; obj* x_17; obj* x_19; obj* x_20; unsigned x_21; obj* x_24; obj* x_25; obj* x_27; x_15 = lean::cnstr_get(x_10, 1); lean::inc(x_15); x_17 = lean::cnstr_get(x_10, 2); lean::inc(x_17); if (lean::is_shared(x_10)) { lean::dec(x_10); x_19 = lean::box(0); } else { lean::cnstr_release(x_10, 0); lean::cnstr_release(x_10, 1); lean::cnstr_release(x_10, 2); x_19 = x_10; } x_20 = _l_s4_lean_s17_id__begin__escape; x_21 = lean::unbox_uint32(x_20); lean::inc(x_15); lean::inc(x_1); x_24 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_21, x_1, x_15, x_12); x_25 = lean::cnstr_get(x_24, 0); lean::inc(x_25); x_27 = lean::cnstr_get(x_24, 1); lean::inc(x_27); lean::dec(x_24); if (lean::obj_tag(x_25) == 0) { obj* x_33; lean::dec(x_15); lean::dec(x_19); lean::dec(x_1); x_33 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_25); x_4 = x_33; x_5 = x_27; goto lbl_6; } else { obj* x_34; unsigned char x_36; x_34 = lean::cnstr_get(x_25, 0); lean::inc(x_34); x_36 = lean::cnstr_get_scalar(x_25, sizeof(void*)*1); if (x_36 == 0) { unsigned char x_38; lean::dec(x_25); x_38 = lean::string_iterator_has_next(x_15); if (x_38 == 0) { obj* x_40; obj* x_41; obj* x_42; obj* x_46; obj* x_47; obj* x_49; obj* x_52; obj* x_54; obj* x_55; obj* x_56; lean::dec(x_19); x_40 = lean::box(0); x_41 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_42 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_40); lean::inc(x_42); lean::inc(x_41); x_46 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_41, x_42, x_40, x_40, x_1, x_15, x_27); x_47 = lean::cnstr_get(x_46, 0); lean::inc(x_47); x_49 = lean::cnstr_get(x_46, 1); lean::inc(x_49); lean::dec(x_46); x_52 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_52); x_54 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_52, x_47); x_55 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_54); x_56 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_55); x_4 = x_56; x_5 = x_49; goto lbl_6; } else { unsigned x_57; unsigned char x_58; x_57 = lean::string_iterator_curr(x_15); x_58 = _l_s4_lean_s13_is__id__first(x_57); if (x_58 == 0) { obj* x_60; obj* x_61; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_70; obj* x_71; obj* x_73; obj* x_76; obj* x_78; obj* x_79; obj* x_80; lean::dec(x_19); x_60 = _l_s4_char_s11_quote__core(x_57); x_61 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_61); x_63 = lean::string_append(x_61, x_60); lean::dec(x_60); x_65 = lean::string_append(x_63, x_61); x_66 = lean::box(0); x_67 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_66); lean::inc(x_67); x_70 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_65, x_67, x_66, x_66, x_1, x_15, x_27); x_71 = lean::cnstr_get(x_70, 0); lean::inc(x_71); x_73 = lean::cnstr_get(x_70, 1); lean::inc(x_73); lean::dec(x_70); x_76 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_76); x_78 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_76, x_71); x_79 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_34, x_78); x_80 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_79); x_4 = x_80; x_5 = x_73; goto lbl_6; } else { obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; lean::dec(x_1); lean::dec(x_34); x_83 = lean::string_iterator_next(x_15); x_84 = lean::box(0); x_85 = lean::box_uint32(x_57); if (lean::is_scalar(x_19)) { x_86 = lean::alloc_cnstr(0, 3, 0); } else { x_86 = x_19; } lean::cnstr_set(x_86, 0, x_85); lean::cnstr_set(x_86, 1, x_83); lean::cnstr_set(x_86, 2, x_84); x_87 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_86); x_4 = x_87; x_5 = x_27; goto lbl_6; } } } else { obj* x_92; lean::dec(x_15); lean::dec(x_19); lean::dec(x_1); lean::dec(x_34); x_92 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_25); x_4 = x_92; x_5 = x_27; goto lbl_6; } } } else { obj* x_94; unsigned char x_96; obj* x_97; obj* x_98; obj* x_99; lean::dec(x_1); x_94 = lean::cnstr_get(x_10, 0); lean::inc(x_94); x_96 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); if (lean::is_shared(x_10)) { lean::dec(x_10); x_97 = lean::box(0); } else { lean::cnstr_release(x_10, 0); x_97 = x_10; } 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_94); lean::cnstr_set_scalar(x_98, sizeof(void*)*1, x_96); x_99 = x_98; x_4 = x_99; x_5 = x_12; goto lbl_6; } lbl_6: { if (lean::obj_tag(x_4) == 0) { obj* x_100; obj* x_102; obj* x_103; obj* x_105; obj* x_106; x_100 = lean::cnstr_get(x_4, 0); lean::inc(x_100); if (lean::is_shared(x_4)) { lean::dec(x_4); x_102 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); lean::cnstr_release(x_4, 2); x_102 = x_4; } x_103 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_103); if (lean::is_scalar(x_102)) { x_105 = lean::alloc_cnstr(0, 3, 0); } else { x_105 = x_102; } lean::cnstr_set(x_105, 0, x_100); lean::cnstr_set(x_105, 1, x_2); lean::cnstr_set(x_105, 2, x_103); x_106 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_106, 0, x_105); lean::cnstr_set(x_106, 1, x_5); return x_106; } else { obj* x_108; lean::dec(x_2); x_108 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_108, 0, x_4); lean::cnstr_set(x_108, 1, x_5); return x_108; } } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21(unsigned x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { obj* x_6; obj* x_7; x_6 = lean::mk_nat_obj(0u); x_7 = lean::nat_dec_eq(x_2, x_6); lean::dec(x_6); if (lean::obj_tag(x_7) == 0) { obj* x_10; obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_19; obj* x_21; lean::dec(x_7); x_10 = lean::box_uint32(x_0); lean::inc(x_10); x_12 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21_s11___lambda__1_s7___boxed), 4, 1); lean::closure_set(x_12, 0, x_10); x_13 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21_s11___lambda__2_s7___boxed), 5, 1); lean::closure_set(x_13, 0, x_10); lean::inc(x_4); lean::inc(x_3); x_16 = _l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg(x_12, x_13, x_3, x_4, x_5); x_17 = lean::cnstr_get(x_16, 0); lean::inc(x_17); x_19 = lean::cnstr_get(x_16, 1); lean::inc(x_19); if (lean::is_shared(x_16)) { lean::dec(x_16); x_21 = lean::box(0); } else { lean::cnstr_release(x_16, 0); lean::cnstr_release(x_16, 1); x_21 = x_16; } if (lean::obj_tag(x_17) == 0) { obj* x_22; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_41; x_22 = lean::cnstr_get(x_17, 0); lean::inc(x_22); x_24 = lean::cnstr_get(x_17, 1); lean::inc(x_24); x_26 = lean::cnstr_get(x_17, 2); lean::inc(x_26); if (lean::is_shared(x_17)) { lean::dec(x_17); x_28 = lean::box(0); } else { lean::cnstr_release(x_17, 0); lean::cnstr_release(x_17, 1); lean::cnstr_release(x_17, 2); x_28 = x_17; } x_29 = lean::mk_nat_obj(1u); x_30 = lean::nat_sub(x_2, x_29); lean::dec(x_29); lean::dec(x_2); lean::inc(x_1); x_34 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_34, 0, x_1); lean::cnstr_set(x_34, 1, x_22); x_35 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21(x_0, x_34, x_30, x_3, x_24, x_19); x_36 = lean::cnstr_get(x_35, 0); lean::inc(x_36); x_38 = lean::cnstr_get(x_35, 1); lean::inc(x_38); lean::dec(x_35); x_41 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_26, x_36); if (lean::obj_tag(x_41) == 0) { obj* x_45; lean::dec(x_4); lean::dec(x_1); lean::dec(x_28); if (lean::is_scalar(x_21)) { x_45 = lean::alloc_cnstr(0, 2, 0); } else { x_45 = x_21; } lean::cnstr_set(x_45, 0, x_41); lean::cnstr_set(x_45, 1, x_38); return x_45; } else { obj* x_46; unsigned char x_48; x_46 = lean::cnstr_get(x_41, 0); lean::inc(x_46); x_48 = lean::cnstr_get_scalar(x_41, sizeof(void*)*1); if (x_48 == 0) { obj* x_50; obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_58; lean::dec(x_41); x_50 = lean::cnstr_get(x_46, 2); lean::inc(x_50); lean::dec(x_46); x_53 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_53); x_55 = lean::alloc_closure(reinterpret_cast(_l_s8_function_s4_comp_s6___rarg), 3, 2); lean::closure_set(x_55, 0, x_50); lean::closure_set(x_55, 1, x_53); x_56 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_56, 0, x_55); if (lean::is_scalar(x_28)) { x_57 = lean::alloc_cnstr(0, 3, 0); } else { x_57 = x_28; } lean::cnstr_set(x_57, 0, x_1); lean::cnstr_set(x_57, 1, x_4); lean::cnstr_set(x_57, 2, x_56); if (lean::is_scalar(x_21)) { x_58 = lean::alloc_cnstr(0, 2, 0); } else { x_58 = x_21; } lean::cnstr_set(x_58, 0, x_57); lean::cnstr_set(x_58, 1, x_38); return x_58; } else { obj* x_63; lean::dec(x_46); lean::dec(x_4); lean::dec(x_1); lean::dec(x_28); if (lean::is_scalar(x_21)) { x_63 = lean::alloc_cnstr(0, 2, 0); } else { x_63 = x_21; } lean::cnstr_set(x_63, 0, x_41); lean::cnstr_set(x_63, 1, x_38); return x_63; } } } else { obj* x_66; unsigned char x_68; obj* x_69; lean::dec(x_2); lean::dec(x_3); x_66 = lean::cnstr_get(x_17, 0); lean::inc(x_66); x_68 = lean::cnstr_get_scalar(x_17, sizeof(void*)*1); if (lean::is_shared(x_17)) { lean::dec(x_17); x_69 = lean::box(0); } else { lean::cnstr_release(x_17, 0); x_69 = x_17; } if (x_68 == 0) { obj* x_71; obj* x_74; obj* x_76; obj* x_77; obj* x_78; obj* x_79; lean::dec(x_69); x_71 = lean::cnstr_get(x_66, 2); lean::inc(x_71); lean::dec(x_66); x_74 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_74); x_76 = lean::alloc_closure(reinterpret_cast(_l_s8_function_s4_comp_s6___rarg), 3, 2); lean::closure_set(x_76, 0, x_71); lean::closure_set(x_76, 1, x_74); x_77 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_77, 0, x_76); x_78 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_78, 0, x_1); lean::cnstr_set(x_78, 1, x_4); lean::cnstr_set(x_78, 2, x_77); if (lean::is_scalar(x_21)) { x_79 = lean::alloc_cnstr(0, 2, 0); } else { x_79 = x_21; } lean::cnstr_set(x_79, 0, x_78); lean::cnstr_set(x_79, 1, x_19); return x_79; } else { obj* x_82; obj* x_83; obj* x_84; lean::dec(x_4); lean::dec(x_1); if (lean::is_scalar(x_69)) { x_82 = lean::alloc_cnstr(1, 1, 1); } else { x_82 = x_69; } lean::cnstr_set(x_82, 0, x_66); lean::cnstr_set_scalar(x_82, sizeof(void*)*1, x_68); x_83 = x_82; if (lean::is_scalar(x_21)) { x_84 = lean::alloc_cnstr(0, 2, 0); } else { x_84 = x_21; } lean::cnstr_set(x_84, 0, x_83); lean::cnstr_set(x_84, 1, x_19); return x_84; } } } else { obj* x_88; obj* x_90; obj* x_91; lean::dec(x_7); lean::dec(x_2); lean::dec(x_3); x_88 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_88); x_90 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_90, 0, x_1); lean::cnstr_set(x_90, 1, x_4); lean::cnstr_set(x_90, 2, x_88); x_91 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_91, 0, x_90); lean::cnstr_set(x_91, 1, x_5); return x_91; } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21_s11___lambda__1(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; x_4 = _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__19(x_0, x_1, x_2, x_3); x_5 = lean::cnstr_get(x_4, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_4, 1); lean::inc(x_7); if (lean::is_shared(x_4)) { lean::dec(x_4); x_9 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); x_9 = x_4; } x_10 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_5); if (lean::is_scalar(x_9)) { x_11 = lean::alloc_cnstr(0, 2, 0); } else { x_11 = x_9; } lean::cnstr_set(x_11, 0, x_10); lean::cnstr_set(x_11, 1, x_7); return x_11; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21_s11___lambda__2(unsigned x_0, unsigned x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_6; obj* x_7; obj* x_9; obj* x_11; lean::inc(x_2); x_6 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_0, x_2, x_3, x_4); x_7 = lean::cnstr_get(x_6, 0); lean::inc(x_7); x_9 = lean::cnstr_get(x_6, 1); lean::inc(x_9); if (lean::is_shared(x_6)) { lean::dec(x_6); x_11 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); x_11 = x_6; } if (lean::obj_tag(x_7) == 0) { obj* x_12; obj* x_14; obj* x_17; obj* x_18; obj* x_20; obj* x_23; obj* x_24; x_12 = lean::cnstr_get(x_7, 1); lean::inc(x_12); x_14 = lean::cnstr_get(x_7, 2); lean::inc(x_14); lean::dec(x_7); x_17 = _l_s4_lean_s6_parser_s8_id__part_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__1(x_2, x_12, x_9); x_18 = lean::cnstr_get(x_17, 0); lean::inc(x_18); x_20 = lean::cnstr_get(x_17, 1); lean::inc(x_20); lean::dec(x_17); x_23 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_14, x_18); if (lean::is_scalar(x_11)) { x_24 = lean::alloc_cnstr(0, 2, 0); } else { x_24 = x_11; } lean::cnstr_set(x_24, 0, x_23); lean::cnstr_set(x_24, 1, x_20); return x_24; } else { obj* x_26; unsigned char x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; lean::dec(x_2); x_26 = lean::cnstr_get(x_7, 0); lean::inc(x_26); x_28 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); if (lean::is_shared(x_7)) { lean::dec(x_7); x_29 = lean::box(0); } else { lean::cnstr_release(x_7, 0); x_29 = x_7; } if (lean::is_scalar(x_29)) { x_30 = lean::alloc_cnstr(1, 1, 1); } else { x_30 = x_29; } lean::cnstr_set(x_30, 0, x_26); lean::cnstr_set_scalar(x_30, sizeof(void*)*1, x_28); x_31 = x_30; if (lean::is_scalar(x_11)) { x_32 = lean::alloc_cnstr(0, 2, 0); } else { x_32 = x_11; } lean::cnstr_set(x_32, 0, x_31); lean::cnstr_set(x_32, 1, x_9); return x_32; } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_foldl_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__20(obj* x_0, unsigned x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_16; obj* x_17; x_5 = lean::box(0); x_6 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_0); x_7 = lean::string_iterator_remaining(x_3); x_8 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21(x_1, x_6, x_7, x_2, x_3, x_4); x_9 = lean::cnstr_get(x_8, 0); lean::inc(x_9); x_11 = lean::cnstr_get(x_8, 1); lean::inc(x_11); if (lean::is_shared(x_8)) { lean::dec(x_8); x_13 = lean::box(0); } else { lean::cnstr_release(x_8, 0); lean::cnstr_release(x_8, 1); x_13 = x_8; } x_14 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_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_9); if (lean::is_scalar(x_13)) { x_17 = lean::alloc_cnstr(0, 2, 0); } else { x_17 = x_13; } lean::cnstr_set(x_17, 0, x_16); lean::cnstr_set(x_17, 1, x_11); return x_17; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__4_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__4(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__6_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s9___spec__6(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__13_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__13(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__17_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__17(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__19_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__19(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { unsigned x_6; obj* x_7; x_6 = lean::unbox_uint32(x_0); x_7 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21(x_6, x_1, x_2, x_3, x_4, x_5); return x_7; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21_s11___lambda__1_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21_s11___lambda__1(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21_s11___lambda__2_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned x_5; unsigned x_6; obj* x_7; x_5 = lean::unbox_uint32(x_0); x_6 = lean::unbox_uint32(x_1); x_7 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_foldl__aux_s6___main_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__21_s11___lambda__2(x_5, x_6, x_2, x_3, x_4); return x_7; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_foldl_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__20_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned x_5; obj* x_6; x_5 = lean::unbox_uint32(x_1); x_6 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_foldl_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__20(x_0, x_5, x_2, x_3, x_4); return x_6; } } obj* _l_s4_lean_s6_parser_s15_parse__bin__lit(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; unsigned x_13; x_3 = lean::mk_nat_obj(48u); x_4 = lean::mk_nat_obj(55296u); x_5 = lean::nat_dec_lt(x_3, x_4); x_6 = lean::mk_nat_obj(98u); x_7 = lean::nat_dec_lt(x_6, x_4); x_8 = lean::mk_nat_obj(66u); x_9 = lean::nat_dec_lt(x_8, x_4); x_10 = lean::mk_nat_obj(49u); x_11 = lean::nat_dec_lt(x_10, x_4); lean::dec(x_4); if (lean::obj_tag(x_5) == 0) { obj* x_16; obj* x_17; lean::dec(x_5); x_16 = lean::mk_nat_obj(57343u); x_17 = lean::nat_dec_lt(x_16, x_3); lean::dec(x_16); if (lean::obj_tag(x_17) == 0) { obj* x_21; unsigned x_22; lean::dec(x_3); lean::dec(x_17); x_21 = lean::mk_nat_obj(0u); x_22 = lean::unbox_uint32(x_21); lean::dec(x_21); x_13 = x_22; goto lbl_14; } else { obj* x_25; obj* x_26; lean::dec(x_17); x_25 = lean::mk_nat_obj(1114112u); x_26 = lean::nat_dec_lt(x_3, x_25); lean::dec(x_25); if (lean::obj_tag(x_26) == 0) { obj* x_30; unsigned x_31; lean::dec(x_3); lean::dec(x_26); x_30 = lean::mk_nat_obj(0u); x_31 = lean::unbox_uint32(x_30); lean::dec(x_30); x_13 = x_31; goto lbl_14; } else { unsigned x_34; lean::dec(x_26); x_34 = lean::unbox_uint32(x_3); lean::dec(x_3); x_13 = x_34; goto lbl_14; } } } else { unsigned x_37; lean::dec(x_5); x_37 = lean::unbox_uint32(x_3); lean::dec(x_3); x_13 = x_37; goto lbl_14; } lbl_14: { obj* x_40; unsigned x_41; lean::inc(x_0); x_40 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_13, x_0, x_1, x_2); if (lean::obj_tag(x_7) == 0) { obj* x_44; obj* x_45; lean::dec(x_7); x_44 = lean::mk_nat_obj(57343u); x_45 = lean::nat_dec_lt(x_44, x_6); lean::dec(x_44); if (lean::obj_tag(x_45) == 0) { obj* x_49; unsigned x_50; lean::dec(x_45); lean::dec(x_6); x_49 = lean::mk_nat_obj(0u); x_50 = lean::unbox_uint32(x_49); lean::dec(x_49); x_41 = x_50; goto lbl_42; } else { obj* x_53; obj* x_54; lean::dec(x_45); x_53 = lean::mk_nat_obj(1114112u); x_54 = lean::nat_dec_lt(x_6, x_53); lean::dec(x_53); if (lean::obj_tag(x_54) == 0) { obj* x_58; unsigned x_59; lean::dec(x_54); lean::dec(x_6); x_58 = lean::mk_nat_obj(0u); x_59 = lean::unbox_uint32(x_58); lean::dec(x_58); x_41 = x_59; goto lbl_42; } else { unsigned x_62; lean::dec(x_54); x_62 = lean::unbox_uint32(x_6); lean::dec(x_6); x_41 = x_62; goto lbl_42; } } } else { unsigned x_65; lean::dec(x_7); x_65 = lean::unbox_uint32(x_6); lean::dec(x_6); x_41 = x_65; goto lbl_42; } lbl_42: { unsigned x_67; if (lean::obj_tag(x_9) == 0) { obj* x_70; obj* x_71; lean::dec(x_9); x_70 = lean::mk_nat_obj(57343u); x_71 = lean::nat_dec_lt(x_70, x_8); lean::dec(x_70); if (lean::obj_tag(x_71) == 0) { obj* x_75; unsigned x_76; lean::dec(x_8); lean::dec(x_71); x_75 = lean::mk_nat_obj(0u); x_76 = lean::unbox_uint32(x_75); lean::dec(x_75); x_67 = x_76; goto lbl_68; } else { obj* x_79; obj* x_80; lean::dec(x_71); x_79 = lean::mk_nat_obj(1114112u); x_80 = lean::nat_dec_lt(x_8, x_79); lean::dec(x_79); if (lean::obj_tag(x_80) == 0) { obj* x_84; unsigned x_85; lean::dec(x_8); lean::dec(x_80); x_84 = lean::mk_nat_obj(0u); x_85 = lean::unbox_uint32(x_84); lean::dec(x_84); x_67 = x_85; goto lbl_68; } else { unsigned x_88; lean::dec(x_80); x_88 = lean::unbox_uint32(x_8); lean::dec(x_8); x_67 = x_88; goto lbl_68; } } } else { unsigned x_91; lean::dec(x_9); x_91 = lean::unbox_uint32(x_8); lean::dec(x_8); x_67 = x_91; goto lbl_68; } lbl_68: { unsigned x_93; if (lean::obj_tag(x_11) == 0) { obj* x_96; obj* x_97; lean::dec(x_11); x_96 = lean::mk_nat_obj(57343u); x_97 = lean::nat_dec_lt(x_96, x_10); lean::dec(x_96); if (lean::obj_tag(x_97) == 0) { obj* x_101; unsigned x_102; lean::dec(x_10); lean::dec(x_97); x_101 = lean::mk_nat_obj(0u); x_102 = lean::unbox_uint32(x_101); lean::dec(x_101); x_93 = x_102; goto lbl_94; } else { obj* x_105; obj* x_106; lean::dec(x_97); x_105 = lean::mk_nat_obj(1114112u); x_106 = lean::nat_dec_lt(x_10, x_105); lean::dec(x_105); if (lean::obj_tag(x_106) == 0) { obj* x_110; unsigned x_111; lean::dec(x_106); lean::dec(x_10); x_110 = lean::mk_nat_obj(0u); x_111 = lean::unbox_uint32(x_110); lean::dec(x_110); x_93 = x_111; goto lbl_94; } else { unsigned x_114; lean::dec(x_106); x_114 = lean::unbox_uint32(x_10); lean::dec(x_10); x_93 = x_114; goto lbl_94; } } } else { unsigned x_117; lean::dec(x_11); x_117 = lean::unbox_uint32(x_10); lean::dec(x_10); x_93 = x_117; goto lbl_94; } lbl_94: { obj* x_119; obj* x_120; obj* x_122; obj* x_124; x_122 = lean::cnstr_get(x_40, 0); lean::inc(x_122); x_124 = lean::cnstr_get(x_40, 1); lean::inc(x_124); lean::dec(x_40); if (lean::obj_tag(x_122) == 0) { obj* x_127; obj* x_129; obj* x_134; obj* x_135; obj* x_137; x_127 = lean::cnstr_get(x_122, 1); lean::inc(x_127); x_129 = lean::cnstr_get(x_122, 2); lean::inc(x_129); lean::dec(x_122); lean::inc(x_127); lean::inc(x_0); x_134 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_41, x_0, x_127, x_124); x_135 = lean::cnstr_get(x_134, 0); lean::inc(x_135); x_137 = lean::cnstr_get(x_134, 1); lean::inc(x_137); lean::dec(x_134); if (lean::obj_tag(x_135) == 0) { obj* x_141; lean::dec(x_127); x_141 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_129, x_135); x_119 = x_141; x_120 = x_137; goto lbl_121; } else { obj* x_142; unsigned char x_144; x_142 = lean::cnstr_get(x_135, 0); lean::inc(x_142); x_144 = lean::cnstr_get_scalar(x_135, sizeof(void*)*1); if (x_144 == 0) { obj* x_147; obj* x_148; obj* x_150; obj* x_153; obj* x_154; lean::dec(x_135); lean::inc(x_0); x_147 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_67, x_0, x_127, x_137); x_148 = lean::cnstr_get(x_147, 0); lean::inc(x_148); x_150 = lean::cnstr_get(x_147, 1); lean::inc(x_150); lean::dec(x_147); x_153 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_142, x_148); x_154 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_129, x_153); x_119 = x_154; x_120 = x_150; goto lbl_121; } else { obj* x_157; lean::dec(x_127); lean::dec(x_142); x_157 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_129, x_135); x_119 = x_157; x_120 = x_137; goto lbl_121; } } } else { obj* x_158; unsigned char x_160; obj* x_161; obj* x_162; obj* x_163; x_158 = lean::cnstr_get(x_122, 0); lean::inc(x_158); x_160 = lean::cnstr_get_scalar(x_122, sizeof(void*)*1); if (lean::is_shared(x_122)) { lean::dec(x_122); x_161 = lean::box(0); } else { lean::cnstr_release(x_122, 0); x_161 = x_122; } if (lean::is_scalar(x_161)) { x_162 = lean::alloc_cnstr(1, 1, 1); } else { x_162 = x_161; } lean::cnstr_set(x_162, 0, x_158); lean::cnstr_set_scalar(x_162, sizeof(void*)*1, x_160); x_163 = x_162; x_119 = x_163; x_120 = x_124; goto lbl_121; } lbl_121: { if (lean::obj_tag(x_119) == 0) { obj* x_164; obj* x_166; obj* x_169; obj* x_170; obj* x_171; obj* x_173; obj* x_175; obj* x_176; obj* x_178; obj* x_179; obj* x_180; x_164 = lean::cnstr_get(x_119, 1); lean::inc(x_164); x_166 = lean::cnstr_get(x_119, 2); lean::inc(x_166); lean::dec(x_119); x_169 = lean::string_iterator_remaining(x_164); x_170 = _l_s4_lean_s6_parser_s13_monad__parsec_s14_many1__aux_x27_s6___main_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__2(x_13, x_93, x_169, x_0, x_164, x_120); x_171 = lean::cnstr_get(x_170, 0); lean::inc(x_171); x_173 = lean::cnstr_get(x_170, 1); lean::inc(x_173); if (lean::is_shared(x_170)) { lean::dec(x_170); x_175 = lean::box(0); } else { lean::cnstr_release(x_170, 0); lean::cnstr_release(x_170, 1); x_175 = x_170; } x_176 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_176); x_178 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_176, x_171); x_179 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_166, x_178); if (lean::is_scalar(x_175)) { x_180 = lean::alloc_cnstr(0, 2, 0); } else { x_180 = x_175; } lean::cnstr_set(x_180, 0, x_179); lean::cnstr_set(x_180, 1, x_173); return x_180; } else { obj* x_182; unsigned char x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; lean::dec(x_0); x_182 = lean::cnstr_get(x_119, 0); lean::inc(x_182); x_184 = lean::cnstr_get_scalar(x_119, sizeof(void*)*1); if (lean::is_shared(x_119)) { lean::dec(x_119); x_185 = lean::box(0); } else { lean::cnstr_release(x_119, 0); x_185 = x_119; } if (lean::is_scalar(x_185)) { x_186 = lean::alloc_cnstr(1, 1, 1); } else { x_186 = x_185; } lean::cnstr_set(x_186, 0, x_182); lean::cnstr_set_scalar(x_186, sizeof(void*)*1, x_184); x_187 = x_186; x_188 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_188, 0, x_187); lean::cnstr_set(x_188, 1, x_120); return x_188; } } } } } } } } obj* _l_s9_reader__t_s6_orelse_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__1_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_7; obj* x_8; obj* x_10; obj* x_12; lean::inc(x_3); lean::inc(x_2); x_7 = lean::apply_3(x_0, x_2, x_3, x_4); x_8 = lean::cnstr_get(x_7, 0); lean::inc(x_8); x_10 = lean::cnstr_get(x_7, 1); lean::inc(x_10); if (lean::is_shared(x_7)) { lean::dec(x_7); x_12 = lean::box(0); } else { lean::cnstr_release(x_7, 0); lean::cnstr_release(x_7, 1); x_12 = x_7; } if (lean::obj_tag(x_8) == 0) { obj* x_16; lean::dec(x_1); lean::dec(x_2); lean::dec(x_3); if (lean::is_scalar(x_12)) { x_16 = lean::alloc_cnstr(0, 2, 0); } else { x_16 = x_12; } lean::cnstr_set(x_16, 0, x_8); lean::cnstr_set(x_16, 1, x_10); return x_16; } else { obj* x_17; unsigned char x_19; x_17 = lean::cnstr_get(x_8, 0); lean::inc(x_17); x_19 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); if (x_19 == 0) { obj* x_21; obj* x_22; obj* x_24; obj* x_27; obj* x_28; lean::dec(x_8); x_21 = lean::apply_3(x_1, x_2, x_3, x_10); x_22 = lean::cnstr_get(x_21, 0); lean::inc(x_22); x_24 = lean::cnstr_get(x_21, 1); lean::inc(x_24); lean::dec(x_21); x_27 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_17, x_22); if (lean::is_scalar(x_12)) { x_28 = lean::alloc_cnstr(0, 2, 0); } else { x_28 = x_12; } lean::cnstr_set(x_28, 0, x_27); lean::cnstr_set(x_28, 1, x_24); return x_28; } else { obj* x_33; lean::dec(x_17); lean::dec(x_1); lean::dec(x_2); lean::dec(x_3); if (lean::is_scalar(x_12)) { x_33 = lean::alloc_cnstr(0, 2, 0); } else { x_33 = x_12; } lean::cnstr_set(x_33, 0, x_8); lean::cnstr_set(x_33, 1, x_10); return x_33; } } } } obj* _l_s9_reader__t_s6_orelse_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__1(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s6_orelse_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__1_s6___rarg), 5, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s14_many1__aux_x27_s6___main_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__2(unsigned x_0, unsigned x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; x_6 = lean::box_uint32(x_0); x_7 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11_s7___boxed), 4, 1); lean::closure_set(x_7, 0, x_6); x_8 = lean::box_uint32(x_1); x_9 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11_s7___boxed), 4, 1); lean::closure_set(x_9, 0, x_8); x_10 = lean::mk_nat_obj(0u); x_11 = lean::nat_dec_eq(x_2, x_10); lean::dec(x_10); if (lean::obj_tag(x_11) == 0) { obj* x_15; obj* x_16; obj* x_18; obj* x_20; lean::dec(x_11); lean::inc(x_3); x_15 = _l_s9_reader__t_s6_orelse_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__1_s6___rarg(x_7, x_9, x_3, x_4, x_5); x_16 = lean::cnstr_get(x_15, 0); lean::inc(x_16); x_18 = lean::cnstr_get(x_15, 1); lean::inc(x_18); if (lean::is_shared(x_15)) { lean::dec(x_15); x_20 = lean::box(0); } else { lean::cnstr_release(x_15, 0); lean::cnstr_release(x_15, 1); x_20 = x_15; } if (lean::obj_tag(x_16) == 0) { obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_31; obj* x_32; obj* x_34; x_21 = lean::cnstr_get(x_16, 1); lean::inc(x_21); x_23 = lean::cnstr_get(x_16, 2); lean::inc(x_23); if (lean::is_shared(x_16)) { lean::dec(x_16); x_25 = lean::box(0); } else { lean::cnstr_release(x_16, 0); lean::cnstr_release(x_16, 1); lean::cnstr_release(x_16, 2); x_25 = x_16; } x_26 = lean::mk_nat_obj(1u); x_27 = lean::nat_sub(x_2, x_26); lean::dec(x_26); lean::dec(x_2); lean::inc(x_21); x_31 = _l_s4_lean_s6_parser_s13_monad__parsec_s14_many1__aux_x27_s6___main_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__2(x_0, x_1, x_27, x_3, x_21, x_18); x_32 = lean::cnstr_get(x_31, 0); lean::inc(x_32); x_34 = lean::cnstr_get(x_31, 1); lean::inc(x_34); lean::dec(x_31); if (lean::obj_tag(x_32) == 0) { obj* x_39; obj* x_40; lean::dec(x_21); lean::dec(x_25); x_39 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_23, x_32); if (lean::is_scalar(x_20)) { x_40 = lean::alloc_cnstr(0, 2, 0); } else { x_40 = x_20; } lean::cnstr_set(x_40, 0, x_39); lean::cnstr_set(x_40, 1, x_34); return x_40; } else { obj* x_41; unsigned char x_43; x_41 = lean::cnstr_get(x_32, 0); lean::inc(x_41); x_43 = lean::cnstr_get_scalar(x_32, sizeof(void*)*1); if (x_43 == 0) { obj* x_45; obj* x_48; obj* x_50; obj* x_51; unsigned char x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; lean::dec(x_32); x_45 = lean::cnstr_get(x_41, 2); lean::inc(x_45); lean::dec(x_41); x_48 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_48); x_50 = lean::alloc_closure(reinterpret_cast(_l_s8_function_s4_comp_s6___rarg), 3, 2); lean::closure_set(x_50, 0, x_45); lean::closure_set(x_50, 1, x_48); x_51 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_51, 0, x_50); x_52 = 0; x_53 = lean::box(x_52); if (lean::is_scalar(x_25)) { x_54 = lean::alloc_cnstr(0, 3, 0); } else { x_54 = x_25; } lean::cnstr_set(x_54, 0, x_53); lean::cnstr_set(x_54, 1, x_21); lean::cnstr_set(x_54, 2, x_51); x_55 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_23, x_54); if (lean::is_scalar(x_20)) { x_56 = lean::alloc_cnstr(0, 2, 0); } else { x_56 = x_20; } lean::cnstr_set(x_56, 0, x_55); lean::cnstr_set(x_56, 1, x_34); return x_56; } else { obj* x_60; obj* x_61; lean::dec(x_41); lean::dec(x_21); lean::dec(x_25); x_60 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_23, x_32); if (lean::is_scalar(x_20)) { x_61 = lean::alloc_cnstr(0, 2, 0); } else { x_61 = x_20; } lean::cnstr_set(x_61, 0, x_60); lean::cnstr_set(x_61, 1, x_34); return x_61; } } } else { obj* x_64; unsigned char x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; lean::dec(x_2); lean::dec(x_3); x_64 = lean::cnstr_get(x_16, 0); lean::inc(x_64); x_66 = lean::cnstr_get_scalar(x_16, sizeof(void*)*1); if (lean::is_shared(x_16)) { lean::dec(x_16); x_67 = lean::box(0); } else { lean::cnstr_release(x_16, 0); x_67 = x_16; } if (lean::is_scalar(x_67)) { x_68 = lean::alloc_cnstr(1, 1, 1); } else { x_68 = x_67; } lean::cnstr_set(x_68, 0, x_64); lean::cnstr_set_scalar(x_68, sizeof(void*)*1, x_66); x_69 = x_68; if (lean::is_scalar(x_20)) { x_70 = lean::alloc_cnstr(0, 2, 0); } else { x_70 = x_20; } lean::cnstr_set(x_70, 0, x_69); lean::cnstr_set(x_70, 1, x_18); return x_70; } } else { obj* x_73; obj* x_74; obj* x_76; obj* x_78; lean::dec(x_11); lean::dec(x_2); x_73 = _l_s9_reader__t_s6_orelse_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__1_s6___rarg(x_7, x_9, x_3, x_4, x_5); x_74 = lean::cnstr_get(x_73, 0); lean::inc(x_74); x_76 = lean::cnstr_get(x_73, 1); lean::inc(x_76); if (lean::is_shared(x_73)) { lean::dec(x_73); x_78 = lean::box(0); } else { lean::cnstr_release(x_73, 0); lean::cnstr_release(x_73, 1); x_78 = x_73; } if (lean::obj_tag(x_74) == 0) { obj* x_79; obj* x_81; obj* x_83; unsigned char x_84; obj* x_85; obj* x_86; obj* x_88; obj* x_89; obj* x_90; x_79 = lean::cnstr_get(x_74, 1); lean::inc(x_79); x_81 = lean::cnstr_get(x_74, 2); lean::inc(x_81); if (lean::is_shared(x_74)) { lean::dec(x_74); x_83 = lean::box(0); } else { lean::cnstr_release(x_74, 0); lean::cnstr_release(x_74, 1); lean::cnstr_release(x_74, 2); x_83 = x_74; } x_84 = 0; x_85 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; x_86 = lean::box(x_84); lean::inc(x_85); if (lean::is_scalar(x_83)) { x_88 = lean::alloc_cnstr(0, 3, 0); } else { x_88 = x_83; } lean::cnstr_set(x_88, 0, x_86); lean::cnstr_set(x_88, 1, x_79); lean::cnstr_set(x_88, 2, x_85); x_89 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_81, x_88); if (lean::is_scalar(x_78)) { x_90 = lean::alloc_cnstr(0, 2, 0); } else { x_90 = x_78; } lean::cnstr_set(x_90, 0, x_89); lean::cnstr_set(x_90, 1, x_76); return x_90; } else { obj* x_91; unsigned char x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; x_91 = lean::cnstr_get(x_74, 0); lean::inc(x_91); x_93 = lean::cnstr_get_scalar(x_74, sizeof(void*)*1); if (lean::is_shared(x_74)) { lean::dec(x_74); x_94 = lean::box(0); } else { lean::cnstr_release(x_74, 0); x_94 = x_74; } if (lean::is_scalar(x_94)) { x_95 = lean::alloc_cnstr(1, 1, 1); } else { x_95 = x_94; } lean::cnstr_set(x_95, 0, x_91); lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_93); x_96 = x_95; if (lean::is_scalar(x_78)) { x_97 = lean::alloc_cnstr(0, 2, 0); } else { x_97 = x_78; } lean::cnstr_set(x_97, 0, x_96); lean::cnstr_set(x_97, 1, x_76); return x_97; } } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s14_many1__aux_x27_s6___main_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__2_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { unsigned x_6; unsigned x_7; obj* x_8; x_6 = lean::unbox_uint32(x_0); x_7 = lean::unbox_uint32(x_1); x_8 = _l_s4_lean_s6_parser_s13_monad__parsec_s14_many1__aux_x27_s6___main_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__2(x_6, x_7, x_2, x_3, x_4, x_5); return x_8; } } obj* _l_s4_lean_s6_parser_s15_parse__oct__lit(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; unsigned x_11; x_3 = lean::mk_nat_obj(48u); x_4 = lean::mk_nat_obj(55296u); x_5 = lean::nat_dec_lt(x_3, x_4); x_6 = lean::mk_nat_obj(111u); x_7 = lean::nat_dec_lt(x_6, x_4); x_8 = lean::mk_nat_obj(79u); x_9 = lean::nat_dec_lt(x_8, x_4); lean::dec(x_4); if (lean::obj_tag(x_5) == 0) { obj* x_14; obj* x_15; lean::dec(x_5); x_14 = lean::mk_nat_obj(57343u); x_15 = lean::nat_dec_lt(x_14, x_3); lean::dec(x_14); if (lean::obj_tag(x_15) == 0) { obj* x_19; unsigned x_20; lean::dec(x_3); lean::dec(x_15); x_19 = lean::mk_nat_obj(0u); x_20 = lean::unbox_uint32(x_19); lean::dec(x_19); x_11 = x_20; goto lbl_12; } else { obj* x_23; obj* x_24; lean::dec(x_15); x_23 = lean::mk_nat_obj(1114112u); x_24 = lean::nat_dec_lt(x_3, x_23); lean::dec(x_23); if (lean::obj_tag(x_24) == 0) { obj* x_28; unsigned x_29; lean::dec(x_3); lean::dec(x_24); x_28 = lean::mk_nat_obj(0u); x_29 = lean::unbox_uint32(x_28); lean::dec(x_28); x_11 = x_29; goto lbl_12; } else { unsigned x_32; lean::dec(x_24); x_32 = lean::unbox_uint32(x_3); lean::dec(x_3); x_11 = x_32; goto lbl_12; } } } else { unsigned x_35; lean::dec(x_5); x_35 = lean::unbox_uint32(x_3); lean::dec(x_3); x_11 = x_35; goto lbl_12; } lbl_12: { obj* x_37; obj* x_38; obj* x_41; unsigned x_42; lean::inc(x_0); x_41 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_11, x_0, x_1, x_2); if (lean::obj_tag(x_7) == 0) { obj* x_45; obj* x_46; lean::dec(x_7); x_45 = lean::mk_nat_obj(57343u); x_46 = lean::nat_dec_lt(x_45, x_6); lean::dec(x_45); if (lean::obj_tag(x_46) == 0) { obj* x_50; unsigned x_51; lean::dec(x_46); lean::dec(x_6); x_50 = lean::mk_nat_obj(0u); x_51 = lean::unbox_uint32(x_50); lean::dec(x_50); x_42 = x_51; goto lbl_43; } else { obj* x_54; obj* x_55; lean::dec(x_46); x_54 = lean::mk_nat_obj(1114112u); x_55 = lean::nat_dec_lt(x_6, x_54); lean::dec(x_54); if (lean::obj_tag(x_55) == 0) { obj* x_59; unsigned x_60; lean::dec(x_55); lean::dec(x_6); x_59 = lean::mk_nat_obj(0u); x_60 = lean::unbox_uint32(x_59); lean::dec(x_59); x_42 = x_60; goto lbl_43; } else { unsigned x_63; lean::dec(x_55); x_63 = lean::unbox_uint32(x_6); lean::dec(x_6); x_42 = x_63; goto lbl_43; } } } else { unsigned x_66; lean::dec(x_7); x_66 = lean::unbox_uint32(x_6); lean::dec(x_6); x_42 = x_66; goto lbl_43; } lbl_39: { if (lean::obj_tag(x_37) == 0) { obj* x_68; obj* x_70; obj* x_73; obj* x_74; obj* x_76; obj* x_78; obj* x_79; obj* x_80; x_68 = lean::cnstr_get(x_37, 1); lean::inc(x_68); x_70 = lean::cnstr_get(x_37, 2); lean::inc(x_70); lean::dec(x_37); x_73 = _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__1(x_11, x_0, x_68, x_38); x_74 = lean::cnstr_get(x_73, 0); lean::inc(x_74); x_76 = lean::cnstr_get(x_73, 1); lean::inc(x_76); if (lean::is_shared(x_73)) { lean::dec(x_73); x_78 = lean::box(0); } else { lean::cnstr_release(x_73, 0); lean::cnstr_release(x_73, 1); x_78 = x_73; } x_79 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_70, x_74); if (lean::is_scalar(x_78)) { x_80 = lean::alloc_cnstr(0, 2, 0); } else { x_80 = x_78; } lean::cnstr_set(x_80, 0, x_79); lean::cnstr_set(x_80, 1, x_76); return x_80; } else { obj* x_82; unsigned char x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; lean::dec(x_0); x_82 = lean::cnstr_get(x_37, 0); lean::inc(x_82); x_84 = lean::cnstr_get_scalar(x_37, sizeof(void*)*1); if (lean::is_shared(x_37)) { lean::dec(x_37); x_85 = lean::box(0); } else { lean::cnstr_release(x_37, 0); x_85 = x_37; } if (lean::is_scalar(x_85)) { x_86 = lean::alloc_cnstr(1, 1, 1); } else { x_86 = x_85; } lean::cnstr_set(x_86, 0, x_82); lean::cnstr_set_scalar(x_86, sizeof(void*)*1, x_84); x_87 = x_86; x_88 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_88, 0, x_87); lean::cnstr_set(x_88, 1, x_38); return x_88; } } lbl_43: { unsigned x_89; obj* x_90; obj* x_91; if (lean::obj_tag(x_9) == 0) { obj* x_94; obj* x_95; lean::dec(x_9); x_94 = lean::mk_nat_obj(57343u); x_95 = lean::nat_dec_lt(x_94, x_8); lean::dec(x_94); if (lean::obj_tag(x_95) == 0) { obj* x_99; obj* x_101; obj* x_104; unsigned x_105; lean::dec(x_8); lean::dec(x_95); x_99 = lean::cnstr_get(x_41, 0); lean::inc(x_99); x_101 = lean::cnstr_get(x_41, 1); lean::inc(x_101); lean::dec(x_41); x_104 = lean::mk_nat_obj(0u); x_105 = lean::unbox_uint32(x_104); lean::dec(x_104); x_89 = x_105; x_90 = x_99; x_91 = x_101; goto lbl_92; } else { obj* x_108; obj* x_109; lean::dec(x_95); x_108 = lean::mk_nat_obj(1114112u); x_109 = lean::nat_dec_lt(x_8, x_108); lean::dec(x_108); if (lean::obj_tag(x_109) == 0) { obj* x_113; obj* x_115; obj* x_118; unsigned x_119; lean::dec(x_8); lean::dec(x_109); x_113 = lean::cnstr_get(x_41, 0); lean::inc(x_113); x_115 = lean::cnstr_get(x_41, 1); lean::inc(x_115); lean::dec(x_41); x_118 = lean::mk_nat_obj(0u); x_119 = lean::unbox_uint32(x_118); lean::dec(x_118); x_89 = x_119; x_90 = x_113; x_91 = x_115; goto lbl_92; } else { obj* x_122; obj* x_124; unsigned x_127; lean::dec(x_109); x_122 = lean::cnstr_get(x_41, 0); lean::inc(x_122); x_124 = lean::cnstr_get(x_41, 1); lean::inc(x_124); lean::dec(x_41); x_127 = lean::unbox_uint32(x_8); lean::dec(x_8); x_89 = x_127; x_90 = x_122; x_91 = x_124; goto lbl_92; } } } else { obj* x_130; obj* x_132; unsigned x_135; lean::dec(x_9); x_130 = lean::cnstr_get(x_41, 0); lean::inc(x_130); x_132 = lean::cnstr_get(x_41, 1); lean::inc(x_132); lean::dec(x_41); x_135 = lean::unbox_uint32(x_8); lean::dec(x_8); x_89 = x_135; x_90 = x_130; x_91 = x_132; goto lbl_92; } lbl_92: { if (lean::obj_tag(x_90) == 0) { obj* x_137; obj* x_139; obj* x_144; obj* x_145; obj* x_147; x_137 = lean::cnstr_get(x_90, 1); lean::inc(x_137); x_139 = lean::cnstr_get(x_90, 2); lean::inc(x_139); lean::dec(x_90); lean::inc(x_137); lean::inc(x_0); x_144 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_42, x_0, x_137, x_91); x_145 = lean::cnstr_get(x_144, 0); lean::inc(x_145); x_147 = lean::cnstr_get(x_144, 1); lean::inc(x_147); lean::dec(x_144); if (lean::obj_tag(x_145) == 0) { obj* x_151; lean::dec(x_137); x_151 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_139, x_145); x_37 = x_151; x_38 = x_147; goto lbl_39; } else { obj* x_152; unsigned char x_154; x_152 = lean::cnstr_get(x_145, 0); lean::inc(x_152); x_154 = lean::cnstr_get_scalar(x_145, sizeof(void*)*1); if (x_154 == 0) { obj* x_157; obj* x_158; obj* x_160; obj* x_163; obj* x_164; lean::dec(x_145); lean::inc(x_0); x_157 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_89, x_0, x_137, x_147); x_158 = lean::cnstr_get(x_157, 0); lean::inc(x_158); x_160 = lean::cnstr_get(x_157, 1); lean::inc(x_160); lean::dec(x_157); x_163 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_152, x_158); x_164 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_139, x_163); x_37 = x_164; x_38 = x_160; goto lbl_39; } else { obj* x_167; lean::dec(x_137); lean::dec(x_152); x_167 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_139, x_145); x_37 = x_167; x_38 = x_147; goto lbl_39; } } } else { obj* x_168; unsigned char x_170; obj* x_171; obj* x_172; obj* x_173; x_168 = lean::cnstr_get(x_90, 0); lean::inc(x_168); x_170 = lean::cnstr_get_scalar(x_90, sizeof(void*)*1); if (lean::is_shared(x_90)) { lean::dec(x_90); x_171 = lean::box(0); } else { lean::cnstr_release(x_90, 0); x_171 = x_90; } if (lean::is_scalar(x_171)) { x_172 = lean::alloc_cnstr(1, 1, 1); } else { x_172 = x_171; } lean::cnstr_set(x_172, 0, x_168); lean::cnstr_set_scalar(x_172, sizeof(void*)*1, x_170); x_173 = x_172; x_37 = x_173; x_38 = x_91; goto lbl_39; } } } } } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__3(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; x_4 = lean::mk_nat_obj(0u); x_5 = lean::nat_dec_eq(x_1, x_4); if (lean::obj_tag(x_5) == 0) { unsigned char x_7; lean::dec(x_5); x_7 = lean::string_iterator_has_next(x_3); if (x_7 == 0) { obj* x_10; lean::dec(x_4); lean::dec(x_1); x_10 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_10; } else { obj* x_11; obj* x_12; unsigned x_15; unsigned char x_16; unsigned char x_18; obj* x_20; obj* x_21; obj* x_22; x_11 = lean::mk_nat_obj(1u); x_12 = lean::nat_sub(x_1, x_11); lean::dec(x_11); lean::dec(x_1); x_15 = lean::string_iterator_curr(x_3); x_20 = lean::box_uint32(x_0); x_21 = lean::box_uint32(x_15); x_22 = lean::nat_dec_le(x_20, x_21); lean::dec(x_21); lean::dec(x_20); if (lean::obj_tag(x_22) == 0) { obj* x_28; lean::dec(x_22); lean::dec(x_12); lean::dec(x_4); x_28 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_28; } else { unsigned char x_30; lean::dec(x_22); x_30 = 1; x_18 = x_30; goto lbl_19; } lbl_17: { obj* x_31; obj* x_32; obj* x_33; x_31 = lean::string_push(x_2, x_15); x_32 = lean::string_iterator_next(x_3); x_33 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__3(x_0, x_12, x_31, x_32); return x_33; } lbl_19: { obj* x_34; obj* x_35; obj* x_36; x_34 = lean::mk_nat_obj(56u); x_35 = lean::mk_nat_obj(55296u); x_36 = lean::nat_dec_lt(x_34, x_35); lean::dec(x_35); if (lean::obj_tag(x_36) == 0) { obj* x_39; obj* x_40; lean::dec(x_36); x_39 = lean::mk_nat_obj(57343u); x_40 = lean::nat_dec_lt(x_39, x_34); lean::dec(x_39); if (lean::obj_tag(x_40) == 0) { obj* x_44; obj* x_45; lean::dec(x_40); lean::dec(x_34); x_44 = lean::box_uint32(x_15); x_45 = lean::nat_dec_lt(x_44, x_4); lean::dec(x_4); lean::dec(x_44); if (lean::obj_tag(x_45) == 0) { obj* x_50; lean::dec(x_12); lean::dec(x_45); x_50 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_50; } else { lean::dec(x_45); if (x_18 == 0) { obj* x_53; lean::dec(x_12); x_53 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_53; } else { unsigned char x_54; x_54 = 0; x_16 = x_54; goto lbl_17; } } } else { obj* x_56; obj* x_57; lean::dec(x_40); x_56 = lean::mk_nat_obj(1114112u); x_57 = lean::nat_dec_lt(x_34, x_56); lean::dec(x_56); if (lean::obj_tag(x_57) == 0) { obj* x_61; obj* x_62; lean::dec(x_57); lean::dec(x_34); x_61 = lean::box_uint32(x_15); x_62 = lean::nat_dec_lt(x_61, x_4); lean::dec(x_4); lean::dec(x_61); if (lean::obj_tag(x_62) == 0) { obj* x_67; lean::dec(x_12); lean::dec(x_62); x_67 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_67; } else { lean::dec(x_62); if (x_18 == 0) { obj* x_70; lean::dec(x_12); x_70 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_70; } else { unsigned char x_71; x_71 = 0; x_16 = x_71; goto lbl_17; } } } else { obj* x_74; obj* x_75; lean::dec(x_57); lean::dec(x_4); x_74 = lean::box_uint32(x_15); x_75 = lean::nat_dec_lt(x_74, x_34); lean::dec(x_34); lean::dec(x_74); if (lean::obj_tag(x_75) == 0) { obj* x_80; lean::dec(x_12); lean::dec(x_75); x_80 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_80; } else { lean::dec(x_75); if (x_18 == 0) { obj* x_83; lean::dec(x_12); x_83 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_83; } else { unsigned char x_84; x_84 = 0; x_16 = x_84; goto lbl_17; } } } } } else { obj* x_87; obj* x_88; lean::dec(x_4); lean::dec(x_36); x_87 = lean::box_uint32(x_15); x_88 = lean::nat_dec_lt(x_87, x_34); lean::dec(x_34); lean::dec(x_87); if (lean::obj_tag(x_88) == 0) { obj* x_93; lean::dec(x_12); lean::dec(x_88); x_93 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_93; } else { lean::dec(x_88); if (x_18 == 0) { obj* x_96; lean::dec(x_12); x_96 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_96; } else { unsigned char x_97; x_97 = 0; x_16 = x_97; goto lbl_17; } } } } } } else { obj* x_101; lean::dec(x_4); lean::dec(x_5); lean::dec(x_1); x_101 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_101; } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__2(unsigned x_0, unsigned x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; lean::dec(x_2); x_6 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_6); x_8 = lean::string_push(x_6, x_1); x_9 = lean::string_iterator_remaining(x_3); x_10 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__3(x_0, x_9, x_8, x_3); x_11 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_11, 0, x_10); lean::cnstr_set(x_11, 1, x_4); return x_11; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__5(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; x_4 = lean::mk_nat_obj(0u); x_5 = lean::nat_dec_eq(x_1, x_4); if (lean::obj_tag(x_5) == 0) { unsigned char x_7; lean::dec(x_5); x_7 = lean::string_iterator_has_next(x_3); if (x_7 == 0) { obj* x_10; lean::dec(x_4); lean::dec(x_1); x_10 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_10; } else { obj* x_11; obj* x_12; unsigned x_15; unsigned char x_16; unsigned char x_18; obj* x_20; obj* x_21; obj* x_22; x_11 = lean::mk_nat_obj(1u); x_12 = lean::nat_sub(x_1, x_11); lean::dec(x_11); lean::dec(x_1); x_15 = lean::string_iterator_curr(x_3); x_20 = lean::box_uint32(x_0); x_21 = lean::box_uint32(x_15); x_22 = lean::nat_dec_le(x_20, x_21); lean::dec(x_21); lean::dec(x_20); if (lean::obj_tag(x_22) == 0) { obj* x_28; lean::dec(x_22); lean::dec(x_12); lean::dec(x_4); x_28 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_28; } else { unsigned char x_30; lean::dec(x_22); x_30 = 1; x_18 = x_30; goto lbl_19; } lbl_17: { obj* x_31; obj* x_32; obj* x_33; x_31 = lean::string_push(x_2, x_15); x_32 = lean::string_iterator_next(x_3); x_33 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__5(x_0, x_12, x_31, x_32); return x_33; } lbl_19: { obj* x_34; obj* x_35; obj* x_36; x_34 = lean::mk_nat_obj(56u); x_35 = lean::mk_nat_obj(55296u); x_36 = lean::nat_dec_lt(x_34, x_35); lean::dec(x_35); if (lean::obj_tag(x_36) == 0) { obj* x_39; obj* x_40; lean::dec(x_36); x_39 = lean::mk_nat_obj(57343u); x_40 = lean::nat_dec_lt(x_39, x_34); lean::dec(x_39); if (lean::obj_tag(x_40) == 0) { obj* x_44; obj* x_45; lean::dec(x_40); lean::dec(x_34); x_44 = lean::box_uint32(x_15); x_45 = lean::nat_dec_lt(x_44, x_4); lean::dec(x_4); lean::dec(x_44); if (lean::obj_tag(x_45) == 0) { obj* x_50; lean::dec(x_12); lean::dec(x_45); x_50 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_50; } else { lean::dec(x_45); if (x_18 == 0) { obj* x_53; lean::dec(x_12); x_53 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_53; } else { unsigned char x_54; x_54 = 0; x_16 = x_54; goto lbl_17; } } } else { obj* x_56; obj* x_57; lean::dec(x_40); x_56 = lean::mk_nat_obj(1114112u); x_57 = lean::nat_dec_lt(x_34, x_56); lean::dec(x_56); if (lean::obj_tag(x_57) == 0) { obj* x_61; obj* x_62; lean::dec(x_57); lean::dec(x_34); x_61 = lean::box_uint32(x_15); x_62 = lean::nat_dec_lt(x_61, x_4); lean::dec(x_4); lean::dec(x_61); if (lean::obj_tag(x_62) == 0) { obj* x_67; lean::dec(x_12); lean::dec(x_62); x_67 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_67; } else { lean::dec(x_62); if (x_18 == 0) { obj* x_70; lean::dec(x_12); x_70 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_70; } else { unsigned char x_71; x_71 = 0; x_16 = x_71; goto lbl_17; } } } else { obj* x_74; obj* x_75; lean::dec(x_57); lean::dec(x_4); x_74 = lean::box_uint32(x_15); x_75 = lean::nat_dec_lt(x_74, x_34); lean::dec(x_34); lean::dec(x_74); if (lean::obj_tag(x_75) == 0) { obj* x_80; lean::dec(x_12); lean::dec(x_75); x_80 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_80; } else { lean::dec(x_75); if (x_18 == 0) { obj* x_83; lean::dec(x_12); x_83 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_83; } else { unsigned char x_84; x_84 = 0; x_16 = x_84; goto lbl_17; } } } } } else { obj* x_87; obj* x_88; lean::dec(x_4); lean::dec(x_36); x_87 = lean::box_uint32(x_15); x_88 = lean::nat_dec_lt(x_87, x_34); lean::dec(x_34); lean::dec(x_87); if (lean::obj_tag(x_88) == 0) { obj* x_93; lean::dec(x_12); lean::dec(x_88); x_93 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_93; } else { lean::dec(x_88); if (x_18 == 0) { obj* x_96; lean::dec(x_12); x_96 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_96; } else { unsigned char x_97; x_97 = 0; x_16 = x_97; goto lbl_17; } } } } } } else { obj* x_101; lean::dec(x_4); lean::dec(x_5); lean::dec(x_1); x_101 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_101; } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__4(unsigned x_0, unsigned x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; lean::dec(x_2); x_6 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_6); x_8 = lean::string_push(x_6, x_1); x_9 = lean::string_iterator_remaining(x_3); x_10 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__5(x_0, x_9, x_8, x_3); x_11 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_11, 0, x_10); lean::cnstr_set(x_11, 1, x_4); return x_11; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__7(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; x_4 = lean::mk_nat_obj(0u); x_5 = lean::nat_dec_eq(x_1, x_4); if (lean::obj_tag(x_5) == 0) { unsigned char x_7; lean::dec(x_5); x_7 = lean::string_iterator_has_next(x_3); if (x_7 == 0) { obj* x_10; lean::dec(x_4); lean::dec(x_1); x_10 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_10; } else { obj* x_11; obj* x_12; unsigned x_15; unsigned char x_16; unsigned char x_18; obj* x_20; obj* x_21; obj* x_22; x_11 = lean::mk_nat_obj(1u); x_12 = lean::nat_sub(x_1, x_11); lean::dec(x_11); lean::dec(x_1); x_15 = lean::string_iterator_curr(x_3); x_20 = lean::box_uint32(x_0); x_21 = lean::box_uint32(x_15); x_22 = lean::nat_dec_le(x_20, x_21); lean::dec(x_21); lean::dec(x_20); if (lean::obj_tag(x_22) == 0) { obj* x_28; lean::dec(x_22); lean::dec(x_12); lean::dec(x_4); x_28 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_28; } else { unsigned char x_30; lean::dec(x_22); x_30 = 1; x_18 = x_30; goto lbl_19; } lbl_17: { obj* x_31; obj* x_32; obj* x_33; x_31 = lean::string_push(x_2, x_15); x_32 = lean::string_iterator_next(x_3); x_33 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__7(x_0, x_12, x_31, x_32); return x_33; } lbl_19: { obj* x_34; obj* x_35; obj* x_36; x_34 = lean::mk_nat_obj(56u); x_35 = lean::mk_nat_obj(55296u); x_36 = lean::nat_dec_lt(x_34, x_35); lean::dec(x_35); if (lean::obj_tag(x_36) == 0) { obj* x_39; obj* x_40; lean::dec(x_36); x_39 = lean::mk_nat_obj(57343u); x_40 = lean::nat_dec_lt(x_39, x_34); lean::dec(x_39); if (lean::obj_tag(x_40) == 0) { obj* x_44; obj* x_45; lean::dec(x_40); lean::dec(x_34); x_44 = lean::box_uint32(x_15); x_45 = lean::nat_dec_lt(x_44, x_4); lean::dec(x_4); lean::dec(x_44); if (lean::obj_tag(x_45) == 0) { obj* x_50; lean::dec(x_12); lean::dec(x_45); x_50 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_50; } else { lean::dec(x_45); if (x_18 == 0) { obj* x_53; lean::dec(x_12); x_53 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_53; } else { unsigned char x_54; x_54 = 0; x_16 = x_54; goto lbl_17; } } } else { obj* x_56; obj* x_57; lean::dec(x_40); x_56 = lean::mk_nat_obj(1114112u); x_57 = lean::nat_dec_lt(x_34, x_56); lean::dec(x_56); if (lean::obj_tag(x_57) == 0) { obj* x_61; obj* x_62; lean::dec(x_57); lean::dec(x_34); x_61 = lean::box_uint32(x_15); x_62 = lean::nat_dec_lt(x_61, x_4); lean::dec(x_4); lean::dec(x_61); if (lean::obj_tag(x_62) == 0) { obj* x_67; lean::dec(x_12); lean::dec(x_62); x_67 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_67; } else { lean::dec(x_62); if (x_18 == 0) { obj* x_70; lean::dec(x_12); x_70 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_70; } else { unsigned char x_71; x_71 = 0; x_16 = x_71; goto lbl_17; } } } else { obj* x_74; obj* x_75; lean::dec(x_57); lean::dec(x_4); x_74 = lean::box_uint32(x_15); x_75 = lean::nat_dec_lt(x_74, x_34); lean::dec(x_34); lean::dec(x_74); if (lean::obj_tag(x_75) == 0) { obj* x_80; lean::dec(x_12); lean::dec(x_75); x_80 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_80; } else { lean::dec(x_75); if (x_18 == 0) { obj* x_83; lean::dec(x_12); x_83 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_83; } else { unsigned char x_84; x_84 = 0; x_16 = x_84; goto lbl_17; } } } } } else { obj* x_87; obj* x_88; lean::dec(x_4); lean::dec(x_36); x_87 = lean::box_uint32(x_15); x_88 = lean::nat_dec_lt(x_87, x_34); lean::dec(x_34); lean::dec(x_87); if (lean::obj_tag(x_88) == 0) { obj* x_93; lean::dec(x_12); lean::dec(x_88); x_93 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_93; } else { lean::dec(x_88); if (x_18 == 0) { obj* x_96; lean::dec(x_12); x_96 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_96; } else { unsigned char x_97; x_97 = 0; x_16 = x_97; goto lbl_17; } } } } } } else { obj* x_101; lean::dec(x_4); lean::dec(x_5); lean::dec(x_1); x_101 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_2, x_3); return x_101; } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__6(unsigned x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; lean::dec(x_2); x_6 = lean::string_iterator_curr(x_1); lean::dec(x_1); x_8 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_8); x_10 = lean::string_push(x_8, x_6); x_11 = lean::string_iterator_remaining(x_3); x_12 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__7(x_0, x_11, x_10, x_3); x_13 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_13, 0, x_12); lean::cnstr_set(x_13, 1, x_4); return x_13; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__1(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned char x_4; x_4 = lean::string_iterator_has_next(x_2); if (x_4 == 0) { obj* x_5; obj* x_6; obj* x_7; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_20; x_5 = lean::box(0); x_6 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_7 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_1); lean::inc(x_5); lean::inc(x_7); lean::inc(x_6); x_12 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_6, x_7, x_5, x_5, x_1, x_2, x_3); x_13 = lean::cnstr_get(x_12, 0); lean::inc(x_13); x_15 = lean::cnstr_get(x_12, 1); lean::inc(x_15); if (lean::is_shared(x_12)) { lean::dec(x_12); x_17 = lean::box(0); } else { lean::cnstr_release(x_12, 0); lean::cnstr_release(x_12, 1); x_17 = x_12; } x_18 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_18); x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_18, x_13); if (lean::obj_tag(x_20) == 0) { obj* x_21; obj* x_23; obj* x_25; unsigned x_28; obj* x_30; obj* x_31; obj* x_33; obj* x_36; obj* x_37; x_21 = lean::cnstr_get(x_20, 0); lean::inc(x_21); x_23 = lean::cnstr_get(x_20, 1); lean::inc(x_23); x_25 = lean::cnstr_get(x_20, 2); lean::inc(x_25); lean::dec(x_20); x_28 = lean::unbox_uint32(x_21); lean::dec(x_21); x_30 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__2(x_0, x_28, x_1, x_23, x_15); x_31 = lean::cnstr_get(x_30, 0); lean::inc(x_31); x_33 = lean::cnstr_get(x_30, 1); lean::inc(x_33); lean::dec(x_30); x_36 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_25, x_31); if (lean::is_scalar(x_17)) { x_37 = lean::alloc_cnstr(0, 2, 0); } else { x_37 = x_17; } lean::cnstr_set(x_37, 0, x_36); lean::cnstr_set(x_37, 1, x_33); return x_37; } else { obj* x_39; unsigned char x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; lean::dec(x_1); x_39 = lean::cnstr_get(x_20, 0); lean::inc(x_39); x_41 = lean::cnstr_get_scalar(x_20, sizeof(void*)*1); if (lean::is_shared(x_20)) { lean::dec(x_20); x_42 = lean::box(0); } else { lean::cnstr_release(x_20, 0); x_42 = x_20; } if (lean::is_scalar(x_42)) { x_43 = lean::alloc_cnstr(1, 1, 1); } else { x_43 = x_42; } lean::cnstr_set(x_43, 0, x_39); lean::cnstr_set_scalar(x_43, sizeof(void*)*1, x_41); x_44 = x_43; if (lean::is_scalar(x_17)) { x_45 = lean::alloc_cnstr(0, 2, 0); } else { x_45 = x_17; } lean::cnstr_set(x_45, 0, x_44); lean::cnstr_set(x_45, 1, x_15); return x_45; } } else { unsigned x_46; unsigned char x_47; unsigned char x_49; unsigned char x_51; obj* x_53; obj* x_54; obj* x_55; x_46 = lean::string_iterator_curr(x_2); x_53 = lean::box_uint32(x_0); x_54 = lean::box_uint32(x_46); x_55 = lean::nat_dec_le(x_53, x_54); lean::dec(x_54); lean::dec(x_53); if (lean::obj_tag(x_55) == 0) { unsigned char x_59; lean::dec(x_55); x_59 = 0; x_47 = x_59; goto lbl_48; } else { unsigned char x_61; lean::dec(x_55); x_61 = 1; x_51 = x_61; goto lbl_52; } lbl_48: { obj* x_62; obj* x_63; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_73; obj* x_74; obj* x_76; obj* x_78; obj* x_79; obj* x_81; x_62 = _l_s4_char_s11_quote__core(x_46); x_63 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_63); x_65 = lean::string_append(x_63, x_62); lean::dec(x_62); x_67 = lean::string_append(x_65, x_63); x_68 = lean::box(0); x_69 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_1); lean::inc(x_68); lean::inc(x_69); x_73 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_67, x_69, x_68, x_68, x_1, x_2, x_3); x_74 = lean::cnstr_get(x_73, 0); lean::inc(x_74); x_76 = lean::cnstr_get(x_73, 1); lean::inc(x_76); if (lean::is_shared(x_73)) { lean::dec(x_73); x_78 = lean::box(0); } else { lean::cnstr_release(x_73, 0); lean::cnstr_release(x_73, 1); x_78 = x_73; } x_79 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_79); x_81 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_79, x_74); if (lean::obj_tag(x_81) == 0) { obj* x_82; obj* x_84; obj* x_86; unsigned x_89; obj* x_91; obj* x_92; obj* x_94; obj* x_97; obj* x_98; 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); lean::dec(x_81); x_89 = lean::unbox_uint32(x_82); lean::dec(x_82); x_91 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__4(x_0, x_89, x_1, x_84, x_76); x_92 = lean::cnstr_get(x_91, 0); lean::inc(x_92); x_94 = lean::cnstr_get(x_91, 1); lean::inc(x_94); lean::dec(x_91); x_97 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_86, x_92); if (lean::is_scalar(x_78)) { x_98 = lean::alloc_cnstr(0, 2, 0); } else { x_98 = x_78; } lean::cnstr_set(x_98, 0, x_97); lean::cnstr_set(x_98, 1, x_94); return x_98; } else { obj* x_100; unsigned char x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; lean::dec(x_1); x_100 = lean::cnstr_get(x_81, 0); lean::inc(x_100); x_102 = lean::cnstr_get_scalar(x_81, sizeof(void*)*1); if (lean::is_shared(x_81)) { lean::dec(x_81); x_103 = lean::box(0); } else { lean::cnstr_release(x_81, 0); x_103 = x_81; } if (lean::is_scalar(x_103)) { x_104 = lean::alloc_cnstr(1, 1, 1); } else { x_104 = x_103; } lean::cnstr_set(x_104, 0, x_100); lean::cnstr_set_scalar(x_104, sizeof(void*)*1, x_102); x_105 = x_104; if (lean::is_scalar(x_78)) { x_106 = lean::alloc_cnstr(0, 2, 0); } else { x_106 = x_78; } lean::cnstr_set(x_106, 0, x_105); lean::cnstr_set(x_106, 1, x_76); return x_106; } } lbl_50: { obj* x_108; obj* x_109; obj* x_110; obj* x_112; obj* x_114; obj* x_115; obj* x_116; obj* x_117; lean::inc(x_2); x_108 = lean::string_iterator_next(x_2); x_109 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__6(x_0, x_2, x_1, x_108, x_3); x_110 = lean::cnstr_get(x_109, 0); lean::inc(x_110); x_112 = lean::cnstr_get(x_109, 1); lean::inc(x_112); if (lean::is_shared(x_109)) { lean::dec(x_109); x_114 = lean::box(0); } else { lean::cnstr_release(x_109, 0); lean::cnstr_release(x_109, 1); x_114 = x_109; } x_115 = lean::box(0); x_116 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_115, x_110); if (lean::is_scalar(x_114)) { x_117 = lean::alloc_cnstr(0, 2, 0); } else { x_117 = x_114; } lean::cnstr_set(x_117, 0, x_116); lean::cnstr_set(x_117, 1, x_112); return x_117; } lbl_52: { obj* x_118; obj* x_119; obj* x_120; x_118 = lean::mk_nat_obj(56u); x_119 = lean::mk_nat_obj(55296u); x_120 = lean::nat_dec_lt(x_118, x_119); lean::dec(x_119); if (lean::obj_tag(x_120) == 0) { obj* x_123; obj* x_124; lean::dec(x_120); x_123 = lean::mk_nat_obj(57343u); x_124 = lean::nat_dec_lt(x_123, x_118); lean::dec(x_123); if (lean::obj_tag(x_124) == 0) { obj* x_128; obj* x_129; obj* x_130; lean::dec(x_118); lean::dec(x_124); x_128 = lean::mk_nat_obj(0u); x_129 = lean::box_uint32(x_46); x_130 = lean::nat_dec_lt(x_129, x_128); lean::dec(x_128); lean::dec(x_129); if (lean::obj_tag(x_130) == 0) { unsigned char x_134; lean::dec(x_130); x_134 = 0; x_47 = x_134; goto lbl_48; } else { lean::dec(x_130); if (x_51 == 0) { unsigned char x_136; x_136 = 0; x_47 = x_136; goto lbl_48; } else { unsigned char x_137; x_137 = 0; x_49 = x_137; goto lbl_50; } } } else { obj* x_139; obj* x_140; lean::dec(x_124); x_139 = lean::mk_nat_obj(1114112u); x_140 = lean::nat_dec_lt(x_118, x_139); lean::dec(x_139); if (lean::obj_tag(x_140) == 0) { obj* x_144; obj* x_145; obj* x_146; lean::dec(x_140); lean::dec(x_118); x_144 = lean::mk_nat_obj(0u); x_145 = lean::box_uint32(x_46); x_146 = lean::nat_dec_lt(x_145, x_144); lean::dec(x_144); lean::dec(x_145); if (lean::obj_tag(x_146) == 0) { unsigned char x_150; lean::dec(x_146); x_150 = 0; x_47 = x_150; goto lbl_48; } else { lean::dec(x_146); if (x_51 == 0) { unsigned char x_152; x_152 = 0; x_47 = x_152; goto lbl_48; } else { unsigned char x_153; x_153 = 0; x_49 = x_153; goto lbl_50; } } } else { obj* x_155; obj* x_156; lean::dec(x_140); x_155 = lean::box_uint32(x_46); x_156 = lean::nat_dec_lt(x_155, x_118); lean::dec(x_118); lean::dec(x_155); if (lean::obj_tag(x_156) == 0) { unsigned char x_160; lean::dec(x_156); x_160 = 0; x_47 = x_160; goto lbl_48; } else { lean::dec(x_156); if (x_51 == 0) { unsigned char x_162; x_162 = 0; x_47 = x_162; goto lbl_48; } else { unsigned char x_163; x_163 = 0; x_49 = x_163; goto lbl_50; } } } } } else { obj* x_165; obj* x_166; lean::dec(x_120); x_165 = lean::box_uint32(x_46); x_166 = lean::nat_dec_lt(x_165, x_118); lean::dec(x_118); lean::dec(x_165); if (lean::obj_tag(x_166) == 0) { unsigned char x_170; lean::dec(x_166); x_170 = 0; x_47 = x_170; goto lbl_48; } else { lean::dec(x_166); if (x_51 == 0) { unsigned char x_172; x_172 = 0; x_47 = x_172; goto lbl_48; } else { unsigned char x_173; x_173 = 0; x_49 = x_173; goto lbl_50; } } } } } } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__3_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__3(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__2_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned x_5; unsigned x_6; obj* x_7; x_5 = lean::unbox_uint32(x_0); x_6 = lean::unbox_uint32(x_1); x_7 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__2(x_5, x_6, x_2, x_3, x_4); return x_7; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__5_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__5(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__4_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned x_5; unsigned x_6; obj* x_7; x_5 = lean::unbox_uint32(x_0); x_6 = lean::unbox_uint32(x_1); x_7 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__4(x_5, x_6, x_2, x_3, x_4); return x_7; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__7_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__7(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__6_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { unsigned x_5; obj* x_6; x_5 = lean::unbox_uint32(x_0); x_6 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__6(x_5, x_1, x_2, x_3, x_4); return x_6; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__1_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s15_parse__oct__lit_s9___spec__1(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s15_parse__hex__lit(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; unsigned x_14; x_3 = lean::mk_nat_obj(48u); x_4 = lean::mk_nat_obj(55296u); x_5 = lean::nat_dec_lt(x_3, x_4); x_6 = lean::mk_nat_obj(120u); x_7 = lean::nat_dec_lt(x_6, x_4); x_8 = lean::mk_nat_obj(88u); x_9 = lean::nat_dec_lt(x_8, x_4); lean::dec(x_4); if (lean::obj_tag(x_5) == 0) { obj* x_17; obj* x_18; lean::dec(x_5); x_17 = lean::mk_nat_obj(57343u); x_18 = lean::nat_dec_lt(x_17, x_3); lean::dec(x_17); if (lean::obj_tag(x_18) == 0) { obj* x_22; unsigned x_23; lean::dec(x_3); lean::dec(x_18); x_22 = lean::mk_nat_obj(0u); x_23 = lean::unbox_uint32(x_22); lean::dec(x_22); x_14 = x_23; goto lbl_15; } else { obj* x_26; obj* x_27; lean::dec(x_18); x_26 = lean::mk_nat_obj(1114112u); x_27 = lean::nat_dec_lt(x_3, x_26); lean::dec(x_26); if (lean::obj_tag(x_27) == 0) { obj* x_31; unsigned x_32; lean::dec(x_3); lean::dec(x_27); x_31 = lean::mk_nat_obj(0u); x_32 = lean::unbox_uint32(x_31); lean::dec(x_31); x_14 = x_32; goto lbl_15; } else { unsigned x_35; lean::dec(x_27); x_35 = lean::unbox_uint32(x_3); lean::dec(x_3); x_14 = x_35; goto lbl_15; } } } else { unsigned x_38; lean::dec(x_5); x_38 = lean::unbox_uint32(x_3); lean::dec(x_3); x_14 = x_38; goto lbl_15; } lbl_13: { if (lean::obj_tag(x_11) == 0) { obj* x_40; obj* x_42; obj* x_45; obj* x_46; obj* x_48; obj* x_50; obj* x_51; obj* x_52; x_40 = lean::cnstr_get(x_11, 1); lean::inc(x_40); x_42 = lean::cnstr_get(x_11, 2); lean::inc(x_42); lean::dec(x_11); x_45 = _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s15_parse__hex__lit_s9___spec__1(x_0, x_40, x_12); x_46 = lean::cnstr_get(x_45, 0); lean::inc(x_46); x_48 = lean::cnstr_get(x_45, 1); lean::inc(x_48); if (lean::is_shared(x_45)) { lean::dec(x_45); x_50 = lean::box(0); } else { lean::cnstr_release(x_45, 0); lean::cnstr_release(x_45, 1); x_50 = x_45; } x_51 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_42, x_46); if (lean::is_scalar(x_50)) { x_52 = lean::alloc_cnstr(0, 2, 0); } else { x_52 = x_50; } lean::cnstr_set(x_52, 0, x_51); lean::cnstr_set(x_52, 1, x_48); return x_52; } else { obj* x_54; unsigned char x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; lean::dec(x_0); x_54 = lean::cnstr_get(x_11, 0); lean::inc(x_54); x_56 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); if (lean::is_shared(x_11)) { lean::dec(x_11); x_57 = lean::box(0); } else { lean::cnstr_release(x_11, 0); x_57 = x_11; } if (lean::is_scalar(x_57)) { x_58 = lean::alloc_cnstr(1, 1, 1); } else { x_58 = x_57; } lean::cnstr_set(x_58, 0, x_54); lean::cnstr_set_scalar(x_58, sizeof(void*)*1, x_56); x_59 = x_58; x_60 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_60, 0, x_59); lean::cnstr_set(x_60, 1, x_12); return x_60; } } lbl_15: { obj* x_62; unsigned x_63; lean::inc(x_0); x_62 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_14, x_0, x_1, x_2); if (lean::obj_tag(x_7) == 0) { obj* x_66; obj* x_67; lean::dec(x_7); x_66 = lean::mk_nat_obj(57343u); x_67 = lean::nat_dec_lt(x_66, x_6); lean::dec(x_66); if (lean::obj_tag(x_67) == 0) { obj* x_71; unsigned x_72; lean::dec(x_67); lean::dec(x_6); x_71 = lean::mk_nat_obj(0u); x_72 = lean::unbox_uint32(x_71); lean::dec(x_71); x_63 = x_72; goto lbl_64; } else { obj* x_75; obj* x_76; lean::dec(x_67); x_75 = lean::mk_nat_obj(1114112u); x_76 = lean::nat_dec_lt(x_6, x_75); lean::dec(x_75); if (lean::obj_tag(x_76) == 0) { obj* x_80; unsigned x_81; lean::dec(x_76); lean::dec(x_6); x_80 = lean::mk_nat_obj(0u); x_81 = lean::unbox_uint32(x_80); lean::dec(x_80); x_63 = x_81; goto lbl_64; } else { unsigned x_84; lean::dec(x_76); x_84 = lean::unbox_uint32(x_6); lean::dec(x_6); x_63 = x_84; goto lbl_64; } } } else { unsigned x_87; lean::dec(x_7); x_87 = lean::unbox_uint32(x_6); lean::dec(x_6); x_63 = x_87; goto lbl_64; } lbl_64: { unsigned x_89; obj* x_90; obj* x_91; if (lean::obj_tag(x_9) == 0) { obj* x_94; obj* x_95; lean::dec(x_9); x_94 = lean::mk_nat_obj(57343u); x_95 = lean::nat_dec_lt(x_94, x_8); lean::dec(x_94); if (lean::obj_tag(x_95) == 0) { obj* x_99; obj* x_101; obj* x_104; unsigned x_105; lean::dec(x_8); lean::dec(x_95); x_99 = lean::cnstr_get(x_62, 0); lean::inc(x_99); x_101 = lean::cnstr_get(x_62, 1); lean::inc(x_101); lean::dec(x_62); x_104 = lean::mk_nat_obj(0u); x_105 = lean::unbox_uint32(x_104); lean::dec(x_104); x_89 = x_105; x_90 = x_99; x_91 = x_101; goto lbl_92; } else { obj* x_108; obj* x_109; lean::dec(x_95); x_108 = lean::mk_nat_obj(1114112u); x_109 = lean::nat_dec_lt(x_8, x_108); lean::dec(x_108); if (lean::obj_tag(x_109) == 0) { obj* x_113; obj* x_115; obj* x_118; unsigned x_119; lean::dec(x_8); lean::dec(x_109); x_113 = lean::cnstr_get(x_62, 0); lean::inc(x_113); x_115 = lean::cnstr_get(x_62, 1); lean::inc(x_115); lean::dec(x_62); x_118 = lean::mk_nat_obj(0u); x_119 = lean::unbox_uint32(x_118); lean::dec(x_118); x_89 = x_119; x_90 = x_113; x_91 = x_115; goto lbl_92; } else { obj* x_122; obj* x_124; unsigned x_127; lean::dec(x_109); x_122 = lean::cnstr_get(x_62, 0); lean::inc(x_122); x_124 = lean::cnstr_get(x_62, 1); lean::inc(x_124); lean::dec(x_62); x_127 = lean::unbox_uint32(x_8); lean::dec(x_8); x_89 = x_127; x_90 = x_122; x_91 = x_124; goto lbl_92; } } } else { obj* x_130; obj* x_132; unsigned x_135; lean::dec(x_9); x_130 = lean::cnstr_get(x_62, 0); lean::inc(x_130); x_132 = lean::cnstr_get(x_62, 1); lean::inc(x_132); lean::dec(x_62); x_135 = lean::unbox_uint32(x_8); lean::dec(x_8); x_89 = x_135; x_90 = x_130; x_91 = x_132; goto lbl_92; } lbl_92: { if (lean::obj_tag(x_90) == 0) { obj* x_137; obj* x_139; obj* x_144; obj* x_145; obj* x_147; x_137 = lean::cnstr_get(x_90, 1); lean::inc(x_137); x_139 = lean::cnstr_get(x_90, 2); lean::inc(x_139); lean::dec(x_90); lean::inc(x_137); lean::inc(x_0); x_144 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_63, x_0, x_137, x_91); x_145 = lean::cnstr_get(x_144, 0); lean::inc(x_145); x_147 = lean::cnstr_get(x_144, 1); lean::inc(x_147); lean::dec(x_144); if (lean::obj_tag(x_145) == 0) { obj* x_151; lean::dec(x_137); x_151 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_139, x_145); x_11 = x_151; x_12 = x_147; goto lbl_13; } else { obj* x_152; unsigned char x_154; x_152 = lean::cnstr_get(x_145, 0); lean::inc(x_152); x_154 = lean::cnstr_get_scalar(x_145, sizeof(void*)*1); if (x_154 == 0) { obj* x_157; obj* x_158; obj* x_160; obj* x_163; obj* x_164; lean::dec(x_145); lean::inc(x_0); x_157 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_89, x_0, x_137, x_147); x_158 = lean::cnstr_get(x_157, 0); lean::inc(x_158); x_160 = lean::cnstr_get(x_157, 1); lean::inc(x_160); lean::dec(x_157); x_163 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_152, x_158); x_164 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_139, x_163); x_11 = x_164; x_12 = x_160; goto lbl_13; } else { obj* x_167; lean::dec(x_137); lean::dec(x_152); x_167 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_139, x_145); x_11 = x_167; x_12 = x_147; goto lbl_13; } } } else { obj* x_168; unsigned char x_170; obj* x_171; obj* x_172; obj* x_173; x_168 = lean::cnstr_get(x_90, 0); lean::inc(x_168); x_170 = lean::cnstr_get_scalar(x_90, sizeof(void*)*1); if (lean::is_shared(x_90)) { lean::dec(x_90); x_171 = lean::box(0); } else { lean::cnstr_release(x_90, 0); x_171 = x_90; } if (lean::is_scalar(x_171)) { x_172 = lean::alloc_cnstr(1, 1, 1); } else { x_172 = x_171; } lean::cnstr_set(x_172, 0, x_168); lean::cnstr_set_scalar(x_172, sizeof(void*)*1, x_170); x_173 = x_172; x_11 = x_173; x_12 = x_91; goto lbl_13; } } } } } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__hex__lit_s9___spec__3(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 { obj* x_10; obj* x_11; unsigned x_14; unsigned char x_15; x_10 = lean::mk_nat_obj(1u); x_11 = lean::nat_sub(x_0, x_10); lean::dec(x_10); lean::dec(x_0); x_14 = lean::string_iterator_curr(x_2); x_15 = _l_s4_char_s9_is__digit(x_14); if (x_15 == 0) { unsigned char x_16; x_16 = _l_s4_char_s9_is__alpha(x_14); if (x_16 == 0) { obj* x_18; lean::dec(x_11); x_18 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); return x_18; } else { obj* x_19; obj* x_20; obj* x_21; x_19 = lean::string_push(x_1, x_14); x_20 = lean::string_iterator_next(x_2); x_21 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__hex__lit_s9___spec__3(x_11, x_19, x_20); return x_21; } } else { if (x_15 == 0) { obj* x_23; lean::dec(x_11); x_23 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); return x_23; } else { obj* x_24; obj* x_25; obj* x_26; x_24 = lean::string_push(x_1, x_14); x_25 = lean::string_iterator_next(x_2); x_26 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__hex__lit_s9___spec__3(x_11, x_24, x_25); return x_26; } } } } else { obj* x_29; lean::dec(x_4); lean::dec(x_0); x_29 = _l_s9___private_2142412293__s18_mk__string__result_s6___rarg(x_1, x_2); return x_29; } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__hex__lit_s9___spec__2(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s15_parse__hex__lit_s9___spec__3(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s15_parse__hex__lit_s9___spec__1(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; unsigned char x_6; x_6 = lean::string_iterator_has_next(x_1); if (x_6 == 0) { obj* x_7; obj* x_8; obj* x_9; obj* x_14; obj* x_15; obj* x_17; obj* x_20; obj* x_22; x_7 = lean::box(0); x_8 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_9 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_7); lean::inc(x_9); lean::inc(x_8); x_14 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_8, x_9, x_7, x_7, x_0, x_1, x_2); x_15 = lean::cnstr_get(x_14, 0); lean::inc(x_15); x_17 = lean::cnstr_get(x_14, 1); lean::inc(x_17); lean::dec(x_14); x_20 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_20); x_22 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_20, x_15); x_3 = x_22; x_4 = x_17; goto lbl_5; } else { unsigned x_23; unsigned char x_24; x_23 = lean::string_iterator_curr(x_1); x_24 = _l_s4_char_s9_is__digit(x_23); if (x_24 == 0) { unsigned char x_25; x_25 = _l_s4_char_s9_is__alpha(x_23); if (x_25 == 0) { obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_37; obj* x_38; obj* x_40; obj* x_43; obj* x_45; x_26 = _l_s4_char_s11_quote__core(x_23); x_27 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_27); x_29 = lean::string_append(x_27, x_26); lean::dec(x_26); x_31 = lean::string_append(x_29, x_27); x_32 = lean::box(0); x_33 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_32); lean::inc(x_33); x_37 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_31, x_33, x_32, x_32, x_0, x_1, x_2); x_38 = lean::cnstr_get(x_37, 0); lean::inc(x_38); x_40 = lean::cnstr_get(x_37, 1); lean::inc(x_40); lean::dec(x_37); x_43 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_43); x_45 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_43, x_38); x_3 = x_45; x_4 = x_40; goto lbl_5; } else { obj* x_46; obj* x_47; obj* x_48; obj* x_49; x_46 = lean::string_iterator_next(x_1); x_47 = lean::box(0); x_48 = lean::box_uint32(x_23); x_49 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_49, 0, x_48); lean::cnstr_set(x_49, 1, x_46); lean::cnstr_set(x_49, 2, x_47); x_3 = x_49; x_4 = x_2; goto lbl_5; } } else { if (x_24 == 0) { obj* x_50; obj* x_51; obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_61; obj* x_62; obj* x_64; obj* x_67; obj* x_69; x_50 = _l_s4_char_s11_quote__core(x_23); x_51 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_51); x_53 = lean::string_append(x_51, x_50); lean::dec(x_50); x_55 = lean::string_append(x_53, x_51); x_56 = lean::box(0); x_57 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_56); lean::inc(x_57); x_61 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_55, x_57, x_56, x_56, x_0, x_1, x_2); x_62 = lean::cnstr_get(x_61, 0); lean::inc(x_62); x_64 = lean::cnstr_get(x_61, 1); lean::inc(x_64); lean::dec(x_61); x_67 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_67); x_69 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_67, x_62); x_3 = x_69; x_4 = x_64; goto lbl_5; } else { obj* x_70; obj* x_71; obj* x_72; obj* x_73; x_70 = lean::string_iterator_next(x_1); x_71 = lean::box(0); x_72 = lean::box_uint32(x_23); x_73 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_73, 0, x_72); lean::cnstr_set(x_73, 1, x_70); lean::cnstr_set(x_73, 2, x_71); x_3 = x_73; x_4 = x_2; goto lbl_5; } } } lbl_5: { if (lean::obj_tag(x_3) == 0) { obj* x_74; obj* x_76; obj* x_78; unsigned x_81; obj* x_83; obj* x_84; obj* x_86; obj* x_88; obj* x_89; obj* x_90; x_74 = lean::cnstr_get(x_3, 0); lean::inc(x_74); x_76 = lean::cnstr_get(x_3, 1); lean::inc(x_76); x_78 = lean::cnstr_get(x_3, 2); lean::inc(x_78); lean::dec(x_3); x_81 = lean::unbox_uint32(x_74); lean::dec(x_74); x_83 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__hex__lit_s9___spec__2(x_81, x_0, x_76, x_4); x_84 = lean::cnstr_get(x_83, 0); lean::inc(x_84); x_86 = lean::cnstr_get(x_83, 1); lean::inc(x_86); if (lean::is_shared(x_83)) { lean::dec(x_83); x_88 = lean::box(0); } else { lean::cnstr_release(x_83, 0); lean::cnstr_release(x_83, 1); x_88 = x_83; } x_89 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_78, x_84); if (lean::is_scalar(x_88)) { x_90 = lean::alloc_cnstr(0, 2, 0); } else { x_90 = x_88; } lean::cnstr_set(x_90, 0, x_89); lean::cnstr_set(x_90, 1, x_86); return x_90; } else { obj* x_92; unsigned char x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; lean::dec(x_0); x_92 = lean::cnstr_get(x_3, 0); lean::inc(x_92); x_94 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); if (lean::is_shared(x_3)) { lean::dec(x_3); x_95 = lean::box(0); } else { lean::cnstr_release(x_3, 0); x_95 = x_3; } if (lean::is_scalar(x_95)) { x_96 = lean::alloc_cnstr(1, 1, 1); } else { x_96 = x_95; } lean::cnstr_set(x_96, 0, x_92); lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_94); x_97 = x_96; x_98 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_98, 0, x_97); lean::cnstr_set(x_98, 1, x_4); return x_98; } } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__hex__lit_s9___spec__2_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s15_parse__hex__lit_s9___spec__2(x_4, x_1, x_2, x_3); return x_5; } } obj* _init__l_s4_lean_s6_parser_s6_number() { { obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("lean"); x_2 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); x_3 = lean::mk_string("parser"); x_4 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_4, 0, x_2); lean::cnstr_set(x_4, 1, x_3); x_5 = lean::mk_string("number"); x_6 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_6, 0, x_4); lean::cnstr_set(x_6, 1, x_5); return x_6; } } obj* _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__2), 1, 0); x_2 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); return x_2; } } obj* _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1(obj* x_0) { { obj* x_1; obj* x_2; obj* x_4; x_4 = _l_s4_lean_s6_parser_s6_syntax_s8_as__node_s6___main(x_0); if (lean::obj_tag(x_4) == 0) { obj* x_6; lean::dec(x_4); x_6 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__5; lean::inc(x_6); return x_6; } else { obj* x_8; obj* x_11; obj* x_13; obj* x_16; obj* x_18; x_8 = lean::cnstr_get(x_4, 0); lean::inc(x_8); lean::dec(x_4); x_11 = lean::cnstr_get(x_8, 0); lean::inc(x_11); x_13 = lean::cnstr_get(x_8, 1); lean::inc(x_13); lean::dec(x_8); x_16 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__6; lean::inc(x_16); x_18 = _l_s4_lean_s4_name_s12_has__dec__eq_s6___main(x_11, x_16); if (lean::obj_tag(x_18) == 0) { obj* x_21; lean::dec(x_18); lean::dec(x_13); x_21 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__5; lean::inc(x_21); return x_21; } else { lean::dec(x_18); if (lean::obj_tag(x_13) == 0) { obj* x_25; lean::dec(x_13); x_25 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__5; lean::inc(x_25); return x_25; } else { obj* x_27; obj* x_29; x_27 = lean::cnstr_get(x_13, 0); lean::inc(x_27); x_29 = lean::cnstr_get(x_13, 1); lean::inc(x_29); lean::dec(x_13); if (lean::obj_tag(x_29) == 0) { obj* x_33; lean::dec(x_29); x_33 = _l_s4_lean_s6_parser_s6_syntax_s8_as__node_s6___main(x_27); if (lean::obj_tag(x_33) == 0) { obj* x_35; lean::dec(x_33); x_35 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__5; lean::inc(x_35); return x_35; } else { obj* x_37; obj* x_40; obj* x_42; x_37 = lean::cnstr_get(x_33, 0); lean::inc(x_37); lean::dec(x_33); x_40 = lean::cnstr_get(x_37, 0); lean::inc(x_40); x_42 = lean::cnstr_get(x_37, 1); lean::inc(x_42); lean::dec(x_37); switch (lean::obj_tag(x_40)) { case 0: { obj* x_47; lean::dec(x_40); lean::dec(x_42); x_47 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__5; lean::inc(x_47); return x_47; } case 1: { obj* x_51; lean::dec(x_40); lean::dec(x_42); x_51 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__5; lean::inc(x_51); return x_51; } default: { obj* x_53; obj* x_55; obj* x_58; obj* x_59; x_53 = lean::cnstr_get(x_40, 0); lean::inc(x_53); x_55 = lean::cnstr_get(x_40, 1); lean::inc(x_55); lean::dec(x_40); x_58 = lean::box(0); x_59 = _l_s4_lean_s4_name_s12_has__dec__eq_s6___main(x_53, x_58); if (lean::obj_tag(x_59) == 0) { obj* x_63; lean::dec(x_55); lean::dec(x_42); lean::dec(x_59); x_63 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__5; lean::inc(x_63); return x_63; } else { lean::dec(x_59); if (lean::obj_tag(x_42) == 0) { obj* x_68; lean::dec(x_55); lean::dec(x_42); x_68 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__5; lean::inc(x_68); return x_68; } else { obj* x_70; obj* x_72; x_70 = lean::cnstr_get(x_42, 0); lean::inc(x_70); x_72 = lean::cnstr_get(x_42, 1); lean::inc(x_72); lean::dec(x_42); if (lean::obj_tag(x_72) == 0) { lean::dec(x_72); x_1 = x_70; x_2 = x_55; goto lbl_3; } else { obj* x_79; lean::dec(x_70); lean::dec(x_72); lean::dec(x_55); x_79 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__5; lean::inc(x_79); return x_79; } } } } } } } else { obj* x_83; lean::dec(x_29); lean::dec(x_27); x_83 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__5; lean::inc(x_83); return x_83; } } } } lbl_3: { obj* x_85; obj* x_86; x_85 = lean::mk_nat_obj(0u); x_86 = lean::nat_dec_eq(x_2, x_85); lean::dec(x_85); if (lean::obj_tag(x_86) == 0) { obj* x_89; obj* x_90; lean::dec(x_86); x_89 = lean::mk_nat_obj(1u); x_90 = lean::nat_dec_eq(x_2, x_89); lean::dec(x_89); if (lean::obj_tag(x_90) == 0) { obj* x_93; obj* x_94; lean::dec(x_90); x_93 = lean::mk_nat_obj(2u); x_94 = lean::nat_dec_eq(x_2, x_93); lean::dec(x_93); lean::dec(x_2); if (lean::obj_tag(x_94) == 0) { lean::dec(x_94); switch (lean::obj_tag(x_1)) { case 0: { obj* x_98; obj* x_101; obj* x_102; x_98 = lean::cnstr_get(x_1, 0); lean::inc(x_98); lean::dec(x_1); x_101 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_101, 0, x_98); x_102 = lean::alloc_cnstr(3, 1, 0); lean::cnstr_set(x_102, 0, x_101); return x_102; } case 1: { obj* x_104; lean::dec(x_1); x_104 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_104); return x_104; } case 2: { obj* x_107; lean::dec(x_1); x_107 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_107); return x_107; } default: { obj* x_110; lean::dec(x_1); x_110 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_110); return x_110; } } } else { lean::dec(x_94); switch (lean::obj_tag(x_1)) { case 0: { obj* x_113; obj* x_116; obj* x_117; x_113 = lean::cnstr_get(x_1, 0); lean::inc(x_113); lean::dec(x_1); x_116 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_116, 0, x_113); x_117 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_117, 0, x_116); return x_117; } case 1: { obj* x_119; lean::dec(x_1); x_119 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_119); return x_119; } case 2: { obj* x_122; lean::dec(x_1); x_122 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_122); return x_122; } default: { obj* x_125; lean::dec(x_1); x_125 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_125); return x_125; } } } } else { lean::dec(x_90); lean::dec(x_2); switch (lean::obj_tag(x_1)) { case 0: { obj* x_129; obj* x_132; obj* x_133; x_129 = lean::cnstr_get(x_1, 0); lean::inc(x_129); lean::dec(x_1); x_132 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_132, 0, x_129); x_133 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_133, 0, x_132); return x_133; } case 1: { obj* x_135; lean::dec(x_1); x_135 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__3; lean::inc(x_135); return x_135; } case 2: { obj* x_138; lean::dec(x_1); x_138 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__3; lean::inc(x_138); return x_138; } default: { obj* x_141; lean::dec(x_1); x_141 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__3; lean::inc(x_141); return x_141; } } } } else { lean::dec(x_86); lean::dec(x_2); switch (lean::obj_tag(x_1)) { case 0: { obj* x_145; obj* x_148; obj* x_149; x_145 = lean::cnstr_get(x_1, 0); lean::inc(x_145); lean::dec(x_1); x_148 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_148, 0, x_145); x_149 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_149, 0, x_148); return x_149; } case 1: { obj* x_151; lean::dec(x_1); x_151 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__4; lean::inc(x_151); return x_151; } case 2: { obj* x_154; lean::dec(x_1); x_154 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__4; lean::inc(x_154); return x_154; } default: { obj* x_157; lean::dec(x_1); x_157 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__4; lean::inc(x_157); return x_157; } } } } } } obj* _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__1() { { obj* x_0; obj* x_1; x_0 = lean::box(0); x_1 = lean::alloc_cnstr(3, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__2() { { obj* x_0; obj* x_1; x_0 = lean::box(0); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__3() { { obj* x_0; obj* x_1; x_0 = lean::box(0); x_1 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__4() { { obj* x_0; obj* x_1; x_0 = lean::box(0); x_1 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__5() { { obj* x_0; obj* x_1; obj* x_3; obj* x_4; x_3 = lean::box(3); x_4 = lean::mk_nat_obj(0u); x_0 = x_3; x_1 = x_4; goto lbl_2; lbl_2: { obj* x_5; obj* x_6; x_5 = lean::mk_nat_obj(0u); x_6 = lean::nat_dec_eq(x_1, x_5); lean::dec(x_5); if (lean::obj_tag(x_6) == 0) { obj* x_9; obj* x_10; lean::dec(x_6); x_9 = lean::mk_nat_obj(1u); x_10 = lean::nat_dec_eq(x_1, x_9); lean::dec(x_9); if (lean::obj_tag(x_10) == 0) { obj* x_13; obj* x_14; lean::dec(x_10); x_13 = lean::mk_nat_obj(2u); x_14 = lean::nat_dec_eq(x_1, x_13); lean::dec(x_13); lean::dec(x_1); if (lean::obj_tag(x_14) == 0) { lean::dec(x_14); switch (lean::obj_tag(x_0)) { case 0: { obj* x_18; obj* x_21; obj* x_22; x_18 = lean::cnstr_get(x_0, 0); lean::inc(x_18); lean::dec(x_0); x_21 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_21, 0, x_18); x_22 = lean::alloc_cnstr(3, 1, 0); lean::cnstr_set(x_22, 0, x_21); return x_22; } case 1: { obj* x_24; lean::dec(x_0); x_24 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_24); return x_24; } case 2: { obj* x_27; lean::dec(x_0); x_27 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_27); return x_27; } default: { obj* x_30; lean::dec(x_0); x_30 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__1; lean::inc(x_30); return x_30; } } } else { lean::dec(x_14); switch (lean::obj_tag(x_0)) { case 0: { obj* x_33; obj* x_36; obj* x_37; x_33 = lean::cnstr_get(x_0, 0); lean::inc(x_33); lean::dec(x_0); x_36 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_36, 0, x_33); x_37 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_37, 0, x_36); return x_37; } case 1: { obj* x_39; lean::dec(x_0); x_39 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_39); return x_39; } case 2: { obj* x_42; lean::dec(x_0); x_42 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_42); return x_42; } default: { obj* x_45; lean::dec(x_0); x_45 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__2; lean::inc(x_45); return x_45; } } } } else { lean::dec(x_10); lean::dec(x_1); switch (lean::obj_tag(x_0)) { case 0: { obj* x_49; obj* x_52; obj* x_53; x_49 = lean::cnstr_get(x_0, 0); lean::inc(x_49); lean::dec(x_0); x_52 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_52, 0, x_49); x_53 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_53, 0, x_52); return x_53; } case 1: { obj* x_55; lean::dec(x_0); x_55 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__3; lean::inc(x_55); return x_55; } case 2: { obj* x_58; lean::dec(x_0); x_58 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__3; lean::inc(x_58); return x_58; } default: { obj* x_61; lean::dec(x_0); x_61 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__3; lean::inc(x_61); return x_61; } } } } else { lean::dec(x_1); lean::dec(x_6); switch (lean::obj_tag(x_0)) { case 0: { obj* x_65; obj* x_68; obj* x_69; x_65 = lean::cnstr_get(x_0, 0); lean::inc(x_65); lean::dec(x_0); x_68 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_68, 0, x_65); x_69 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_69, 0, x_68); return x_69; } case 1: { obj* x_71; lean::dec(x_0); x_71 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__4; lean::inc(x_71); return x_71; } case 2: { obj* x_74; lean::dec(x_0); x_74 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__4; lean::inc(x_74); return x_74; } default: { obj* x_77; lean::dec(x_0); x_77 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__4; lean::inc(x_77); return x_77; } } } } } } obj* _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__6() { { obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("lean"); x_2 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); x_3 = lean::mk_string("parser"); x_4 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_4, 0, x_2); lean::cnstr_set(x_4, 1, x_3); x_5 = lean::mk_string("number"); x_6 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_6, 0, x_4); lean::cnstr_set(x_6, 1, x_5); return x_6; } } obj* _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__2(obj* x_0) { { obj* x_1; x_1 = lean::box(0); switch (lean::obj_tag(x_0)) { case 0: { obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); x_5 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3_s11___closed__1; lean::inc(x_5); x_7 = _l_s6_option_s3_map_s6___rarg(x_5, x_2); x_8 = lean::box(3); x_9 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_7, x_8); lean::inc(x_1); x_11 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_11, 0, x_9); lean::cnstr_set(x_11, 1, x_1); x_12 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2_s11___closed__1; lean::inc(x_12); x_14 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_12, x_11); x_15 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_15, 0, x_14); lean::cnstr_set(x_15, 1, x_1); x_16 = _l_s4_lean_s6_parser_s6_number; lean::inc(x_16); x_18 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_16, x_15); return x_18; } case 1: { obj* x_19; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; x_19 = lean::cnstr_get(x_0, 0); lean::inc(x_19); lean::dec(x_0); x_22 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3_s11___closed__1; lean::inc(x_22); x_24 = _l_s6_option_s3_map_s6___rarg(x_22, x_19); x_25 = lean::box(3); x_26 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_24, x_25); lean::inc(x_1); x_28 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_28, 0, x_26); lean::cnstr_set(x_28, 1, x_1); x_29 = _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2_s11___closed__2; lean::inc(x_29); x_31 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_29, x_28); x_32 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_32, 0, x_31); lean::cnstr_set(x_32, 1, x_1); x_33 = _l_s4_lean_s6_parser_s6_number; lean::inc(x_33); x_35 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_33, x_32); return x_35; } case 2: { obj* x_36; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_52; x_36 = lean::cnstr_get(x_0, 0); lean::inc(x_36); lean::dec(x_0); x_39 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3_s11___closed__1; lean::inc(x_39); x_41 = _l_s6_option_s3_map_s6___rarg(x_39, x_36); x_42 = lean::box(3); x_43 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_41, x_42); lean::inc(x_1); x_45 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_45, 0, x_43); lean::cnstr_set(x_45, 1, x_1); x_46 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__2_s11___closed__1; lean::inc(x_46); x_48 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_46, x_45); x_49 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_49, 0, x_48); lean::cnstr_set(x_49, 1, x_1); x_50 = _l_s4_lean_s6_parser_s6_number; lean::inc(x_50); x_52 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_50, x_49); return x_52; } default: { obj* x_53; obj* x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_69; x_53 = lean::cnstr_get(x_0, 0); lean::inc(x_53); lean::dec(x_0); x_56 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3_s11___closed__1; lean::inc(x_56); x_58 = _l_s6_option_s3_map_s6___rarg(x_56, x_53); x_59 = lean::box(3); x_60 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_58, x_59); lean::inc(x_1); x_62 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_62, 0, x_60); lean::cnstr_set(x_62, 1, x_1); x_63 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__2_s11___closed__2; lean::inc(x_63); x_65 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_63, x_62); x_66 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_66, 0, x_65); lean::cnstr_set(x_66, 1, x_1); x_67 = _l_s4_lean_s6_parser_s6_number; lean::inc(x_67); x_69 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_67, x_66); return x_69; } } } } obj* _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__2_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::box(0); x_1 = lean::mk_nat_obj(2u); x_2 = lean::alloc_cnstr(2, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); return x_2; } } obj* _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__2_s11___closed__2() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::box(0); x_1 = lean::mk_nat_obj(3u); x_2 = lean::alloc_cnstr(2, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); return x_2; } } obj* _init__l_s4_lean_s6_parser_s6_number_s9_has__view() { { obj* x_0; x_0 = _l_s4_lean_s6_parser_s6_number_s13_has__view_x27; lean::inc(x_0); return x_0; } } obj* _l_s4_lean_s6_parser_s10_number_x27(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_7; x_3 = _l_s4_lean_s6_parser_s6_number; x_4 = _l_s4_lean_s6_parser_s10_number_x27_s11___closed__1; lean::inc(x_4); lean::inc(x_3); x_7 = _l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__8(x_3, x_4, x_0, x_1, x_2); return x_7; } } obj* _init__l_s4_lean_s6_parser_s10_number_x27_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__1), 2, 0); x_1 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__1_s6___rarg), 4, 1); lean::closure_set(x_1, 0, x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s10_number_x27_s11___lambda__1), 4, 0); lean::inc(x_1); x_4 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_4, 0, x_1); lean::closure_set(x_4, 1, x_2); x_5 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s10_number_x27_s11___lambda__2), 4, 0); lean::inc(x_1); x_7 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_7, 0, x_1); lean::closure_set(x_7, 1, x_5); x_8 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s10_number_x27_s11___lambda__3), 4, 0); lean::inc(x_1); x_10 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_10, 0, x_1); lean::closure_set(x_10, 1, x_8); x_11 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s10_number_x27_s11___lambda__4), 4, 0); x_12 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_12, 0, x_1); lean::closure_set(x_12, 1, x_11); x_13 = lean::box(0); lean::inc(x_13); x_15 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_15, 0, x_12); lean::cnstr_set(x_15, 1, x_13); x_16 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_16, 0, x_10); lean::cnstr_set(x_16, 1, x_15); x_17 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_17, 0, x_7); lean::cnstr_set(x_17, 1, x_16); x_18 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_18, 0, x_4); lean::cnstr_set(x_18, 1, x_17); x_19 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_combinators_s15_longest__choice_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__8), 4, 1); lean::closure_set(x_19, 0, x_18); x_20 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_20, 0, x_19); lean::cnstr_set(x_20, 1, x_13); return x_20; } } obj* _l_s4_lean_s6_parser_s10_number_x27_s11___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_7; obj* x_9; x_4 = _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__1(x_1, x_2, x_3); x_5 = lean::cnstr_get(x_4, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_4, 1); lean::inc(x_7); if (lean::is_shared(x_4)) { lean::dec(x_4); x_9 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); x_9 = x_4; } if (lean::obj_tag(x_5) == 0) { obj* x_10; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; x_10 = lean::cnstr_get(x_5, 1); lean::inc(x_10); x_12 = lean::cnstr_get(x_5, 2); lean::inc(x_12); if (lean::is_shared(x_5)) { lean::dec(x_5); x_14 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); x_14 = x_5; } lean::inc(x_10); x_16 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_0, x_10); x_17 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_17); if (lean::is_scalar(x_14)) { x_19 = lean::alloc_cnstr(0, 3, 0); } else { x_19 = x_14; } lean::cnstr_set(x_19, 0, x_16); lean::cnstr_set(x_19, 1, x_10); lean::cnstr_set(x_19, 2, x_17); x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_12, x_19); if (lean::is_scalar(x_9)) { x_21 = lean::alloc_cnstr(0, 2, 0); } else { x_21 = x_9; } lean::cnstr_set(x_21, 0, x_20); lean::cnstr_set(x_21, 1, x_7); return x_21; } else { obj* x_23; unsigned char x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; lean::dec(x_0); x_23 = lean::cnstr_get(x_5, 0); lean::inc(x_23); x_25 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); if (lean::is_shared(x_5)) { lean::dec(x_5); x_26 = lean::box(0); } else { lean::cnstr_release(x_5, 0); x_26 = x_5; } if (lean::is_scalar(x_26)) { x_27 = lean::alloc_cnstr(1, 1, 1); } else { x_27 = x_26; } lean::cnstr_set(x_27, 0, x_23); lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); x_28 = x_27; if (lean::is_scalar(x_9)) { x_29 = lean::alloc_cnstr(0, 2, 0); } else { x_29 = x_9; } lean::cnstr_set(x_29, 0, x_28); lean::cnstr_set(x_29, 1, x_7); return x_29; } } } obj* _l_s4_lean_s6_parser_s10_number_x27_s11___lambda__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_7; obj* x_9; x_4 = _l_s4_lean_s6_parser_s15_parse__bin__lit(x_1, x_2, x_3); x_5 = lean::cnstr_get(x_4, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_4, 1); lean::inc(x_7); if (lean::is_shared(x_4)) { lean::dec(x_4); x_9 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); x_9 = x_4; } if (lean::obj_tag(x_5) == 0) { obj* x_10; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; x_10 = lean::cnstr_get(x_5, 1); lean::inc(x_10); x_12 = lean::cnstr_get(x_5, 2); lean::inc(x_12); if (lean::is_shared(x_5)) { lean::dec(x_5); x_14 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); x_14 = x_5; } lean::inc(x_10); x_16 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_0, x_10); x_17 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_17); if (lean::is_scalar(x_14)) { x_19 = lean::alloc_cnstr(0, 3, 0); } else { x_19 = x_14; } lean::cnstr_set(x_19, 0, x_16); lean::cnstr_set(x_19, 1, x_10); lean::cnstr_set(x_19, 2, x_17); x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_12, x_19); if (lean::is_scalar(x_9)) { x_21 = lean::alloc_cnstr(0, 2, 0); } else { x_21 = x_9; } lean::cnstr_set(x_21, 0, x_20); lean::cnstr_set(x_21, 1, x_7); return x_21; } else { obj* x_23; unsigned char x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; lean::dec(x_0); x_23 = lean::cnstr_get(x_5, 0); lean::inc(x_23); x_25 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); if (lean::is_shared(x_5)) { lean::dec(x_5); x_26 = lean::box(0); } else { lean::cnstr_release(x_5, 0); x_26 = x_5; } if (lean::is_scalar(x_26)) { x_27 = lean::alloc_cnstr(1, 1, 1); } else { x_27 = x_26; } lean::cnstr_set(x_27, 0, x_23); lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); x_28 = x_27; if (lean::is_scalar(x_9)) { x_29 = lean::alloc_cnstr(0, 2, 0); } else { x_29 = x_9; } lean::cnstr_set(x_29, 0, x_28); lean::cnstr_set(x_29, 1, x_7); return x_29; } } } obj* _l_s4_lean_s6_parser_s10_number_x27_s11___lambda__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_7; obj* x_9; x_4 = _l_s4_lean_s6_parser_s15_parse__oct__lit(x_1, x_2, x_3); x_5 = lean::cnstr_get(x_4, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_4, 1); lean::inc(x_7); if (lean::is_shared(x_4)) { lean::dec(x_4); x_9 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); x_9 = x_4; } if (lean::obj_tag(x_5) == 0) { obj* x_10; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; x_10 = lean::cnstr_get(x_5, 1); lean::inc(x_10); x_12 = lean::cnstr_get(x_5, 2); lean::inc(x_12); if (lean::is_shared(x_5)) { lean::dec(x_5); x_14 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); x_14 = x_5; } lean::inc(x_10); x_16 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_0, x_10); x_17 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_17); if (lean::is_scalar(x_14)) { x_19 = lean::alloc_cnstr(0, 3, 0); } else { x_19 = x_14; } lean::cnstr_set(x_19, 0, x_16); lean::cnstr_set(x_19, 1, x_10); lean::cnstr_set(x_19, 2, x_17); x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_12, x_19); if (lean::is_scalar(x_9)) { x_21 = lean::alloc_cnstr(0, 2, 0); } else { x_21 = x_9; } lean::cnstr_set(x_21, 0, x_20); lean::cnstr_set(x_21, 1, x_7); return x_21; } else { obj* x_23; unsigned char x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; lean::dec(x_0); x_23 = lean::cnstr_get(x_5, 0); lean::inc(x_23); x_25 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); if (lean::is_shared(x_5)) { lean::dec(x_5); x_26 = lean::box(0); } else { lean::cnstr_release(x_5, 0); x_26 = x_5; } if (lean::is_scalar(x_26)) { x_27 = lean::alloc_cnstr(1, 1, 1); } else { x_27 = x_26; } lean::cnstr_set(x_27, 0, x_23); lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); x_28 = x_27; if (lean::is_scalar(x_9)) { x_29 = lean::alloc_cnstr(0, 2, 0); } else { x_29 = x_9; } lean::cnstr_set(x_29, 0, x_28); lean::cnstr_set(x_29, 1, x_7); return x_29; } } } obj* _l_s4_lean_s6_parser_s10_number_x27_s11___lambda__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_7; obj* x_9; x_4 = _l_s4_lean_s6_parser_s15_parse__hex__lit(x_1, x_2, x_3); x_5 = lean::cnstr_get(x_4, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_4, 1); lean::inc(x_7); if (lean::is_shared(x_4)) { lean::dec(x_4); x_9 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); x_9 = x_4; } if (lean::obj_tag(x_5) == 0) { obj* x_10; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; x_10 = lean::cnstr_get(x_5, 1); lean::inc(x_10); x_12 = lean::cnstr_get(x_5, 2); lean::inc(x_12); if (lean::is_shared(x_5)) { lean::dec(x_5); x_14 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); x_14 = x_5; } lean::inc(x_10); x_16 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_0, x_10); x_17 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_17); if (lean::is_scalar(x_14)) { x_19 = lean::alloc_cnstr(0, 3, 0); } else { x_19 = x_14; } lean::cnstr_set(x_19, 0, x_16); lean::cnstr_set(x_19, 1, x_10); lean::cnstr_set(x_19, 2, x_17); x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_12, x_19); if (lean::is_scalar(x_9)) { x_21 = lean::alloc_cnstr(0, 2, 0); } else { x_21 = x_9; } lean::cnstr_set(x_21, 0, x_20); lean::cnstr_set(x_21, 1, x_7); return x_21; } else { obj* x_23; unsigned char x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; lean::dec(x_0); x_23 = lean::cnstr_get(x_5, 0); lean::inc(x_23); x_25 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); if (lean::is_shared(x_5)) { lean::dec(x_5); x_26 = lean::box(0); } else { lean::cnstr_release(x_5, 0); x_26 = x_5; } if (lean::is_scalar(x_26)) { x_27 = lean::alloc_cnstr(1, 1, 1); } else { x_27 = x_26; } lean::cnstr_set(x_27, 0, x_23); lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); x_28 = x_27; if (lean::is_scalar(x_9)) { x_29 = lean::alloc_cnstr(0, 2, 0); } else { x_29 = x_9; } lean::cnstr_set(x_29, 0, x_28); lean::cnstr_set(x_29, 1, x_7); return x_29; } } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__3(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_s4_lean_s6_parser_s10_number_x27_s9___spec__3(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_s4_lean_s6_parser_s10_number_x27_s9___spec__2(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__3(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_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_s4_lean_s6_parser_s10_number_x27_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_s4_lean_s6_parser_s10_number_x27_s9___spec__4(unsigned x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; lean::dec(x_1); x_5 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_5); x_7 = lean::string_push(x_5, x_0); x_8 = lean::string_iterator_remaining(x_2); x_9 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__5(x_8, x_7, x_2); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_3); return x_10; } } obj* _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_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_s4_lean_s6_parser_s10_number_x27_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_s4_lean_s6_parser_s10_number_x27_s9___spec__6(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; lean::dec(x_1); x_5 = lean::string_iterator_curr(x_0); lean::dec(x_0); x_7 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_7); x_9 = lean::string_push(x_7, x_5); x_10 = lean::string_iterator_remaining(x_2); x_11 = _l_s9___private_31565857__s16_take__while__aux_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__7(x_10, x_9, x_2); x_12 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_12, 0, x_11); lean::cnstr_set(x_12, 1, x_3); return x_12; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s12_take__while1_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__1(obj* x_0, obj* x_1, obj* x_2) { { unsigned char x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { obj* x_4; obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; x_4 = lean::box(0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_6 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); x_11 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); x_12 = lean::cnstr_get(x_11, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_11, 1); lean::inc(x_14); if (lean::is_shared(x_11)) { lean::dec(x_11); x_16 = lean::box(0); } else { lean::cnstr_release(x_11, 0); lean::cnstr_release(x_11, 1); x_16 = x_11; } x_17 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_17); x_19 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_12); if (lean::obj_tag(x_19) == 0) { obj* x_20; obj* x_22; obj* x_24; unsigned x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; x_20 = lean::cnstr_get(x_19, 0); lean::inc(x_20); x_22 = lean::cnstr_get(x_19, 1); lean::inc(x_22); x_24 = lean::cnstr_get(x_19, 2); lean::inc(x_24); lean::dec(x_19); x_27 = lean::unbox_uint32(x_20); lean::dec(x_20); x_29 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__2(x_27, x_0, x_22, x_14); x_30 = lean::cnstr_get(x_29, 0); lean::inc(x_30); x_32 = lean::cnstr_get(x_29, 1); lean::inc(x_32); lean::dec(x_29); x_35 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_24, x_30); if (lean::is_scalar(x_16)) { x_36 = lean::alloc_cnstr(0, 2, 0); } else { x_36 = x_16; } lean::cnstr_set(x_36, 0, x_35); lean::cnstr_set(x_36, 1, x_32); return x_36; } else { obj* x_38; unsigned char x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; lean::dec(x_0); x_38 = lean::cnstr_get(x_19, 0); lean::inc(x_38); x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); if (lean::is_shared(x_19)) { lean::dec(x_19); x_41 = lean::box(0); } else { lean::cnstr_release(x_19, 0); x_41 = x_19; } if (lean::is_scalar(x_41)) { x_42 = lean::alloc_cnstr(1, 1, 1); } else { x_42 = x_41; } lean::cnstr_set(x_42, 0, x_38); lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); x_43 = x_42; if (lean::is_scalar(x_16)) { x_44 = lean::alloc_cnstr(0, 2, 0); } else { x_44 = x_16; } lean::cnstr_set(x_44, 0, x_43); lean::cnstr_set(x_44, 1, x_14); return x_44; } } else { unsigned x_45; unsigned char x_46; x_45 = lean::string_iterator_curr(x_1); x_46 = _l_s4_char_s9_is__digit(x_45); if (x_46 == 0) { obj* x_47; obj* x_48; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_66; x_47 = _l_s4_char_s11_quote__core(x_45); x_48 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_48); x_50 = lean::string_append(x_48, x_47); lean::dec(x_47); x_52 = lean::string_append(x_50, x_48); x_53 = lean::box(0); x_54 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_53); lean::inc(x_54); x_58 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_52, x_54, x_53, x_53, x_0, x_1, x_2); x_59 = lean::cnstr_get(x_58, 0); lean::inc(x_59); x_61 = lean::cnstr_get(x_58, 1); lean::inc(x_61); if (lean::is_shared(x_58)) { lean::dec(x_58); x_63 = lean::box(0); } else { lean::cnstr_release(x_58, 0); lean::cnstr_release(x_58, 1); x_63 = x_58; } x_64 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_64); x_66 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_64, x_59); if (lean::obj_tag(x_66) == 0) { obj* x_67; obj* x_69; obj* x_71; unsigned x_74; obj* x_76; obj* x_77; obj* x_79; obj* x_82; obj* x_83; x_67 = lean::cnstr_get(x_66, 0); lean::inc(x_67); x_69 = lean::cnstr_get(x_66, 1); lean::inc(x_69); x_71 = lean::cnstr_get(x_66, 2); lean::inc(x_71); lean::dec(x_66); x_74 = lean::unbox_uint32(x_67); lean::dec(x_67); x_76 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__4(x_74, x_0, x_69, x_61); x_77 = lean::cnstr_get(x_76, 0); lean::inc(x_77); x_79 = lean::cnstr_get(x_76, 1); lean::inc(x_79); lean::dec(x_76); x_82 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_71, x_77); if (lean::is_scalar(x_63)) { x_83 = lean::alloc_cnstr(0, 2, 0); } else { x_83 = x_63; } lean::cnstr_set(x_83, 0, x_82); lean::cnstr_set(x_83, 1, x_79); return x_83; } else { obj* x_85; unsigned char x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; lean::dec(x_0); x_85 = lean::cnstr_get(x_66, 0); lean::inc(x_85); x_87 = lean::cnstr_get_scalar(x_66, sizeof(void*)*1); if (lean::is_shared(x_66)) { lean::dec(x_66); x_88 = lean::box(0); } else { lean::cnstr_release(x_66, 0); x_88 = x_66; } if (lean::is_scalar(x_88)) { x_89 = lean::alloc_cnstr(1, 1, 1); } else { x_89 = x_88; } lean::cnstr_set(x_89, 0, x_85); lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_87); x_90 = x_89; if (lean::is_scalar(x_63)) { x_91 = lean::alloc_cnstr(0, 2, 0); } else { x_91 = x_63; } lean::cnstr_set(x_91, 0, x_90); lean::cnstr_set(x_91, 1, x_61); return x_91; } } else { obj* x_93; obj* x_94; obj* x_95; obj* x_97; obj* x_99; obj* x_100; obj* x_101; obj* x_102; lean::inc(x_1); x_93 = lean::string_iterator_next(x_1); x_94 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__6(x_1, x_0, x_93, x_2); x_95 = lean::cnstr_get(x_94, 0); lean::inc(x_95); x_97 = lean::cnstr_get(x_94, 1); lean::inc(x_97); if (lean::is_shared(x_94)) { lean::dec(x_94); x_99 = lean::box(0); } else { lean::cnstr_release(x_94, 0); lean::cnstr_release(x_94, 1); x_99 = x_94; } x_100 = lean::box(0); x_101 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_100, x_95); if (lean::is_scalar(x_99)) { x_102 = lean::alloc_cnstr(0, 2, 0); } else { x_102 = x_99; } lean::cnstr_set(x_102, 0, x_101); lean::cnstr_set(x_102, 1, x_97); return x_102; } } } } obj* _l_s4_list_s3_map_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__9(obj* x_0) { { if (lean::obj_tag(x_0) == 0) { obj* x_2; lean::dec(x_0); x_2 = lean::box(0); return x_2; } else { obj* x_3; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; x_3 = lean::cnstr_get(x_0, 0); lean::inc(x_3); x_5 = lean::cnstr_get(x_0, 1); lean::inc(x_5); if (lean::is_shared(x_0)) { lean::dec(x_0); x_7 = lean::box(0); } else { lean::cnstr_release(x_0, 0); lean::cnstr_release(x_0, 1); x_7 = x_0; } x_8 = lean::alloc_closure(reinterpret_cast(_l_s4_list_s3_map_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__9_s11___lambda__1), 4, 1); lean::closure_set(x_8, 0, x_3); x_9 = _l_s4_list_s3_map_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__9(x_5); if (lean::is_scalar(x_7)) { x_10 = lean::alloc_cnstr(1, 2, 0); } else { x_10 = x_7; } lean::cnstr_set(x_10, 0, x_8); lean::cnstr_set(x_10, 1, x_9); return x_10; } } } obj* _l_s4_list_s3_map_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__9_s11___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; x_4 = lean::cnstr_get(x_0, 0); lean::inc(x_4); x_6 = lean::cnstr_get(x_0, 1); lean::inc(x_6); if (lean::is_shared(x_0)) { lean::dec(x_0); x_8 = lean::box(0); } else { lean::cnstr_release(x_0, 0); lean::cnstr_release(x_0, 1); x_8 = x_0; } x_9 = lean::apply_3(x_6, x_1, x_2, x_3); x_10 = lean::cnstr_get(x_9, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_9, 1); lean::inc(x_12); lean::dec(x_9); if (lean::obj_tag(x_10) == 0) { obj* x_15; obj* x_17; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; x_15 = lean::cnstr_get(x_10, 0); lean::inc(x_15); x_17 = lean::cnstr_get(x_10, 1); lean::inc(x_17); x_19 = lean::cnstr_get(x_10, 2); lean::inc(x_19); if (lean::is_shared(x_10)) { lean::dec(x_10); x_21 = lean::box(0); } else { lean::cnstr_release(x_10, 0); lean::cnstr_release(x_10, 1); lean::cnstr_release(x_10, 2); x_21 = x_10; } x_22 = lean::box(0); lean::inc(x_22); x_24 = lean::alloc_cnstr(2, 2, 0); lean::cnstr_set(x_24, 0, x_22); lean::cnstr_set(x_24, 1, x_4); x_25 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_25, 0, x_15); lean::cnstr_set(x_25, 1, x_22); x_26 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_24, x_25); x_27 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_27); if (lean::is_scalar(x_21)) { x_29 = lean::alloc_cnstr(0, 3, 0); } else { x_29 = x_21; } lean::cnstr_set(x_29, 0, x_26); lean::cnstr_set(x_29, 1, x_17); lean::cnstr_set(x_29, 2, x_27); x_30 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_29); if (lean::is_scalar(x_8)) { x_31 = lean::alloc_cnstr(0, 2, 0); } else { x_31 = x_8; } lean::cnstr_set(x_31, 0, x_30); lean::cnstr_set(x_31, 1, x_12); return x_31; } else { obj* x_33; unsigned char x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; lean::dec(x_4); x_33 = lean::cnstr_get(x_10, 0); lean::inc(x_33); x_35 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); if (lean::is_shared(x_10)) { lean::dec(x_10); x_36 = lean::box(0); } else { lean::cnstr_release(x_10, 0); x_36 = x_10; } if (lean::is_scalar(x_36)) { x_37 = lean::alloc_cnstr(1, 1, 1); } else { x_37 = x_36; } lean::cnstr_set(x_37, 0, x_33); lean::cnstr_set_scalar(x_37, sizeof(void*)*1, x_35); x_38 = x_37; if (lean::is_scalar(x_8)) { x_39 = lean::alloc_cnstr(0, 2, 0); } else { x_39 = x_8; } lean::cnstr_set(x_39, 0, x_38); lean::cnstr_set(x_39, 1, x_12); return x_39; } } } obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s10_number_x27_s10___spec__11(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_13; obj* x_14; obj* x_16; lean::inc(x_4); x_13 = lean::apply_3(x_1, x_3, x_4, x_5); x_14 = lean::cnstr_get(x_13, 0); lean::inc(x_14); x_16 = lean::cnstr_get(x_13, 1); lean::inc(x_16); lean::dec(x_13); if (lean::obj_tag(x_14) == 0) { obj* x_19; obj* x_21; obj* x_23; obj* x_25; unsigned char x_26; x_19 = lean::cnstr_get(x_14, 0); lean::inc(x_19); x_21 = lean::cnstr_get(x_14, 1); lean::inc(x_21); x_23 = lean::cnstr_get(x_14, 2); lean::inc(x_23); if (lean::is_shared(x_14)) { lean::dec(x_14); x_25 = lean::box(0); } else { lean::cnstr_release(x_14, 0); lean::cnstr_release(x_14, 1); lean::cnstr_release(x_14, 2); x_25 = x_14; } if (lean::obj_tag(x_2) == 0) { obj* x_28; obj* x_30; obj* x_32; x_28 = lean::cnstr_get(x_2, 0); lean::inc(x_28); x_30 = lean::cnstr_get(x_2, 1); lean::inc(x_30); x_32 = lean::cnstr_get(x_2, 2); lean::inc(x_32); if (lean::obj_tag(x_32) == 0) { obj* x_35; obj* x_36; obj* x_38; lean::dec(x_25); x_35 = lean::string_iterator_offset(x_21); x_36 = lean::string_iterator_offset(x_30); lean::dec(x_30); x_38 = lean::nat_dec_lt(x_35, x_36); if (lean::obj_tag(x_38) == 0) { obj* x_40; lean::dec(x_38); x_40 = lean::nat_dec_lt(x_36, x_35); lean::dec(x_35); lean::dec(x_36); if (lean::obj_tag(x_40) == 0) { obj* x_44; obj* x_46; obj* x_47; obj* x_49; obj* x_50; lean::dec(x_40); x_44 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_44, 0, x_19); lean::cnstr_set(x_44, 1, x_28); lean::inc(x_21); x_46 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_46, 0, x_44); lean::cnstr_set(x_46, 1, x_21); lean::cnstr_set(x_46, 2, x_32); x_47 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_47); x_49 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_49, 0, x_46); lean::cnstr_set(x_49, 1, x_21); lean::cnstr_set(x_49, 2, x_47); x_50 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_23, x_49); x_9 = x_50; x_10 = x_16; goto lbl_11; } else { obj* x_53; obj* x_54; obj* x_56; obj* x_57; obj* x_59; obj* x_60; lean::dec(x_40); lean::dec(x_28); x_53 = lean::box(0); x_54 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_54, 0, x_19); lean::cnstr_set(x_54, 1, x_53); lean::inc(x_21); x_56 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_56, 0, x_54); lean::cnstr_set(x_56, 1, x_21); lean::cnstr_set(x_56, 2, x_32); x_57 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_57); x_59 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_59, 0, x_56); lean::cnstr_set(x_59, 1, x_21); lean::cnstr_set(x_59, 2, x_57); x_60 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_23, x_59); x_9 = x_60; x_10 = x_16; goto lbl_11; } } else { obj* x_67; obj* x_70; obj* x_71; lean::dec(x_19); lean::dec(x_36); lean::dec(x_38); lean::dec(x_28); lean::dec(x_32); lean::dec(x_35); x_67 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_67); lean::inc(x_2); x_70 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_70, 0, x_2); lean::cnstr_set(x_70, 1, x_21); lean::cnstr_set(x_70, 2, x_67); x_71 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_23, x_70); x_9 = x_71; x_10 = x_16; goto lbl_11; } } else { unsigned char x_75; lean::dec(x_28); lean::dec(x_30); lean::dec(x_32); x_75 = 0; x_26 = x_75; goto lbl_27; } } else { unsigned char x_76; x_76 = 0; x_26 = x_76; goto lbl_27; } lbl_27: { obj* x_77; obj* x_79; obj* x_81; obj* x_82; obj* x_84; obj* x_85; x_77 = lean::box(0); lean::inc(x_77); x_79 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_79, 0, x_19); lean::cnstr_set(x_79, 1, x_77); lean::inc(x_21); if (lean::is_scalar(x_25)) { x_81 = lean::alloc_cnstr(0, 3, 0); } else { x_81 = x_25; } lean::cnstr_set(x_81, 0, x_79); lean::cnstr_set(x_81, 1, x_21); lean::cnstr_set(x_81, 2, x_77); x_82 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_82); x_84 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_84, 0, x_81); lean::cnstr_set(x_84, 1, x_21); lean::cnstr_set(x_84, 2, x_82); x_85 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_23, x_84); x_9 = x_85; x_10 = x_16; goto lbl_11; } } else { obj* x_86; unsigned char x_88; obj* x_89; obj* x_90; obj* x_91; x_86 = lean::cnstr_get(x_14, 0); lean::inc(x_86); x_88 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); if (lean::is_shared(x_14)) { lean::dec(x_14); x_89 = lean::box(0); } else { lean::cnstr_release(x_14, 0); x_89 = x_14; } if (lean::is_scalar(x_89)) { x_90 = lean::alloc_cnstr(1, 1, 1); } else { x_90 = x_89; } lean::cnstr_set(x_90, 0, x_86); lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_88); x_91 = x_90; x_9 = x_91; x_10 = x_16; goto lbl_11; } lbl_8: { if (lean::obj_tag(x_6) == 0) { obj* x_92; obj* x_94; obj* x_95; obj* x_97; obj* x_98; x_92 = lean::cnstr_get(x_6, 0); lean::inc(x_92); if (lean::is_shared(x_6)) { lean::dec(x_6); x_94 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); lean::cnstr_release(x_6, 2); x_94 = x_6; } x_95 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_95); if (lean::is_scalar(x_94)) { x_97 = lean::alloc_cnstr(0, 3, 0); } else { x_97 = x_94; } lean::cnstr_set(x_97, 0, x_92); lean::cnstr_set(x_97, 1, x_4); lean::cnstr_set(x_97, 2, x_95); x_98 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_98, 0, x_97); lean::cnstr_set(x_98, 1, x_7); return x_98; } else { obj* x_100; lean::dec(x_4); x_100 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_100, 0, x_6); lean::cnstr_set(x_100, 1, x_7); return x_100; } } lbl_11: { if (lean::obj_tag(x_9) == 0) { lean::dec(x_0); lean::dec(x_2); x_6 = x_9; x_7 = x_10; goto lbl_8; } else { obj* x_103; obj* x_105; obj* x_106; x_103 = lean::cnstr_get(x_9, 0); lean::inc(x_103); if (lean::is_shared(x_9)) { lean::dec(x_9); x_105 = lean::box(0); } else { lean::cnstr_release(x_9, 0); x_105 = x_9; } x_106 = lean::cnstr_get(x_103, 0); lean::inc(x_106); if (lean::obj_tag(x_2) == 0) { obj* x_111; obj* x_113; lean::dec(x_103); lean::dec(x_105); lean::dec(x_0); x_111 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_111); x_113 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_113, 0, x_2); lean::cnstr_set(x_113, 1, x_106); lean::cnstr_set(x_113, 2, x_111); x_6 = x_113; x_7 = x_10; goto lbl_8; } else { obj* x_114; obj* x_116; obj* x_117; obj* x_119; obj* x_121; x_114 = lean::cnstr_get(x_2, 0); lean::inc(x_114); x_116 = lean::string_iterator_offset(x_106); x_117 = lean::cnstr_get(x_114, 0); lean::inc(x_117); x_119 = lean::string_iterator_offset(x_117); lean::dec(x_117); x_121 = lean::nat_dec_lt(x_116, x_119); if (lean::obj_tag(x_121) == 0) { obj* x_124; lean::dec(x_121); lean::dec(x_2); x_124 = lean::nat_dec_lt(x_119, x_116); lean::dec(x_119); if (lean::obj_tag(x_124) == 0) { obj* x_127; obj* x_128; obj* x_130; lean::dec(x_124); x_127 = _l_s4_lean_s6_parser_s9_parsec__t_s5_merge_s6___rarg(x_103, x_114); x_128 = lean::string_iterator_offset(x_0); lean::dec(x_0); x_130 = lean::nat_dec_lt(x_128, x_116); lean::dec(x_116); lean::dec(x_128); if (lean::obj_tag(x_130) == 0) { unsigned char x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_139; lean::dec(x_130); x_134 = 0; if (lean::is_scalar(x_105)) { x_135 = lean::alloc_cnstr(1, 1, 1); } else { x_135 = x_105; } lean::cnstr_set(x_135, 0, x_127); lean::cnstr_set_scalar(x_135, sizeof(void*)*1, x_134); x_136 = x_135; x_137 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_137); x_139 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_139, 0, x_136); lean::cnstr_set(x_139, 1, x_106); lean::cnstr_set(x_139, 2, x_137); x_6 = x_139; x_7 = x_10; goto lbl_8; } else { unsigned char x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_146; lean::dec(x_130); x_141 = 1; if (lean::is_scalar(x_105)) { x_142 = lean::alloc_cnstr(1, 1, 1); } else { x_142 = x_105; } lean::cnstr_set(x_142, 0, x_127); lean::cnstr_set_scalar(x_142, sizeof(void*)*1, x_141); x_143 = x_142; x_144 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_144); x_146 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_146, 0, x_143); lean::cnstr_set(x_146, 1, x_106); lean::cnstr_set(x_146, 2, x_144); x_6 = x_146; x_7 = x_10; goto lbl_8; } } else { unsigned char x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_156; lean::dec(x_114); lean::dec(x_124); lean::dec(x_116); lean::dec(x_0); x_151 = 1; if (lean::is_scalar(x_105)) { x_152 = lean::alloc_cnstr(1, 1, 1); } else { x_152 = x_105; } lean::cnstr_set(x_152, 0, x_103); lean::cnstr_set_scalar(x_152, sizeof(void*)*1, x_151); x_153 = x_152; x_154 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_154); x_156 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_156, 0, x_153); lean::cnstr_set(x_156, 1, x_106); lean::cnstr_set(x_156, 2, x_154); x_6 = x_156; x_7 = x_10; goto lbl_8; } } else { obj* x_164; obj* x_166; lean::dec(x_121); lean::dec(x_103); lean::dec(x_105); lean::dec(x_114); lean::dec(x_119); lean::dec(x_116); lean::dec(x_0); x_164 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_164); x_166 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_166, 0, x_2); lean::cnstr_set(x_166, 1, x_106); lean::cnstr_set(x_166, 2, x_164); x_6 = x_166; x_7 = x_10; goto lbl_8; } } } } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s10_number_x27_s10___spec__12_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_s4_lean_s6_parser_s10_number_x27_s10___spec__12(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_s4_lean_s6_parser_s10_number_x27_s10___spec__12_s6___rarg), 5, 0); return x_2; } } obj* _l_s4_list_s6_mfoldr_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s10___spec__13(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { if (lean::obj_tag(x_1) == 0) { obj* x_7; obj* x_8; obj* x_9; obj* x_13; obj* x_14; obj* x_16; obj* x_17; lean::dec(x_1); lean::dec(x_2); x_7 = lean::box(0); x_8 = _l_s4_list_s6_mfoldr_s6___main_s4___at_s4_lean_s6_parser_s13_monad__parsec_s14_longest__match_s9___spec__2_s6___rarg_s11___closed__1; x_9 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_7); lean::inc(x_9); lean::inc(x_8); x_13 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s10_number_x27_s10___spec__12_s6___rarg(x_8, x_9, x_7, x_7, x_0); x_14 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_14); x_16 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_16, 0, x_13); lean::cnstr_set(x_16, 1, x_3); lean::cnstr_set(x_16, 2, x_14); x_17 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_17, 0, x_16); lean::cnstr_set(x_17, 1, x_4); return x_17; } else { obj* x_18; obj* x_20; obj* x_25; obj* x_26; obj* x_28; obj* x_30; x_18 = lean::cnstr_get(x_1, 0); lean::inc(x_18); x_20 = lean::cnstr_get(x_1, 1); lean::inc(x_20); lean::dec(x_1); lean::inc(x_2); lean::inc(x_0); x_25 = _l_s4_list_s6_mfoldr_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s10___spec__13(x_0, x_20, x_2, x_3, x_4); x_26 = lean::cnstr_get(x_25, 0); lean::inc(x_26); x_28 = lean::cnstr_get(x_25, 1); lean::inc(x_28); if (lean::is_shared(x_25)) { lean::dec(x_25); x_30 = lean::box(0); } else { lean::cnstr_release(x_25, 0); lean::cnstr_release(x_25, 1); x_30 = x_25; } if (lean::obj_tag(x_26) == 0) { obj* x_31; obj* x_33; obj* x_35; obj* x_38; obj* x_39; obj* x_41; obj* x_44; obj* x_45; x_31 = lean::cnstr_get(x_26, 0); lean::inc(x_31); x_33 = lean::cnstr_get(x_26, 1); lean::inc(x_33); x_35 = lean::cnstr_get(x_26, 2); lean::inc(x_35); lean::dec(x_26); x_38 = _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s10_number_x27_s10___spec__11(x_0, x_18, x_31, x_2, x_33, x_28); x_39 = lean::cnstr_get(x_38, 0); lean::inc(x_39); x_41 = lean::cnstr_get(x_38, 1); lean::inc(x_41); lean::dec(x_38); x_44 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_35, x_39); if (lean::is_scalar(x_30)) { x_45 = lean::alloc_cnstr(0, 2, 0); } else { x_45 = x_30; } lean::cnstr_set(x_45, 0, x_44); lean::cnstr_set(x_45, 1, x_41); return x_45; } else { obj* x_49; unsigned char x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; lean::dec(x_0); lean::dec(x_2); lean::dec(x_18); x_49 = lean::cnstr_get(x_26, 0); lean::inc(x_49); x_51 = lean::cnstr_get_scalar(x_26, sizeof(void*)*1); if (lean::is_shared(x_26)) { lean::dec(x_26); x_52 = lean::box(0); } else { lean::cnstr_release(x_26, 0); x_52 = x_26; } if (lean::is_scalar(x_52)) { x_53 = lean::alloc_cnstr(1, 1, 1); } else { x_53 = x_52; } lean::cnstr_set(x_53, 0, x_49); lean::cnstr_set_scalar(x_53, sizeof(void*)*1, x_51); x_54 = x_53; if (lean::is_scalar(x_30)) { x_55 = lean::alloc_cnstr(0, 2, 0); } else { x_55 = x_30; } lean::cnstr_set(x_55, 0, x_54); lean::cnstr_set(x_55, 1, x_28); return x_55; } } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s14_longest__match_s4___at_s4_lean_s6_parser_s10_number_x27_s10___spec__10(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_13; x_4 = lean::mk_nat_obj(0u); x_5 = _l_s4_list_s10_enum__from_s6___main_s6___rarg(x_4, x_0); x_6 = _l_s4_list_s3_map_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__9(x_5); lean::inc(x_2); x_8 = _l_s4_list_s6_mfoldr_s6___main_s4___at_s4_lean_s6_parser_s10_number_x27_s10___spec__13(x_2, x_6, x_1, x_2, x_3); x_9 = lean::cnstr_get(x_8, 0); lean::inc(x_9); x_11 = lean::cnstr_get(x_8, 1); lean::inc(x_11); if (lean::is_shared(x_8)) { lean::dec(x_8); x_13 = lean::box(0); } else { lean::cnstr_release(x_8, 0); lean::cnstr_release(x_8, 1); x_13 = x_8; } if (lean::obj_tag(x_9) == 0) { obj* x_14; obj* x_16; obj* x_19; obj* x_20; obj* x_22; obj* x_23; x_14 = lean::cnstr_get(x_9, 0); lean::inc(x_14); x_16 = lean::cnstr_get(x_9, 2); lean::inc(x_16); lean::dec(x_9); x_19 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_14); x_20 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_20); x_22 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_20, x_19); if (lean::is_scalar(x_13)) { x_23 = lean::alloc_cnstr(0, 2, 0); } else { x_23 = x_13; } lean::cnstr_set(x_23, 0, x_22); lean::cnstr_set(x_23, 1, x_11); return x_23; } else { obj* x_24; unsigned char x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_33; x_24 = lean::cnstr_get(x_9, 0); lean::inc(x_24); x_26 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); if (lean::is_shared(x_9)) { lean::dec(x_9); x_27 = lean::box(0); } else { lean::cnstr_release(x_9, 0); x_27 = x_9; } 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_30 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_30); x_32 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_30, x_29); if (lean::is_scalar(x_13)) { x_33 = lean::alloc_cnstr(0, 2, 0); } else { x_33 = x_13; } lean::cnstr_set(x_33, 0, x_32); lean::cnstr_set(x_33, 1, x_11); return x_33; } } } obj* _l_s4_lean_s6_parser_s11_combinators_s15_longest__choice_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__8(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_6; obj* x_8; obj* x_10; lean::inc(x_1); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s14_longest__match_s4___at_s4_lean_s6_parser_s10_number_x27_s10___spec__10(x_0, x_1, x_2, x_3); x_6 = lean::cnstr_get(x_5, 0); lean::inc(x_6); x_8 = lean::cnstr_get(x_5, 1); lean::inc(x_8); if (lean::is_shared(x_5)) { lean::dec(x_5); x_10 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); x_10 = x_5; } if (lean::obj_tag(x_6) == 0) { obj* x_11; obj* x_13; obj* x_15; obj* x_17; x_11 = lean::cnstr_get(x_6, 0); lean::inc(x_11); x_13 = lean::cnstr_get(x_6, 1); lean::inc(x_13); x_15 = lean::cnstr_get(x_6, 2); lean::inc(x_15); if (lean::is_shared(x_6)) { lean::dec(x_6); x_17 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); lean::cnstr_release(x_6, 2); x_17 = x_6; } if (lean::obj_tag(x_11) == 0) { obj* x_20; obj* x_21; obj* x_22; obj* x_26; obj* x_27; obj* x_29; obj* x_32; obj* x_33; lean::dec(x_11); lean::dec(x_17); x_20 = lean::box(0); x_21 = _l_s9___private_1297690757__s10_many1__aux_s6___main_s6___rarg_s11___closed__1; x_22 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_20); lean::inc(x_22); lean::inc(x_21); x_26 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_21, x_22, x_20, x_20, x_1, x_13, x_8); x_27 = lean::cnstr_get(x_26, 0); lean::inc(x_27); x_29 = lean::cnstr_get(x_26, 1); lean::inc(x_29); lean::dec(x_26); x_32 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_27); if (lean::is_scalar(x_10)) { x_33 = lean::alloc_cnstr(0, 2, 0); } else { x_33 = x_10; } lean::cnstr_set(x_33, 0, x_32); lean::cnstr_set(x_33, 1, x_29); return x_33; } else { obj* x_35; obj* x_38; obj* x_40; obj* x_41; obj* x_42; lean::dec(x_1); x_35 = lean::cnstr_get(x_11, 0); lean::inc(x_35); lean::dec(x_11); x_38 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_38); if (lean::is_scalar(x_17)) { x_40 = lean::alloc_cnstr(0, 3, 0); } else { x_40 = x_17; } lean::cnstr_set(x_40, 0, x_35); lean::cnstr_set(x_40, 1, x_13); lean::cnstr_set(x_40, 2, x_38); x_41 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_40); if (lean::is_scalar(x_10)) { x_42 = lean::alloc_cnstr(0, 2, 0); } else { x_42 = x_10; } lean::cnstr_set(x_42, 0, x_41); lean::cnstr_set(x_42, 1, x_8); return x_42; } } else { obj* x_44; unsigned char x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; lean::dec(x_1); x_44 = lean::cnstr_get(x_6, 0); lean::inc(x_44); x_46 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); if (lean::is_shared(x_6)) { lean::dec(x_6); x_47 = lean::box(0); } else { lean::cnstr_release(x_6, 0); x_47 = x_6; } 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; if (lean::is_scalar(x_10)) { x_50 = lean::alloc_cnstr(0, 2, 0); } else { x_50 = x_10; } lean::cnstr_set(x_50, 0, x_49); lean::cnstr_set(x_50, 1, x_8); return x_50; } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__2_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__2(x_4, x_1, x_2, x_3); return x_5; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__4_s7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { unsigned x_4; obj* x_5; x_4 = lean::unbox_uint32(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s17_take__while__cont_s4___at_s4_lean_s6_parser_s10_number_x27_s9___spec__4(x_4, x_1, x_2, x_3); return x_5; } } obj* _init__l_s4_lean_s6_parser_s11_string__lit() { { obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("lean"); x_2 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); x_3 = lean::mk_string("parser"); x_4 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_4, 0, x_2); lean::cnstr_set(x_4, 1, x_3); x_5 = lean::mk_string("string_lit"); x_6 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_6, 0, x_4); lean::cnstr_set(x_6, 1, x_5); return x_6; } } obj* _init__l_s4_lean_s6_parser_s11_string__lit_s13_has__view_x27() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_string__lit_s13_has__view_x27_s11___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_string__lit_s13_has__view_x27_s11___lambda__2), 1, 0); x_2 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); return x_2; } } obj* _l_s4_lean_s6_parser_s11_string__lit_s13_has__view_x27_s11___lambda__1(obj* x_0) { { obj* x_1; x_1 = _l_s4_lean_s6_parser_s6_syntax_s8_as__node_s6___main(x_0); if (lean::obj_tag(x_1) == 0) { obj* x_3; lean::dec(x_1); x_3 = lean::box(0); return x_3; } else { obj* x_4; obj* x_6; obj* x_7; x_4 = lean::cnstr_get(x_1, 0); lean::inc(x_4); if (lean::is_shared(x_1)) { lean::dec(x_1); x_6 = lean::box(0); } else { lean::cnstr_release(x_1, 0); x_6 = x_1; } x_7 = lean::cnstr_get(x_4, 1); lean::inc(x_7); lean::dec(x_4); if (lean::obj_tag(x_7) == 0) { obj* x_12; lean::dec(x_6); lean::dec(x_7); x_12 = lean::box(0); return x_12; } else { obj* x_13; x_13 = lean::cnstr_get(x_7, 0); lean::inc(x_13); lean::dec(x_7); switch (lean::obj_tag(x_13)) { case 0: { obj* x_16; obj* x_19; x_16 = lean::cnstr_get(x_13, 0); lean::inc(x_16); lean::dec(x_13); if (lean::is_scalar(x_6)) { x_19 = lean::alloc_cnstr(1, 1, 0); } else { x_19 = x_6; } lean::cnstr_set(x_19, 0, x_16); return x_19; } case 1: { obj* x_22; lean::dec(x_6); lean::dec(x_13); x_22 = lean::box(0); return x_22; } case 2: { obj* x_25; lean::dec(x_6); lean::dec(x_13); x_25 = lean::box(0); return x_25; } default: { obj* x_28; lean::dec(x_6); lean::dec(x_13); x_28 = lean::box(0); return x_28; } } } } } } obj* _l_s4_lean_s6_parser_s11_string__lit_s13_has__view_x27_s11___lambda__2(obj* x_0) { { obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_10; x_1 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3_s11___closed__1; lean::inc(x_1); x_3 = _l_s6_option_s3_map_s6___rarg(x_1, x_0); x_4 = lean::box(3); x_5 = _l_s6_option_s13_get__or__else_s6___main_s6___rarg(x_3, x_4); x_6 = lean::box(0); x_7 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_7, 0, x_5); lean::cnstr_set(x_7, 1, x_6); x_8 = _l_s4_lean_s6_parser_s11_string__lit; lean::inc(x_8); x_10 = _l_s4_lean_s6_parser_s6_syntax_s8_mk__node(x_8, x_7); return x_10; } } obj* _init__l_s4_lean_s6_parser_s11_string__lit_s9_has__view() { { obj* x_0; x_0 = _l_s4_lean_s6_parser_s11_string__lit_s13_has__view_x27; lean::inc(x_0); return x_0; } } obj* _l_s4_lean_s6_parser_s15_string__lit_x27(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_7; x_3 = _l_s4_lean_s6_parser_s11_string__lit; x_4 = _l_s4_lean_s6_parser_s15_string__lit_x27_s11___closed__1; lean::inc(x_4); lean::inc(x_3); x_7 = _l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__8(x_3, x_4, x_0, x_1, x_2); return x_7; } } obj* _init__l_s4_lean_s6_parser_s15_string__lit_x27_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___lambda__1), 2, 0); x_1 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_lift_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__1_s6___rarg), 4, 1); lean::closure_set(x_1, 0, x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s15_string__lit_x27_s11___lambda__1), 4, 0); x_3 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_3, 0, x_1); lean::closure_set(x_3, 1, x_2); x_4 = lean::box(0); x_5 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_5, 0, x_3); lean::cnstr_set(x_5, 1, x_4); return x_5; } } obj* _l_s4_lean_s6_parser_s15_string__lit_x27_s11___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; obj* x_7; obj* x_9; x_4 = _l_s4_lean_s6_parser_s22_parse__string__literal_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__1(x_1, x_2, x_3); x_5 = lean::cnstr_get(x_4, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_4, 1); lean::inc(x_7); if (lean::is_shared(x_4)) { lean::dec(x_4); x_9 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); x_9 = x_4; } if (lean::obj_tag(x_5) == 0) { obj* x_10; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; x_10 = lean::cnstr_get(x_5, 1); lean::inc(x_10); x_12 = lean::cnstr_get(x_5, 2); lean::inc(x_12); if (lean::is_shared(x_5)) { lean::dec(x_5); x_14 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); x_14 = x_5; } lean::inc(x_10); x_16 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_0, x_10); x_17 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_17); if (lean::is_scalar(x_14)) { x_19 = lean::alloc_cnstr(0, 3, 0); } else { x_19 = x_14; } lean::cnstr_set(x_19, 0, x_16); lean::cnstr_set(x_19, 1, x_10); lean::cnstr_set(x_19, 2, x_17); x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_12, x_19); if (lean::is_scalar(x_9)) { x_21 = lean::alloc_cnstr(0, 2, 0); } else { x_21 = x_9; } lean::cnstr_set(x_21, 0, x_20); lean::cnstr_set(x_21, 1, x_7); return x_21; } else { obj* x_23; unsigned char x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; lean::dec(x_0); x_23 = lean::cnstr_get(x_5, 0); lean::inc(x_23); x_25 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); if (lean::is_shared(x_5)) { lean::dec(x_5); x_26 = lean::box(0); } else { lean::cnstr_release(x_5, 0); x_26 = x_5; } if (lean::is_scalar(x_26)) { x_27 = lean::alloc_cnstr(1, 1, 1); } else { x_27 = x_26; } lean::cnstr_set(x_27, 0, x_23); lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); x_28 = x_27; if (lean::is_scalar(x_9)) { x_29 = lean::alloc_cnstr(0, 2, 0); } else { x_29 = x_9; } lean::cnstr_set(x_29, 0, x_28); lean::cnstr_set(x_29, 1, x_7); return x_29; } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__5(obj* x_0, obj* x_1, obj* x_2) { { unsigned char x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { obj* x_4; obj* x_5; obj* x_6; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_19; x_4 = lean::box(0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_6 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); x_10 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); x_11 = lean::cnstr_get(x_10, 0); lean::inc(x_11); x_13 = lean::cnstr_get(x_10, 1); lean::inc(x_13); if (lean::is_shared(x_10)) { lean::dec(x_10); x_15 = lean::box(0); } else { lean::cnstr_release(x_10, 0); lean::cnstr_release(x_10, 1); x_15 = x_10; } x_16 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_16); x_18 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_11); if (lean::is_scalar(x_15)) { x_19 = lean::alloc_cnstr(0, 2, 0); } else { x_19 = x_15; } lean::cnstr_set(x_19, 0, x_18); lean::cnstr_set(x_19, 1, x_13); return x_19; } else { unsigned x_20; unsigned char x_21; x_20 = lean::string_iterator_curr(x_1); x_21 = _l_s4_char_s9_is__digit(x_20); if (x_21 == 0) { obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_32; obj* x_33; obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_41; x_22 = _l_s4_char_s11_quote__core(x_20); x_23 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_23); x_25 = lean::string_append(x_23, x_22); lean::dec(x_22); x_27 = lean::string_append(x_25, x_23); x_28 = lean::box(0); x_29 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_28); lean::inc(x_29); x_32 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_27, x_29, x_28, x_28, x_0, x_1, x_2); x_33 = lean::cnstr_get(x_32, 0); lean::inc(x_33); x_35 = lean::cnstr_get(x_32, 1); lean::inc(x_35); if (lean::is_shared(x_32)) { lean::dec(x_32); x_37 = lean::box(0); } else { lean::cnstr_release(x_32, 0); lean::cnstr_release(x_32, 1); x_37 = x_32; } x_38 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_38); x_40 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_38, x_33); if (lean::is_scalar(x_37)) { x_41 = lean::alloc_cnstr(0, 2, 0); } else { x_41 = x_37; } lean::cnstr_set(x_41, 0, x_40); lean::cnstr_set(x_41, 1, x_35); return x_41; } else { obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; lean::dec(x_0); x_43 = lean::string_iterator_next(x_1); x_44 = lean::box(0); x_45 = lean::box_uint32(x_20); x_46 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_46, 0, x_45); lean::cnstr_set(x_46, 1, x_43); lean::cnstr_set(x_46, 2, x_44); x_47 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_47, 0, x_46); lean::cnstr_set(x_47, 1, x_2); return x_47; } } } } obj* _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_5; obj* x_6; obj* x_10; obj* x_11; obj* x_13; lean::inc(x_1); lean::inc(x_0); x_10 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__5(x_0, x_1, x_2); x_11 = lean::cnstr_get(x_10, 0); lean::inc(x_11); x_13 = lean::cnstr_get(x_10, 1); lean::inc(x_13); lean::dec(x_10); if (lean::obj_tag(x_11) == 0) { obj* x_16; obj* x_18; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; x_16 = lean::cnstr_get(x_11, 0); lean::inc(x_16); x_18 = lean::cnstr_get(x_11, 1); lean::inc(x_18); x_20 = lean::cnstr_get(x_11, 2); lean::inc(x_20); if (lean::is_shared(x_11)) { lean::dec(x_11); x_22 = lean::box(0); } else { lean::cnstr_release(x_11, 0); lean::cnstr_release(x_11, 1); lean::cnstr_release(x_11, 2); x_22 = x_11; } x_23 = lean::mk_nat_obj(48u); x_24 = lean::mk_nat_obj(55296u); x_25 = lean::nat_dec_lt(x_23, x_24); lean::dec(x_24); if (lean::obj_tag(x_25) == 0) { obj* x_28; obj* x_29; lean::dec(x_25); x_28 = lean::mk_nat_obj(57343u); x_29 = lean::nat_dec_lt(x_28, x_23); lean::dec(x_28); if (lean::obj_tag(x_29) == 0) { obj* x_33; obj* x_34; obj* x_37; obj* x_39; obj* x_40; lean::dec(x_23); lean::dec(x_29); x_33 = lean::mk_nat_obj(0u); x_34 = lean::nat_sub(x_16, x_33); lean::dec(x_33); lean::dec(x_16); x_37 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_37); if (lean::is_scalar(x_22)) { x_39 = lean::alloc_cnstr(0, 3, 0); } else { x_39 = x_22; } lean::cnstr_set(x_39, 0, x_34); lean::cnstr_set(x_39, 1, x_18); lean::cnstr_set(x_39, 2, x_37); x_40 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_20, x_39); x_5 = x_40; x_6 = x_13; goto lbl_7; } else { obj* x_42; obj* x_43; lean::dec(x_29); x_42 = lean::mk_nat_obj(1114112u); x_43 = lean::nat_dec_lt(x_23, x_42); lean::dec(x_42); if (lean::obj_tag(x_43) == 0) { obj* x_47; obj* x_48; obj* x_51; obj* x_53; obj* x_54; lean::dec(x_43); lean::dec(x_23); x_47 = lean::mk_nat_obj(0u); x_48 = lean::nat_sub(x_16, x_47); lean::dec(x_47); lean::dec(x_16); x_51 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_51); if (lean::is_scalar(x_22)) { x_53 = lean::alloc_cnstr(0, 3, 0); } else { x_53 = x_22; } lean::cnstr_set(x_53, 0, x_48); lean::cnstr_set(x_53, 1, x_18); lean::cnstr_set(x_53, 2, x_51); x_54 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_20, x_53); x_5 = x_54; x_6 = x_13; goto lbl_7; } else { obj* x_56; obj* x_59; obj* x_61; obj* x_62; lean::dec(x_43); x_56 = lean::nat_sub(x_16, x_23); lean::dec(x_23); lean::dec(x_16); x_59 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_59); if (lean::is_scalar(x_22)) { x_61 = lean::alloc_cnstr(0, 3, 0); } else { x_61 = x_22; } lean::cnstr_set(x_61, 0, x_56); lean::cnstr_set(x_61, 1, x_18); lean::cnstr_set(x_61, 2, x_59); x_62 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_20, x_61); x_5 = x_62; x_6 = x_13; goto lbl_7; } } } else { obj* x_64; obj* x_67; obj* x_69; obj* x_70; lean::dec(x_25); x_64 = lean::nat_sub(x_16, x_23); lean::dec(x_23); lean::dec(x_16); x_67 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_67); if (lean::is_scalar(x_22)) { x_69 = lean::alloc_cnstr(0, 3, 0); } else { x_69 = x_22; } lean::cnstr_set(x_69, 0, x_64); lean::cnstr_set(x_69, 1, x_18); lean::cnstr_set(x_69, 2, x_67); x_70 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_20, x_69); x_5 = x_70; x_6 = x_13; goto lbl_7; } } else { obj* x_71; unsigned char x_73; obj* x_74; obj* x_75; obj* x_76; x_71 = lean::cnstr_get(x_11, 0); lean::inc(x_71); x_73 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); if (lean::is_shared(x_11)) { lean::dec(x_11); x_74 = lean::box(0); } else { lean::cnstr_release(x_11, 0); x_74 = x_11; } if (lean::is_scalar(x_74)) { x_75 = lean::alloc_cnstr(1, 1, 1); } else { x_75 = x_74; } lean::cnstr_set(x_75, 0, x_71); lean::cnstr_set_scalar(x_75, sizeof(void*)*1, x_73); x_76 = x_75; x_5 = x_76; x_6 = x_13; goto lbl_7; } lbl_4: { obj* x_77; obj* x_79; obj* x_81; obj* x_82; obj* x_84; obj* x_85; x_77 = lean::cnstr_get(x_3, 0); lean::inc(x_77); x_79 = lean::cnstr_get(x_3, 1); lean::inc(x_79); if (lean::is_shared(x_3)) { lean::dec(x_3); x_81 = lean::box(0); } else { lean::cnstr_release(x_3, 0); lean::cnstr_release(x_3, 1); x_81 = x_3; } x_82 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_s11___closed__1; lean::inc(x_82); x_84 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_77, x_82); if (lean::is_scalar(x_81)) { x_85 = lean::alloc_cnstr(0, 2, 0); } else { x_85 = x_81; } lean::cnstr_set(x_85, 0, x_84); lean::cnstr_set(x_85, 1, x_79); return x_85; } lbl_7: { if (lean::obj_tag(x_5) == 0) { obj* x_88; obj* x_90; obj* x_91; lean::dec(x_0); lean::dec(x_1); x_88 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_s11___closed__1; lean::inc(x_88); x_90 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_5, x_88); x_91 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_91, 0, x_90); lean::cnstr_set(x_91, 1, x_6); return x_91; } else { obj* x_92; unsigned char x_94; obj* x_95; obj* x_97; obj* x_98; obj* x_100; obj* x_101; x_92 = lean::cnstr_get(x_5, 0); lean::inc(x_92); x_94 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); if (x_94 == 0) { unsigned char x_104; lean::dec(x_5); x_104 = lean::string_iterator_has_next(x_1); if (x_104 == 0) { obj* x_105; obj* x_106; obj* x_107; obj* x_113; obj* x_114; obj* x_116; obj* x_119; obj* x_121; x_105 = lean::box(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_1); lean::inc(x_0); lean::inc(x_105); lean::inc(x_107); lean::inc(x_106); x_113 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_106, x_107, x_105, x_105, x_0, x_1, x_6); x_114 = lean::cnstr_get(x_113, 0); lean::inc(x_114); x_116 = lean::cnstr_get(x_113, 1); lean::inc(x_116); lean::dec(x_113); x_119 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_119); x_121 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_119, x_114); x_100 = x_121; x_101 = x_116; goto lbl_102; } else { unsigned x_122; unsigned char x_123; unsigned char x_125; obj* x_127; obj* x_128; obj* x_129; unsigned char x_130; x_122 = lean::string_iterator_curr(x_1); x_127 = lean::mk_nat_obj(97u); x_128 = lean::mk_nat_obj(55296u); x_129 = lean::nat_dec_lt(x_127, x_128); if (lean::obj_tag(x_129) == 0) { obj* x_133; obj* x_134; lean::dec(x_129); x_133 = lean::mk_nat_obj(57343u); x_134 = lean::nat_dec_lt(x_133, x_127); lean::dec(x_133); if (lean::obj_tag(x_134) == 0) { obj* x_138; obj* x_139; obj* x_140; lean::dec(x_127); lean::dec(x_134); x_138 = lean::mk_nat_obj(0u); x_139 = lean::box_uint32(x_122); x_140 = lean::nat_dec_le(x_138, x_139); lean::dec(x_139); lean::dec(x_138); if (lean::obj_tag(x_140) == 0) { unsigned char x_145; lean::dec(x_128); lean::dec(x_140); x_145 = 0; x_123 = x_145; goto lbl_124; } else { unsigned char x_147; lean::dec(x_140); x_147 = 1; x_130 = x_147; goto lbl_131; } } else { obj* x_149; obj* x_150; lean::dec(x_134); x_149 = lean::mk_nat_obj(1114112u); x_150 = lean::nat_dec_lt(x_127, x_149); lean::dec(x_149); if (lean::obj_tag(x_150) == 0) { obj* x_154; obj* x_155; obj* x_156; lean::dec(x_127); lean::dec(x_150); x_154 = lean::mk_nat_obj(0u); x_155 = lean::box_uint32(x_122); x_156 = lean::nat_dec_le(x_154, x_155); lean::dec(x_155); lean::dec(x_154); if (lean::obj_tag(x_156) == 0) { unsigned char x_161; lean::dec(x_128); lean::dec(x_156); x_161 = 0; x_123 = x_161; goto lbl_124; } else { unsigned char x_163; lean::dec(x_156); x_163 = 1; x_130 = x_163; goto lbl_131; } } else { obj* x_165; obj* x_166; lean::dec(x_150); x_165 = lean::box_uint32(x_122); x_166 = lean::nat_dec_le(x_127, x_165); lean::dec(x_165); lean::dec(x_127); if (lean::obj_tag(x_166) == 0) { unsigned char x_171; lean::dec(x_166); lean::dec(x_128); x_171 = 0; x_123 = x_171; goto lbl_124; } else { unsigned char x_173; lean::dec(x_166); x_173 = 1; x_130 = x_173; goto lbl_131; } } } } else { obj* x_175; obj* x_176; lean::dec(x_129); x_175 = lean::box_uint32(x_122); x_176 = lean::nat_dec_le(x_127, x_175); lean::dec(x_175); lean::dec(x_127); if (lean::obj_tag(x_176) == 0) { unsigned char x_181; lean::dec(x_176); lean::dec(x_128); x_181 = 0; x_123 = x_181; goto lbl_124; } else { unsigned char x_183; lean::dec(x_176); x_183 = 1; x_130 = x_183; goto lbl_131; } } lbl_124: { obj* x_184; obj* x_185; obj* x_187; obj* x_189; obj* x_190; obj* x_191; obj* x_196; obj* x_197; obj* x_199; obj* x_202; obj* x_204; x_184 = _l_s4_char_s11_quote__core(x_122); x_185 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_185); x_187 = lean::string_append(x_185, x_184); lean::dec(x_184); x_189 = lean::string_append(x_187, x_185); x_190 = lean::box(0); x_191 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_1); lean::inc(x_0); lean::inc(x_190); lean::inc(x_191); x_196 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_189, x_191, x_190, x_190, x_0, x_1, x_6); x_197 = lean::cnstr_get(x_196, 0); lean::inc(x_197); x_199 = lean::cnstr_get(x_196, 1); lean::inc(x_199); lean::dec(x_196); x_202 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_202); x_204 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_202, x_197); x_100 = x_204; x_101 = x_199; goto lbl_102; } lbl_126: { obj* x_206; obj* x_207; obj* x_208; obj* x_209; lean::inc(x_1); x_206 = lean::string_iterator_next(x_1); x_207 = lean::box(0); x_208 = lean::box_uint32(x_122); x_209 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_209, 0, x_208); lean::cnstr_set(x_209, 1, x_206); lean::cnstr_set(x_209, 2, x_207); x_100 = x_209; x_101 = x_6; goto lbl_102; } lbl_131: { obj* x_210; obj* x_211; x_210 = lean::mk_nat_obj(102u); x_211 = lean::nat_dec_lt(x_210, x_128); lean::dec(x_128); if (lean::obj_tag(x_211) == 0) { obj* x_214; obj* x_215; lean::dec(x_211); x_214 = lean::mk_nat_obj(57343u); x_215 = lean::nat_dec_lt(x_214, x_210); lean::dec(x_214); if (lean::obj_tag(x_215) == 0) { obj* x_219; obj* x_220; obj* x_221; lean::dec(x_210); lean::dec(x_215); x_219 = lean::mk_nat_obj(0u); x_220 = lean::box_uint32(x_122); x_221 = lean::nat_dec_le(x_220, x_219); lean::dec(x_219); lean::dec(x_220); if (lean::obj_tag(x_221) == 0) { unsigned char x_225; lean::dec(x_221); x_225 = 0; x_123 = x_225; goto lbl_124; } else { lean::dec(x_221); if (x_130 == 0) { unsigned char x_227; x_227 = 0; x_123 = x_227; goto lbl_124; } else { unsigned char x_228; x_228 = 0; x_125 = x_228; goto lbl_126; } } } else { obj* x_230; obj* x_231; lean::dec(x_215); x_230 = lean::mk_nat_obj(1114112u); x_231 = lean::nat_dec_lt(x_210, x_230); lean::dec(x_230); if (lean::obj_tag(x_231) == 0) { obj* x_235; obj* x_236; obj* x_237; lean::dec(x_210); lean::dec(x_231); x_235 = lean::mk_nat_obj(0u); x_236 = lean::box_uint32(x_122); x_237 = lean::nat_dec_le(x_236, x_235); lean::dec(x_235); lean::dec(x_236); if (lean::obj_tag(x_237) == 0) { unsigned char x_241; lean::dec(x_237); x_241 = 0; x_123 = x_241; goto lbl_124; } else { lean::dec(x_237); if (x_130 == 0) { unsigned char x_243; x_243 = 0; x_123 = x_243; goto lbl_124; } else { unsigned char x_244; x_244 = 0; x_125 = x_244; goto lbl_126; } } } else { obj* x_246; obj* x_247; lean::dec(x_231); x_246 = lean::box_uint32(x_122); x_247 = lean::nat_dec_le(x_246, x_210); lean::dec(x_210); lean::dec(x_246); if (lean::obj_tag(x_247) == 0) { unsigned char x_251; lean::dec(x_247); x_251 = 0; x_123 = x_251; goto lbl_124; } else { lean::dec(x_247); if (x_130 == 0) { unsigned char x_253; x_253 = 0; x_123 = x_253; goto lbl_124; } else { unsigned char x_254; x_254 = 0; x_125 = x_254; goto lbl_126; } } } } } else { obj* x_256; obj* x_257; lean::dec(x_211); x_256 = lean::box_uint32(x_122); x_257 = lean::nat_dec_le(x_256, x_210); lean::dec(x_210); lean::dec(x_256); if (lean::obj_tag(x_257) == 0) { unsigned char x_261; lean::dec(x_257); x_261 = 0; x_123 = x_261; goto lbl_124; } else { lean::dec(x_257); if (x_130 == 0) { unsigned char x_263; x_263 = 0; x_123 = x_263; goto lbl_124; } else { unsigned char x_264; x_264 = 0; x_125 = x_264; goto lbl_126; } } } } } } else { obj* x_268; lean::dec(x_92); lean::dec(x_0); lean::dec(x_1); x_268 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_268, 0, x_5); lean::cnstr_set(x_268, 1, x_6); x_3 = x_268; goto lbl_4; } lbl_96: { obj* x_269; obj* x_271; obj* x_273; obj* x_274; obj* x_275; x_269 = lean::cnstr_get(x_95, 0); lean::inc(x_269); x_271 = lean::cnstr_get(x_95, 1); lean::inc(x_271); if (lean::is_shared(x_95)) { lean::dec(x_95); x_273 = lean::box(0); } else { lean::cnstr_release(x_95, 0); lean::cnstr_release(x_95, 1); x_273 = x_95; } x_274 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_92, x_269); if (lean::is_scalar(x_273)) { x_275 = lean::alloc_cnstr(0, 2, 0); } else { x_275 = x_273; } lean::cnstr_set(x_275, 0, x_274); lean::cnstr_set(x_275, 1, x_271); x_3 = x_275; goto lbl_4; } lbl_99: { if (lean::obj_tag(x_97) == 0) { obj* x_278; lean::dec(x_0); lean::dec(x_1); x_278 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_278, 0, x_97); lean::cnstr_set(x_278, 1, x_98); x_95 = x_278; goto lbl_96; } else { obj* x_279; unsigned char x_281; obj* x_282; obj* x_283; x_279 = lean::cnstr_get(x_97, 0); lean::inc(x_279); x_281 = lean::cnstr_get_scalar(x_97, sizeof(void*)*1); if (x_281 == 0) { unsigned char x_286; lean::dec(x_97); x_286 = lean::string_iterator_has_next(x_1); if (x_286 == 0) { obj* x_287; obj* x_288; obj* x_289; obj* x_293; obj* x_294; obj* x_296; obj* x_299; obj* x_301; x_287 = lean::box(0); x_288 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_289 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_287); lean::inc(x_289); lean::inc(x_288); x_293 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_288, x_289, x_287, x_287, x_0, x_1, x_98); x_294 = lean::cnstr_get(x_293, 0); lean::inc(x_294); x_296 = lean::cnstr_get(x_293, 1); lean::inc(x_296); lean::dec(x_293); x_299 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_299); x_301 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_299, x_294); x_282 = x_301; x_283 = x_296; goto lbl_284; } else { unsigned x_302; unsigned char x_303; unsigned char x_305; obj* x_307; obj* x_308; obj* x_309; unsigned char x_310; x_302 = lean::string_iterator_curr(x_1); x_307 = lean::mk_nat_obj(65u); x_308 = lean::mk_nat_obj(55296u); x_309 = lean::nat_dec_lt(x_307, x_308); if (lean::obj_tag(x_309) == 0) { obj* x_313; obj* x_314; lean::dec(x_309); x_313 = lean::mk_nat_obj(57343u); x_314 = lean::nat_dec_lt(x_313, x_307); lean::dec(x_313); if (lean::obj_tag(x_314) == 0) { obj* x_318; obj* x_319; obj* x_320; lean::dec(x_314); lean::dec(x_307); x_318 = lean::mk_nat_obj(0u); x_319 = lean::box_uint32(x_302); x_320 = lean::nat_dec_le(x_318, x_319); lean::dec(x_319); lean::dec(x_318); if (lean::obj_tag(x_320) == 0) { unsigned char x_325; lean::dec(x_308); lean::dec(x_320); x_325 = 0; x_303 = x_325; goto lbl_304; } else { unsigned char x_327; lean::dec(x_320); x_327 = 1; x_310 = x_327; goto lbl_311; } } else { obj* x_329; obj* x_330; lean::dec(x_314); x_329 = lean::mk_nat_obj(1114112u); x_330 = lean::nat_dec_lt(x_307, x_329); lean::dec(x_329); if (lean::obj_tag(x_330) == 0) { obj* x_334; obj* x_335; obj* x_336; lean::dec(x_330); lean::dec(x_307); x_334 = lean::mk_nat_obj(0u); x_335 = lean::box_uint32(x_302); x_336 = lean::nat_dec_le(x_334, x_335); lean::dec(x_335); lean::dec(x_334); if (lean::obj_tag(x_336) == 0) { unsigned char x_341; lean::dec(x_308); lean::dec(x_336); x_341 = 0; x_303 = x_341; goto lbl_304; } else { unsigned char x_343; lean::dec(x_336); x_343 = 1; x_310 = x_343; goto lbl_311; } } else { obj* x_345; obj* x_346; lean::dec(x_330); x_345 = lean::box_uint32(x_302); x_346 = lean::nat_dec_le(x_307, x_345); lean::dec(x_345); lean::dec(x_307); if (lean::obj_tag(x_346) == 0) { unsigned char x_351; lean::dec(x_346); lean::dec(x_308); x_351 = 0; x_303 = x_351; goto lbl_304; } else { unsigned char x_353; lean::dec(x_346); x_353 = 1; x_310 = x_353; goto lbl_311; } } } } else { obj* x_355; obj* x_356; lean::dec(x_309); x_355 = lean::box_uint32(x_302); x_356 = lean::nat_dec_le(x_307, x_355); lean::dec(x_355); lean::dec(x_307); if (lean::obj_tag(x_356) == 0) { unsigned char x_361; lean::dec(x_356); lean::dec(x_308); x_361 = 0; x_303 = x_361; goto lbl_304; } else { unsigned char x_363; lean::dec(x_356); x_363 = 1; x_310 = x_363; goto lbl_311; } } lbl_304: { obj* x_364; obj* x_365; obj* x_367; obj* x_369; obj* x_370; obj* x_371; obj* x_374; obj* x_375; obj* x_377; obj* x_380; obj* x_382; x_364 = _l_s4_char_s11_quote__core(x_302); x_365 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_365); x_367 = lean::string_append(x_365, x_364); lean::dec(x_364); x_369 = lean::string_append(x_367, x_365); x_370 = lean::box(0); x_371 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_370); lean::inc(x_371); x_374 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_369, x_371, x_370, x_370, x_0, x_1, x_98); x_375 = lean::cnstr_get(x_374, 0); lean::inc(x_375); x_377 = lean::cnstr_get(x_374, 1); lean::inc(x_377); lean::dec(x_374); x_380 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_380); x_382 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_380, x_375); x_282 = x_382; x_283 = x_377; goto lbl_284; } lbl_306: { obj* x_383; obj* x_384; obj* x_385; obj* x_386; x_383 = lean::string_iterator_next(x_1); x_384 = lean::box(0); x_385 = lean::box_uint32(x_302); x_386 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_386, 0, x_385); lean::cnstr_set(x_386, 1, x_383); lean::cnstr_set(x_386, 2, x_384); x_282 = x_386; x_283 = x_98; goto lbl_284; } lbl_311: { obj* x_387; obj* x_388; x_387 = lean::mk_nat_obj(70u); x_388 = lean::nat_dec_lt(x_387, x_308); lean::dec(x_308); if (lean::obj_tag(x_388) == 0) { obj* x_391; obj* x_392; lean::dec(x_388); x_391 = lean::mk_nat_obj(57343u); x_392 = lean::nat_dec_lt(x_391, x_387); lean::dec(x_391); if (lean::obj_tag(x_392) == 0) { obj* x_396; obj* x_397; obj* x_398; lean::dec(x_387); lean::dec(x_392); x_396 = lean::mk_nat_obj(0u); x_397 = lean::box_uint32(x_302); x_398 = lean::nat_dec_le(x_397, x_396); lean::dec(x_396); lean::dec(x_397); if (lean::obj_tag(x_398) == 0) { unsigned char x_402; lean::dec(x_398); x_402 = 0; x_303 = x_402; goto lbl_304; } else { lean::dec(x_398); if (x_310 == 0) { unsigned char x_404; x_404 = 0; x_303 = x_404; goto lbl_304; } else { unsigned char x_406; lean::dec(x_0); x_406 = 0; x_305 = x_406; goto lbl_306; } } } else { obj* x_408; obj* x_409; lean::dec(x_392); x_408 = lean::mk_nat_obj(1114112u); x_409 = lean::nat_dec_lt(x_387, x_408); lean::dec(x_408); if (lean::obj_tag(x_409) == 0) { obj* x_413; obj* x_414; obj* x_415; lean::dec(x_409); lean::dec(x_387); x_413 = lean::mk_nat_obj(0u); x_414 = lean::box_uint32(x_302); x_415 = lean::nat_dec_le(x_414, x_413); lean::dec(x_413); lean::dec(x_414); if (lean::obj_tag(x_415) == 0) { unsigned char x_419; lean::dec(x_415); x_419 = 0; x_303 = x_419; goto lbl_304; } else { lean::dec(x_415); if (x_310 == 0) { unsigned char x_421; x_421 = 0; x_303 = x_421; goto lbl_304; } else { unsigned char x_423; lean::dec(x_0); x_423 = 0; x_305 = x_423; goto lbl_306; } } } else { obj* x_425; obj* x_426; lean::dec(x_409); x_425 = lean::box_uint32(x_302); x_426 = lean::nat_dec_le(x_425, x_387); lean::dec(x_387); lean::dec(x_425); if (lean::obj_tag(x_426) == 0) { unsigned char x_430; lean::dec(x_426); x_430 = 0; x_303 = x_430; goto lbl_304; } else { lean::dec(x_426); if (x_310 == 0) { unsigned char x_432; x_432 = 0; x_303 = x_432; goto lbl_304; } else { unsigned char x_434; lean::dec(x_0); x_434 = 0; x_305 = x_434; goto lbl_306; } } } } } else { obj* x_436; obj* x_437; lean::dec(x_388); x_436 = lean::box_uint32(x_302); x_437 = lean::nat_dec_le(x_436, x_387); lean::dec(x_387); lean::dec(x_436); if (lean::obj_tag(x_437) == 0) { unsigned char x_441; lean::dec(x_437); x_441 = 0; x_303 = x_441; goto lbl_304; } else { lean::dec(x_437); if (x_310 == 0) { unsigned char x_443; x_443 = 0; x_303 = x_443; goto lbl_304; } else { unsigned char x_445; lean::dec(x_0); x_445 = 0; x_305 = x_445; goto lbl_306; } } } } } } else { obj* x_449; lean::dec(x_279); lean::dec(x_0); lean::dec(x_1); x_449 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_449, 0, x_97); lean::cnstr_set(x_449, 1, x_98); x_95 = x_449; goto lbl_96; } lbl_284: { if (lean::obj_tag(x_282) == 0) { obj* x_450; obj* x_452; obj* x_454; obj* x_456; obj* x_457; obj* x_458; obj* x_459; x_450 = lean::cnstr_get(x_282, 0); lean::inc(x_450); x_452 = lean::cnstr_get(x_282, 1); lean::inc(x_452); x_454 = lean::cnstr_get(x_282, 2); lean::inc(x_454); if (lean::is_shared(x_282)) { lean::dec(x_282); x_456 = lean::box(0); } else { lean::cnstr_release(x_282, 0); lean::cnstr_release(x_282, 1); lean::cnstr_release(x_282, 2); x_456 = x_282; } x_457 = lean::mk_nat_obj(65u); x_458 = lean::mk_nat_obj(55296u); x_459 = lean::nat_dec_lt(x_457, x_458); lean::dec(x_458); if (lean::obj_tag(x_459) == 0) { obj* x_462; obj* x_463; lean::dec(x_459); x_462 = lean::mk_nat_obj(57343u); x_463 = lean::nat_dec_lt(x_462, x_457); lean::dec(x_462); if (lean::obj_tag(x_463) == 0) { obj* x_467; obj* x_468; obj* x_471; obj* x_472; obj* x_475; obj* x_477; obj* x_478; obj* x_479; obj* x_480; lean::dec(x_463); lean::dec(x_457); x_467 = lean::mk_nat_obj(0u); x_468 = lean::nat_sub(x_450, x_467); lean::dec(x_467); lean::dec(x_450); x_471 = lean::mk_nat_obj(10u); x_472 = lean::nat_add(x_471, x_468); lean::dec(x_468); lean::dec(x_471); x_475 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_475); if (lean::is_scalar(x_456)) { x_477 = lean::alloc_cnstr(0, 3, 0); } else { x_477 = x_456; } lean::cnstr_set(x_477, 0, x_472); lean::cnstr_set(x_477, 1, x_452); lean::cnstr_set(x_477, 2, x_475); x_478 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_454, x_477); x_479 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_279, x_478); x_480 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_480, 0, x_479); lean::cnstr_set(x_480, 1, x_283); x_95 = x_480; goto lbl_96; } else { obj* x_482; obj* x_483; lean::dec(x_463); x_482 = lean::mk_nat_obj(1114112u); x_483 = lean::nat_dec_lt(x_457, x_482); lean::dec(x_482); if (lean::obj_tag(x_483) == 0) { obj* x_487; obj* x_488; obj* x_491; obj* x_492; obj* x_495; obj* x_497; obj* x_498; obj* x_499; obj* x_500; lean::dec(x_457); lean::dec(x_483); x_487 = lean::mk_nat_obj(0u); x_488 = lean::nat_sub(x_450, x_487); lean::dec(x_487); lean::dec(x_450); x_491 = lean::mk_nat_obj(10u); x_492 = lean::nat_add(x_491, x_488); lean::dec(x_488); lean::dec(x_491); x_495 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_495); if (lean::is_scalar(x_456)) { x_497 = lean::alloc_cnstr(0, 3, 0); } else { x_497 = x_456; } lean::cnstr_set(x_497, 0, x_492); lean::cnstr_set(x_497, 1, x_452); lean::cnstr_set(x_497, 2, x_495); x_498 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_454, x_497); x_499 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_279, x_498); x_500 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_500, 0, x_499); lean::cnstr_set(x_500, 1, x_283); x_95 = x_500; goto lbl_96; } else { obj* x_502; obj* x_505; obj* x_506; obj* x_509; obj* x_511; obj* x_512; obj* x_513; obj* x_514; lean::dec(x_483); x_502 = lean::nat_sub(x_450, x_457); lean::dec(x_457); lean::dec(x_450); x_505 = lean::mk_nat_obj(10u); x_506 = lean::nat_add(x_505, x_502); lean::dec(x_502); lean::dec(x_505); x_509 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_509); if (lean::is_scalar(x_456)) { x_511 = lean::alloc_cnstr(0, 3, 0); } else { x_511 = x_456; } lean::cnstr_set(x_511, 0, x_506); lean::cnstr_set(x_511, 1, x_452); lean::cnstr_set(x_511, 2, x_509); x_512 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_454, x_511); x_513 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_279, x_512); x_514 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_514, 0, x_513); lean::cnstr_set(x_514, 1, x_283); x_95 = x_514; goto lbl_96; } } } else { obj* x_516; obj* x_519; obj* x_520; obj* x_523; obj* x_525; obj* x_526; obj* x_527; obj* x_528; lean::dec(x_459); x_516 = lean::nat_sub(x_450, x_457); lean::dec(x_457); lean::dec(x_450); x_519 = lean::mk_nat_obj(10u); x_520 = lean::nat_add(x_519, x_516); lean::dec(x_516); lean::dec(x_519); x_523 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_523); if (lean::is_scalar(x_456)) { x_525 = lean::alloc_cnstr(0, 3, 0); } else { x_525 = x_456; } lean::cnstr_set(x_525, 0, x_520); lean::cnstr_set(x_525, 1, x_452); lean::cnstr_set(x_525, 2, x_523); x_526 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_454, x_525); x_527 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_279, x_526); x_528 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_528, 0, x_527); lean::cnstr_set(x_528, 1, x_283); x_95 = x_528; goto lbl_96; } } else { obj* x_529; unsigned char x_531; obj* x_532; obj* x_533; obj* x_534; obj* x_535; obj* x_536; x_529 = lean::cnstr_get(x_282, 0); lean::inc(x_529); x_531 = lean::cnstr_get_scalar(x_282, sizeof(void*)*1); if (lean::is_shared(x_282)) { lean::dec(x_282); x_532 = lean::box(0); } else { lean::cnstr_release(x_282, 0); x_532 = x_282; } if (lean::is_scalar(x_532)) { x_533 = lean::alloc_cnstr(1, 1, 1); } else { x_533 = x_532; } lean::cnstr_set(x_533, 0, x_529); lean::cnstr_set_scalar(x_533, sizeof(void*)*1, x_531); x_534 = x_533; x_535 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_279, x_534); x_536 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_536, 0, x_535); lean::cnstr_set(x_536, 1, x_283); x_95 = x_536; goto lbl_96; } } } } lbl_102: { if (lean::obj_tag(x_100) == 0) { obj* x_537; obj* x_539; obj* x_541; obj* x_543; obj* x_544; obj* x_545; obj* x_546; x_537 = lean::cnstr_get(x_100, 0); lean::inc(x_537); x_539 = lean::cnstr_get(x_100, 1); lean::inc(x_539); x_541 = lean::cnstr_get(x_100, 2); lean::inc(x_541); if (lean::is_shared(x_100)) { lean::dec(x_100); x_543 = lean::box(0); } else { lean::cnstr_release(x_100, 0); lean::cnstr_release(x_100, 1); lean::cnstr_release(x_100, 2); x_543 = x_100; } x_544 = lean::mk_nat_obj(97u); x_545 = lean::mk_nat_obj(55296u); x_546 = lean::nat_dec_lt(x_544, x_545); lean::dec(x_545); if (lean::obj_tag(x_546) == 0) { obj* x_549; obj* x_550; lean::dec(x_546); x_549 = lean::mk_nat_obj(57343u); x_550 = lean::nat_dec_lt(x_549, x_544); lean::dec(x_549); if (lean::obj_tag(x_550) == 0) { obj* x_554; obj* x_555; obj* x_558; obj* x_559; obj* x_562; obj* x_564; obj* x_565; lean::dec(x_550); lean::dec(x_544); x_554 = lean::mk_nat_obj(0u); x_555 = lean::nat_sub(x_537, x_554); lean::dec(x_554); lean::dec(x_537); x_558 = lean::mk_nat_obj(10u); x_559 = lean::nat_add(x_558, x_555); lean::dec(x_555); lean::dec(x_558); x_562 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_562); if (lean::is_scalar(x_543)) { x_564 = lean::alloc_cnstr(0, 3, 0); } else { x_564 = x_543; } lean::cnstr_set(x_564, 0, x_559); lean::cnstr_set(x_564, 1, x_539); lean::cnstr_set(x_564, 2, x_562); x_565 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_541, x_564); x_97 = x_565; x_98 = x_101; goto lbl_99; } else { obj* x_567; obj* x_568; lean::dec(x_550); x_567 = lean::mk_nat_obj(1114112u); x_568 = lean::nat_dec_lt(x_544, x_567); lean::dec(x_567); if (lean::obj_tag(x_568) == 0) { obj* x_572; obj* x_573; obj* x_576; obj* x_577; obj* x_580; obj* x_582; obj* x_583; lean::dec(x_568); lean::dec(x_544); x_572 = lean::mk_nat_obj(0u); x_573 = lean::nat_sub(x_537, x_572); lean::dec(x_572); lean::dec(x_537); x_576 = lean::mk_nat_obj(10u); x_577 = lean::nat_add(x_576, x_573); lean::dec(x_573); lean::dec(x_576); x_580 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_580); if (lean::is_scalar(x_543)) { x_582 = lean::alloc_cnstr(0, 3, 0); } else { x_582 = x_543; } lean::cnstr_set(x_582, 0, x_577); lean::cnstr_set(x_582, 1, x_539); lean::cnstr_set(x_582, 2, x_580); x_583 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_541, x_582); x_97 = x_583; x_98 = x_101; goto lbl_99; } else { obj* x_585; obj* x_588; obj* x_589; obj* x_592; obj* x_594; obj* x_595; lean::dec(x_568); x_585 = lean::nat_sub(x_537, x_544); lean::dec(x_544); lean::dec(x_537); x_588 = lean::mk_nat_obj(10u); x_589 = lean::nat_add(x_588, x_585); lean::dec(x_585); lean::dec(x_588); x_592 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_592); if (lean::is_scalar(x_543)) { x_594 = lean::alloc_cnstr(0, 3, 0); } else { x_594 = x_543; } lean::cnstr_set(x_594, 0, x_589); lean::cnstr_set(x_594, 1, x_539); lean::cnstr_set(x_594, 2, x_592); x_595 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_541, x_594); x_97 = x_595; x_98 = x_101; goto lbl_99; } } } else { obj* x_597; obj* x_600; obj* x_601; obj* x_604; obj* x_606; obj* x_607; lean::dec(x_546); x_597 = lean::nat_sub(x_537, x_544); lean::dec(x_544); lean::dec(x_537); x_600 = lean::mk_nat_obj(10u); x_601 = lean::nat_add(x_600, x_597); lean::dec(x_597); lean::dec(x_600); x_604 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_604); if (lean::is_scalar(x_543)) { x_606 = lean::alloc_cnstr(0, 3, 0); } else { x_606 = x_543; } lean::cnstr_set(x_606, 0, x_601); lean::cnstr_set(x_606, 1, x_539); lean::cnstr_set(x_606, 2, x_604); x_607 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_541, x_606); x_97 = x_607; x_98 = x_101; goto lbl_99; } } else { obj* x_608; unsigned char x_610; obj* x_611; obj* x_612; obj* x_613; x_608 = lean::cnstr_get(x_100, 0); lean::inc(x_608); x_610 = lean::cnstr_get_scalar(x_100, sizeof(void*)*1); if (lean::is_shared(x_100)) { lean::dec(x_100); x_611 = lean::box(0); } else { lean::cnstr_release(x_100, 0); x_611 = x_100; } if (lean::is_scalar(x_611)) { x_612 = lean::alloc_cnstr(1, 1, 1); } else { x_612 = x_611; } lean::cnstr_set(x_612, 0, x_608); lean::cnstr_set_scalar(x_612, sizeof(void*)*1, x_610); x_613 = x_612; x_97 = x_613; x_98 = x_101; goto lbl_99; } } } } } } obj* _init__l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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_s14_unexpected__at_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__6_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_5; obj* x_6; obj* x_7; obj* x_9; x_5 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_5, 0, x_1); x_6 = lean::box(0); x_7 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_7); x_9 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_0, x_7, x_5, x_6, x_2, x_3, x_4); return x_9; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__6(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_s14_unexpected__at_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__6_s6___rarg), 5, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s19_parse__quoted__char_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__3(obj* x_0, obj* x_1, obj* x_2) { { obj* x_5; obj* x_6; obj* x_8; obj* x_10; lean::inc(x_1); lean::inc(x_0); x_5 = _l_s4_lean_s6_parser_s13_monad__parsec_s3_any_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__2(x_0, x_1, x_2); x_6 = lean::cnstr_get(x_5, 0); lean::inc(x_6); x_8 = lean::cnstr_get(x_5, 1); lean::inc(x_8); if (lean::is_shared(x_5)) { lean::dec(x_5); x_10 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); x_10 = x_5; } if (lean::obj_tag(x_6) == 0) { obj* x_11; obj* x_13; obj* x_15; obj* x_17; unsigned char x_18; unsigned char x_20; unsigned char x_22; unsigned char x_24; unsigned char x_26; unsigned char x_28; unsigned char x_30; unsigned char x_32; obj* x_34; obj* x_35; obj* x_36; unsigned x_38; x_11 = lean::cnstr_get(x_6, 0); lean::inc(x_11); x_13 = lean::cnstr_get(x_6, 1); lean::inc(x_13); x_15 = lean::cnstr_get(x_6, 2); lean::inc(x_15); if (lean::is_shared(x_6)) { lean::dec(x_6); x_17 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); lean::cnstr_release(x_6, 2); x_17 = x_6; } x_34 = lean::mk_nat_obj(92u); x_35 = lean::mk_nat_obj(55296u); x_36 = lean::nat_dec_lt(x_34, x_35); lean::dec(x_35); if (lean::obj_tag(x_36) == 0) { obj* x_41; obj* x_42; lean::dec(x_36); x_41 = lean::mk_nat_obj(57343u); x_42 = lean::nat_dec_lt(x_41, x_34); lean::dec(x_41); if (lean::obj_tag(x_42) == 0) { obj* x_46; unsigned x_47; lean::dec(x_42); lean::dec(x_34); x_46 = lean::mk_nat_obj(0u); x_47 = lean::unbox_uint32(x_46); lean::dec(x_46); x_38 = x_47; goto lbl_39; } else { obj* x_50; obj* x_51; lean::dec(x_42); x_50 = lean::mk_nat_obj(1114112u); x_51 = lean::nat_dec_lt(x_34, x_50); lean::dec(x_50); if (lean::obj_tag(x_51) == 0) { obj* x_55; unsigned x_56; lean::dec(x_34); lean::dec(x_51); x_55 = lean::mk_nat_obj(0u); x_56 = lean::unbox_uint32(x_55); lean::dec(x_55); x_38 = x_56; goto lbl_39; } else { unsigned x_59; lean::dec(x_51); x_59 = lean::unbox_uint32(x_34); lean::dec(x_34); x_38 = x_59; goto lbl_39; } } } else { unsigned x_62; lean::dec(x_36); x_62 = lean::unbox_uint32(x_34); lean::dec(x_34); x_38 = x_62; goto lbl_39; } lbl_19: { obj* x_65; obj* x_66; obj* x_68; lean::inc(x_0); x_65 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4(x_0, x_13, x_8); x_66 = lean::cnstr_get(x_65, 0); lean::inc(x_66); x_68 = lean::cnstr_get(x_65, 1); lean::inc(x_68); lean::dec(x_65); if (lean::obj_tag(x_66) == 0) { obj* x_71; obj* x_73; obj* x_75; obj* x_79; obj* x_80; obj* x_82; x_71 = lean::cnstr_get(x_66, 0); lean::inc(x_71); x_73 = lean::cnstr_get(x_66, 1); lean::inc(x_73); x_75 = lean::cnstr_get(x_66, 2); lean::inc(x_75); lean::dec(x_66); lean::inc(x_0); x_79 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4(x_0, x_73, x_68); x_80 = lean::cnstr_get(x_79, 0); lean::inc(x_80); x_82 = lean::cnstr_get(x_79, 1); lean::inc(x_82); lean::dec(x_79); if (lean::obj_tag(x_80) == 0) { obj* x_85; obj* x_87; obj* x_89; obj* x_93; obj* x_94; obj* x_96; x_85 = lean::cnstr_get(x_80, 0); lean::inc(x_85); x_87 = lean::cnstr_get(x_80, 1); lean::inc(x_87); x_89 = lean::cnstr_get(x_80, 2); lean::inc(x_89); lean::dec(x_80); lean::inc(x_0); x_93 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4(x_0, x_87, x_82); x_94 = lean::cnstr_get(x_93, 0); lean::inc(x_94); x_96 = lean::cnstr_get(x_93, 1); lean::inc(x_96); lean::dec(x_93); if (lean::obj_tag(x_94) == 0) { obj* x_99; obj* x_101; obj* x_103; obj* x_106; obj* x_107; obj* x_109; x_99 = lean::cnstr_get(x_94, 0); lean::inc(x_99); x_101 = lean::cnstr_get(x_94, 1); lean::inc(x_101); x_103 = lean::cnstr_get(x_94, 2); lean::inc(x_103); lean::dec(x_94); x_106 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4(x_0, x_101, x_96); x_107 = lean::cnstr_get(x_106, 0); lean::inc(x_107); x_109 = lean::cnstr_get(x_106, 1); lean::inc(x_109); lean::dec(x_106); if (lean::obj_tag(x_107) == 0) { obj* x_112; obj* x_114; obj* x_116; obj* x_119; obj* x_120; obj* x_122; obj* x_125; obj* x_127; obj* x_130; obj* x_133; obj* x_136; obj* x_137; x_112 = lean::cnstr_get(x_107, 0); lean::inc(x_112); x_114 = lean::cnstr_get(x_107, 1); lean::inc(x_114); x_116 = lean::cnstr_get(x_107, 2); lean::inc(x_116); lean::dec(x_107); x_119 = lean::mk_nat_obj(16u); x_120 = lean::nat_mul(x_119, x_71); lean::dec(x_71); x_122 = lean::nat_add(x_120, x_85); lean::dec(x_85); lean::dec(x_120); x_125 = lean::nat_mul(x_119, x_122); lean::dec(x_122); x_127 = lean::nat_add(x_125, x_99); lean::dec(x_99); lean::dec(x_125); x_130 = lean::nat_mul(x_119, x_127); lean::dec(x_127); lean::dec(x_119); x_133 = lean::nat_add(x_130, x_112); lean::dec(x_112); lean::dec(x_130); x_136 = lean::mk_nat_obj(55296u); x_137 = lean::nat_dec_lt(x_133, x_136); lean::dec(x_136); if (lean::obj_tag(x_137) == 0) { obj* x_140; obj* x_141; lean::dec(x_137); x_140 = lean::mk_nat_obj(57343u); x_141 = lean::nat_dec_lt(x_140, x_133); lean::dec(x_140); if (lean::obj_tag(x_141) == 0) { obj* x_145; obj* x_146; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_155; obj* x_156; lean::dec(x_141); lean::dec(x_133); x_145 = lean::mk_nat_obj(0u); x_146 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_146); if (lean::is_scalar(x_17)) { x_148 = lean::alloc_cnstr(0, 3, 0); } else { x_148 = x_17; } lean::cnstr_set(x_148, 0, x_145); lean::cnstr_set(x_148, 1, x_114); lean::cnstr_set(x_148, 2, x_146); x_149 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_116, x_148); x_150 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_103, x_149); x_151 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_89, x_150); x_152 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_75, x_151); x_153 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_152); lean::inc(x_146); x_155 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_146, x_153); if (lean::is_scalar(x_10)) { x_156 = lean::alloc_cnstr(0, 2, 0); } else { x_156 = x_10; } lean::cnstr_set(x_156, 0, x_155); lean::cnstr_set(x_156, 1, x_109); return x_156; } else { obj* x_158; obj* x_159; lean::dec(x_141); x_158 = lean::mk_nat_obj(1114112u); x_159 = lean::nat_dec_lt(x_133, x_158); lean::dec(x_158); if (lean::obj_tag(x_159) == 0) { obj* x_163; obj* x_164; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_173; obj* x_174; lean::dec(x_159); lean::dec(x_133); x_163 = lean::mk_nat_obj(0u); x_164 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_164); if (lean::is_scalar(x_17)) { x_166 = lean::alloc_cnstr(0, 3, 0); } else { x_166 = x_17; } lean::cnstr_set(x_166, 0, x_163); lean::cnstr_set(x_166, 1, x_114); lean::cnstr_set(x_166, 2, x_164); x_167 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_116, x_166); x_168 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_103, x_167); x_169 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_89, x_168); x_170 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_75, x_169); x_171 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_170); lean::inc(x_164); x_173 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_164, x_171); if (lean::is_scalar(x_10)) { x_174 = lean::alloc_cnstr(0, 2, 0); } else { x_174 = x_10; } lean::cnstr_set(x_174, 0, x_173); lean::cnstr_set(x_174, 1, x_109); return x_174; } else { obj* x_176; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_185; obj* x_186; lean::dec(x_159); x_176 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_176); if (lean::is_scalar(x_17)) { x_178 = lean::alloc_cnstr(0, 3, 0); } else { x_178 = x_17; } lean::cnstr_set(x_178, 0, x_133); lean::cnstr_set(x_178, 1, x_114); lean::cnstr_set(x_178, 2, x_176); x_179 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_116, x_178); x_180 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_103, x_179); x_181 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_89, x_180); x_182 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_75, x_181); x_183 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_182); lean::inc(x_176); x_185 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_176, x_183); if (lean::is_scalar(x_10)) { x_186 = lean::alloc_cnstr(0, 2, 0); } else { x_186 = x_10; } lean::cnstr_set(x_186, 0, x_185); lean::cnstr_set(x_186, 1, x_109); return x_186; } } } else { obj* x_188; obj* x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_194; obj* x_195; obj* x_197; obj* x_198; lean::dec(x_137); x_188 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_188); if (lean::is_scalar(x_17)) { x_190 = lean::alloc_cnstr(0, 3, 0); } else { x_190 = x_17; } lean::cnstr_set(x_190, 0, x_133); lean::cnstr_set(x_190, 1, x_114); lean::cnstr_set(x_190, 2, x_188); x_191 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_116, x_190); x_192 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_103, x_191); x_193 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_89, x_192); x_194 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_75, x_193); x_195 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_194); lean::inc(x_188); x_197 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_188, x_195); if (lean::is_scalar(x_10)) { x_198 = lean::alloc_cnstr(0, 2, 0); } else { x_198 = x_10; } lean::cnstr_set(x_198, 0, x_197); lean::cnstr_set(x_198, 1, x_109); return x_198; } } else { obj* x_203; unsigned char x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; obj* x_213; obj* x_215; obj* x_216; lean::dec(x_17); lean::dec(x_99); lean::dec(x_85); lean::dec(x_71); x_203 = lean::cnstr_get(x_107, 0); lean::inc(x_203); x_205 = lean::cnstr_get_scalar(x_107, sizeof(void*)*1); if (lean::is_shared(x_107)) { lean::dec(x_107); x_206 = lean::box(0); } else { lean::cnstr_release(x_107, 0); x_206 = x_107; } if (lean::is_scalar(x_206)) { x_207 = lean::alloc_cnstr(1, 1, 1); } else { x_207 = x_206; } lean::cnstr_set(x_207, 0, x_203); lean::cnstr_set_scalar(x_207, sizeof(void*)*1, x_205); x_208 = x_207; x_209 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_103, x_208); x_210 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_89, x_209); x_211 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_75, x_210); x_212 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_211); x_213 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_213); x_215 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_213, x_212); if (lean::is_scalar(x_10)) { x_216 = lean::alloc_cnstr(0, 2, 0); } else { x_216 = x_10; } lean::cnstr_set(x_216, 0, x_215); lean::cnstr_set(x_216, 1, x_109); return x_216; } } else { obj* x_221; unsigned char x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; obj* x_230; obj* x_232; obj* x_233; lean::dec(x_17); lean::dec(x_0); lean::dec(x_85); lean::dec(x_71); x_221 = lean::cnstr_get(x_94, 0); lean::inc(x_221); x_223 = lean::cnstr_get_scalar(x_94, sizeof(void*)*1); if (lean::is_shared(x_94)) { lean::dec(x_94); x_224 = lean::box(0); } else { lean::cnstr_release(x_94, 0); x_224 = x_94; } if (lean::is_scalar(x_224)) { x_225 = lean::alloc_cnstr(1, 1, 1); } else { x_225 = x_224; } lean::cnstr_set(x_225, 0, x_221); lean::cnstr_set_scalar(x_225, sizeof(void*)*1, x_223); x_226 = x_225; x_227 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_89, x_226); x_228 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_75, x_227); x_229 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_228); x_230 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_230); x_232 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_230, x_229); if (lean::is_scalar(x_10)) { x_233 = lean::alloc_cnstr(0, 2, 0); } else { x_233 = x_10; } lean::cnstr_set(x_233, 0, x_232); lean::cnstr_set(x_233, 1, x_96); return x_233; } } else { obj* x_237; unsigned char x_239; obj* x_240; obj* x_241; obj* x_242; obj* x_243; obj* x_244; obj* x_245; obj* x_247; obj* x_248; lean::dec(x_17); lean::dec(x_0); lean::dec(x_71); x_237 = lean::cnstr_get(x_80, 0); lean::inc(x_237); x_239 = lean::cnstr_get_scalar(x_80, sizeof(void*)*1); if (lean::is_shared(x_80)) { lean::dec(x_80); x_240 = lean::box(0); } else { lean::cnstr_release(x_80, 0); x_240 = x_80; } if (lean::is_scalar(x_240)) { x_241 = lean::alloc_cnstr(1, 1, 1); } else { x_241 = x_240; } lean::cnstr_set(x_241, 0, x_237); lean::cnstr_set_scalar(x_241, sizeof(void*)*1, x_239); x_242 = x_241; x_243 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_75, x_242); x_244 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_243); x_245 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_245); x_247 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_245, x_244); if (lean::is_scalar(x_10)) { x_248 = lean::alloc_cnstr(0, 2, 0); } else { x_248 = x_10; } lean::cnstr_set(x_248, 0, x_247); lean::cnstr_set(x_248, 1, x_82); return x_248; } } else { obj* x_251; unsigned char x_253; obj* x_254; obj* x_255; obj* x_256; obj* x_257; obj* x_258; obj* x_260; obj* x_261; lean::dec(x_17); lean::dec(x_0); x_251 = lean::cnstr_get(x_66, 0); lean::inc(x_251); x_253 = lean::cnstr_get_scalar(x_66, sizeof(void*)*1); if (lean::is_shared(x_66)) { lean::dec(x_66); x_254 = lean::box(0); } else { lean::cnstr_release(x_66, 0); x_254 = x_66; } if (lean::is_scalar(x_254)) { x_255 = lean::alloc_cnstr(1, 1, 1); } else { x_255 = x_254; } lean::cnstr_set(x_255, 0, x_251); lean::cnstr_set_scalar(x_255, sizeof(void*)*1, x_253); x_256 = x_255; x_257 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_256); x_258 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_258); x_260 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_258, x_257); if (lean::is_scalar(x_10)) { x_261 = lean::alloc_cnstr(0, 2, 0); } else { x_261 = x_10; } lean::cnstr_set(x_261, 0, x_260); lean::cnstr_set(x_261, 1, x_68); return x_261; } } lbl_21: { obj* x_262; obj* x_263; obj* x_264; x_262 = lean::mk_nat_obj(117u); x_263 = lean::mk_nat_obj(55296u); x_264 = lean::nat_dec_lt(x_262, x_263); lean::dec(x_263); if (lean::obj_tag(x_264) == 0) { obj* x_267; obj* x_268; lean::dec(x_264); x_267 = lean::mk_nat_obj(57343u); x_268 = lean::nat_dec_lt(x_267, x_262); lean::dec(x_267); if (lean::obj_tag(x_268) == 0) { obj* x_272; obj* x_273; lean::dec(x_268); lean::dec(x_262); x_272 = lean::mk_nat_obj(0u); x_273 = lean::nat_dec_eq(x_11, x_272); lean::dec(x_272); lean::dec(x_11); if (lean::obj_tag(x_273) == 0) { obj* x_279; obj* x_281; obj* x_282; obj* x_284; obj* x_286; obj* x_287; obj* x_288; obj* x_290; obj* x_291; lean::dec(x_17); lean::dec(x_10); lean::dec(x_273); x_279 = _l_s4_lean_s6_parser_s19_parse__quoted__char_s6___rarg_s11___lambda__7_s11___closed__1; lean::inc(x_279); x_281 = _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__6_s6___rarg(x_279, x_1, x_0, x_13, x_8); x_282 = lean::cnstr_get(x_281, 0); lean::inc(x_282); x_284 = lean::cnstr_get(x_281, 1); lean::inc(x_284); if (lean::is_shared(x_281)) { lean::dec(x_281); x_286 = lean::box(0); } else { lean::cnstr_release(x_281, 0); lean::cnstr_release(x_281, 1); x_286 = x_281; } x_287 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_282); x_288 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_288); x_290 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_288, x_287); if (lean::is_scalar(x_286)) { x_291 = lean::alloc_cnstr(0, 2, 0); } else { x_291 = x_286; } lean::cnstr_set(x_291, 0, x_290); lean::cnstr_set(x_291, 1, x_284); return x_291; } else { unsigned char x_294; lean::dec(x_1); lean::dec(x_273); x_294 = 0; x_18 = x_294; goto lbl_19; } } else { obj* x_296; obj* x_297; lean::dec(x_268); x_296 = lean::mk_nat_obj(1114112u); x_297 = lean::nat_dec_lt(x_262, x_296); lean::dec(x_296); if (lean::obj_tag(x_297) == 0) { obj* x_301; obj* x_302; lean::dec(x_297); lean::dec(x_262); x_301 = lean::mk_nat_obj(0u); x_302 = lean::nat_dec_eq(x_11, x_301); lean::dec(x_301); lean::dec(x_11); if (lean::obj_tag(x_302) == 0) { obj* x_308; obj* x_310; obj* x_311; obj* x_313; obj* x_315; obj* x_316; obj* x_317; obj* x_319; obj* x_320; lean::dec(x_302); lean::dec(x_17); lean::dec(x_10); x_308 = _l_s4_lean_s6_parser_s19_parse__quoted__char_s6___rarg_s11___lambda__7_s11___closed__1; lean::inc(x_308); x_310 = _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__6_s6___rarg(x_308, x_1, x_0, x_13, x_8); x_311 = lean::cnstr_get(x_310, 0); lean::inc(x_311); x_313 = lean::cnstr_get(x_310, 1); lean::inc(x_313); if (lean::is_shared(x_310)) { lean::dec(x_310); x_315 = lean::box(0); } else { lean::cnstr_release(x_310, 0); lean::cnstr_release(x_310, 1); x_315 = x_310; } x_316 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_311); x_317 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_317); x_319 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_317, x_316); if (lean::is_scalar(x_315)) { x_320 = lean::alloc_cnstr(0, 2, 0); } else { x_320 = x_315; } lean::cnstr_set(x_320, 0, x_319); lean::cnstr_set(x_320, 1, x_313); return x_320; } else { unsigned char x_323; lean::dec(x_302); lean::dec(x_1); x_323 = 0; x_18 = x_323; goto lbl_19; } } else { obj* x_325; lean::dec(x_297); x_325 = lean::nat_dec_eq(x_11, x_262); lean::dec(x_262); lean::dec(x_11); if (lean::obj_tag(x_325) == 0) { obj* x_331; obj* x_333; obj* x_334; obj* x_336; obj* x_338; obj* x_339; obj* x_340; obj* x_342; obj* x_343; lean::dec(x_325); lean::dec(x_17); lean::dec(x_10); x_331 = _l_s4_lean_s6_parser_s19_parse__quoted__char_s6___rarg_s11___lambda__7_s11___closed__1; lean::inc(x_331); x_333 = _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__6_s6___rarg(x_331, x_1, x_0, x_13, x_8); x_334 = lean::cnstr_get(x_333, 0); lean::inc(x_334); x_336 = lean::cnstr_get(x_333, 1); lean::inc(x_336); if (lean::is_shared(x_333)) { lean::dec(x_333); x_338 = lean::box(0); } else { lean::cnstr_release(x_333, 0); lean::cnstr_release(x_333, 1); x_338 = x_333; } x_339 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_334); x_340 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_340); x_342 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_340, x_339); if (lean::is_scalar(x_338)) { x_343 = lean::alloc_cnstr(0, 2, 0); } else { x_343 = x_338; } lean::cnstr_set(x_343, 0, x_342); lean::cnstr_set(x_343, 1, x_336); return x_343; } else { unsigned char x_346; lean::dec(x_325); lean::dec(x_1); x_346 = 0; x_18 = x_346; goto lbl_19; } } } } else { obj* x_348; lean::dec(x_264); x_348 = lean::nat_dec_eq(x_11, x_262); lean::dec(x_262); lean::dec(x_11); if (lean::obj_tag(x_348) == 0) { obj* x_354; obj* x_356; obj* x_357; obj* x_359; obj* x_361; obj* x_362; obj* x_363; obj* x_365; obj* x_366; lean::dec(x_348); lean::dec(x_17); lean::dec(x_10); x_354 = _l_s4_lean_s6_parser_s19_parse__quoted__char_s6___rarg_s11___lambda__7_s11___closed__1; lean::inc(x_354); x_356 = _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__6_s6___rarg(x_354, x_1, x_0, x_13, x_8); x_357 = lean::cnstr_get(x_356, 0); lean::inc(x_357); x_359 = lean::cnstr_get(x_356, 1); lean::inc(x_359); if (lean::is_shared(x_356)) { lean::dec(x_356); x_361 = lean::box(0); } else { lean::cnstr_release(x_356, 0); lean::cnstr_release(x_356, 1); x_361 = x_356; } x_362 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_357); x_363 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_363); x_365 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_363, x_362); if (lean::is_scalar(x_361)) { x_366 = lean::alloc_cnstr(0, 2, 0); } else { x_366 = x_361; } lean::cnstr_set(x_366, 0, x_365); lean::cnstr_set(x_366, 1, x_359); return x_366; } else { unsigned char x_369; lean::dec(x_348); lean::dec(x_1); x_369 = 0; x_18 = x_369; goto lbl_19; } } } lbl_23: { obj* x_371; obj* x_372; obj* x_374; obj* x_376; lean::inc(x_0); x_371 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4(x_0, x_13, x_8); x_372 = lean::cnstr_get(x_371, 0); lean::inc(x_372); x_374 = lean::cnstr_get(x_371, 1); lean::inc(x_374); if (lean::is_shared(x_371)) { lean::dec(x_371); x_376 = lean::box(0); } else { lean::cnstr_release(x_371, 0); lean::cnstr_release(x_371, 1); x_376 = x_371; } if (lean::obj_tag(x_372) == 0) { obj* x_377; obj* x_379; obj* x_381; obj* x_383; obj* x_384; obj* x_385; obj* x_387; x_377 = lean::cnstr_get(x_372, 0); lean::inc(x_377); x_379 = lean::cnstr_get(x_372, 1); lean::inc(x_379); x_381 = lean::cnstr_get(x_372, 2); lean::inc(x_381); if (lean::is_shared(x_372)) { lean::dec(x_372); x_383 = lean::box(0); } else { lean::cnstr_release(x_372, 0); lean::cnstr_release(x_372, 1); lean::cnstr_release(x_372, 2); x_383 = x_372; } x_384 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4(x_0, x_379, x_374); x_385 = lean::cnstr_get(x_384, 0); lean::inc(x_385); x_387 = lean::cnstr_get(x_384, 1); lean::inc(x_387); lean::dec(x_384); if (lean::obj_tag(x_385) == 0) { obj* x_390; obj* x_392; obj* x_394; obj* x_397; obj* x_398; obj* x_401; obj* x_404; obj* x_405; x_390 = lean::cnstr_get(x_385, 0); lean::inc(x_390); x_392 = lean::cnstr_get(x_385, 1); lean::inc(x_392); x_394 = lean::cnstr_get(x_385, 2); lean::inc(x_394); lean::dec(x_385); x_397 = lean::mk_nat_obj(16u); x_398 = lean::nat_mul(x_397, x_377); lean::dec(x_377); lean::dec(x_397); x_401 = lean::nat_add(x_398, x_390); lean::dec(x_390); lean::dec(x_398); x_404 = lean::mk_nat_obj(55296u); x_405 = lean::nat_dec_lt(x_401, x_404); lean::dec(x_404); if (lean::obj_tag(x_405) == 0) { obj* x_408; obj* x_409; lean::dec(x_405); x_408 = lean::mk_nat_obj(57343u); x_409 = lean::nat_dec_lt(x_408, x_401); lean::dec(x_408); if (lean::obj_tag(x_409) == 0) { obj* x_413; obj* x_414; obj* x_416; obj* x_417; obj* x_418; obj* x_419; obj* x_421; obj* x_422; lean::dec(x_409); lean::dec(x_401); x_413 = lean::mk_nat_obj(0u); x_414 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_414); if (lean::is_scalar(x_383)) { x_416 = lean::alloc_cnstr(0, 3, 0); } else { x_416 = x_383; } lean::cnstr_set(x_416, 0, x_413); lean::cnstr_set(x_416, 1, x_392); lean::cnstr_set(x_416, 2, x_414); x_417 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_394, x_416); x_418 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_381, x_417); x_419 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_418); lean::inc(x_414); x_421 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_414, x_419); if (lean::is_scalar(x_376)) { x_422 = lean::alloc_cnstr(0, 2, 0); } else { x_422 = x_376; } lean::cnstr_set(x_422, 0, x_421); lean::cnstr_set(x_422, 1, x_387); return x_422; } else { obj* x_424; obj* x_425; lean::dec(x_409); x_424 = lean::mk_nat_obj(1114112u); x_425 = lean::nat_dec_lt(x_401, x_424); lean::dec(x_424); if (lean::obj_tag(x_425) == 0) { obj* x_429; obj* x_430; obj* x_432; obj* x_433; obj* x_434; obj* x_435; obj* x_437; obj* x_438; lean::dec(x_425); lean::dec(x_401); x_429 = lean::mk_nat_obj(0u); x_430 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_430); if (lean::is_scalar(x_383)) { x_432 = lean::alloc_cnstr(0, 3, 0); } else { x_432 = x_383; } lean::cnstr_set(x_432, 0, x_429); lean::cnstr_set(x_432, 1, x_392); lean::cnstr_set(x_432, 2, x_430); x_433 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_394, x_432); x_434 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_381, x_433); x_435 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_434); lean::inc(x_430); x_437 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_430, x_435); if (lean::is_scalar(x_376)) { x_438 = lean::alloc_cnstr(0, 2, 0); } else { x_438 = x_376; } lean::cnstr_set(x_438, 0, x_437); lean::cnstr_set(x_438, 1, x_387); return x_438; } else { obj* x_440; obj* x_442; obj* x_443; obj* x_444; obj* x_445; obj* x_447; obj* x_448; lean::dec(x_425); x_440 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_440); if (lean::is_scalar(x_383)) { x_442 = lean::alloc_cnstr(0, 3, 0); } else { x_442 = x_383; } lean::cnstr_set(x_442, 0, x_401); lean::cnstr_set(x_442, 1, x_392); lean::cnstr_set(x_442, 2, x_440); x_443 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_394, x_442); x_444 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_381, x_443); x_445 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_444); lean::inc(x_440); x_447 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_440, x_445); if (lean::is_scalar(x_376)) { x_448 = lean::alloc_cnstr(0, 2, 0); } else { x_448 = x_376; } lean::cnstr_set(x_448, 0, x_447); lean::cnstr_set(x_448, 1, x_387); return x_448; } } } else { obj* x_450; obj* x_452; obj* x_453; obj* x_454; obj* x_455; obj* x_457; obj* x_458; lean::dec(x_405); x_450 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_450); if (lean::is_scalar(x_383)) { x_452 = lean::alloc_cnstr(0, 3, 0); } else { x_452 = x_383; } lean::cnstr_set(x_452, 0, x_401); lean::cnstr_set(x_452, 1, x_392); lean::cnstr_set(x_452, 2, x_450); x_453 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_394, x_452); x_454 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_381, x_453); x_455 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_454); lean::inc(x_450); x_457 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_450, x_455); if (lean::is_scalar(x_376)) { x_458 = lean::alloc_cnstr(0, 2, 0); } else { x_458 = x_376; } lean::cnstr_set(x_458, 0, x_457); lean::cnstr_set(x_458, 1, x_387); return x_458; } } else { obj* x_461; unsigned char x_463; obj* x_464; obj* x_465; obj* x_466; obj* x_467; obj* x_468; obj* x_469; obj* x_471; obj* x_472; lean::dec(x_377); lean::dec(x_383); x_461 = lean::cnstr_get(x_385, 0); lean::inc(x_461); x_463 = lean::cnstr_get_scalar(x_385, sizeof(void*)*1); if (lean::is_shared(x_385)) { lean::dec(x_385); x_464 = lean::box(0); } else { lean::cnstr_release(x_385, 0); x_464 = x_385; } if (lean::is_scalar(x_464)) { x_465 = lean::alloc_cnstr(1, 1, 1); } else { x_465 = x_464; } lean::cnstr_set(x_465, 0, x_461); lean::cnstr_set_scalar(x_465, sizeof(void*)*1, x_463); x_466 = x_465; x_467 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_381, x_466); x_468 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_467); x_469 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_469); x_471 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_469, x_468); if (lean::is_scalar(x_376)) { x_472 = lean::alloc_cnstr(0, 2, 0); } else { x_472 = x_376; } lean::cnstr_set(x_472, 0, x_471); lean::cnstr_set(x_472, 1, x_387); return x_472; } } else { obj* x_474; unsigned char x_476; obj* x_477; obj* x_478; obj* x_479; obj* x_480; obj* x_481; obj* x_483; obj* x_484; lean::dec(x_0); x_474 = lean::cnstr_get(x_372, 0); lean::inc(x_474); x_476 = lean::cnstr_get_scalar(x_372, sizeof(void*)*1); if (lean::is_shared(x_372)) { lean::dec(x_372); x_477 = lean::box(0); } else { lean::cnstr_release(x_372, 0); x_477 = x_372; } if (lean::is_scalar(x_477)) { x_478 = lean::alloc_cnstr(1, 1, 1); } else { x_478 = x_477; } lean::cnstr_set(x_478, 0, x_474); lean::cnstr_set_scalar(x_478, sizeof(void*)*1, x_476); x_479 = x_478; x_480 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_479); x_481 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_481); x_483 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_481, x_480); if (lean::is_scalar(x_376)) { x_484 = lean::alloc_cnstr(0, 2, 0); } else { x_484 = x_376; } lean::cnstr_set(x_484, 0, x_483); lean::cnstr_set(x_484, 1, x_374); return x_484; } } lbl_25: { obj* x_485; obj* x_486; obj* x_487; x_485 = lean::mk_nat_obj(120u); x_486 = lean::mk_nat_obj(55296u); x_487 = lean::nat_dec_lt(x_485, 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_485); lean::dec(x_490); if (lean::obj_tag(x_491) == 0) { obj* x_495; obj* x_496; lean::dec(x_491); lean::dec(x_485); x_495 = lean::mk_nat_obj(0u); x_496 = lean::nat_dec_eq(x_11, x_495); lean::dec(x_495); if (lean::obj_tag(x_496) == 0) { unsigned char x_499; lean::dec(x_496); x_499 = 0; x_20 = x_499; goto lbl_21; } else { unsigned char x_505; lean::dec(x_17); lean::dec(x_10); lean::dec(x_11); lean::dec(x_1); lean::dec(x_496); x_505 = 0; x_22 = x_505; goto lbl_23; } } else { obj* x_507; obj* x_508; lean::dec(x_491); x_507 = lean::mk_nat_obj(1114112u); x_508 = lean::nat_dec_lt(x_485, x_507); lean::dec(x_507); if (lean::obj_tag(x_508) == 0) { obj* x_512; obj* x_513; lean::dec(x_508); lean::dec(x_485); x_512 = lean::mk_nat_obj(0u); x_513 = lean::nat_dec_eq(x_11, x_512); lean::dec(x_512); if (lean::obj_tag(x_513) == 0) { unsigned char x_516; lean::dec(x_513); x_516 = 0; x_20 = x_516; goto lbl_21; } else { unsigned char x_522; lean::dec(x_17); lean::dec(x_513); lean::dec(x_10); lean::dec(x_11); lean::dec(x_1); x_522 = 0; x_22 = x_522; goto lbl_23; } } else { obj* x_524; lean::dec(x_508); x_524 = lean::nat_dec_eq(x_11, x_485); lean::dec(x_485); if (lean::obj_tag(x_524) == 0) { unsigned char x_527; lean::dec(x_524); x_527 = 0; x_20 = x_527; goto lbl_21; } else { unsigned char x_533; lean::dec(x_17); lean::dec(x_10); lean::dec(x_11); lean::dec(x_524); lean::dec(x_1); x_533 = 0; x_22 = x_533; goto lbl_23; } } } } else { obj* x_535; lean::dec(x_487); x_535 = lean::nat_dec_eq(x_11, x_485); lean::dec(x_485); if (lean::obj_tag(x_535) == 0) { unsigned char x_538; lean::dec(x_535); x_538 = 0; x_20 = x_538; goto lbl_21; } else { unsigned char x_544; lean::dec(x_17); lean::dec(x_535); lean::dec(x_10); lean::dec(x_11); lean::dec(x_1); x_544 = 0; x_22 = x_544; goto lbl_23; } } } lbl_27: { obj* x_545; obj* x_546; obj* x_547; unsigned x_548; x_545 = lean::mk_nat_obj(116u); x_546 = lean::mk_nat_obj(55296u); x_547 = lean::nat_dec_lt(x_545, x_546); if (lean::obj_tag(x_547) == 0) { obj* x_551; obj* x_552; lean::dec(x_547); x_551 = lean::mk_nat_obj(57343u); x_552 = lean::nat_dec_lt(x_551, x_545); lean::dec(x_551); if (lean::obj_tag(x_552) == 0) { obj* x_556; unsigned x_557; lean::dec(x_552); lean::dec(x_545); x_556 = lean::mk_nat_obj(0u); x_557 = lean::unbox_uint32(x_556); lean::dec(x_556); x_548 = x_557; goto lbl_549; } else { obj* x_560; obj* x_561; lean::dec(x_552); x_560 = lean::mk_nat_obj(1114112u); x_561 = lean::nat_dec_lt(x_545, x_560); lean::dec(x_560); if (lean::obj_tag(x_561) == 0) { obj* x_565; unsigned x_566; lean::dec(x_545); lean::dec(x_561); x_565 = lean::mk_nat_obj(0u); x_566 = lean::unbox_uint32(x_565); lean::dec(x_565); x_548 = x_566; goto lbl_549; } else { unsigned x_569; lean::dec(x_561); x_569 = lean::unbox_uint32(x_545); lean::dec(x_545); x_548 = x_569; goto lbl_549; } } } else { unsigned x_572; lean::dec(x_547); x_572 = lean::unbox_uint32(x_545); lean::dec(x_545); x_548 = x_572; goto lbl_549; } lbl_549: { obj* x_574; obj* x_575; x_574 = lean::box_uint32(x_548); x_575 = lean::nat_dec_eq(x_11, x_574); lean::dec(x_574); if (lean::obj_tag(x_575) == 0) { unsigned char x_579; lean::dec(x_546); lean::dec(x_575); x_579 = 0; x_24 = x_579; goto lbl_25; } else { obj* x_586; obj* x_587; lean::dec(x_575); lean::dec(x_17); lean::dec(x_10); lean::dec(x_11); lean::dec(x_0); lean::dec(x_1); x_586 = lean::mk_nat_obj(9u); x_587 = lean::nat_dec_lt(x_586, x_546); lean::dec(x_546); if (lean::obj_tag(x_587) == 0) { obj* x_590; obj* x_591; lean::dec(x_587); x_590 = lean::mk_nat_obj(57343u); x_591 = lean::nat_dec_lt(x_590, x_586); lean::dec(x_590); if (lean::obj_tag(x_591) == 0) { obj* x_595; obj* x_596; obj* x_598; obj* x_599; obj* x_601; obj* x_602; lean::dec(x_586); lean::dec(x_591); x_595 = lean::mk_nat_obj(0u); x_596 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_596); x_598 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_598, 0, x_595); lean::cnstr_set(x_598, 1, x_13); lean::cnstr_set(x_598, 2, x_596); x_599 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_598); lean::inc(x_596); x_601 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_596, x_599); x_602 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_602, 0, x_601); lean::cnstr_set(x_602, 1, x_8); return x_602; } else { obj* x_604; obj* x_605; lean::dec(x_591); x_604 = lean::mk_nat_obj(1114112u); x_605 = lean::nat_dec_lt(x_586, x_604); lean::dec(x_604); if (lean::obj_tag(x_605) == 0) { obj* x_609; obj* x_610; obj* x_612; obj* x_613; obj* x_615; obj* x_616; lean::dec(x_586); lean::dec(x_605); x_609 = lean::mk_nat_obj(0u); x_610 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_610); x_612 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_612, 0, x_609); lean::cnstr_set(x_612, 1, x_13); lean::cnstr_set(x_612, 2, x_610); x_613 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_612); lean::inc(x_610); x_615 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_610, x_613); x_616 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_616, 0, x_615); lean::cnstr_set(x_616, 1, x_8); return x_616; } else { obj* x_618; obj* x_620; obj* x_621; obj* x_623; obj* x_624; lean::dec(x_605); x_618 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_618); x_620 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_620, 0, x_586); lean::cnstr_set(x_620, 1, x_13); lean::cnstr_set(x_620, 2, x_618); x_621 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_620); lean::inc(x_618); x_623 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_618, x_621); x_624 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_624, 0, x_623); lean::cnstr_set(x_624, 1, x_8); return x_624; } } } else { obj* x_626; obj* x_628; obj* x_629; obj* x_631; obj* x_632; lean::dec(x_587); x_626 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_626); x_628 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_628, 0, x_586); lean::cnstr_set(x_628, 1, x_13); lean::cnstr_set(x_628, 2, x_626); x_629 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_628); lean::inc(x_626); x_631 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_626, x_629); x_632 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_632, 0, x_631); lean::cnstr_set(x_632, 1, x_8); return x_632; } } } } lbl_29: { obj* x_633; obj* x_634; obj* x_635; unsigned x_636; x_633 = lean::mk_nat_obj(110u); x_634 = lean::mk_nat_obj(55296u); x_635 = lean::nat_dec_lt(x_633, x_634); if (lean::obj_tag(x_635) == 0) { obj* x_639; obj* x_640; lean::dec(x_635); x_639 = lean::mk_nat_obj(57343u); x_640 = lean::nat_dec_lt(x_639, x_633); lean::dec(x_639); if (lean::obj_tag(x_640) == 0) { obj* x_644; unsigned x_645; lean::dec(x_633); lean::dec(x_640); x_644 = lean::mk_nat_obj(0u); x_645 = lean::unbox_uint32(x_644); lean::dec(x_644); x_636 = x_645; goto lbl_637; } else { obj* x_648; obj* x_649; lean::dec(x_640); x_648 = lean::mk_nat_obj(1114112u); x_649 = lean::nat_dec_lt(x_633, x_648); lean::dec(x_648); if (lean::obj_tag(x_649) == 0) { obj* x_653; unsigned x_654; lean::dec(x_649); lean::dec(x_633); x_653 = lean::mk_nat_obj(0u); x_654 = lean::unbox_uint32(x_653); lean::dec(x_653); x_636 = x_654; goto lbl_637; } else { unsigned x_657; lean::dec(x_649); x_657 = lean::unbox_uint32(x_633); lean::dec(x_633); x_636 = x_657; goto lbl_637; } } } else { unsigned x_660; lean::dec(x_635); x_660 = lean::unbox_uint32(x_633); lean::dec(x_633); x_636 = x_660; goto lbl_637; } lbl_637: { obj* x_662; obj* x_663; x_662 = lean::box_uint32(x_636); x_663 = lean::nat_dec_eq(x_11, x_662); lean::dec(x_662); if (lean::obj_tag(x_663) == 0) { unsigned char x_667; lean::dec(x_634); lean::dec(x_663); x_667 = 0; x_26 = x_667; goto lbl_27; } else { obj* x_674; obj* x_675; lean::dec(x_17); lean::dec(x_10); lean::dec(x_11); lean::dec(x_0); lean::dec(x_1); lean::dec(x_663); x_674 = lean::mk_nat_obj(10u); x_675 = lean::nat_dec_lt(x_674, x_634); lean::dec(x_634); if (lean::obj_tag(x_675) == 0) { obj* x_678; obj* x_679; lean::dec(x_675); x_678 = lean::mk_nat_obj(57343u); x_679 = lean::nat_dec_lt(x_678, x_674); lean::dec(x_678); if (lean::obj_tag(x_679) == 0) { obj* x_683; obj* x_684; obj* x_686; obj* x_687; obj* x_689; obj* x_690; lean::dec(x_679); lean::dec(x_674); x_683 = lean::mk_nat_obj(0u); x_684 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_684); x_686 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_686, 0, x_683); lean::cnstr_set(x_686, 1, x_13); lean::cnstr_set(x_686, 2, x_684); x_687 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_686); lean::inc(x_684); x_689 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_684, x_687); x_690 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_690, 0, x_689); lean::cnstr_set(x_690, 1, x_8); return x_690; } else { obj* x_692; obj* x_693; lean::dec(x_679); x_692 = lean::mk_nat_obj(1114112u); x_693 = lean::nat_dec_lt(x_674, x_692); lean::dec(x_692); if (lean::obj_tag(x_693) == 0) { obj* x_697; obj* x_698; obj* x_700; obj* x_701; obj* x_703; obj* x_704; lean::dec(x_693); lean::dec(x_674); x_697 = lean::mk_nat_obj(0u); x_698 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_698); x_700 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_700, 0, x_697); lean::cnstr_set(x_700, 1, x_13); lean::cnstr_set(x_700, 2, x_698); x_701 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_700); lean::inc(x_698); x_703 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_698, x_701); x_704 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_704, 0, x_703); lean::cnstr_set(x_704, 1, x_8); return x_704; } else { obj* x_706; obj* x_708; obj* x_709; obj* x_711; obj* x_712; lean::dec(x_693); x_706 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_706); x_708 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_708, 0, x_674); lean::cnstr_set(x_708, 1, x_13); lean::cnstr_set(x_708, 2, x_706); x_709 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_708); lean::inc(x_706); x_711 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_706, x_709); x_712 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_712, 0, x_711); lean::cnstr_set(x_712, 1, x_8); return x_712; } } } else { obj* x_714; obj* x_716; obj* x_717; obj* x_719; obj* x_720; lean::dec(x_675); x_714 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_714); x_716 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_716, 0, x_674); lean::cnstr_set(x_716, 1, x_13); lean::cnstr_set(x_716, 2, x_714); x_717 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_716); lean::inc(x_714); x_719 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_714, x_717); x_720 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_720, 0, x_719); lean::cnstr_set(x_720, 1, x_8); return x_720; } } } } lbl_31: { obj* x_721; obj* x_722; obj* x_723; unsigned x_725; x_721 = lean::mk_nat_obj(39u); x_722 = lean::mk_nat_obj(55296u); x_723 = lean::nat_dec_lt(x_721, x_722); lean::dec(x_722); if (lean::obj_tag(x_723) == 0) { obj* x_728; obj* x_729; lean::dec(x_723); x_728 = lean::mk_nat_obj(57343u); x_729 = lean::nat_dec_lt(x_728, x_721); lean::dec(x_728); if (lean::obj_tag(x_729) == 0) { obj* x_733; unsigned x_734; lean::dec(x_721); lean::dec(x_729); x_733 = lean::mk_nat_obj(0u); x_734 = lean::unbox_uint32(x_733); lean::dec(x_733); x_725 = x_734; goto lbl_726; } else { obj* x_737; obj* x_738; lean::dec(x_729); x_737 = lean::mk_nat_obj(1114112u); x_738 = lean::nat_dec_lt(x_721, x_737); lean::dec(x_737); if (lean::obj_tag(x_738) == 0) { obj* x_742; unsigned x_743; lean::dec(x_738); lean::dec(x_721); x_742 = lean::mk_nat_obj(0u); x_743 = lean::unbox_uint32(x_742); lean::dec(x_742); x_725 = x_743; goto lbl_726; } else { unsigned x_746; lean::dec(x_738); x_746 = lean::unbox_uint32(x_721); lean::dec(x_721); x_725 = x_746; goto lbl_726; } } } else { unsigned x_749; lean::dec(x_723); x_749 = lean::unbox_uint32(x_721); lean::dec(x_721); x_725 = x_749; goto lbl_726; } lbl_726: { obj* x_751; obj* x_752; x_751 = lean::box_uint32(x_725); x_752 = lean::nat_dec_eq(x_11, x_751); if (lean::obj_tag(x_752) == 0) { unsigned char x_755; lean::dec(x_751); lean::dec(x_752); x_755 = 0; x_28 = x_755; goto lbl_29; } else { obj* x_762; obj* x_764; obj* x_765; obj* x_767; obj* x_768; lean::dec(x_17); lean::dec(x_752); lean::dec(x_10); lean::dec(x_11); lean::dec(x_0); lean::dec(x_1); x_762 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_762); x_764 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_764, 0, x_751); lean::cnstr_set(x_764, 1, x_13); lean::cnstr_set(x_764, 2, x_762); x_765 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_764); lean::inc(x_762); x_767 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_762, x_765); x_768 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_768, 0, x_767); lean::cnstr_set(x_768, 1, x_8); return x_768; } } } lbl_33: { obj* x_769; obj* x_770; obj* x_771; unsigned x_773; x_769 = lean::mk_nat_obj(34u); x_770 = lean::mk_nat_obj(55296u); x_771 = lean::nat_dec_lt(x_769, x_770); lean::dec(x_770); if (lean::obj_tag(x_771) == 0) { obj* x_776; obj* x_777; lean::dec(x_771); x_776 = lean::mk_nat_obj(57343u); x_777 = lean::nat_dec_lt(x_776, x_769); lean::dec(x_776); if (lean::obj_tag(x_777) == 0) { obj* x_781; unsigned x_782; lean::dec(x_777); lean::dec(x_769); x_781 = lean::mk_nat_obj(0u); x_782 = lean::unbox_uint32(x_781); lean::dec(x_781); x_773 = x_782; goto lbl_774; } else { obj* x_785; obj* x_786; lean::dec(x_777); x_785 = lean::mk_nat_obj(1114112u); x_786 = lean::nat_dec_lt(x_769, x_785); lean::dec(x_785); if (lean::obj_tag(x_786) == 0) { obj* x_790; unsigned x_791; lean::dec(x_786); lean::dec(x_769); x_790 = lean::mk_nat_obj(0u); x_791 = lean::unbox_uint32(x_790); lean::dec(x_790); x_773 = x_791; goto lbl_774; } else { unsigned x_794; lean::dec(x_786); x_794 = lean::unbox_uint32(x_769); lean::dec(x_769); x_773 = x_794; goto lbl_774; } } } else { unsigned x_797; lean::dec(x_771); x_797 = lean::unbox_uint32(x_769); lean::dec(x_769); x_773 = x_797; goto lbl_774; } lbl_774: { obj* x_799; obj* x_800; x_799 = lean::box_uint32(x_773); x_800 = lean::nat_dec_eq(x_11, x_799); if (lean::obj_tag(x_800) == 0) { unsigned char x_803; lean::dec(x_799); lean::dec(x_800); x_803 = 0; x_30 = x_803; goto lbl_31; } else { obj* x_810; obj* x_812; obj* x_813; obj* x_815; obj* x_816; lean::dec(x_800); lean::dec(x_17); lean::dec(x_10); lean::dec(x_11); lean::dec(x_0); lean::dec(x_1); x_810 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_810); x_812 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_812, 0, x_799); lean::cnstr_set(x_812, 1, x_13); lean::cnstr_set(x_812, 2, x_810); x_813 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_812); lean::inc(x_810); x_815 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_810, x_813); x_816 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_816, 0, x_815); lean::cnstr_set(x_816, 1, x_8); return x_816; } } } lbl_39: { obj* x_817; obj* x_818; x_817 = lean::box_uint32(x_38); x_818 = lean::nat_dec_eq(x_11, x_817); if (lean::obj_tag(x_818) == 0) { unsigned char x_821; lean::dec(x_817); lean::dec(x_818); x_821 = 0; x_32 = x_821; goto lbl_33; } else { obj* x_828; obj* x_830; obj* x_831; obj* x_833; obj* x_834; lean::dec(x_17); lean::dec(x_10); lean::dec(x_11); lean::dec(x_0); lean::dec(x_1); lean::dec(x_818); x_828 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_828); x_830 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_830, 0, x_817); lean::cnstr_set(x_830, 1, x_13); lean::cnstr_set(x_830, 2, x_828); x_831 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_15, x_830); lean::inc(x_828); x_833 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_828, x_831); x_834 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_834, 0, x_833); lean::cnstr_set(x_834, 1, x_8); return x_834; } } } else { obj* x_837; unsigned char x_839; obj* x_840; obj* x_841; obj* x_842; obj* x_843; obj* x_845; obj* x_846; lean::dec(x_0); lean::dec(x_1); x_837 = lean::cnstr_get(x_6, 0); lean::inc(x_837); x_839 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); if (lean::is_shared(x_6)) { lean::dec(x_6); x_840 = lean::box(0); } else { lean::cnstr_release(x_6, 0); x_840 = x_6; } if (lean::is_scalar(x_840)) { x_841 = lean::alloc_cnstr(1, 1, 1); } else { x_841 = x_840; } lean::cnstr_set(x_841, 0, x_837); lean::cnstr_set_scalar(x_841, sizeof(void*)*1, x_839); x_842 = x_841; x_843 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_843); x_845 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_843, x_842); if (lean::is_scalar(x_10)) { x_846 = lean::alloc_cnstr(0, 2, 0); } else { x_846 = x_10; } lean::cnstr_set(x_846, 0, x_845); lean::cnstr_set(x_846, 1, x_8); return x_846; } } } obj* _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_5; obj* x_6; x_5 = lean::mk_nat_obj(0u); x_6 = lean::nat_dec_eq(x_0, x_5); if (lean::obj_tag(x_6) == 0) { obj* x_9; obj* x_10; obj* x_12; obj* x_14; lean::dec(x_6); lean::inc(x_2); x_9 = _l_s4_lean_s6_parser_s13_monad__parsec_s3_any_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__2(x_2, x_3, x_4); x_10 = lean::cnstr_get(x_9, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_9, 1); lean::inc(x_12); if (lean::is_shared(x_9)) { lean::dec(x_9); x_14 = lean::box(0); } else { lean::cnstr_release(x_9, 0); lean::cnstr_release(x_9, 1); x_14 = x_9; } if (lean::obj_tag(x_10) == 0) { obj* x_15; obj* x_17; obj* x_19; obj* x_21; obj* x_22; obj* x_23; unsigned char x_26; obj* x_28; obj* x_29; obj* x_30; unsigned x_32; x_15 = lean::cnstr_get(x_10, 0); lean::inc(x_15); x_17 = lean::cnstr_get(x_10, 1); lean::inc(x_17); x_19 = lean::cnstr_get(x_10, 2); lean::inc(x_19); if (lean::is_shared(x_10)) { lean::dec(x_10); x_21 = lean::box(0); } else { lean::cnstr_release(x_10, 0); lean::cnstr_release(x_10, 1); lean::cnstr_release(x_10, 2); x_21 = x_10; } x_22 = lean::mk_nat_obj(1u); x_23 = lean::nat_sub(x_0, x_22); lean::dec(x_22); lean::dec(x_0); x_28 = lean::mk_nat_obj(92u); x_29 = lean::mk_nat_obj(55296u); x_30 = lean::nat_dec_lt(x_28, x_29); lean::dec(x_29); if (lean::obj_tag(x_30) == 0) { obj* x_35; obj* x_36; lean::dec(x_30); x_35 = lean::mk_nat_obj(57343u); x_36 = lean::nat_dec_lt(x_35, x_28); lean::dec(x_35); if (lean::obj_tag(x_36) == 0) { unsigned x_40; lean::dec(x_36); lean::dec(x_28); x_40 = lean::unbox_uint32(x_5); x_32 = x_40; goto lbl_33; } else { obj* x_42; obj* x_43; lean::dec(x_36); x_42 = lean::mk_nat_obj(1114112u); x_43 = lean::nat_dec_lt(x_28, x_42); lean::dec(x_42); if (lean::obj_tag(x_43) == 0) { unsigned x_47; lean::dec(x_43); lean::dec(x_28); x_47 = lean::unbox_uint32(x_5); x_32 = x_47; goto lbl_33; } else { unsigned x_49; lean::dec(x_43); x_49 = lean::unbox_uint32(x_28); lean::dec(x_28); x_32 = x_49; goto lbl_33; } } } else { unsigned x_52; lean::dec(x_30); x_52 = lean::unbox_uint32(x_28); lean::dec(x_28); x_32 = x_52; goto lbl_33; } lbl_27: { obj* x_54; obj* x_55; obj* x_56; unsigned x_58; x_54 = lean::mk_nat_obj(34u); x_55 = lean::mk_nat_obj(55296u); x_56 = lean::nat_dec_lt(x_54, x_55); lean::dec(x_55); if (lean::obj_tag(x_56) == 0) { obj* x_61; obj* x_62; lean::dec(x_56); x_61 = lean::mk_nat_obj(57343u); x_62 = lean::nat_dec_lt(x_61, x_54); lean::dec(x_61); if (lean::obj_tag(x_62) == 0) { unsigned x_66; lean::dec(x_54); lean::dec(x_62); x_66 = lean::unbox_uint32(x_5); lean::dec(x_5); x_58 = x_66; goto lbl_59; } else { obj* x_69; obj* x_70; lean::dec(x_62); x_69 = lean::mk_nat_obj(1114112u); x_70 = lean::nat_dec_lt(x_54, x_69); lean::dec(x_69); if (lean::obj_tag(x_70) == 0) { unsigned x_74; lean::dec(x_54); lean::dec(x_70); x_74 = lean::unbox_uint32(x_5); lean::dec(x_5); x_58 = x_74; goto lbl_59; } else { unsigned x_78; lean::dec(x_70); lean::dec(x_5); x_78 = lean::unbox_uint32(x_54); lean::dec(x_54); x_58 = x_78; goto lbl_59; } } } else { unsigned x_82; lean::dec(x_56); lean::dec(x_5); x_82 = lean::unbox_uint32(x_54); lean::dec(x_54); x_58 = x_82; goto lbl_59; } lbl_59: { obj* x_84; obj* x_85; x_84 = lean::box_uint32(x_58); x_85 = lean::nat_dec_eq(x_15, x_84); lean::dec(x_84); if (lean::obj_tag(x_85) == 0) { unsigned x_89; obj* x_91; obj* x_92; obj* x_93; obj* x_95; obj* x_98; obj* x_99; lean::dec(x_85); lean::dec(x_21); x_89 = lean::unbox_uint32(x_15); lean::dec(x_15); x_91 = lean::string_push(x_1, x_89); x_92 = _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__2(x_23, x_91, x_2, x_17, x_12); x_93 = lean::cnstr_get(x_92, 0); lean::inc(x_93); x_95 = lean::cnstr_get(x_92, 1); lean::inc(x_95); lean::dec(x_92); x_98 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_93); if (lean::is_scalar(x_14)) { x_99 = lean::alloc_cnstr(0, 2, 0); } else { x_99 = x_14; } lean::cnstr_set(x_99, 0, x_98); lean::cnstr_set(x_99, 1, x_95); return x_99; } else { obj* x_104; obj* x_106; obj* x_107; obj* x_108; lean::dec(x_15); lean::dec(x_85); lean::dec(x_2); lean::dec(x_23); x_104 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_104); if (lean::is_scalar(x_21)) { x_106 = lean::alloc_cnstr(0, 3, 0); } else { x_106 = x_21; } lean::cnstr_set(x_106, 0, x_1); lean::cnstr_set(x_106, 1, x_17); lean::cnstr_set(x_106, 2, x_104); x_107 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_106); if (lean::is_scalar(x_14)) { x_108 = lean::alloc_cnstr(0, 2, 0); } else { x_108 = x_14; } lean::cnstr_set(x_108, 0, x_107); lean::cnstr_set(x_108, 1, x_12); return x_108; } } } lbl_33: { obj* x_109; obj* x_110; x_109 = lean::box_uint32(x_32); x_110 = lean::nat_dec_eq(x_15, x_109); lean::dec(x_109); if (lean::obj_tag(x_110) == 0) { unsigned char x_113; lean::dec(x_110); x_113 = 0; x_26 = x_113; goto lbl_27; } else { obj* x_120; obj* x_121; obj* x_123; obj* x_125; lean::dec(x_14); lean::dec(x_15); lean::dec(x_110); lean::dec(x_5); lean::dec(x_21); lean::inc(x_2); x_120 = _l_s4_lean_s6_parser_s19_parse__quoted__char_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__3(x_2, x_17, x_12); x_121 = lean::cnstr_get(x_120, 0); lean::inc(x_121); x_123 = lean::cnstr_get(x_120, 1); lean::inc(x_123); if (lean::is_shared(x_120)) { lean::dec(x_120); x_125 = lean::box(0); } else { lean::cnstr_release(x_120, 0); lean::cnstr_release(x_120, 1); x_125 = x_120; } if (lean::obj_tag(x_121) == 0) { obj* x_126; obj* x_128; obj* x_130; unsigned x_133; obj* x_135; obj* x_136; obj* x_137; obj* x_139; obj* x_142; obj* x_143; obj* x_144; x_126 = lean::cnstr_get(x_121, 0); lean::inc(x_126); x_128 = lean::cnstr_get(x_121, 1); lean::inc(x_128); x_130 = lean::cnstr_get(x_121, 2); lean::inc(x_130); lean::dec(x_121); x_133 = lean::unbox_uint32(x_126); lean::dec(x_126); x_135 = lean::string_push(x_1, x_133); x_136 = _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__2(x_23, x_135, x_2, x_128, x_123); x_137 = lean::cnstr_get(x_136, 0); lean::inc(x_137); x_139 = lean::cnstr_get(x_136, 1); lean::inc(x_139); lean::dec(x_136); x_142 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_130, x_137); x_143 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_142); if (lean::is_scalar(x_125)) { x_144 = lean::alloc_cnstr(0, 2, 0); } else { x_144 = x_125; } lean::cnstr_set(x_144, 0, x_143); lean::cnstr_set(x_144, 1, x_139); return x_144; } else { obj* x_148; unsigned char x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; lean::dec(x_1); lean::dec(x_2); lean::dec(x_23); x_148 = lean::cnstr_get(x_121, 0); lean::inc(x_148); x_150 = lean::cnstr_get_scalar(x_121, sizeof(void*)*1); if (lean::is_shared(x_121)) { lean::dec(x_121); x_151 = lean::box(0); } else { lean::cnstr_release(x_121, 0); x_151 = x_121; } if (lean::is_scalar(x_151)) { x_152 = lean::alloc_cnstr(1, 1, 1); } else { x_152 = x_151; } lean::cnstr_set(x_152, 0, x_148); lean::cnstr_set_scalar(x_152, sizeof(void*)*1, x_150); x_153 = x_152; x_154 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_19, x_153); if (lean::is_scalar(x_125)) { x_155 = lean::alloc_cnstr(0, 2, 0); } else { x_155 = x_125; } lean::cnstr_set(x_155, 0, x_154); lean::cnstr_set(x_155, 1, x_123); return x_155; } } } } else { obj* x_160; unsigned char x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; lean::dec(x_5); lean::dec(x_0); lean::dec(x_1); lean::dec(x_2); x_160 = lean::cnstr_get(x_10, 0); lean::inc(x_160); x_162 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); if (lean::is_shared(x_10)) { lean::dec(x_10); x_163 = lean::box(0); } else { lean::cnstr_release(x_10, 0); x_163 = x_10; } if (lean::is_scalar(x_163)) { x_164 = lean::alloc_cnstr(1, 1, 1); } else { x_164 = x_163; } lean::cnstr_set(x_164, 0, x_160); lean::cnstr_set_scalar(x_164, sizeof(void*)*1, x_162); x_165 = x_164; if (lean::is_scalar(x_14)) { x_166 = lean::alloc_cnstr(0, 2, 0); } else { x_166 = x_14; } lean::cnstr_set(x_166, 0, x_165); lean::cnstr_set(x_166, 1, x_12); return x_166; } } else { obj* x_169; obj* x_170; obj* x_171; lean::dec(x_6); lean::dec(x_0); x_169 = lean::mk_nat_obj(34u); x_170 = lean::mk_nat_obj(55296u); x_171 = lean::nat_dec_lt(x_169, x_170); lean::dec(x_170); if (lean::obj_tag(x_171) == 0) { obj* x_174; obj* x_175; lean::dec(x_171); x_174 = lean::mk_nat_obj(57343u); x_175 = lean::nat_dec_lt(x_174, x_169); lean::dec(x_174); if (lean::obj_tag(x_175) == 0) { unsigned x_179; obj* x_181; obj* x_182; obj* x_184; obj* x_186; lean::dec(x_175); lean::dec(x_169); x_179 = lean::unbox_uint32(x_5); lean::dec(x_5); x_181 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_179, x_2, x_3, x_4); x_182 = lean::cnstr_get(x_181, 0); lean::inc(x_182); x_184 = lean::cnstr_get(x_181, 1); lean::inc(x_184); if (lean::is_shared(x_181)) { lean::dec(x_181); x_186 = lean::box(0); } else { lean::cnstr_release(x_181, 0); lean::cnstr_release(x_181, 1); x_186 = x_181; } if (lean::obj_tag(x_182) == 0) { obj* x_187; obj* x_189; obj* x_191; obj* x_192; obj* x_194; obj* x_195; obj* x_196; x_187 = lean::cnstr_get(x_182, 1); lean::inc(x_187); x_189 = lean::cnstr_get(x_182, 2); lean::inc(x_189); if (lean::is_shared(x_182)) { lean::dec(x_182); x_191 = lean::box(0); } else { lean::cnstr_release(x_182, 0); lean::cnstr_release(x_182, 1); lean::cnstr_release(x_182, 2); x_191 = x_182; } x_192 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_192); if (lean::is_scalar(x_191)) { x_194 = lean::alloc_cnstr(0, 3, 0); } else { x_194 = x_191; } lean::cnstr_set(x_194, 0, x_1); lean::cnstr_set(x_194, 1, x_187); lean::cnstr_set(x_194, 2, x_192); x_195 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_189, x_194); if (lean::is_scalar(x_186)) { x_196 = lean::alloc_cnstr(0, 2, 0); } else { x_196 = x_186; } lean::cnstr_set(x_196, 0, x_195); lean::cnstr_set(x_196, 1, x_184); return x_196; } else { obj* x_198; unsigned char x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; lean::dec(x_1); x_198 = lean::cnstr_get(x_182, 0); lean::inc(x_198); x_200 = lean::cnstr_get_scalar(x_182, sizeof(void*)*1); if (lean::is_shared(x_182)) { lean::dec(x_182); x_201 = lean::box(0); } else { lean::cnstr_release(x_182, 0); x_201 = x_182; } if (lean::is_scalar(x_201)) { x_202 = lean::alloc_cnstr(1, 1, 1); } else { x_202 = x_201; } lean::cnstr_set(x_202, 0, x_198); lean::cnstr_set_scalar(x_202, sizeof(void*)*1, x_200); x_203 = x_202; if (lean::is_scalar(x_186)) { x_204 = lean::alloc_cnstr(0, 2, 0); } else { x_204 = x_186; } lean::cnstr_set(x_204, 0, x_203); lean::cnstr_set(x_204, 1, x_184); return x_204; } } else { obj* x_206; obj* x_207; lean::dec(x_175); x_206 = lean::mk_nat_obj(1114112u); x_207 = lean::nat_dec_lt(x_169, x_206); lean::dec(x_206); if (lean::obj_tag(x_207) == 0) { unsigned x_211; obj* x_213; obj* x_214; obj* x_216; obj* x_218; lean::dec(x_207); lean::dec(x_169); x_211 = lean::unbox_uint32(x_5); lean::dec(x_5); x_213 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_211, x_2, x_3, x_4); x_214 = lean::cnstr_get(x_213, 0); lean::inc(x_214); x_216 = lean::cnstr_get(x_213, 1); lean::inc(x_216); if (lean::is_shared(x_213)) { lean::dec(x_213); x_218 = lean::box(0); } else { lean::cnstr_release(x_213, 0); lean::cnstr_release(x_213, 1); x_218 = x_213; } if (lean::obj_tag(x_214) == 0) { obj* x_219; obj* x_221; obj* x_223; obj* x_224; obj* x_226; obj* x_227; obj* x_228; x_219 = lean::cnstr_get(x_214, 1); lean::inc(x_219); x_221 = lean::cnstr_get(x_214, 2); lean::inc(x_221); if (lean::is_shared(x_214)) { lean::dec(x_214); x_223 = lean::box(0); } else { lean::cnstr_release(x_214, 0); lean::cnstr_release(x_214, 1); lean::cnstr_release(x_214, 2); x_223 = x_214; } x_224 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_224); if (lean::is_scalar(x_223)) { x_226 = lean::alloc_cnstr(0, 3, 0); } else { x_226 = x_223; } lean::cnstr_set(x_226, 0, x_1); lean::cnstr_set(x_226, 1, x_219); lean::cnstr_set(x_226, 2, x_224); x_227 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_221, x_226); if (lean::is_scalar(x_218)) { x_228 = lean::alloc_cnstr(0, 2, 0); } else { x_228 = x_218; } lean::cnstr_set(x_228, 0, x_227); lean::cnstr_set(x_228, 1, x_216); return x_228; } else { obj* x_230; unsigned char x_232; obj* x_233; obj* x_234; obj* x_235; obj* x_236; lean::dec(x_1); x_230 = lean::cnstr_get(x_214, 0); lean::inc(x_230); x_232 = lean::cnstr_get_scalar(x_214, sizeof(void*)*1); if (lean::is_shared(x_214)) { lean::dec(x_214); x_233 = lean::box(0); } else { lean::cnstr_release(x_214, 0); x_233 = x_214; } if (lean::is_scalar(x_233)) { x_234 = lean::alloc_cnstr(1, 1, 1); } else { x_234 = x_233; } lean::cnstr_set(x_234, 0, x_230); lean::cnstr_set_scalar(x_234, sizeof(void*)*1, x_232); x_235 = x_234; if (lean::is_scalar(x_218)) { x_236 = lean::alloc_cnstr(0, 2, 0); } else { x_236 = x_218; } lean::cnstr_set(x_236, 0, x_235); lean::cnstr_set(x_236, 1, x_216); return x_236; } } else { unsigned x_239; obj* x_241; obj* x_242; obj* x_244; obj* x_246; lean::dec(x_207); lean::dec(x_5); x_239 = lean::unbox_uint32(x_169); lean::dec(x_169); x_241 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_239, x_2, x_3, x_4); x_242 = lean::cnstr_get(x_241, 0); lean::inc(x_242); x_244 = lean::cnstr_get(x_241, 1); lean::inc(x_244); if (lean::is_shared(x_241)) { lean::dec(x_241); x_246 = lean::box(0); } else { lean::cnstr_release(x_241, 0); lean::cnstr_release(x_241, 1); x_246 = x_241; } if (lean::obj_tag(x_242) == 0) { obj* x_247; obj* x_249; obj* x_251; obj* x_252; obj* x_254; obj* x_255; obj* x_256; x_247 = lean::cnstr_get(x_242, 1); lean::inc(x_247); x_249 = lean::cnstr_get(x_242, 2); lean::inc(x_249); if (lean::is_shared(x_242)) { lean::dec(x_242); x_251 = lean::box(0); } else { lean::cnstr_release(x_242, 0); lean::cnstr_release(x_242, 1); lean::cnstr_release(x_242, 2); x_251 = x_242; } x_252 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_252); if (lean::is_scalar(x_251)) { x_254 = lean::alloc_cnstr(0, 3, 0); } else { x_254 = x_251; } lean::cnstr_set(x_254, 0, x_1); lean::cnstr_set(x_254, 1, x_247); lean::cnstr_set(x_254, 2, x_252); x_255 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_249, x_254); if (lean::is_scalar(x_246)) { x_256 = lean::alloc_cnstr(0, 2, 0); } else { x_256 = x_246; } lean::cnstr_set(x_256, 0, x_255); lean::cnstr_set(x_256, 1, x_244); return x_256; } else { obj* x_258; unsigned char x_260; obj* x_261; obj* x_262; obj* x_263; obj* x_264; lean::dec(x_1); x_258 = lean::cnstr_get(x_242, 0); lean::inc(x_258); x_260 = lean::cnstr_get_scalar(x_242, sizeof(void*)*1); if (lean::is_shared(x_242)) { lean::dec(x_242); x_261 = lean::box(0); } else { lean::cnstr_release(x_242, 0); x_261 = x_242; } if (lean::is_scalar(x_261)) { x_262 = lean::alloc_cnstr(1, 1, 1); } else { x_262 = x_261; } lean::cnstr_set(x_262, 0, x_258); lean::cnstr_set_scalar(x_262, sizeof(void*)*1, x_260); x_263 = x_262; if (lean::is_scalar(x_246)) { x_264 = lean::alloc_cnstr(0, 2, 0); } else { x_264 = x_246; } lean::cnstr_set(x_264, 0, x_263); lean::cnstr_set(x_264, 1, x_244); return x_264; } } } } else { unsigned x_267; obj* x_269; obj* x_270; obj* x_272; obj* x_274; lean::dec(x_171); lean::dec(x_5); x_267 = lean::unbox_uint32(x_169); lean::dec(x_169); x_269 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_267, x_2, x_3, x_4); x_270 = lean::cnstr_get(x_269, 0); lean::inc(x_270); x_272 = lean::cnstr_get(x_269, 1); lean::inc(x_272); if (lean::is_shared(x_269)) { lean::dec(x_269); x_274 = lean::box(0); } else { lean::cnstr_release(x_269, 0); lean::cnstr_release(x_269, 1); x_274 = x_269; } if (lean::obj_tag(x_270) == 0) { obj* x_275; obj* x_277; obj* x_279; obj* x_280; obj* x_282; obj* x_283; obj* x_284; x_275 = lean::cnstr_get(x_270, 1); lean::inc(x_275); x_277 = lean::cnstr_get(x_270, 2); lean::inc(x_277); if (lean::is_shared(x_270)) { lean::dec(x_270); x_279 = lean::box(0); } else { lean::cnstr_release(x_270, 0); lean::cnstr_release(x_270, 1); lean::cnstr_release(x_270, 2); x_279 = x_270; } x_280 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_280); if (lean::is_scalar(x_279)) { x_282 = lean::alloc_cnstr(0, 3, 0); } else { x_282 = x_279; } lean::cnstr_set(x_282, 0, x_1); lean::cnstr_set(x_282, 1, x_275); lean::cnstr_set(x_282, 2, x_280); x_283 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_277, x_282); if (lean::is_scalar(x_274)) { x_284 = lean::alloc_cnstr(0, 2, 0); } else { x_284 = x_274; } lean::cnstr_set(x_284, 0, x_283); lean::cnstr_set(x_284, 1, x_272); return x_284; } else { obj* x_286; unsigned char x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; lean::dec(x_1); x_286 = lean::cnstr_get(x_270, 0); lean::inc(x_286); x_288 = lean::cnstr_get_scalar(x_270, sizeof(void*)*1); if (lean::is_shared(x_270)) { lean::dec(x_270); x_289 = lean::box(0); } else { lean::cnstr_release(x_270, 0); x_289 = x_270; } if (lean::is_scalar(x_289)) { x_290 = lean::alloc_cnstr(1, 1, 1); } else { x_290 = x_289; } lean::cnstr_set(x_290, 0, x_286); lean::cnstr_set_scalar(x_290, sizeof(void*)*1, x_288); x_291 = x_290; if (lean::is_scalar(x_274)) { x_292 = lean::alloc_cnstr(0, 2, 0); } else { x_292 = x_274; } lean::cnstr_set(x_292, 0, x_291); lean::cnstr_set(x_292, 1, x_272); return x_292; } } } } } obj* _l_s4_lean_s6_parser_s22_parse__string__literal_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__1(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_5; x_3 = lean::mk_nat_obj(34u); x_4 = lean::mk_nat_obj(55296u); x_5 = lean::nat_dec_lt(x_3, x_4); lean::dec(x_4); if (lean::obj_tag(x_5) == 0) { obj* x_8; obj* x_9; lean::dec(x_5); x_8 = lean::mk_nat_obj(57343u); x_9 = lean::nat_dec_lt(x_8, x_3); lean::dec(x_8); if (lean::obj_tag(x_9) == 0) { obj* x_13; unsigned x_14; obj* x_17; obj* x_18; obj* x_20; obj* x_22; lean::dec(x_9); lean::dec(x_3); x_13 = lean::mk_nat_obj(0u); x_14 = lean::unbox_uint32(x_13); lean::dec(x_13); lean::inc(x_0); x_17 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_14, x_0, x_1, x_2); x_18 = lean::cnstr_get(x_17, 0); lean::inc(x_18); x_20 = lean::cnstr_get(x_17, 1); lean::inc(x_20); if (lean::is_shared(x_17)) { lean::dec(x_17); x_22 = lean::box(0); } else { lean::cnstr_release(x_17, 0); lean::cnstr_release(x_17, 1); x_22 = x_17; } if (lean::obj_tag(x_18) == 0) { obj* x_23; obj* x_25; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_34; obj* x_37; obj* x_39; obj* x_40; obj* x_41; x_23 = lean::cnstr_get(x_18, 1); lean::inc(x_23); x_25 = lean::cnstr_get(x_18, 2); lean::inc(x_25); lean::dec(x_18); x_28 = lean::string_iterator_remaining(x_23); x_29 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_29); x_31 = _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__2(x_28, x_29, x_0, x_23, x_20); x_32 = lean::cnstr_get(x_31, 0); lean::inc(x_32); x_34 = lean::cnstr_get(x_31, 1); lean::inc(x_34); lean::dec(x_31); x_37 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_37); x_39 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_37, x_32); x_40 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_25, x_39); if (lean::is_scalar(x_22)) { x_41 = lean::alloc_cnstr(0, 2, 0); } else { x_41 = x_22; } lean::cnstr_set(x_41, 0, x_40); lean::cnstr_set(x_41, 1, x_34); return x_41; } else { obj* x_43; unsigned char x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; lean::dec(x_0); x_43 = lean::cnstr_get(x_18, 0); lean::inc(x_43); x_45 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); if (lean::is_shared(x_18)) { lean::dec(x_18); x_46 = lean::box(0); } else { lean::cnstr_release(x_18, 0); x_46 = x_18; } if (lean::is_scalar(x_46)) { x_47 = lean::alloc_cnstr(1, 1, 1); } else { x_47 = x_46; } lean::cnstr_set(x_47, 0, x_43); lean::cnstr_set_scalar(x_47, sizeof(void*)*1, x_45); x_48 = x_47; if (lean::is_scalar(x_22)) { x_49 = lean::alloc_cnstr(0, 2, 0); } else { x_49 = x_22; } lean::cnstr_set(x_49, 0, x_48); lean::cnstr_set(x_49, 1, x_20); return x_49; } } else { obj* x_51; obj* x_52; lean::dec(x_9); x_51 = lean::mk_nat_obj(1114112u); x_52 = lean::nat_dec_lt(x_3, x_51); lean::dec(x_51); if (lean::obj_tag(x_52) == 0) { obj* x_56; unsigned x_57; obj* x_60; obj* x_61; obj* x_63; obj* x_65; lean::dec(x_52); lean::dec(x_3); x_56 = lean::mk_nat_obj(0u); x_57 = lean::unbox_uint32(x_56); lean::dec(x_56); lean::inc(x_0); x_60 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_57, x_0, x_1, x_2); x_61 = lean::cnstr_get(x_60, 0); lean::inc(x_61); x_63 = lean::cnstr_get(x_60, 1); lean::inc(x_63); if (lean::is_shared(x_60)) { lean::dec(x_60); x_65 = lean::box(0); } else { lean::cnstr_release(x_60, 0); lean::cnstr_release(x_60, 1); x_65 = x_60; } if (lean::obj_tag(x_61) == 0) { obj* x_66; obj* x_68; obj* x_71; obj* x_72; obj* x_74; obj* x_75; obj* x_77; obj* x_80; obj* x_82; obj* x_83; obj* x_84; x_66 = lean::cnstr_get(x_61, 1); lean::inc(x_66); x_68 = lean::cnstr_get(x_61, 2); lean::inc(x_68); lean::dec(x_61); x_71 = lean::string_iterator_remaining(x_66); x_72 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_72); x_74 = _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__2(x_71, x_72, x_0, x_66, x_63); x_75 = lean::cnstr_get(x_74, 0); lean::inc(x_75); x_77 = lean::cnstr_get(x_74, 1); lean::inc(x_77); lean::dec(x_74); x_80 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_80); x_82 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_80, x_75); x_83 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_68, x_82); if (lean::is_scalar(x_65)) { x_84 = lean::alloc_cnstr(0, 2, 0); } else { x_84 = x_65; } lean::cnstr_set(x_84, 0, x_83); lean::cnstr_set(x_84, 1, x_77); return x_84; } else { obj* x_86; unsigned char x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; lean::dec(x_0); x_86 = lean::cnstr_get(x_61, 0); lean::inc(x_86); x_88 = lean::cnstr_get_scalar(x_61, sizeof(void*)*1); if (lean::is_shared(x_61)) { lean::dec(x_61); x_89 = lean::box(0); } else { lean::cnstr_release(x_61, 0); x_89 = x_61; } if (lean::is_scalar(x_89)) { x_90 = lean::alloc_cnstr(1, 1, 1); } else { x_90 = x_89; } lean::cnstr_set(x_90, 0, x_86); lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_88); x_91 = x_90; if (lean::is_scalar(x_65)) { x_92 = lean::alloc_cnstr(0, 2, 0); } else { x_92 = x_65; } lean::cnstr_set(x_92, 0, x_91); lean::cnstr_set(x_92, 1, x_63); return x_92; } } else { unsigned x_94; obj* x_97; obj* x_98; obj* x_100; obj* x_102; lean::dec(x_52); x_94 = lean::unbox_uint32(x_3); lean::dec(x_3); lean::inc(x_0); x_97 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_94, x_0, x_1, x_2); x_98 = lean::cnstr_get(x_97, 0); lean::inc(x_98); x_100 = lean::cnstr_get(x_97, 1); lean::inc(x_100); if (lean::is_shared(x_97)) { lean::dec(x_97); x_102 = lean::box(0); } else { lean::cnstr_release(x_97, 0); lean::cnstr_release(x_97, 1); x_102 = x_97; } if (lean::obj_tag(x_98) == 0) { obj* x_103; obj* x_105; obj* x_108; obj* x_109; obj* x_111; obj* x_112; obj* x_114; obj* x_117; obj* x_119; obj* x_120; obj* x_121; x_103 = lean::cnstr_get(x_98, 1); lean::inc(x_103); x_105 = lean::cnstr_get(x_98, 2); lean::inc(x_105); lean::dec(x_98); x_108 = lean::string_iterator_remaining(x_103); x_109 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_109); x_111 = _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__2(x_108, x_109, x_0, x_103, x_100); x_112 = lean::cnstr_get(x_111, 0); lean::inc(x_112); x_114 = lean::cnstr_get(x_111, 1); lean::inc(x_114); lean::dec(x_111); x_117 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_117); x_119 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_117, x_112); x_120 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_105, x_119); if (lean::is_scalar(x_102)) { x_121 = lean::alloc_cnstr(0, 2, 0); } else { x_121 = x_102; } lean::cnstr_set(x_121, 0, x_120); lean::cnstr_set(x_121, 1, x_114); return x_121; } else { obj* x_123; unsigned char x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; lean::dec(x_0); x_123 = lean::cnstr_get(x_98, 0); lean::inc(x_123); x_125 = lean::cnstr_get_scalar(x_98, sizeof(void*)*1); if (lean::is_shared(x_98)) { lean::dec(x_98); x_126 = lean::box(0); } else { lean::cnstr_release(x_98, 0); x_126 = x_98; } if (lean::is_scalar(x_126)) { x_127 = lean::alloc_cnstr(1, 1, 1); } else { x_127 = x_126; } lean::cnstr_set(x_127, 0, x_123); lean::cnstr_set_scalar(x_127, sizeof(void*)*1, x_125); x_128 = x_127; if (lean::is_scalar(x_102)) { x_129 = lean::alloc_cnstr(0, 2, 0); } else { x_129 = x_102; } lean::cnstr_set(x_129, 0, x_128); lean::cnstr_set(x_129, 1, x_100); return x_129; } } } } else { unsigned x_131; obj* x_134; obj* x_135; obj* x_137; obj* x_139; lean::dec(x_5); x_131 = lean::unbox_uint32(x_3); lean::dec(x_3); lean::inc(x_0); x_134 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_131, x_0, x_1, x_2); x_135 = lean::cnstr_get(x_134, 0); lean::inc(x_135); x_137 = lean::cnstr_get(x_134, 1); lean::inc(x_137); if (lean::is_shared(x_134)) { lean::dec(x_134); x_139 = lean::box(0); } else { lean::cnstr_release(x_134, 0); lean::cnstr_release(x_134, 1); x_139 = x_134; } if (lean::obj_tag(x_135) == 0) { obj* x_140; obj* x_142; obj* x_145; obj* x_146; obj* x_148; obj* x_149; obj* x_151; obj* x_154; obj* x_156; obj* x_157; obj* x_158; x_140 = lean::cnstr_get(x_135, 1); lean::inc(x_140); x_142 = lean::cnstr_get(x_135, 2); lean::inc(x_142); lean::dec(x_135); x_145 = lean::string_iterator_remaining(x_140); x_146 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_146); x_148 = _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__2(x_145, x_146, x_0, x_140, x_137); x_149 = lean::cnstr_get(x_148, 0); lean::inc(x_149); x_151 = lean::cnstr_get(x_148, 1); lean::inc(x_151); lean::dec(x_148); x_154 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_154); x_156 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_154, x_149); x_157 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_142, x_156); if (lean::is_scalar(x_139)) { x_158 = lean::alloc_cnstr(0, 2, 0); } else { x_158 = x_139; } lean::cnstr_set(x_158, 0, x_157); lean::cnstr_set(x_158, 1, x_151); return x_158; } else { obj* x_160; unsigned char x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; lean::dec(x_0); x_160 = lean::cnstr_get(x_135, 0); lean::inc(x_160); x_162 = lean::cnstr_get_scalar(x_135, sizeof(void*)*1); if (lean::is_shared(x_135)) { lean::dec(x_135); x_163 = lean::box(0); } else { lean::cnstr_release(x_135, 0); x_163 = x_135; } if (lean::is_scalar(x_163)) { x_164 = lean::alloc_cnstr(1, 1, 1); } else { x_164 = x_163; } lean::cnstr_set(x_164, 0, x_160); lean::cnstr_set_scalar(x_164, sizeof(void*)*1, x_162); x_165 = x_164; if (lean::is_scalar(x_139)) { x_166 = lean::alloc_cnstr(0, 2, 0); } else { x_166 = x_139; } lean::cnstr_set(x_166, 0, x_165); lean::cnstr_set(x_166, 1, x_137); return x_166; } } } } obj* _l_s9___private_3602054007__s18_mk__consume__token(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_7; obj* x_10; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; lean::dec(x_3); lean::dec(x_2); x_7 = lean::cnstr_get(x_0, 0); lean::inc(x_7); lean::dec(x_0); x_10 = lean::string_length(x_7); lean::dec(x_7); lean::inc(x_1); x_13 = _l_s6_string_s8_iterator_s5_nextn_s6___main(x_1, x_10); lean::inc(x_13); x_15 = _l_s4_lean_s6_parser_s12_mk__raw__res(x_1, x_13); x_16 = lean::box(0); x_17 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_17, 0, x_15); lean::cnstr_set(x_17, 1, x_13); lean::cnstr_set(x_17, 2, x_16); x_18 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_18, 0, x_17); lean::cnstr_set(x_18, 1, x_4); return x_18; } } obj* _l_s4_lean_s6_parser_s23_number__or__string__lit(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_9; obj* x_10; obj* x_12; obj* x_14; x_3 = _l_s4_lean_s6_parser_s6_number; x_4 = _l_s4_lean_s6_parser_s10_number_x27_s11___closed__1; lean::inc(x_1); lean::inc(x_0); lean::inc(x_4); lean::inc(x_3); x_9 = _l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__8(x_3, x_4, x_0, x_1, x_2); x_10 = lean::cnstr_get(x_9, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_9, 1); lean::inc(x_12); if (lean::is_shared(x_9)) { lean::dec(x_9); x_14 = lean::box(0); } else { lean::cnstr_release(x_9, 0); lean::cnstr_release(x_9, 1); x_14 = x_9; } if (lean::obj_tag(x_10) == 0) { obj* x_17; lean::dec(x_0); lean::dec(x_1); if (lean::is_scalar(x_14)) { x_17 = lean::alloc_cnstr(0, 2, 0); } else { x_17 = x_14; } lean::cnstr_set(x_17, 0, x_10); lean::cnstr_set(x_17, 1, x_12); return x_17; } else { obj* x_18; unsigned char x_20; x_18 = lean::cnstr_get(x_10, 0); lean::inc(x_18); x_20 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); if (x_20 == 0) { obj* x_22; obj* x_23; obj* x_26; obj* x_27; obj* x_29; obj* x_32; obj* x_33; lean::dec(x_10); x_22 = _l_s4_lean_s6_parser_s11_string__lit; x_23 = _l_s4_lean_s6_parser_s15_string__lit_x27_s11___closed__1; lean::inc(x_23); lean::inc(x_22); x_26 = _l_s4_lean_s6_parser_s11_combinators_s4_node_s4___at_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s9___spec__8(x_22, x_23, x_0, x_1, x_12); x_27 = lean::cnstr_get(x_26, 0); lean::inc(x_27); x_29 = lean::cnstr_get(x_26, 1); lean::inc(x_29); lean::dec(x_26); x_32 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_18, x_27); if (lean::is_scalar(x_14)) { x_33 = lean::alloc_cnstr(0, 2, 0); } else { x_33 = x_14; } lean::cnstr_set(x_33, 0, x_32); lean::cnstr_set(x_33, 1, x_29); return x_33; } else { obj* x_37; lean::dec(x_18); lean::dec(x_0); lean::dec(x_1); if (lean::is_scalar(x_14)) { x_37 = lean::alloc_cnstr(0, 2, 0); } else { x_37 = x_14; } lean::cnstr_set(x_37, 0, x_10); lean::cnstr_set(x_37, 1, x_12); return x_37; } } } } obj* _l_s4_lean_s6_parser_s11_token__cont(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { obj* x_6; obj* x_7; obj* x_9; obj* x_11; lean::inc(x_2); x_6 = _l_s9___private_3519775105__s9_ident_x27(x_2, x_3, x_4); x_7 = lean::cnstr_get(x_6, 0); lean::inc(x_7); x_9 = lean::cnstr_get(x_6, 1); lean::inc(x_9); if (lean::is_shared(x_6)) { lean::dec(x_6); x_11 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); x_11 = x_6; } if (lean::obj_tag(x_7) == 0) { obj* x_12; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_28; x_12 = lean::cnstr_get(x_7, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_7, 1); lean::inc(x_14); x_16 = lean::cnstr_get(x_7, 2); lean::inc(x_16); if (lean::is_shared(x_7)) { lean::dec(x_7); x_18 = lean::box(0); } else { lean::cnstr_release(x_7, 0); lean::cnstr_release(x_7, 1); lean::cnstr_release(x_7, 2); x_18 = x_7; } x_19 = lean::string_iterator_offset(x_14); x_20 = lean::string_iterator_offset(x_0); x_21 = lean::cnstr_get(x_1, 0); lean::inc(x_21); x_23 = lean::string_length(x_21); lean::dec(x_21); x_25 = lean::nat_add(x_20, x_23); lean::dec(x_23); lean::dec(x_20); x_28 = lean::nat_dec_le(x_19, x_25); lean::dec(x_25); lean::dec(x_19); if (lean::obj_tag(x_28) == 0) { obj* x_35; obj* x_37; obj* x_38; obj* x_39; lean::dec(x_0); lean::dec(x_1); lean::dec(x_2); lean::dec(x_28); x_35 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_35); if (lean::is_scalar(x_18)) { x_37 = lean::alloc_cnstr(0, 3, 0); } else { x_37 = x_18; } lean::cnstr_set(x_37, 0, x_12); lean::cnstr_set(x_37, 1, x_14); lean::cnstr_set(x_37, 2, x_35); x_38 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_37); if (lean::is_scalar(x_11)) { x_39 = lean::alloc_cnstr(0, 2, 0); } else { x_39 = x_11; } lean::cnstr_set(x_39, 0, x_38); lean::cnstr_set(x_39, 1, x_9); return x_39; } else { obj* x_43; obj* x_44; obj* x_46; obj* x_49; obj* x_51; obj* x_52; obj* x_53; lean::dec(x_12); lean::dec(x_18); lean::dec(x_28); x_43 = _l_s9___private_3602054007__s18_mk__consume__token(x_1, x_0, x_2, x_14, x_9); x_44 = lean::cnstr_get(x_43, 0); lean::inc(x_44); x_46 = lean::cnstr_get(x_43, 1); lean::inc(x_46); lean::dec(x_43); x_49 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_49); x_51 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_49, x_44); x_52 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_51); if (lean::is_scalar(x_11)) { x_53 = lean::alloc_cnstr(0, 2, 0); } else { x_53 = x_11; } lean::cnstr_set(x_53, 0, x_52); lean::cnstr_set(x_53, 1, x_46); return x_53; } } else { obj* x_57; unsigned char x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; lean::dec(x_0); lean::dec(x_1); lean::dec(x_2); x_57 = lean::cnstr_get(x_7, 0); lean::inc(x_57); x_59 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); if (lean::is_shared(x_7)) { lean::dec(x_7); x_60 = lean::box(0); } else { lean::cnstr_release(x_7, 0); x_60 = x_7; } if (lean::is_scalar(x_60)) { x_61 = lean::alloc_cnstr(1, 1, 1); } else { x_61 = x_60; } lean::cnstr_set(x_61, 0, x_57); lean::cnstr_set_scalar(x_61, sizeof(void*)*1, x_59); x_62 = x_61; if (lean::is_scalar(x_11)) { x_63 = lean::alloc_cnstr(0, 2, 0); } else { x_63 = x_11; } lean::cnstr_set(x_63, 0, x_62); lean::cnstr_set(x_63, 1, x_9); return x_63; } } } obj* _l_s4_lean_s6_parser_s5_token(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_6; x_6 = lean::cnstr_get(x_2, 0); lean::inc(x_6); if (lean::obj_tag(x_6) == 0) { obj* x_11; obj* x_12; obj* x_14; obj* x_17; obj* x_19; lean::dec(x_6); lean::inc(x_2); lean::inc(x_1); x_11 = _l_s4_lean_s6_parser_s9_parsec__t_s7_failure_s4___at_s4_lean_s6_parser_s5_token_s9___spec__4_s6___rarg(x_1, x_2); x_12 = lean::cnstr_get(x_11, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_11, 1); lean::inc(x_14); lean::dec(x_11); x_17 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_17); x_19 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_12); x_3 = x_19; x_4 = x_14; goto lbl_5; } else { obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_27; x_20 = lean::cnstr_get(x_6, 0); lean::inc(x_20); x_22 = lean::string_iterator_offset(x_1); x_23 = lean::cnstr_get(x_20, 0); lean::inc(x_23); x_25 = lean::string_iterator_offset(x_23); lean::dec(x_23); x_27 = lean::nat_dec_eq(x_22, x_25); lean::dec(x_25); lean::dec(x_22); if (lean::obj_tag(x_27) == 0) { obj* x_33; obj* x_34; obj* x_36; lean::dec(x_27); lean::inc(x_2); lean::inc(x_1); x_33 = _l_s4_lean_s6_parser_s9_parsec__t_s7_failure_s4___at_s4_lean_s6_parser_s5_token_s9___spec__4_s6___rarg(x_1, x_2); x_34 = lean::cnstr_get(x_33, 0); lean::inc(x_34); x_36 = lean::cnstr_get(x_33, 1); lean::inc(x_36); lean::dec(x_33); if (lean::obj_tag(x_34) == 0) { obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_52; obj* x_54; obj* x_55; obj* x_58; obj* x_59; obj* x_60; obj* x_62; lean::dec(x_36); x_40 = lean::cnstr_get(x_34, 2); lean::inc(x_40); if (lean::is_shared(x_34)) { lean::dec(x_34); x_42 = lean::box(0); } else { lean::cnstr_release(x_34, 0); lean::cnstr_release(x_34, 1); lean::cnstr_release(x_34, 2); x_42 = x_34; } x_43 = lean::cnstr_get(x_20, 1); lean::inc(x_43); x_45 = lean::box(0); x_46 = lean::cnstr_get(x_2, 1); lean::inc(x_46); x_48 = lean::mk_nat_obj(1u); x_49 = lean::nat_add(x_46, x_48); lean::dec(x_48); lean::dec(x_46); x_52 = lean::cnstr_get(x_2, 2); lean::inc(x_52); x_54 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_54, 0, x_6); lean::cnstr_set(x_54, 1, x_49); lean::cnstr_set(x_54, 2, x_52); x_55 = lean::cnstr_get(x_20, 2); lean::inc(x_55); lean::dec(x_20); if (lean::is_scalar(x_42)) { x_58 = lean::alloc_cnstr(0, 3, 0); } else { x_58 = x_42; } lean::cnstr_set(x_58, 0, x_55); lean::cnstr_set(x_58, 1, x_43); lean::cnstr_set(x_58, 2, x_45); x_59 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_40, x_58); x_60 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_60); x_62 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_60, x_59); x_3 = x_62; x_4 = x_54; goto lbl_5; } else { obj* x_65; unsigned char x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_73; lean::dec(x_6); lean::dec(x_20); x_65 = lean::cnstr_get(x_34, 0); lean::inc(x_65); x_67 = lean::cnstr_get_scalar(x_34, sizeof(void*)*1); if (lean::is_shared(x_34)) { lean::dec(x_34); x_68 = lean::box(0); } else { lean::cnstr_release(x_34, 0); x_68 = x_34; } if (lean::is_scalar(x_68)) { x_69 = lean::alloc_cnstr(1, 1, 1); } else { x_69 = x_68; } lean::cnstr_set(x_69, 0, x_65); lean::cnstr_set_scalar(x_69, sizeof(void*)*1, x_67); x_70 = x_69; x_71 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_71); x_73 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_71, x_70); x_3 = x_73; x_4 = x_36; goto lbl_5; } } else { obj* x_75; obj* x_77; obj* x_78; obj* x_80; obj* x_81; obj* x_84; obj* x_86; obj* x_87; obj* x_90; lean::dec(x_27); x_75 = lean::cnstr_get(x_20, 1); lean::inc(x_75); x_77 = lean::box(0); x_78 = lean::cnstr_get(x_2, 1); lean::inc(x_78); x_80 = lean::mk_nat_obj(1u); x_81 = lean::nat_add(x_78, x_80); lean::dec(x_80); lean::dec(x_78); x_84 = lean::cnstr_get(x_2, 2); lean::inc(x_84); x_86 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_86, 0, x_6); lean::cnstr_set(x_86, 1, x_81); lean::cnstr_set(x_86, 2, x_84); x_87 = lean::cnstr_get(x_20, 2); lean::inc(x_87); lean::dec(x_20); x_90 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_90, 0, x_87); lean::cnstr_set(x_90, 1, x_75); lean::cnstr_set(x_90, 2, x_77); x_3 = x_90; x_4 = x_86; goto lbl_5; } } lbl_5: { if (lean::obj_tag(x_3) == 0) { obj* x_94; obj* x_96; obj* x_98; obj* x_99; lean::dec(x_0); lean::dec(x_1); lean::dec(x_2); x_94 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_94); x_96 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_94, x_3); lean::inc(x_94); x_98 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_94, x_96); x_99 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_99, 0, x_98); lean::cnstr_set(x_99, 1, x_4); return x_99; } else { obj* x_100; unsigned char x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_107; obj* x_111; obj* x_112; obj* x_114; x_100 = lean::cnstr_get(x_3, 0); lean::inc(x_100); x_102 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); if (lean::is_shared(x_3)) { lean::dec(x_3); x_103 = lean::box(0); } else { lean::cnstr_release(x_3, 0); x_103 = x_3; } x_107 = lean::cnstr_get(x_100, 0); lean::inc(x_107); lean::dec(x_100); lean::inc(x_0); x_111 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_observing_s4___at_s4_lean_s6_parser_s5_token_s9___spec__2(x_0, x_107, x_4); x_112 = lean::cnstr_get(x_111, 0); lean::inc(x_112); x_114 = lean::cnstr_get(x_111, 1); lean::inc(x_114); lean::dec(x_111); if (lean::obj_tag(x_112) == 0) { obj* x_117; obj* x_119; obj* x_121; obj* x_123; obj* x_125; obj* x_126; obj* x_128; x_117 = lean::cnstr_get(x_112, 0); lean::inc(x_117); x_119 = lean::cnstr_get(x_112, 1); lean::inc(x_119); x_121 = lean::cnstr_get(x_112, 2); lean::inc(x_121); if (lean::is_shared(x_112)) { lean::dec(x_112); x_123 = lean::box(0); } else { lean::cnstr_release(x_112, 0); lean::cnstr_release(x_112, 1); lean::cnstr_release(x_112, 2); x_123 = x_112; } lean::inc(x_0); x_125 = _l_s4_lean_s6_parser_s12_match__token(x_0, x_119, x_114); x_126 = lean::cnstr_get(x_125, 0); lean::inc(x_126); x_128 = lean::cnstr_get(x_125, 1); lean::inc(x_128); lean::dec(x_125); if (lean::obj_tag(x_126) == 0) { obj* x_131; obj* x_133; obj* x_135; obj* x_138; obj* x_139; unsigned char x_141; x_131 = lean::cnstr_get(x_126, 0); lean::inc(x_131); x_133 = lean::cnstr_get(x_126, 1); lean::inc(x_133); x_135 = lean::cnstr_get(x_126, 2); lean::inc(x_135); lean::dec(x_126); if (lean::obj_tag(x_131) == 0) { lean::dec(x_131); if (lean::obj_tag(x_117) == 0) { obj* x_146; obj* x_147; obj* x_149; lean::dec(x_117); lean::inc(x_0); x_146 = _l_s4_lean_s6_parser_s23_number__or__string__lit(x_0, x_133, x_128); x_147 = lean::cnstr_get(x_146, 0); lean::inc(x_147); x_149 = lean::cnstr_get(x_146, 1); lean::inc(x_149); lean::dec(x_146); x_138 = x_147; x_139 = x_149; goto lbl_140; } else { obj* x_154; obj* x_155; obj* x_157; lean::dec(x_117); lean::inc(x_0); x_154 = _l_s9___private_3519775105__s9_ident_x27(x_0, x_133, x_128); x_155 = lean::cnstr_get(x_154, 0); lean::inc(x_155); x_157 = lean::cnstr_get(x_154, 1); lean::inc(x_157); lean::dec(x_154); x_138 = x_155; x_139 = x_157; goto lbl_140; } } else { obj* x_160; obj* x_163; x_160 = lean::cnstr_get(x_131, 0); lean::inc(x_160); lean::dec(x_131); x_163 = lean::cnstr_get(x_160, 2); lean::inc(x_163); if (lean::obj_tag(x_163) == 0) { lean::dec(x_163); if (lean::obj_tag(x_117) == 0) { obj* x_169; obj* x_170; obj* x_172; lean::dec(x_117); lean::inc(x_0); lean::inc(x_1); x_169 = _l_s9___private_3602054007__s18_mk__consume__token(x_160, x_1, x_0, x_133, x_128); x_170 = lean::cnstr_get(x_169, 0); lean::inc(x_170); x_172 = lean::cnstr_get(x_169, 1); lean::inc(x_172); lean::dec(x_169); x_138 = x_170; x_139 = x_172; goto lbl_140; } else { obj* x_178; obj* x_179; obj* x_181; lean::dec(x_117); lean::inc(x_0); lean::inc(x_1); x_178 = _l_s4_lean_s6_parser_s11_token__cont(x_1, x_160, x_0, x_133, x_128); x_179 = lean::cnstr_get(x_178, 0); lean::inc(x_179); x_181 = lean::cnstr_get(x_178, 1); lean::inc(x_181); lean::dec(x_178); x_138 = x_179; x_139 = x_181; goto lbl_140; } } else { unsigned char x_187; lean::dec(x_163); lean::dec(x_117); lean::dec(x_160); x_187 = 0; x_141 = x_187; goto lbl_142; } } lbl_140: { if (lean::obj_tag(x_138) == 0) { obj* x_188; obj* x_190; obj* x_192; obj* x_195; obj* x_196; obj* x_198; x_188 = lean::cnstr_get(x_138, 0); lean::inc(x_188); x_190 = lean::cnstr_get(x_138, 1); lean::inc(x_190); x_192 = lean::cnstr_get(x_138, 2); lean::inc(x_192); lean::dec(x_138); x_195 = _l_s4_lean_s6_parser_s14_with__trailing_s4___at_s4_lean_s6_parser_s5_token_s9___spec__3(x_188, x_0, x_190, x_139); x_196 = lean::cnstr_get(x_195, 0); lean::inc(x_196); x_198 = lean::cnstr_get(x_195, 1); lean::inc(x_198); lean::dec(x_195); if (lean::obj_tag(x_196) == 0) { obj* x_202; obj* x_204; obj* x_206; obj* x_211; obj* x_212; obj* x_213; obj* x_215; obj* x_218; obj* x_219; obj* x_222; obj* x_223; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; lean::dec(x_198); x_202 = lean::cnstr_get(x_196, 0); lean::inc(x_202); x_204 = lean::cnstr_get(x_196, 1); lean::inc(x_204); x_206 = lean::cnstr_get(x_196, 2); lean::inc(x_206); lean::dec(x_196); lean::inc(x_202); lean::inc(x_204); x_211 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_211, 0, x_1); lean::cnstr_set(x_211, 1, x_204); lean::cnstr_set(x_211, 2, x_202); x_212 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_212, 0, x_211); x_213 = lean::cnstr_get(x_2, 1); lean::inc(x_213); x_215 = lean::cnstr_get(x_2, 2); lean::inc(x_215); lean::dec(x_2); x_218 = lean::mk_nat_obj(1u); x_219 = lean::nat_add(x_215, x_218); lean::dec(x_218); lean::dec(x_215); x_222 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_222, 0, x_212); lean::cnstr_set(x_222, 1, x_213); lean::cnstr_set(x_222, 2, x_219); x_223 = _l_s4_lean_s6_parser_s12_match__token_s11___closed__2; lean::inc(x_223); if (lean::is_scalar(x_123)) { x_225 = lean::alloc_cnstr(0, 3, 0); } else { x_225 = x_123; } lean::cnstr_set(x_225, 0, x_202); lean::cnstr_set(x_225, 1, x_204); lean::cnstr_set(x_225, 2, x_223); x_226 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_206, x_225); x_227 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_192, x_226); x_228 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_135, x_227); x_229 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_121, x_228); x_104 = x_229; x_105 = x_222; goto lbl_106; } else { obj* x_233; unsigned char x_235; obj* x_236; obj* x_237; obj* x_238; obj* x_239; obj* x_240; obj* x_241; lean::dec(x_123); lean::dec(x_1); lean::dec(x_2); x_233 = lean::cnstr_get(x_196, 0); lean::inc(x_233); x_235 = lean::cnstr_get_scalar(x_196, sizeof(void*)*1); if (lean::is_shared(x_196)) { lean::dec(x_196); x_236 = lean::box(0); } else { lean::cnstr_release(x_196, 0); x_236 = x_196; } if (lean::is_scalar(x_236)) { x_237 = lean::alloc_cnstr(1, 1, 1); } else { x_237 = x_236; } lean::cnstr_set(x_237, 0, x_233); lean::cnstr_set_scalar(x_237, sizeof(void*)*1, x_235); x_238 = x_237; x_239 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_192, x_238); x_240 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_135, x_239); x_241 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_121, x_240); x_104 = x_241; x_105 = x_198; goto lbl_106; } } else { obj* x_246; unsigned char x_248; obj* x_249; obj* x_250; obj* x_251; obj* x_252; obj* x_253; lean::dec(x_123); lean::dec(x_0); lean::dec(x_1); lean::dec(x_2); x_246 = lean::cnstr_get(x_138, 0); lean::inc(x_246); x_248 = lean::cnstr_get_scalar(x_138, sizeof(void*)*1); if (lean::is_shared(x_138)) { lean::dec(x_138); x_249 = lean::box(0); } else { lean::cnstr_release(x_138, 0); x_249 = x_138; } if (lean::is_scalar(x_249)) { x_250 = lean::alloc_cnstr(1, 1, 1); } else { x_250 = x_249; } lean::cnstr_set(x_250, 0, x_246); lean::cnstr_set_scalar(x_250, sizeof(void*)*1, x_248); x_251 = x_250; x_252 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_135, x_251); x_253 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_121, x_252); x_104 = x_253; x_105 = x_139; goto lbl_106; } } lbl_142: { obj* x_254; obj* x_255; obj* x_256; obj* x_261; obj* x_262; obj* x_264; x_254 = lean::box(0); x_255 = _l_s4_lean_s6_parser_s5_token_s11___closed__1; x_256 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_0); lean::inc(x_254); lean::inc(x_256); lean::inc(x_255); x_261 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_255, x_256, x_254, x_254, x_0, x_133, x_128); x_262 = lean::cnstr_get(x_261, 0); lean::inc(x_262); x_264 = lean::cnstr_get(x_261, 1); lean::inc(x_264); lean::dec(x_261); x_138 = x_262; x_139 = x_264; goto lbl_140; } } else { obj* x_272; unsigned char x_274; obj* x_275; obj* x_276; obj* x_277; obj* x_278; lean::dec(x_117); lean::dec(x_123); lean::dec(x_0); lean::dec(x_1); lean::dec(x_2); x_272 = lean::cnstr_get(x_126, 0); lean::inc(x_272); x_274 = lean::cnstr_get_scalar(x_126, sizeof(void*)*1); if (lean::is_shared(x_126)) { lean::dec(x_126); x_275 = lean::box(0); } else { lean::cnstr_release(x_126, 0); x_275 = x_126; } if (lean::is_scalar(x_275)) { x_276 = lean::alloc_cnstr(1, 1, 1); } else { x_276 = x_275; } lean::cnstr_set(x_276, 0, x_272); lean::cnstr_set_scalar(x_276, sizeof(void*)*1, x_274); x_277 = x_276; x_278 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_121, x_277); x_104 = x_278; x_105 = x_128; goto lbl_106; } } else { obj* x_282; unsigned char x_284; obj* x_285; obj* x_286; obj* x_287; lean::dec(x_0); lean::dec(x_1); lean::dec(x_2); x_282 = lean::cnstr_get(x_112, 0); lean::inc(x_282); x_284 = lean::cnstr_get_scalar(x_112, sizeof(void*)*1); if (lean::is_shared(x_112)) { lean::dec(x_112); x_285 = lean::box(0); } else { lean::cnstr_release(x_112, 0); x_285 = x_112; } 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_104 = x_287; x_105 = x_114; goto lbl_106; } lbl_106: { if (lean::obj_tag(x_104) == 0) { obj* x_289; obj* x_291; obj* x_293; obj* x_294; lean::dec(x_103); x_289 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_289); x_291 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_289, x_104); lean::inc(x_289); x_293 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_289, x_291); x_294 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_294, 0, x_293); lean::cnstr_set(x_294, 1, x_105); return x_294; } else { obj* x_295; unsigned char x_297; x_295 = lean::cnstr_get(x_104, 0); lean::inc(x_295); x_297 = lean::cnstr_get_scalar(x_104, sizeof(void*)*1); lean::dec(x_104); if (x_102 == 0) { obj* x_299; obj* x_300; obj* x_301; obj* x_303; obj* x_305; obj* x_306; if (lean::is_scalar(x_103)) { x_299 = lean::alloc_cnstr(1, 1, 1); } else { x_299 = x_103; } lean::cnstr_set(x_299, 0, x_295); lean::cnstr_set_scalar(x_299, sizeof(void*)*1, x_297); x_300 = x_299; x_301 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_301); x_303 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_301, x_300); lean::inc(x_301); x_305 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_301, x_303); x_306 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_306, 0, x_305); lean::cnstr_set(x_306, 1, x_105); return x_306; } else { obj* x_307; obj* x_308; obj* x_309; obj* x_311; obj* x_313; obj* x_314; if (lean::is_scalar(x_103)) { x_307 = lean::alloc_cnstr(1, 1, 1); } else { x_307 = x_103; } lean::cnstr_set(x_307, 0, x_295); lean::cnstr_set_scalar(x_307, sizeof(void*)*1, x_102); x_308 = x_307; x_309 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_309); x_311 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_309, x_308); lean::inc(x_309); x_313 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_309, x_311); x_314 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_314, 0, x_313); lean::cnstr_set(x_314, 1, x_105); return x_314; } } } } } } } obj* _init__l_s4_lean_s6_parser_s5_token_s11___closed__1() { { obj* x_0; x_0 = lean::mk_string("token: not implemented"); return x_0; } } obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s5_token_s9___spec__1(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; unsigned char x_6; x_6 = lean::string_iterator_has_next(x_1); if (x_6 == 0) { obj* x_7; obj* x_8; obj* x_9; obj* x_15; obj* x_16; obj* x_18; obj* x_21; obj* x_23; x_7 = lean::box(0); x_8 = _l_s4_lean_s6_parser_s13_monad__parsec_s10_eoi__error_s6___rarg_s11___closed__1; x_9 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_1); lean::inc(x_0); lean::inc(x_7); lean::inc(x_9); lean::inc(x_8); x_15 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_8, x_9, x_7, x_7, x_0, x_1, x_2); x_16 = lean::cnstr_get(x_15, 0); lean::inc(x_16); x_18 = lean::cnstr_get(x_15, 1); lean::inc(x_18); lean::dec(x_15); x_21 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_21); x_23 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_21, x_16); if (lean::obj_tag(x_23) == 0) { lean::dec(x_0); x_3 = x_23; x_4 = x_18; goto lbl_5; } else { obj* x_25; unsigned char x_27; x_25 = lean::cnstr_get(x_23, 0); lean::inc(x_25); x_27 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); if (x_27 == 0) { obj* x_29; unsigned x_30; obj* x_32; obj* x_33; obj* x_35; obj* x_38; lean::dec(x_23); x_29 = _l_s4_lean_s17_id__begin__escape; x_30 = lean::unbox_uint32(x_29); lean::inc(x_1); x_32 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_30, x_0, x_1, x_18); x_33 = lean::cnstr_get(x_32, 0); lean::inc(x_33); x_35 = lean::cnstr_get(x_32, 1); lean::inc(x_35); lean::dec(x_32); x_38 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_25, x_33); x_3 = x_38; x_4 = x_35; goto lbl_5; } else { lean::dec(x_0); lean::dec(x_25); x_3 = x_23; x_4 = x_18; goto lbl_5; } } } else { unsigned x_41; unsigned char x_42; x_41 = lean::string_iterator_curr(x_1); x_42 = _l_s4_lean_s13_is__id__first(x_41); if (x_42 == 0) { obj* x_43; obj* x_44; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_55; obj* x_56; obj* x_58; obj* x_61; obj* x_63; x_43 = _l_s4_char_s11_quote__core(x_41); x_44 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_44); x_46 = lean::string_append(x_44, x_43); lean::dec(x_43); x_48 = lean::string_append(x_46, x_44); x_49 = lean::box(0); x_50 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_1); lean::inc(x_0); lean::inc(x_49); lean::inc(x_50); x_55 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_48, x_50, x_49, x_49, x_0, x_1, x_2); x_56 = lean::cnstr_get(x_55, 0); lean::inc(x_56); x_58 = lean::cnstr_get(x_55, 1); lean::inc(x_58); lean::dec(x_55); x_61 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_61); x_63 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_61, x_56); if (lean::obj_tag(x_63) == 0) { lean::dec(x_0); x_3 = x_63; x_4 = x_58; goto lbl_5; } else { obj* x_65; unsigned char x_67; x_65 = lean::cnstr_get(x_63, 0); lean::inc(x_65); x_67 = lean::cnstr_get_scalar(x_63, sizeof(void*)*1); if (x_67 == 0) { obj* x_69; unsigned x_70; obj* x_72; obj* x_73; obj* x_75; obj* x_78; lean::dec(x_63); x_69 = _l_s4_lean_s17_id__begin__escape; x_70 = lean::unbox_uint32(x_69); lean::inc(x_1); x_72 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s9___private_3519775105__s9_ident_x27_s10___spec__11(x_70, x_0, x_1, x_58); x_73 = lean::cnstr_get(x_72, 0); lean::inc(x_73); x_75 = lean::cnstr_get(x_72, 1); lean::inc(x_75); lean::dec(x_72); x_78 = _l_s4_lean_s6_parser_s9_parsec__t_s15_orelse__mk__res_s6___rarg(x_65, x_73); x_3 = x_78; x_4 = x_75; goto lbl_5; } else { lean::dec(x_65); lean::dec(x_0); x_3 = x_63; x_4 = x_58; goto lbl_5; } } } else { obj* x_83; obj* x_84; obj* x_85; obj* x_86; lean::dec(x_0); lean::inc(x_1); x_83 = lean::string_iterator_next(x_1); x_84 = lean::box(0); x_85 = lean::box_uint32(x_41); x_86 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_86, 0, x_85); lean::cnstr_set(x_86, 1, x_83); lean::cnstr_set(x_86, 2, x_84); x_3 = x_86; x_4 = x_2; goto lbl_5; } } lbl_5: { if (lean::obj_tag(x_3) == 0) { obj* x_87; obj* x_89; obj* x_90; obj* x_92; obj* x_93; x_87 = lean::cnstr_get(x_3, 0); lean::inc(x_87); if (lean::is_shared(x_3)) { lean::dec(x_3); x_89 = lean::box(0); } else { lean::cnstr_release(x_3, 0); lean::cnstr_release(x_3, 1); lean::cnstr_release(x_3, 2); x_89 = x_3; } x_90 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_90); if (lean::is_scalar(x_89)) { x_92 = lean::alloc_cnstr(0, 3, 0); } else { x_92 = x_89; } lean::cnstr_set(x_92, 0, x_87); lean::cnstr_set(x_92, 1, x_1); lean::cnstr_set(x_92, 2, x_90); x_93 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_93, 0, x_92); lean::cnstr_set(x_93, 1, x_4); return x_93; } else { obj* x_95; lean::dec(x_1); x_95 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_95, 0, x_3); lean::cnstr_set(x_95, 1, x_4); return x_95; } } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s9_observing_s4___at_s4_lean_s6_parser_s5_token_s9___spec__2(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_6; obj* x_8; x_3 = _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s5_token_s9___spec__1(x_0, x_1, x_2); x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_6 = lean::cnstr_get(x_3, 1); lean::inc(x_6); if (lean::is_shared(x_3)) { lean::dec(x_3); x_8 = lean::box(0); } else { lean::cnstr_release(x_3, 0); lean::cnstr_release(x_3, 1); x_8 = x_3; } if (lean::obj_tag(x_4) == 0) { obj* x_9; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; x_9 = lean::cnstr_get(x_4, 0); lean::inc(x_9); x_11 = lean::cnstr_get(x_4, 1); lean::inc(x_11); x_13 = lean::cnstr_get(x_4, 2); lean::inc(x_13); if (lean::is_shared(x_4)) { lean::dec(x_4); x_15 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); lean::cnstr_release(x_4, 2); x_15 = x_4; } x_16 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_16, 0, x_9); x_17 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_17); if (lean::is_scalar(x_15)) { x_19 = lean::alloc_cnstr(0, 3, 0); } else { x_19 = x_15; } lean::cnstr_set(x_19, 0, x_16); lean::cnstr_set(x_19, 1, x_11); lean::cnstr_set(x_19, 2, x_17); x_20 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_13, x_19); if (lean::obj_tag(x_20) == 0) { obj* x_22; lean::dec(x_17); if (lean::is_scalar(x_8)) { x_22 = lean::alloc_cnstr(0, 2, 0); } else { x_22 = x_8; } lean::cnstr_set(x_22, 0, x_20); lean::cnstr_set(x_22, 1, x_6); return x_22; } else { obj* x_23; obj* x_26; obj* x_28; obj* x_30; obj* x_31; x_23 = lean::cnstr_get(x_20, 0); lean::inc(x_23); lean::dec(x_20); x_26 = lean::cnstr_get(x_23, 0); lean::inc(x_26); x_28 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_28, 0, x_23); lean::inc(x_17); x_30 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_30, 0, x_28); lean::cnstr_set(x_30, 1, x_26); lean::cnstr_set(x_30, 2, x_17); if (lean::is_scalar(x_8)) { x_31 = lean::alloc_cnstr(0, 2, 0); } else { x_31 = x_8; } lean::cnstr_set(x_31, 0, x_30); lean::cnstr_set(x_31, 1, x_6); return x_31; } } else { obj* x_32; obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_41; x_32 = lean::cnstr_get(x_4, 0); lean::inc(x_32); lean::dec(x_4); x_35 = lean::cnstr_get(x_32, 0); lean::inc(x_35); x_37 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_37, 0, x_32); x_38 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_38); x_40 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_40, 0, x_37); lean::cnstr_set(x_40, 1, x_35); lean::cnstr_set(x_40, 2, x_38); if (lean::is_scalar(x_8)) { x_41 = lean::alloc_cnstr(0, 2, 0); } else { x_41 = x_8; } lean::cnstr_set(x_41, 0, x_40); lean::cnstr_set(x_41, 1, x_6); return x_41; } } } obj* _l_s4_lean_s6_parser_s14_with__trailing_s4___at_s4_lean_s6_parser_s5_token_s9___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_5; obj* x_6; obj* x_8; obj* x_10; lean::inc(x_2); x_5 = _l_s4_lean_s6_parser_s10_whitespace(x_1, x_2, x_3); x_6 = lean::cnstr_get(x_5, 0); lean::inc(x_6); x_8 = lean::cnstr_get(x_5, 1); lean::inc(x_8); if (lean::is_shared(x_5)) { lean::dec(x_5); x_10 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); x_10 = x_5; } if (lean::obj_tag(x_6) == 0) { obj* x_11; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; x_11 = lean::cnstr_get(x_6, 1); lean::inc(x_11); x_13 = lean::cnstr_get(x_6, 2); lean::inc(x_13); if (lean::is_shared(x_6)) { lean::dec(x_6); x_15 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); lean::cnstr_release(x_6, 2); x_15 = x_6; } lean::inc(x_11); x_17 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_17, 0, x_2); lean::cnstr_set(x_17, 1, x_11); x_18 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_18); if (lean::is_scalar(x_15)) { x_20 = lean::alloc_cnstr(0, 3, 0); } else { x_20 = x_15; } lean::cnstr_set(x_20, 0, x_17); lean::cnstr_set(x_20, 1, x_11); lean::cnstr_set(x_20, 2, x_18); x_21 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_13, x_20); x_22 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_22); x_24 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_22, x_21); if (lean::obj_tag(x_24) == 0) { obj* x_25; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; x_25 = lean::cnstr_get(x_24, 0); lean::inc(x_25); x_27 = lean::cnstr_get(x_24, 1); lean::inc(x_27); x_29 = lean::cnstr_get(x_24, 2); lean::inc(x_29); if (lean::is_shared(x_24)) { lean::dec(x_24); x_31 = lean::box(0); } else { lean::cnstr_release(x_24, 0); lean::cnstr_release(x_24, 1); lean::cnstr_release(x_24, 2); x_31 = x_24; } x_32 = _l_s9___private_3229416877__s16_update__trailing_s6___main(x_25, x_0); lean::inc(x_22); if (lean::is_scalar(x_31)) { x_34 = lean::alloc_cnstr(0, 3, 0); } else { x_34 = x_31; } lean::cnstr_set(x_34, 0, x_32); lean::cnstr_set(x_34, 1, x_27); lean::cnstr_set(x_34, 2, x_22); x_35 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_29, x_34); if (lean::is_scalar(x_10)) { x_36 = lean::alloc_cnstr(0, 2, 0); } else { x_36 = x_10; } lean::cnstr_set(x_36, 0, x_35); lean::cnstr_set(x_36, 1, x_8); return x_36; } else { obj* x_39; unsigned char x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; lean::dec(x_22); lean::dec(x_0); x_39 = lean::cnstr_get(x_24, 0); lean::inc(x_39); x_41 = lean::cnstr_get_scalar(x_24, sizeof(void*)*1); if (lean::is_shared(x_24)) { lean::dec(x_24); x_42 = lean::box(0); } else { lean::cnstr_release(x_24, 0); x_42 = x_24; } if (lean::is_scalar(x_42)) { x_43 = lean::alloc_cnstr(1, 1, 1); } else { x_43 = x_42; } lean::cnstr_set(x_43, 0, x_39); lean::cnstr_set_scalar(x_43, sizeof(void*)*1, x_41); x_44 = x_43; if (lean::is_scalar(x_10)) { x_45 = lean::alloc_cnstr(0, 2, 0); } else { x_45 = x_10; } lean::cnstr_set(x_45, 0, x_44); lean::cnstr_set(x_45, 1, x_8); return x_45; } } else { obj* x_47; unsigned char x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_55; lean::dec(x_2); x_47 = lean::cnstr_get(x_6, 0); lean::inc(x_47); x_49 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); if (lean::is_shared(x_6)) { lean::dec(x_6); x_50 = lean::box(0); } else { lean::cnstr_release(x_6, 0); x_50 = x_6; } if (lean::is_scalar(x_50)) { x_51 = lean::alloc_cnstr(1, 1, 1); } else { x_51 = x_50; } lean::cnstr_set(x_51, 0, x_47); lean::cnstr_set_scalar(x_51, sizeof(void*)*1, x_49); x_52 = x_51; x_53 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_53); x_55 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_53, x_52); if (lean::obj_tag(x_55) == 0) { obj* x_56; obj* x_58; obj* x_60; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_67; x_56 = lean::cnstr_get(x_55, 0); lean::inc(x_56); x_58 = lean::cnstr_get(x_55, 1); lean::inc(x_58); x_60 = lean::cnstr_get(x_55, 2); lean::inc(x_60); if (lean::is_shared(x_55)) { lean::dec(x_55); x_62 = lean::box(0); } else { lean::cnstr_release(x_55, 0); lean::cnstr_release(x_55, 1); lean::cnstr_release(x_55, 2); x_62 = x_55; } x_63 = _l_s9___private_3229416877__s16_update__trailing_s6___main(x_56, x_0); lean::inc(x_53); if (lean::is_scalar(x_62)) { x_65 = lean::alloc_cnstr(0, 3, 0); } else { x_65 = x_62; } lean::cnstr_set(x_65, 0, x_63); lean::cnstr_set(x_65, 1, x_58); lean::cnstr_set(x_65, 2, x_53); x_66 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_60, x_65); if (lean::is_scalar(x_10)) { x_67 = lean::alloc_cnstr(0, 2, 0); } else { x_67 = x_10; } lean::cnstr_set(x_67, 0, x_66); lean::cnstr_set(x_67, 1, x_8); return x_67; } else { obj* x_70; unsigned char x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; lean::dec(x_53); lean::dec(x_0); x_70 = lean::cnstr_get(x_55, 0); lean::inc(x_70); x_72 = lean::cnstr_get_scalar(x_55, sizeof(void*)*1); if (lean::is_shared(x_55)) { lean::dec(x_55); x_73 = lean::box(0); } else { lean::cnstr_release(x_55, 0); x_73 = x_55; } if (lean::is_scalar(x_73)) { x_74 = lean::alloc_cnstr(1, 1, 1); } else { x_74 = x_73; } lean::cnstr_set(x_74, 0, x_70); lean::cnstr_set_scalar(x_74, sizeof(void*)*1, x_72); x_75 = x_74; if (lean::is_scalar(x_10)) { x_76 = lean::alloc_cnstr(0, 2, 0); } else { x_76 = x_10; } lean::cnstr_set(x_76, 0, x_75); lean::cnstr_set(x_76, 1, x_8); return x_76; } } } } obj* _l_s4_lean_s6_parser_s9_parsec__t_s7_failure_s4___at_s4_lean_s6_parser_s5_token_s9___spec__4_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; obj* x_4; obj* x_7; unsigned char x_8; obj* x_9; obj* x_10; obj* x_11; x_2 = lean::box(0); x_3 = _l_s4_lean_s6_parser_s9_parsec__t_s7_failure_s6___rarg_s11___closed__1; x_4 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_4); lean::inc(x_3); x_7 = lean::alloc_cnstr(0, 4, 0); lean::cnstr_set(x_7, 0, x_0); lean::cnstr_set(x_7, 1, x_3); lean::cnstr_set(x_7, 2, x_4); lean::cnstr_set(x_7, 3, x_2); 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; x_11 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_11, 0, x_10); lean::cnstr_set(x_11, 1, x_1); return x_11; } } obj* _l_s4_lean_s6_parser_s9_parsec__t_s7_failure_s4___at_s4_lean_s6_parser_s5_token_s9___spec__4(obj* x_0, obj* x_1) { { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s9_parsec__t_s7_failure_s4___at_s4_lean_s6_parser_s5_token_s9___spec__4_s6___rarg), 2, 0); return x_4; } } obj* _l_s4_lean_s6_parser_s11_peek__token(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; x_3 = _l_s4_lean_s6_parser_s13_monad__parsec_s9_observing_s4___at_s4_lean_s6_parser_s11_peek__token_s9___spec__2(x_0, x_1, x_2); return x_3; } } obj* _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s11_peek__token_s9___spec__1(obj* x_0, obj* x_1, obj* x_2) { { obj* x_4; obj* x_5; obj* x_7; obj* x_9; lean::inc(x_1); x_4 = _l_s4_lean_s6_parser_s5_token(x_0, x_1, x_2); x_5 = lean::cnstr_get(x_4, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_4, 1); lean::inc(x_7); if (lean::is_shared(x_4)) { lean::dec(x_4); x_9 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); x_9 = x_4; } if (lean::obj_tag(x_5) == 0) { obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; x_10 = lean::cnstr_get(x_5, 0); lean::inc(x_10); if (lean::is_shared(x_5)) { lean::dec(x_5); x_12 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); x_12 = x_5; } x_13 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_13); if (lean::is_scalar(x_12)) { x_15 = lean::alloc_cnstr(0, 3, 0); } else { x_15 = x_12; } lean::cnstr_set(x_15, 0, x_10); lean::cnstr_set(x_15, 1, x_1); lean::cnstr_set(x_15, 2, x_13); if (lean::is_scalar(x_9)) { x_16 = lean::alloc_cnstr(0, 2, 0); } else { x_16 = x_9; } lean::cnstr_set(x_16, 0, x_15); lean::cnstr_set(x_16, 1, x_7); return x_16; } else { obj* x_18; lean::dec(x_1); if (lean::is_scalar(x_9)) { x_18 = lean::alloc_cnstr(0, 2, 0); } else { x_18 = x_9; } lean::cnstr_set(x_18, 0, x_5); lean::cnstr_set(x_18, 1, x_7); return x_18; } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s9_observing_s4___at_s4_lean_s6_parser_s11_peek__token_s9___spec__2(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; x_3 = _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s4_lean_s6_parser_s11_peek__token_s9___spec__1(x_0, x_1, x_2); x_4 = lean::cnstr_get(x_3, 0); lean::inc(x_4); x_6 = lean::cnstr_get(x_3, 1); lean::inc(x_6); if (lean::is_shared(x_3)) { lean::dec(x_3); x_8 = lean::box(0); } else { lean::cnstr_release(x_3, 0); lean::cnstr_release(x_3, 1); x_8 = x_3; } x_9 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_4); if (lean::obj_tag(x_9) == 0) { obj* x_10; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; 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::is_shared(x_9)) { lean::dec(x_9); x_16 = lean::box(0); } else { lean::cnstr_release(x_9, 0); lean::cnstr_release(x_9, 1); lean::cnstr_release(x_9, 2); x_16 = x_9; } x_17 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_17, 0, x_10); x_18 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_18); if (lean::is_scalar(x_16)) { x_20 = lean::alloc_cnstr(0, 3, 0); } else { x_20 = x_16; } lean::cnstr_set(x_20, 0, x_17); lean::cnstr_set(x_20, 1, x_12); lean::cnstr_set(x_20, 2, x_18); x_21 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_14, x_20); if (lean::obj_tag(x_21) == 0) { obj* x_23; lean::dec(x_18); if (lean::is_scalar(x_8)) { x_23 = lean::alloc_cnstr(0, 2, 0); } else { x_23 = x_8; } lean::cnstr_set(x_23, 0, x_21); lean::cnstr_set(x_23, 1, x_6); return x_23; } else { obj* x_24; obj* x_27; obj* x_29; obj* x_31; obj* x_32; x_24 = lean::cnstr_get(x_21, 0); lean::inc(x_24); lean::dec(x_21); x_27 = lean::cnstr_get(x_24, 0); lean::inc(x_27); x_29 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_29, 0, x_24); lean::inc(x_18); x_31 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_31, 0, x_29); lean::cnstr_set(x_31, 1, x_27); lean::cnstr_set(x_31, 2, x_18); if (lean::is_scalar(x_8)) { x_32 = lean::alloc_cnstr(0, 2, 0); } else { x_32 = x_8; } lean::cnstr_set(x_32, 0, x_31); lean::cnstr_set(x_32, 1, x_6); return x_32; } } else { obj* x_33; obj* x_36; obj* x_38; obj* x_39; obj* x_41; obj* x_42; x_33 = lean::cnstr_get(x_9, 0); lean::inc(x_33); lean::dec(x_9); x_36 = lean::cnstr_get(x_33, 0); lean::inc(x_36); x_38 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_38, 0, x_33); x_39 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_39); x_41 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_41, 0, x_38); lean::cnstr_set(x_41, 1, x_36); lean::cnstr_set(x_41, 2, x_39); if (lean::is_scalar(x_8)) { x_42 = lean::alloc_cnstr(0, 2, 0); } else { x_42 = x_8; } lean::cnstr_set(x_42, 0, x_41); lean::cnstr_set(x_42, 1, x_6); return x_42; } } } obj* _l_s4_lean_s6_parser_s12_symbol__core_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_6; obj* x_7; obj* x_8; lean::dec(x_2); lean::inc(x_1); x_6 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_6, 0, x_1); x_7 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s12_symbol__core_s6___rarg_s11___lambda__1), 6, 3); lean::closure_set(x_7, 0, x_3); lean::closure_set(x_7, 1, x_6); lean::closure_set(x_7, 2, x_1); x_8 = lean::apply_2(x_0, lean::box(0), x_7); return x_8; } } obj* _l_s4_lean_s6_parser_s12_symbol__core_s6___rarg_s11___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { obj* x_8; obj* x_9; obj* x_11; obj* x_13; lean::inc(x_4); lean::inc(x_3); x_8 = _l_s4_lean_s6_parser_s5_token(x_3, x_4, x_5); x_9 = lean::cnstr_get(x_8, 0); lean::inc(x_9); x_11 = lean::cnstr_get(x_8, 1); lean::inc(x_11); if (lean::is_shared(x_8)) { lean::dec(x_8); x_13 = lean::box(0); } else { lean::cnstr_release(x_8, 0); lean::cnstr_release(x_8, 1); x_13 = x_8; } if (lean::obj_tag(x_9) == 0) { obj* x_14; obj* x_16; obj* x_18; obj* x_20; unsigned char x_21; x_14 = lean::cnstr_get(x_9, 0); lean::inc(x_14); x_16 = lean::cnstr_get(x_9, 1); lean::inc(x_16); x_18 = lean::cnstr_get(x_9, 2); lean::inc(x_18); if (lean::is_shared(x_9)) { lean::dec(x_9); x_20 = lean::box(0); } else { lean::cnstr_release(x_9, 0); lean::cnstr_release(x_9, 1); lean::cnstr_release(x_9, 2); x_20 = x_9; } switch (lean::obj_tag(x_14)) { case 0: { obj* x_24; obj* x_26; obj* x_29; lean::dec(x_13); x_24 = lean::cnstr_get(x_14, 0); lean::inc(x_24); x_26 = lean::cnstr_get(x_24, 1); lean::inc(x_26); lean::dec(x_24); x_29 = lean::string_dec_eq(x_2, x_26); lean::dec(x_2); if (lean::obj_tag(x_29) == 0) { obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_39; lean::dec(x_29); x_32 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_32, 0, x_4); x_33 = lean::box(0); x_34 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_26, x_0, x_32, x_33, x_3, x_16, x_11); x_35 = lean::cnstr_get(x_34, 0); lean::inc(x_35); x_37 = lean::cnstr_get(x_34, 1); lean::inc(x_37); if (lean::is_shared(x_34)) { lean::dec(x_34); x_39 = lean::box(0); } else { lean::cnstr_release(x_34, 0); lean::cnstr_release(x_34, 1); x_39 = x_34; } if (lean::obj_tag(x_35) == 0) { obj* x_40; obj* x_42; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_54; x_40 = lean::cnstr_get(x_35, 1); lean::inc(x_40); x_42 = lean::cnstr_get(x_35, 2); lean::inc(x_42); lean::dec(x_35); x_45 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_45); if (lean::is_scalar(x_20)) { x_47 = lean::alloc_cnstr(0, 3, 0); } else { x_47 = x_20; } lean::cnstr_set(x_47, 0, x_14); lean::cnstr_set(x_47, 1, x_40); lean::cnstr_set(x_47, 2, x_45); x_48 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_42, x_47); x_49 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_18, x_48); lean::inc(x_45); x_51 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_45, x_49); x_52 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_51, x_1); x_53 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_52); if (lean::is_scalar(x_39)) { x_54 = lean::alloc_cnstr(0, 2, 0); } else { x_54 = x_39; } lean::cnstr_set(x_54, 0, x_53); lean::cnstr_set(x_54, 1, x_37); return x_54; } else { obj* x_57; unsigned char x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_66; obj* x_67; obj* x_68; obj* x_69; lean::dec(x_14); lean::dec(x_20); x_57 = lean::cnstr_get(x_35, 0); lean::inc(x_57); x_59 = lean::cnstr_get_scalar(x_35, sizeof(void*)*1); if (lean::is_shared(x_35)) { lean::dec(x_35); x_60 = lean::box(0); } else { lean::cnstr_release(x_35, 0); x_60 = x_35; } if (lean::is_scalar(x_60)) { x_61 = lean::alloc_cnstr(1, 1, 1); } else { x_61 = x_60; } lean::cnstr_set(x_61, 0, x_57); lean::cnstr_set_scalar(x_61, sizeof(void*)*1, x_59); x_62 = x_61; x_63 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_18, x_62); x_64 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_64); x_66 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_64, x_63); x_67 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_66, x_1); x_68 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_67); if (lean::is_scalar(x_39)) { x_69 = lean::alloc_cnstr(0, 2, 0); } else { x_69 = x_39; } lean::cnstr_set(x_69, 0, x_68); lean::cnstr_set(x_69, 1, x_37); return x_69; } } else { obj* x_75; obj* x_77; obj* x_78; obj* x_79; obj* x_81; obj* x_82; obj* x_83; obj* x_84; lean::dec(x_4); lean::dec(x_0); lean::dec(x_3); lean::dec(x_26); lean::dec(x_29); x_75 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_75); if (lean::is_scalar(x_20)) { x_77 = lean::alloc_cnstr(0, 3, 0); } else { x_77 = x_20; } lean::cnstr_set(x_77, 0, x_14); lean::cnstr_set(x_77, 1, x_16); lean::cnstr_set(x_77, 2, x_75); x_78 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_18, x_77); x_79 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_79); x_81 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_79, x_78); x_82 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_81, x_1); x_83 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_82); x_84 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_84, 0, x_83); lean::cnstr_set(x_84, 1, x_11); return x_84; } } case 1: { unsigned char x_88; lean::dec(x_14); lean::dec(x_2); lean::dec(x_20); x_88 = 0; x_21 = x_88; goto lbl_22; } case 2: { unsigned char x_92; lean::dec(x_14); lean::dec(x_2); lean::dec(x_20); x_92 = 0; x_21 = x_92; goto lbl_22; } default: { unsigned char x_96; lean::dec(x_14); lean::dec(x_2); lean::dec(x_20); x_96 = 0; x_21 = x_96; goto lbl_22; } } lbl_22: { obj* x_97; obj* x_98; obj* x_99; obj* x_101; obj* x_102; obj* x_104; obj* x_107; obj* x_108; obj* x_110; obj* x_111; obj* x_112; obj* x_113; x_97 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_97, 0, x_4); x_98 = lean::box(0); x_99 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_99); x_101 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_99, x_0, x_97, x_98, x_3, x_16, x_11); x_102 = lean::cnstr_get(x_101, 0); lean::inc(x_102); x_104 = lean::cnstr_get(x_101, 1); lean::inc(x_104); lean::dec(x_101); x_107 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_18, x_102); x_108 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_108); x_110 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_108, x_107); x_111 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_110, x_1); x_112 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_111); if (lean::is_scalar(x_13)) { x_113 = lean::alloc_cnstr(0, 2, 0); } else { x_113 = x_13; } lean::cnstr_set(x_113, 0, x_112); lean::cnstr_set(x_113, 1, x_104); return x_113; } } else { obj* x_118; unsigned char x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_126; obj* x_127; obj* x_128; obj* x_129; lean::dec(x_4); lean::dec(x_0); lean::dec(x_2); lean::dec(x_3); x_118 = lean::cnstr_get(x_9, 0); lean::inc(x_118); x_120 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); if (lean::is_shared(x_9)) { lean::dec(x_9); x_121 = lean::box(0); } else { lean::cnstr_release(x_9, 0); x_121 = x_9; } if (lean::is_scalar(x_121)) { x_122 = lean::alloc_cnstr(1, 1, 1); } else { x_122 = x_121; } lean::cnstr_set(x_122, 0, x_118); lean::cnstr_set_scalar(x_122, sizeof(void*)*1, x_120); x_123 = x_122; x_124 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_124); x_126 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_124, x_123); x_127 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_126, x_1); x_128 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_127); if (lean::is_scalar(x_13)) { x_129 = lean::alloc_cnstr(0, 2, 0); } else { x_129 = x_13; } lean::cnstr_set(x_129, 0, x_128); lean::cnstr_set(x_129, 1, x_11); return x_129; } } } obj* _l_s4_lean_s6_parser_s12_symbol__core(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s12_symbol__core_s6___rarg), 4, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s6_symbol_s6___rarg(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_5; obj* x_6; x_3 = _l_s6_string_s4_trim(x_1); lean::inc(x_3); x_5 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_5, 0, x_3); x_6 = _l_s4_lean_s6_parser_s12_symbol__core_s6___rarg(x_0, x_3, x_2, x_5); return x_6; } } obj* _l_s4_lean_s6_parser_s6_symbol(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s6_symbol_s6___rarg), 3, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s6_symbol_s6_tokens_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; obj* x_5; obj* x_6; x_2 = _l_s6_string_s4_trim(x_0); x_3 = lean::box(0); lean::inc(x_3); x_5 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_5, 0, x_2); lean::cnstr_set(x_5, 1, x_1); lean::cnstr_set(x_5, 2, x_3); x_6 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_3); return x_6; } } obj* _l_s4_lean_s6_parser_s6_symbol_s6_tokens(obj* x_0, obj* x_1) { { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s6_symbol_s6_tokens_s6___rarg), 2, 0); return x_4; } } obj* _l_s4_lean_s6_parser_s6_symbol_s4_view_s6___rarg(obj* x_0, obj* x_1, obj* x_2) { { obj* x_6; obj* x_7; obj* x_10; lean::dec(x_2); lean::dec(x_1); lean::dec(x_0); x_6 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___closed__1; x_7 = _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___closed__2; lean::inc(x_7); lean::inc(x_6); x_10 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_10, 0, x_6); lean::cnstr_set(x_10, 1, x_7); return x_10; } } obj* _l_s4_lean_s6_parser_s6_symbol_s4_view(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s6_symbol_s4_view_s6___rarg), 3, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s6_symbol_s13_view__default_s6___rarg(obj* x_0, obj* x_1, obj* x_2) { { obj* x_6; lean::dec(x_2); lean::dec(x_1); lean::dec(x_0); x_6 = lean::box(0); return x_6; } } obj* _l_s4_lean_s6_parser_s6_symbol_s13_view__default(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s6_symbol_s13_view__default_s6___rarg), 3, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s6_number_s6_parser_s6___rarg(obj* x_0) { { obj* x_1; obj* x_3; x_1 = _l_s4_lean_s6_parser_s6_number_s6_parser_s6___rarg_s11___closed__1; lean::inc(x_1); x_3 = lean::apply_2(x_0, lean::box(0), x_1); return x_3; } } obj* _init__l_s4_lean_s6_parser_s6_number_s6_parser_s6___rarg_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::mk_string("number"); x_1 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_1, 0, x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s6_number_s6_parser_s6___rarg_s11___lambda__1), 4, 1); lean::closure_set(x_2, 0, x_1); return x_2; } } obj* _l_s4_lean_s6_parser_s6_number_s6_parser_s6___rarg_s11___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_6; obj* x_7; obj* x_9; obj* x_11; lean::inc(x_2); lean::inc(x_1); x_6 = _l_s4_lean_s6_parser_s5_token(x_1, x_2, x_3); x_7 = lean::cnstr_get(x_6, 0); lean::inc(x_7); x_9 = lean::cnstr_get(x_6, 1); lean::inc(x_9); if (lean::is_shared(x_6)) { lean::dec(x_6); x_11 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); x_11 = x_6; } if (lean::obj_tag(x_7) == 0) { obj* x_12; obj* x_14; obj* x_16; obj* x_18; obj* x_20; x_12 = lean::cnstr_get(x_7, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_7, 1); lean::inc(x_14); x_16 = lean::cnstr_get(x_7, 2); lean::inc(x_16); if (lean::is_shared(x_7)) { lean::dec(x_7); x_18 = lean::box(0); } else { lean::cnstr_release(x_7, 0); lean::cnstr_release(x_7, 1); lean::cnstr_release(x_7, 2); x_18 = x_7; } lean::inc(x_12); x_20 = _l_s4_lean_s6_parser_s9_try__view_s4___at_s4_lean_s6_parser_s6_number_s6_parser_s9___spec__1(x_12); if (lean::obj_tag(x_20) == 0) { obj* x_24; obj* x_25; obj* x_26; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; lean::dec(x_12); lean::dec(x_18); lean::dec(x_20); x_24 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_24, 0, x_2); x_25 = lean::box(0); x_26 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_0); lean::inc(x_26); x_29 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_26, x_0, x_24, x_25, x_1, x_14, x_9); x_30 = lean::cnstr_get(x_29, 0); lean::inc(x_30); x_32 = lean::cnstr_get(x_29, 1); lean::inc(x_32); lean::dec(x_29); x_35 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_35); x_37 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_35, x_30); x_38 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_37); lean::inc(x_35); x_40 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_35, x_38); x_41 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_40, x_0); x_42 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_41); if (lean::is_scalar(x_11)) { x_43 = lean::alloc_cnstr(0, 2, 0); } else { x_43 = x_11; } lean::cnstr_set(x_43, 0, x_42); lean::cnstr_set(x_43, 1, x_32); return x_43; } else { obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_56; lean::dec(x_1); lean::dec(x_2); lean::dec(x_20); x_47 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_47); if (lean::is_scalar(x_18)) { x_49 = lean::alloc_cnstr(0, 3, 0); } else { x_49 = x_18; } lean::cnstr_set(x_49, 0, x_12); lean::cnstr_set(x_49, 1, x_14); lean::cnstr_set(x_49, 2, x_47); x_50 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_49); x_51 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_51); x_53 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_51, x_50); x_54 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_53, x_0); x_55 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_54); if (lean::is_scalar(x_11)) { x_56 = lean::alloc_cnstr(0, 2, 0); } else { x_56 = x_11; } lean::cnstr_set(x_56, 0, x_55); lean::cnstr_set(x_56, 1, x_9); return x_56; } } else { obj* x_59; unsigned char x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_70; lean::dec(x_1); lean::dec(x_2); x_59 = lean::cnstr_get(x_7, 0); lean::inc(x_59); x_61 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); if (lean::is_shared(x_7)) { lean::dec(x_7); x_62 = lean::box(0); } else { lean::cnstr_release(x_7, 0); x_62 = x_7; } if (lean::is_scalar(x_62)) { x_63 = lean::alloc_cnstr(1, 1, 1); } else { x_63 = x_62; } lean::cnstr_set(x_63, 0, x_59); lean::cnstr_set_scalar(x_63, sizeof(void*)*1, x_61); x_64 = x_63; x_65 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_65); x_67 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_65, x_64); x_68 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_67, x_0); x_69 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_68); if (lean::is_scalar(x_11)) { x_70 = lean::alloc_cnstr(0, 2, 0); } else { x_70 = x_11; } lean::cnstr_set(x_70, 0, x_69); lean::cnstr_set(x_70, 1, x_9); return x_70; } } } obj* _l_s4_lean_s6_parser_s6_number_s6_parser(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s6_number_s6_parser_s6___rarg), 1, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s9_try__view_s4___at_s4_lean_s6_parser_s6_number_s6_parser_s9___spec__1(obj* x_0) { { obj* x_1; unsigned char x_4; x_1 = _l_s4_lean_s6_parser_s6_number; lean::inc(x_0); lean::inc(x_1); x_4 = _l_s4_lean_s6_parser_s6_syntax_s12_is__of__kind_s6___main(x_1, x_0); if (x_4 == 0) { obj* x_6; lean::dec(x_0); x_6 = lean::box(0); return x_6; } else { obj* x_7; obj* x_8; obj* x_10; obj* x_11; x_7 = _l_s4_lean_s6_parser_s6_number_s9_has__view; x_8 = lean::cnstr_get(x_7, 0); lean::inc(x_8); x_10 = lean::apply_1(x_8, x_0); x_11 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_11, 0, x_10); return x_11; } } } obj* _l_s4_lean_s6_parser_s6_number_s6_parser_s6_tokens(obj* x_0, obj* x_1) { { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::box(0); return x_4; } } obj* _l_s4_lean_s6_parser_s6_number_s6_parser_s4_view_s6___rarg(obj* x_0) { { obj* x_2; obj* x_3; obj* x_6; lean::dec(x_0); x_2 = _l_s4_lean_s6_parser_s6_number_s6_parser_s4_view_s6___rarg_s11___closed__1; x_3 = _l_s4_lean_s6_parser_s6_number_s6_parser_s4_view_s6___rarg_s11___closed__2; lean::inc(x_3); lean::inc(x_2); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_2); lean::cnstr_set(x_6, 1, x_3); return x_6; } } obj* _init__l_s4_lean_s6_parser_s6_number_s6_parser_s4_view_s6___rarg_s11___closed__1() { { obj* x_0; obj* x_1; x_0 = _l_s4_lean_s6_parser_s6_number_s9_has__view; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); return x_1; } } obj* _init__l_s4_lean_s6_parser_s6_number_s6_parser_s4_view_s6___rarg_s11___closed__2() { { obj* x_0; obj* x_1; x_0 = _l_s4_lean_s6_parser_s6_number_s9_has__view; x_1 = lean::cnstr_get(x_0, 1); lean::inc(x_1); return x_1; } } obj* _l_s4_lean_s6_parser_s6_number_s6_parser_s4_view(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s6_number_s6_parser_s4_view_s6___rarg), 1, 0); return x_2; } } obj* _l_s9___private_1765190339__s13_to__nat__core_s6___main(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_5; x_4 = lean::mk_nat_obj(0u); x_5 = lean::nat_dec_eq(x_2, x_4); if (lean::obj_tag(x_5) == 0) { obj* x_7; obj* x_8; unsigned x_11; unsigned char x_12; obj* x_13; obj* x_15; unsigned char x_16; unsigned x_18; lean::dec(x_5); x_7 = lean::mk_nat_obj(1u); x_8 = lean::nat_sub(x_2, x_7); lean::dec(x_7); lean::dec(x_2); x_11 = lean::string_iterator_curr(x_1); x_12 = _l_s4_char_s9_is__digit(x_11); x_13 = lean::nat_mul(x_3, x_0); lean::dec(x_3); x_15 = lean::string_iterator_next(x_1); if (x_12 == 0) { obj* x_20; obj* x_21; obj* x_22; x_20 = lean::mk_nat_obj(97u); x_21 = lean::mk_nat_obj(55296u); x_22 = lean::nat_dec_lt(x_20, x_21); lean::dec(x_21); if (lean::obj_tag(x_22) == 0) { obj* x_25; obj* x_26; lean::dec(x_22); x_25 = lean::mk_nat_obj(57343u); x_26 = lean::nat_dec_lt(x_25, x_20); lean::dec(x_25); if (lean::obj_tag(x_26) == 0) { unsigned x_30; lean::dec(x_20); lean::dec(x_26); x_30 = lean::unbox_uint32(x_4); x_18 = x_30; goto lbl_19; } else { obj* x_32; obj* x_33; lean::dec(x_26); x_32 = lean::mk_nat_obj(1114112u); x_33 = lean::nat_dec_lt(x_20, x_32); lean::dec(x_32); if (lean::obj_tag(x_33) == 0) { unsigned x_37; lean::dec(x_20); lean::dec(x_33); x_37 = lean::unbox_uint32(x_4); x_18 = x_37; goto lbl_19; } else { unsigned x_39; lean::dec(x_33); x_39 = lean::unbox_uint32(x_20); lean::dec(x_20); x_18 = x_39; goto lbl_19; } } } else { unsigned x_42; lean::dec(x_22); x_42 = lean::unbox_uint32(x_20); lean::dec(x_20); x_18 = x_42; goto lbl_19; } } else { obj* x_44; obj* x_45; obj* x_46; x_44 = lean::mk_nat_obj(48u); x_45 = lean::mk_nat_obj(55296u); x_46 = lean::nat_dec_lt(x_44, x_45); lean::dec(x_45); if (lean::obj_tag(x_46) == 0) { obj* x_49; obj* x_50; lean::dec(x_46); x_49 = lean::mk_nat_obj(57343u); x_50 = lean::nat_dec_lt(x_49, x_44); lean::dec(x_49); if (lean::obj_tag(x_50) == 0) { obj* x_54; obj* x_55; obj* x_58; obj* x_61; lean::dec(x_50); lean::dec(x_44); x_54 = lean::box_uint32(x_11); x_55 = lean::nat_sub(x_54, x_4); lean::dec(x_4); lean::dec(x_54); x_58 = lean::nat_add(x_13, x_55); lean::dec(x_55); lean::dec(x_13); x_61 = _l_s9___private_1765190339__s13_to__nat__core_s6___main(x_0, x_15, x_8, x_58); return x_61; } else { obj* x_63; obj* x_64; lean::dec(x_50); x_63 = lean::mk_nat_obj(1114112u); x_64 = lean::nat_dec_lt(x_44, x_63); lean::dec(x_63); if (lean::obj_tag(x_64) == 0) { obj* x_68; obj* x_69; obj* x_72; obj* x_75; lean::dec(x_64); lean::dec(x_44); x_68 = lean::box_uint32(x_11); x_69 = lean::nat_sub(x_68, x_4); lean::dec(x_4); lean::dec(x_68); x_72 = lean::nat_add(x_13, x_69); lean::dec(x_69); lean::dec(x_13); x_75 = _l_s9___private_1765190339__s13_to__nat__core_s6___main(x_0, x_15, x_8, x_72); return x_75; } else { obj* x_78; obj* x_79; obj* x_82; obj* x_85; lean::dec(x_64); lean::dec(x_4); x_78 = lean::box_uint32(x_11); x_79 = lean::nat_sub(x_78, x_44); lean::dec(x_44); lean::dec(x_78); x_82 = lean::nat_add(x_13, x_79); lean::dec(x_79); lean::dec(x_13); x_85 = _l_s9___private_1765190339__s13_to__nat__core_s6___main(x_0, x_15, x_8, x_82); return x_85; } } } else { obj* x_88; obj* x_89; obj* x_92; obj* x_95; lean::dec(x_46); lean::dec(x_4); x_88 = lean::box_uint32(x_11); x_89 = lean::nat_sub(x_88, x_44); lean::dec(x_44); lean::dec(x_88); x_92 = lean::nat_add(x_13, x_89); lean::dec(x_89); lean::dec(x_13); x_95 = _l_s9___private_1765190339__s13_to__nat__core_s6___main(x_0, x_15, x_8, x_92); return x_95; } } lbl_17: { obj* x_96; obj* x_97; obj* x_98; x_96 = lean::mk_nat_obj(65u); x_97 = lean::mk_nat_obj(55296u); x_98 = lean::nat_dec_lt(x_96, x_97); lean::dec(x_97); if (lean::obj_tag(x_98) == 0) { obj* x_101; obj* x_102; lean::dec(x_98); x_101 = lean::mk_nat_obj(57343u); x_102 = lean::nat_dec_lt(x_101, x_96); lean::dec(x_101); if (lean::obj_tag(x_102) == 0) { obj* x_106; obj* x_107; obj* x_110; obj* x_113; lean::dec(x_102); lean::dec(x_96); x_106 = lean::box_uint32(x_11); x_107 = lean::nat_sub(x_106, x_4); lean::dec(x_4); lean::dec(x_106); x_110 = lean::nat_add(x_13, x_107); lean::dec(x_107); lean::dec(x_13); x_113 = _l_s9___private_1765190339__s13_to__nat__core_s6___main(x_0, x_15, x_8, x_110); return x_113; } else { obj* x_115; obj* x_116; lean::dec(x_102); x_115 = lean::mk_nat_obj(1114112u); x_116 = lean::nat_dec_lt(x_96, x_115); lean::dec(x_115); if (lean::obj_tag(x_116) == 0) { obj* x_120; obj* x_121; obj* x_124; obj* x_127; lean::dec(x_116); lean::dec(x_96); x_120 = lean::box_uint32(x_11); x_121 = lean::nat_sub(x_120, x_4); lean::dec(x_4); lean::dec(x_120); x_124 = lean::nat_add(x_13, x_121); lean::dec(x_121); lean::dec(x_13); x_127 = _l_s9___private_1765190339__s13_to__nat__core_s6___main(x_0, x_15, x_8, x_124); return x_127; } else { obj* x_130; obj* x_131; obj* x_134; obj* x_137; lean::dec(x_116); lean::dec(x_4); x_130 = lean::box_uint32(x_11); x_131 = lean::nat_sub(x_130, x_96); lean::dec(x_96); lean::dec(x_130); x_134 = lean::nat_add(x_13, x_131); lean::dec(x_131); lean::dec(x_13); x_137 = _l_s9___private_1765190339__s13_to__nat__core_s6___main(x_0, x_15, x_8, x_134); return x_137; } } } else { obj* x_140; obj* x_141; obj* x_144; obj* x_147; lean::dec(x_98); lean::dec(x_4); x_140 = lean::box_uint32(x_11); x_141 = lean::nat_sub(x_140, x_96); lean::dec(x_96); lean::dec(x_140); x_144 = lean::nat_add(x_13, x_141); lean::dec(x_141); lean::dec(x_13); x_147 = _l_s9___private_1765190339__s13_to__nat__core_s6___main(x_0, x_15, x_8, x_144); return x_147; } } lbl_19: { unsigned x_148; obj* x_150; obj* x_151; obj* x_152; x_150 = lean::box_uint32(x_18); x_151 = lean::box_uint32(x_11); x_152 = lean::nat_dec_le(x_150, x_151); lean::dec(x_151); lean::dec(x_150); if (lean::obj_tag(x_152) == 0) { unsigned char x_156; lean::dec(x_152); x_156 = 0; x_16 = x_156; goto lbl_17; } else { obj* x_158; obj* x_159; obj* x_160; lean::dec(x_152); x_158 = lean::mk_nat_obj(102u); x_159 = lean::mk_nat_obj(55296u); x_160 = lean::nat_dec_lt(x_158, x_159); lean::dec(x_159); if (lean::obj_tag(x_160) == 0) { obj* x_163; obj* x_164; lean::dec(x_160); x_163 = lean::mk_nat_obj(57343u); x_164 = lean::nat_dec_lt(x_163, x_158); lean::dec(x_163); if (lean::obj_tag(x_164) == 0) { unsigned x_168; lean::dec(x_164); lean::dec(x_158); x_168 = lean::unbox_uint32(x_4); x_148 = x_168; goto lbl_149; } else { obj* x_170; obj* x_171; lean::dec(x_164); x_170 = lean::mk_nat_obj(1114112u); x_171 = lean::nat_dec_lt(x_158, x_170); lean::dec(x_170); if (lean::obj_tag(x_171) == 0) { unsigned x_175; lean::dec(x_171); lean::dec(x_158); x_175 = lean::unbox_uint32(x_4); x_148 = x_175; goto lbl_149; } else { unsigned x_177; lean::dec(x_171); x_177 = lean::unbox_uint32(x_158); lean::dec(x_158); x_148 = x_177; goto lbl_149; } } } else { unsigned x_180; lean::dec(x_160); x_180 = lean::unbox_uint32(x_158); lean::dec(x_158); x_148 = x_180; goto lbl_149; } } lbl_149: { obj* x_182; obj* x_183; obj* x_184; x_182 = lean::box_uint32(x_11); x_183 = lean::box_uint32(x_148); x_184 = lean::nat_dec_le(x_182, x_183); lean::dec(x_183); if (lean::obj_tag(x_184) == 0) { unsigned char x_188; lean::dec(x_182); lean::dec(x_184); x_188 = 0; x_16 = x_188; goto lbl_17; } else { obj* x_191; obj* x_192; obj* x_195; obj* x_198; lean::dec(x_184); lean::dec(x_4); x_191 = lean::box_uint32(x_18); x_192 = lean::nat_sub(x_182, x_191); lean::dec(x_191); lean::dec(x_182); x_195 = lean::nat_add(x_13, x_192); lean::dec(x_192); lean::dec(x_13); x_198 = _l_s9___private_1765190339__s13_to__nat__core_s6___main(x_0, x_15, x_8, x_195); return x_198; } } } } else { lean::dec(x_4); lean::dec(x_5); lean::dec(x_0); lean::dec(x_1); lean::dec(x_2); return x_3; } } } obj* _l_s9___private_1765190339__s13_to__nat__core(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; x_4 = _l_s9___private_1765190339__s13_to__nat__core_s6___main(x_0, x_1, x_2, x_3); return x_4; } } obj* _l_s9___private_1741613153__s13_to__nat__base(obj* x_0, obj* x_1) { { obj* x_3; obj* x_4; obj* x_6; obj* x_7; lean::inc(x_0); x_3 = lean::string_mk_iterator(x_0); x_4 = lean::string_length(x_0); lean::dec(x_0); x_6 = lean::mk_nat_obj(0u); x_7 = _l_s9___private_1765190339__s13_to__nat__core_s6___main(x_1, x_3, x_4, x_6); return x_7; } } obj* _l_s4_lean_s6_parser_s6_number_s4_view_s7_to__nat_s6___main(obj* x_0) { { switch (lean::obj_tag(x_0)) { case 0: { obj* x_1; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); lean::dec(x_0); if (lean::obj_tag(x_1) == 0) { obj* x_5; lean::dec(x_1); x_5 = lean::mk_nat_obj(1138u); return x_5; } else { obj* x_6; obj* x_9; obj* x_12; x_6 = lean::cnstr_get(x_1, 0); lean::inc(x_6); lean::dec(x_1); x_9 = lean::cnstr_get(x_6, 1); lean::inc(x_9); lean::dec(x_6); x_12 = _l_s6_string_s7_to__nat(x_9); return x_12; } } case 1: { obj* x_13; x_13 = lean::cnstr_get(x_0, 0); lean::inc(x_13); lean::dec(x_0); if (lean::obj_tag(x_13) == 0) { obj* x_17; lean::dec(x_13); x_17 = lean::mk_nat_obj(1138u); return x_17; } else { obj* x_18; obj* x_21; obj* x_24; obj* x_25; x_18 = lean::cnstr_get(x_13, 0); lean::inc(x_18); lean::dec(x_13); x_21 = lean::cnstr_get(x_18, 1); lean::inc(x_21); lean::dec(x_18); x_24 = lean::mk_nat_obj(2u); x_25 = _l_s9___private_1741613153__s13_to__nat__base(x_21, x_24); return x_25; } } case 2: { obj* x_26; x_26 = lean::cnstr_get(x_0, 0); lean::inc(x_26); lean::dec(x_0); if (lean::obj_tag(x_26) == 0) { obj* x_30; lean::dec(x_26); x_30 = lean::mk_nat_obj(1138u); return x_30; } else { obj* x_31; obj* x_34; obj* x_37; obj* x_38; x_31 = lean::cnstr_get(x_26, 0); lean::inc(x_31); lean::dec(x_26); x_34 = lean::cnstr_get(x_31, 1); lean::inc(x_34); lean::dec(x_31); x_37 = lean::mk_nat_obj(8u); x_38 = _l_s9___private_1741613153__s13_to__nat__base(x_34, x_37); return x_38; } } default: { obj* x_39; x_39 = lean::cnstr_get(x_0, 0); lean::inc(x_39); lean::dec(x_0); if (lean::obj_tag(x_39) == 0) { obj* x_43; lean::dec(x_39); x_43 = lean::mk_nat_obj(1138u); return x_43; } else { obj* x_44; obj* x_47; obj* x_50; obj* x_51; x_44 = lean::cnstr_get(x_39, 0); lean::inc(x_44); lean::dec(x_39); x_47 = lean::cnstr_get(x_44, 1); lean::inc(x_47); lean::dec(x_44); x_50 = lean::mk_nat_obj(16u); x_51 = _l_s9___private_1741613153__s13_to__nat__base(x_47, x_50); return x_51; } } } } } obj* _l_s4_lean_s6_parser_s6_number_s4_view_s7_to__nat(obj* x_0) { { obj* x_1; x_1 = _l_s4_lean_s6_parser_s6_number_s4_view_s7_to__nat_s6___main(x_0); return x_1; } } obj* _l_s4_lean_s6_parser_s6_number_s4_view_s7_of__nat(obj* x_0) { { obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_1 = lean::box(0); x_2 = _l_s3_nat_s4_repr(x_0); x_3 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_3, 0, x_1); lean::cnstr_set(x_3, 1, x_2); x_4 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_4, 0, x_3); x_5 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_5, 0, x_4); return x_5; } } obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s6___rarg(obj* x_0) { { obj* x_1; obj* x_3; x_1 = _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s6___rarg_s11___closed__1; lean::inc(x_1); x_3 = lean::apply_2(x_0, lean::box(0), x_1); return x_3; } } obj* _init__l_s4_lean_s6_parser_s11_string__lit_s6_parser_s6___rarg_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::mk_string("string"); x_1 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_1, 0, x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_string__lit_s6_parser_s6___rarg_s11___lambda__1), 4, 1); lean::closure_set(x_2, 0, x_1); return x_2; } } obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s6___rarg_s11___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_6; obj* x_7; obj* x_9; obj* x_11; lean::inc(x_2); lean::inc(x_1); x_6 = _l_s4_lean_s6_parser_s5_token(x_1, x_2, x_3); x_7 = lean::cnstr_get(x_6, 0); lean::inc(x_7); x_9 = lean::cnstr_get(x_6, 1); lean::inc(x_9); if (lean::is_shared(x_6)) { lean::dec(x_6); x_11 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); x_11 = x_6; } if (lean::obj_tag(x_7) == 0) { obj* x_12; obj* x_14; obj* x_16; obj* x_18; obj* x_20; x_12 = lean::cnstr_get(x_7, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_7, 1); lean::inc(x_14); x_16 = lean::cnstr_get(x_7, 2); lean::inc(x_16); if (lean::is_shared(x_7)) { lean::dec(x_7); x_18 = lean::box(0); } else { lean::cnstr_release(x_7, 0); lean::cnstr_release(x_7, 1); lean::cnstr_release(x_7, 2); x_18 = x_7; } lean::inc(x_12); x_20 = _l_s4_lean_s6_parser_s9_try__view_s4___at_s4_lean_s6_parser_s11_string__lit_s6_parser_s9___spec__1(x_12); if (lean::obj_tag(x_20) == 0) { obj* x_24; obj* x_25; obj* x_26; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; lean::dec(x_12); lean::dec(x_18); lean::dec(x_20); x_24 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_24, 0, x_2); x_25 = lean::box(0); x_26 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_0); lean::inc(x_26); x_29 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_26, x_0, x_24, x_25, x_1, x_14, x_9); x_30 = lean::cnstr_get(x_29, 0); lean::inc(x_30); x_32 = lean::cnstr_get(x_29, 1); lean::inc(x_32); lean::dec(x_29); x_35 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_35); x_37 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_35, x_30); x_38 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_37); lean::inc(x_35); x_40 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_35, x_38); x_41 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_40, x_0); x_42 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_41); if (lean::is_scalar(x_11)) { x_43 = lean::alloc_cnstr(0, 2, 0); } else { x_43 = x_11; } lean::cnstr_set(x_43, 0, x_42); lean::cnstr_set(x_43, 1, x_32); return x_43; } else { obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_56; lean::dec(x_1); lean::dec(x_2); lean::dec(x_20); x_47 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_47); if (lean::is_scalar(x_18)) { x_49 = lean::alloc_cnstr(0, 3, 0); } else { x_49 = x_18; } lean::cnstr_set(x_49, 0, x_12); lean::cnstr_set(x_49, 1, x_14); lean::cnstr_set(x_49, 2, x_47); x_50 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_49); x_51 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_51); x_53 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_51, x_50); x_54 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_53, x_0); x_55 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_54); if (lean::is_scalar(x_11)) { x_56 = lean::alloc_cnstr(0, 2, 0); } else { x_56 = x_11; } lean::cnstr_set(x_56, 0, x_55); lean::cnstr_set(x_56, 1, x_9); return x_56; } } else { obj* x_59; unsigned char x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_70; lean::dec(x_1); lean::dec(x_2); x_59 = lean::cnstr_get(x_7, 0); lean::inc(x_59); x_61 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); if (lean::is_shared(x_7)) { lean::dec(x_7); x_62 = lean::box(0); } else { lean::cnstr_release(x_7, 0); x_62 = x_7; } if (lean::is_scalar(x_62)) { x_63 = lean::alloc_cnstr(1, 1, 1); } else { x_63 = x_62; } lean::cnstr_set(x_63, 0, x_59); lean::cnstr_set_scalar(x_63, sizeof(void*)*1, x_61); x_64 = x_63; x_65 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_65); x_67 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_65, x_64); x_68 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_67, x_0); x_69 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_68); if (lean::is_scalar(x_11)) { x_70 = lean::alloc_cnstr(0, 2, 0); } else { x_70 = x_11; } lean::cnstr_set(x_70, 0, x_69); lean::cnstr_set(x_70, 1, x_9); return x_70; } } } obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_string__lit_s6_parser_s6___rarg), 1, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s9_try__view_s4___at_s4_lean_s6_parser_s11_string__lit_s6_parser_s9___spec__1(obj* x_0) { { obj* x_1; unsigned char x_4; x_1 = _l_s4_lean_s6_parser_s11_string__lit; lean::inc(x_0); lean::inc(x_1); x_4 = _l_s4_lean_s6_parser_s6_syntax_s12_is__of__kind_s6___main(x_1, x_0); if (x_4 == 0) { obj* x_6; lean::dec(x_0); x_6 = lean::box(0); return x_6; } else { obj* x_7; obj* x_8; obj* x_10; obj* x_11; x_7 = _l_s4_lean_s6_parser_s11_string__lit_s9_has__view; x_8 = lean::cnstr_get(x_7, 0); lean::inc(x_8); x_10 = lean::apply_1(x_8, x_0); x_11 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_11, 0, x_10); return x_11; } } } obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s6_tokens(obj* x_0, obj* x_1) { { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::box(0); return x_4; } } obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view_s6___rarg(obj* x_0) { { obj* x_2; obj* x_3; obj* x_6; lean::dec(x_0); x_2 = _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view_s6___rarg_s11___closed__1; x_3 = _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view_s6___rarg_s11___closed__2; lean::inc(x_3); lean::inc(x_2); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_2); lean::cnstr_set(x_6, 1, x_3); return x_6; } } obj* _init__l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view_s6___rarg_s11___closed__1() { { obj* x_0; obj* x_1; x_0 = _l_s4_lean_s6_parser_s11_string__lit_s9_has__view; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); return x_1; } } obj* _init__l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view_s6___rarg_s11___closed__2() { { obj* x_0; obj* x_1; x_0 = _l_s4_lean_s6_parser_s11_string__lit_s9_has__view; x_1 = lean::cnstr_get(x_0, 1); lean::inc(x_1); return x_1; } } obj* _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view_s6___rarg), 1, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value(obj* x_0) { { if (lean::obj_tag(x_0) == 0) { obj* x_2; lean::dec(x_0); x_2 = lean::box(0); return x_2; } else { obj* x_3; obj* x_5; obj* x_6; obj* x_9; obj* x_10; obj* x_13; x_3 = lean::cnstr_get(x_0, 0); lean::inc(x_3); if (lean::is_shared(x_0)) { lean::dec(x_0); x_5 = lean::box(0); } else { lean::cnstr_release(x_0, 0); x_5 = x_0; } x_6 = lean::cnstr_get(x_3, 1); lean::inc(x_6); lean::dec(x_3); x_9 = _l_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s11___closed__1; x_10 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_10); lean::inc(x_9); x_13 = _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_9, x_6, x_10); if (lean::obj_tag(x_13) == 0) { obj* x_16; lean::dec(x_13); lean::dec(x_5); x_16 = lean::box(0); return x_16; } else { obj* x_17; obj* x_20; x_17 = lean::cnstr_get(x_13, 0); lean::inc(x_17); lean::dec(x_13); if (lean::is_scalar(x_5)) { x_20 = lean::alloc_cnstr(1, 1, 0); } else { x_20 = x_5; } lean::cnstr_set(x_20, 0, x_17); return x_20; } } } } obj* _init__l_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s11___closed__1() { { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s22_parse__string__literal_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__1), 1, 0); return x_0; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_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_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_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_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__3_s6___rarg), 5, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__2(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::box(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_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_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::box(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_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_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::box(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_s4_lean_s6_parser_s13_monad__parsec_s3_any_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_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::box(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_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_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; obj* x_48; x_47 = lean::string_iterator_curr(x_0); x_48 = _l_s4_true_s9_decidable; if (lean::obj_tag(x_48) == 0) { obj* x_50; obj* x_51; obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_60; lean::dec(x_48); x_50 = _l_s4_char_s11_quote__core(x_47); x_51 = _l_s4_char_s9_has__repr_s11___closed__1; lean::inc(x_51); x_53 = lean::string_append(x_51, x_50); lean::dec(x_50); x_55 = lean::string_append(x_53, x_51); x_56 = lean::box(0); x_57 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_56); lean::inc(x_57); x_60 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__3_s6___rarg(x_55, x_57, x_56, x_56, x_0); if (lean::obj_tag(x_60) == 0) { obj* x_61; obj* x_63; obj* x_65; x_61 = lean::cnstr_get(x_60, 0); lean::inc(x_61); x_63 = lean::cnstr_get(x_60, 1); lean::inc(x_63); x_65 = lean::cnstr_get(x_60, 2); lean::inc(x_65); if (lean::obj_tag(x_65) == 0) { lean::dec(x_57); lean::dec(x_61); lean::dec(x_63); lean::dec(x_65); return x_60; } else { obj* x_72; obj* x_74; obj* x_76; obj* x_77; obj* x_78; lean::dec(x_60); x_72 = lean::cnstr_get(x_65, 0); lean::inc(x_72); if (lean::is_shared(x_65)) { lean::dec(x_65); x_74 = lean::box(0); } else { lean::cnstr_release(x_65, 0); x_74 = x_65; } lean::inc(x_57); x_76 = lean::alloc_closure(reinterpret_cast(_l_s8_function_s4_comp_s6___rarg), 3, 2); lean::closure_set(x_76, 0, x_57); lean::closure_set(x_76, 1, x_72); if (lean::is_scalar(x_74)) { x_77 = lean::alloc_cnstr(1, 1, 0); } else { x_77 = x_74; } lean::cnstr_set(x_77, 0, x_76); x_78 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_78, 0, x_61); lean::cnstr_set(x_78, 1, x_63); lean::cnstr_set(x_78, 2, x_77); return x_78; } } else { obj* x_79; unsigned char x_81; x_79 = lean::cnstr_get(x_60, 0); lean::inc(x_79); x_81 = lean::cnstr_get_scalar(x_60, sizeof(void*)*1); if (x_81 == 0) { obj* x_83; obj* x_85; obj* x_87; obj* x_90; obj* x_91; obj* x_94; obj* x_95; obj* x_96; lean::dec(x_60); x_83 = lean::cnstr_get(x_79, 0); lean::inc(x_83); x_85 = lean::cnstr_get(x_79, 1); lean::inc(x_85); x_87 = lean::cnstr_get(x_79, 2); lean::inc(x_87); lean::inc(x_57); x_90 = lean::alloc_closure(reinterpret_cast(_l_s8_function_s4_comp_s6___rarg), 3, 2); lean::closure_set(x_90, 0, x_57); lean::closure_set(x_90, 1, x_87); x_91 = lean::cnstr_get(x_79, 3); lean::inc(x_91); lean::dec(x_79); x_94 = lean::alloc_cnstr(0, 4, 0); lean::cnstr_set(x_94, 0, x_83); lean::cnstr_set(x_94, 1, x_85); lean::cnstr_set(x_94, 2, x_90); lean::cnstr_set(x_94, 3, x_91); x_95 = lean::alloc_cnstr(1, 1, 1); lean::cnstr_set(x_95, 0, x_94); lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_81); x_96 = x_95; return x_96; } else { lean::dec(x_57); lean::dec(x_79); return x_60; } } } else { obj* x_100; obj* x_101; obj* x_102; obj* x_103; lean::dec(x_48); x_100 = lean::string_iterator_next(x_0); x_101 = lean::box(0); x_102 = lean::box_uint32(x_47); x_103 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_103, 0, x_102); lean::cnstr_set(x_103, 1, x_100); lean::cnstr_set(x_103, 2, x_101); return x_103; } } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s5_digit_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__8(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::box(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_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_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::box(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_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_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::box(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_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__7(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_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__8(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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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::box(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_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_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::box(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_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_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::box(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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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::box(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_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_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::box(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_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_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::box(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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_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* _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__9_s6___rarg(obj* x_0, obj* x_1, obj* x_2) { { obj* x_3; obj* x_4; obj* x_5; obj* x_7; x_3 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_3, 0, x_1); x_4 = lean::box(0); x_5 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_5); x_7 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__3_s6___rarg(x_0, x_5, x_3, x_4, x_2); return x_7; } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__9(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_s14_unexpected__at_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__9_s6___rarg), 3, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s19_parse__quoted__char_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__6(obj* x_0) { { obj* x_2; lean::inc(x_0); x_2 = _l_s4_lean_s6_parser_s13_monad__parsec_s3_any_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__5(x_0); if (lean::obj_tag(x_2) == 0) { obj* x_3; obj* x_5; obj* x_7; obj* x_9; unsigned char x_10; unsigned char x_12; unsigned char x_14; unsigned char x_16; unsigned char x_18; unsigned char x_20; unsigned char x_22; unsigned char x_24; obj* x_26; obj* x_27; obj* x_28; unsigned x_30; x_3 = lean::cnstr_get(x_2, 0); lean::inc(x_3); x_5 = lean::cnstr_get(x_2, 1); lean::inc(x_5); x_7 = lean::cnstr_get(x_2, 2); lean::inc(x_7); if (lean::is_shared(x_2)) { lean::dec(x_2); x_9 = lean::box(0); } else { lean::cnstr_release(x_2, 0); lean::cnstr_release(x_2, 1); lean::cnstr_release(x_2, 2); x_9 = x_2; } x_26 = lean::mk_nat_obj(92u); x_27 = lean::mk_nat_obj(55296u); x_28 = lean::nat_dec_lt(x_26, x_27); lean::dec(x_27); if (lean::obj_tag(x_28) == 0) { obj* x_33; obj* x_34; lean::dec(x_28); x_33 = lean::mk_nat_obj(57343u); x_34 = lean::nat_dec_lt(x_33, x_26); lean::dec(x_33); if (lean::obj_tag(x_34) == 0) { obj* x_38; unsigned x_39; lean::dec(x_26); lean::dec(x_34); x_38 = lean::mk_nat_obj(0u); x_39 = lean::unbox_uint32(x_38); lean::dec(x_38); x_30 = x_39; goto lbl_31; } else { obj* x_42; obj* x_43; lean::dec(x_34); x_42 = lean::mk_nat_obj(1114112u); x_43 = lean::nat_dec_lt(x_26, x_42); lean::dec(x_42); if (lean::obj_tag(x_43) == 0) { obj* x_47; unsigned x_48; lean::dec(x_43); lean::dec(x_26); x_47 = lean::mk_nat_obj(0u); x_48 = lean::unbox_uint32(x_47); lean::dec(x_47); x_30 = x_48; goto lbl_31; } else { unsigned x_51; lean::dec(x_43); x_51 = lean::unbox_uint32(x_26); lean::dec(x_26); x_30 = x_51; goto lbl_31; } } } else { unsigned x_54; lean::dec(x_28); x_54 = lean::unbox_uint32(x_26); lean::dec(x_26); x_30 = x_54; goto lbl_31; } lbl_11: { obj* x_56; x_56 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__7(x_5); if (lean::obj_tag(x_56) == 0) { obj* x_57; obj* x_59; obj* x_61; obj* x_64; x_57 = lean::cnstr_get(x_56, 0); lean::inc(x_57); x_59 = lean::cnstr_get(x_56, 1); lean::inc(x_59); x_61 = lean::cnstr_get(x_56, 2); lean::inc(x_61); lean::dec(x_56); x_64 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__7(x_59); if (lean::obj_tag(x_64) == 0) { obj* x_65; obj* x_67; obj* x_69; obj* x_72; x_65 = lean::cnstr_get(x_64, 0); lean::inc(x_65); x_67 = lean::cnstr_get(x_64, 1); lean::inc(x_67); x_69 = lean::cnstr_get(x_64, 2); lean::inc(x_69); lean::dec(x_64); x_72 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__7(x_67); if (lean::obj_tag(x_72) == 0) { obj* x_73; obj* x_75; obj* x_77; obj* x_80; x_73 = lean::cnstr_get(x_72, 0); lean::inc(x_73); x_75 = lean::cnstr_get(x_72, 1); lean::inc(x_75); x_77 = lean::cnstr_get(x_72, 2); lean::inc(x_77); lean::dec(x_72); x_80 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__7(x_75); if (lean::obj_tag(x_80) == 0) { obj* x_81; obj* x_83; obj* x_85; obj* x_88; obj* x_89; obj* x_91; obj* x_94; obj* x_96; obj* x_99; obj* x_102; obj* x_105; obj* x_106; x_81 = lean::cnstr_get(x_80, 0); lean::inc(x_81); x_83 = lean::cnstr_get(x_80, 1); lean::inc(x_83); x_85 = lean::cnstr_get(x_80, 2); lean::inc(x_85); lean::dec(x_80); x_88 = lean::mk_nat_obj(16u); x_89 = lean::nat_mul(x_88, x_57); lean::dec(x_57); x_91 = lean::nat_add(x_89, x_65); lean::dec(x_65); lean::dec(x_89); x_94 = lean::nat_mul(x_88, x_91); lean::dec(x_91); x_96 = lean::nat_add(x_94, x_73); lean::dec(x_73); lean::dec(x_94); x_99 = lean::nat_mul(x_88, x_96); lean::dec(x_96); lean::dec(x_88); x_102 = lean::nat_add(x_99, x_81); lean::dec(x_81); lean::dec(x_99); x_105 = lean::mk_nat_obj(55296u); x_106 = lean::nat_dec_lt(x_102, x_105); lean::dec(x_105); if (lean::obj_tag(x_106) == 0) { obj* x_109; obj* x_110; lean::dec(x_106); x_109 = lean::mk_nat_obj(57343u); x_110 = lean::nat_dec_lt(x_109, x_102); lean::dec(x_109); if (lean::obj_tag(x_110) == 0) { obj* x_114; obj* x_115; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_124; lean::dec(x_110); lean::dec(x_102); x_114 = lean::mk_nat_obj(0u); x_115 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_115); if (lean::is_scalar(x_9)) { x_117 = lean::alloc_cnstr(0, 3, 0); } else { x_117 = x_9; } lean::cnstr_set(x_117, 0, x_114); lean::cnstr_set(x_117, 1, x_83); lean::cnstr_set(x_117, 2, x_115); x_118 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_85, x_117); x_119 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_77, x_118); x_120 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_69, x_119); x_121 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_61, x_120); x_122 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_121); lean::inc(x_115); x_124 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_115, x_122); return x_124; } else { obj* x_126; obj* x_127; lean::dec(x_110); x_126 = lean::mk_nat_obj(1114112u); x_127 = lean::nat_dec_lt(x_102, x_126); lean::dec(x_126); if (lean::obj_tag(x_127) == 0) { obj* x_131; obj* x_132; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_141; lean::dec(x_127); lean::dec(x_102); x_131 = lean::mk_nat_obj(0u); x_132 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_132); if (lean::is_scalar(x_9)) { x_134 = lean::alloc_cnstr(0, 3, 0); } else { x_134 = x_9; } lean::cnstr_set(x_134, 0, x_131); lean::cnstr_set(x_134, 1, x_83); lean::cnstr_set(x_134, 2, x_132); x_135 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_85, x_134); x_136 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_77, x_135); x_137 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_69, x_136); x_138 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_61, x_137); x_139 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_138); lean::inc(x_132); x_141 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_132, x_139); return x_141; } else { obj* x_143; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_152; lean::dec(x_127); x_143 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_143); if (lean::is_scalar(x_9)) { x_145 = lean::alloc_cnstr(0, 3, 0); } else { x_145 = x_9; } lean::cnstr_set(x_145, 0, x_102); lean::cnstr_set(x_145, 1, x_83); lean::cnstr_set(x_145, 2, x_143); x_146 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_85, x_145); x_147 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_77, x_146); x_148 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_69, x_147); x_149 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_61, x_148); x_150 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_149); lean::inc(x_143); x_152 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_143, x_150); return x_152; } } } else { obj* x_154; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_163; lean::dec(x_106); x_154 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_154); if (lean::is_scalar(x_9)) { x_156 = lean::alloc_cnstr(0, 3, 0); } else { x_156 = x_9; } lean::cnstr_set(x_156, 0, x_102); lean::cnstr_set(x_156, 1, x_83); lean::cnstr_set(x_156, 2, x_154); x_157 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_85, x_156); x_158 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_77, x_157); x_159 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_69, x_158); x_160 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_61, x_159); x_161 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_160); lean::inc(x_154); x_163 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_154, x_161); return x_163; } } else { obj* x_168; unsigned char x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_180; lean::dec(x_65); lean::dec(x_57); lean::dec(x_73); lean::dec(x_9); x_168 = lean::cnstr_get(x_80, 0); lean::inc(x_168); x_170 = lean::cnstr_get_scalar(x_80, sizeof(void*)*1); if (lean::is_shared(x_80)) { lean::dec(x_80); x_171 = lean::box(0); } else { lean::cnstr_release(x_80, 0); x_171 = x_80; } if (lean::is_scalar(x_171)) { x_172 = lean::alloc_cnstr(1, 1, 1); } else { x_172 = x_171; } lean::cnstr_set(x_172, 0, x_168); lean::cnstr_set_scalar(x_172, sizeof(void*)*1, x_170); x_173 = x_172; x_174 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_77, x_173); x_175 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_69, x_174); x_176 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_61, x_175); x_177 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_176); x_178 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_178); x_180 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_178, x_177); return x_180; } } else { obj* x_184; unsigned char x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_195; lean::dec(x_65); lean::dec(x_57); lean::dec(x_9); x_184 = lean::cnstr_get(x_72, 0); lean::inc(x_184); x_186 = lean::cnstr_get_scalar(x_72, sizeof(void*)*1); if (lean::is_shared(x_72)) { lean::dec(x_72); x_187 = lean::box(0); } else { lean::cnstr_release(x_72, 0); x_187 = x_72; } if (lean::is_scalar(x_187)) { x_188 = lean::alloc_cnstr(1, 1, 1); } else { x_188 = x_187; } lean::cnstr_set(x_188, 0, x_184); lean::cnstr_set_scalar(x_188, sizeof(void*)*1, x_186); x_189 = x_188; x_190 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_69, x_189); x_191 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_61, x_190); x_192 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_191); x_193 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_193); x_195 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_193, x_192); return x_195; } } else { obj* x_198; unsigned char x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_208; lean::dec(x_57); lean::dec(x_9); x_198 = lean::cnstr_get(x_64, 0); lean::inc(x_198); x_200 = lean::cnstr_get_scalar(x_64, sizeof(void*)*1); if (lean::is_shared(x_64)) { lean::dec(x_64); x_201 = lean::box(0); } else { lean::cnstr_release(x_64, 0); x_201 = x_64; } if (lean::is_scalar(x_201)) { x_202 = lean::alloc_cnstr(1, 1, 1); } else { x_202 = x_201; } lean::cnstr_set(x_202, 0, x_198); lean::cnstr_set_scalar(x_202, sizeof(void*)*1, x_200); x_203 = x_202; x_204 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_61, x_203); x_205 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_204); x_206 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_206); x_208 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_206, x_205); return x_208; } } else { obj* x_210; unsigned char x_212; obj* x_213; obj* x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_219; lean::dec(x_9); x_210 = lean::cnstr_get(x_56, 0); lean::inc(x_210); x_212 = lean::cnstr_get_scalar(x_56, sizeof(void*)*1); if (lean::is_shared(x_56)) { lean::dec(x_56); x_213 = lean::box(0); } else { lean::cnstr_release(x_56, 0); x_213 = x_56; } if (lean::is_scalar(x_213)) { x_214 = lean::alloc_cnstr(1, 1, 1); } else { x_214 = x_213; } lean::cnstr_set(x_214, 0, x_210); lean::cnstr_set_scalar(x_214, sizeof(void*)*1, x_212); x_215 = x_214; x_216 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_215); x_217 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_217); x_219 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_217, x_216); return x_219; } } lbl_13: { obj* x_220; obj* x_221; obj* x_222; x_220 = lean::mk_nat_obj(117u); x_221 = lean::mk_nat_obj(55296u); x_222 = lean::nat_dec_lt(x_220, x_221); lean::dec(x_221); if (lean::obj_tag(x_222) == 0) { obj* x_225; obj* x_226; lean::dec(x_222); x_225 = lean::mk_nat_obj(57343u); x_226 = lean::nat_dec_lt(x_225, x_220); lean::dec(x_225); if (lean::obj_tag(x_226) == 0) { obj* x_230; obj* x_231; lean::dec(x_226); lean::dec(x_220); x_230 = lean::mk_nat_obj(0u); x_231 = lean::nat_dec_eq(x_3, x_230); lean::dec(x_230); lean::dec(x_3); if (lean::obj_tag(x_231) == 0) { obj* x_236; obj* x_238; obj* x_239; obj* x_240; obj* x_242; lean::dec(x_231); lean::dec(x_9); x_236 = _l_s4_lean_s6_parser_s19_parse__quoted__char_s6___rarg_s11___lambda__7_s11___closed__1; lean::inc(x_236); x_238 = _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__9_s6___rarg(x_236, x_0, x_5); x_239 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_238); x_240 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_240); x_242 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_240, x_239); return x_242; } else { unsigned char x_245; lean::dec(x_231); lean::dec(x_0); x_245 = 0; x_10 = x_245; goto lbl_11; } } else { obj* x_247; obj* x_248; lean::dec(x_226); x_247 = lean::mk_nat_obj(1114112u); x_248 = lean::nat_dec_lt(x_220, x_247); lean::dec(x_247); if (lean::obj_tag(x_248) == 0) { obj* x_252; obj* x_253; lean::dec(x_220); lean::dec(x_248); x_252 = lean::mk_nat_obj(0u); x_253 = lean::nat_dec_eq(x_3, x_252); lean::dec(x_252); lean::dec(x_3); if (lean::obj_tag(x_253) == 0) { obj* x_258; obj* x_260; obj* x_261; obj* x_262; obj* x_264; lean::dec(x_253); lean::dec(x_9); x_258 = _l_s4_lean_s6_parser_s19_parse__quoted__char_s6___rarg_s11___lambda__7_s11___closed__1; lean::inc(x_258); x_260 = _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__9_s6___rarg(x_258, x_0, x_5); x_261 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_260); x_262 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_262); x_264 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_262, x_261); return x_264; } else { unsigned char x_267; lean::dec(x_253); lean::dec(x_0); x_267 = 0; x_10 = x_267; goto lbl_11; } } else { obj* x_269; lean::dec(x_248); x_269 = lean::nat_dec_eq(x_3, x_220); lean::dec(x_220); lean::dec(x_3); if (lean::obj_tag(x_269) == 0) { obj* x_274; obj* x_276; obj* x_277; obj* x_278; obj* x_280; lean::dec(x_269); lean::dec(x_9); x_274 = _l_s4_lean_s6_parser_s19_parse__quoted__char_s6___rarg_s11___lambda__7_s11___closed__1; lean::inc(x_274); x_276 = _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__9_s6___rarg(x_274, x_0, x_5); x_277 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_276); x_278 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_278); x_280 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_278, x_277); return x_280; } else { unsigned char x_283; lean::dec(x_269); lean::dec(x_0); x_283 = 0; x_10 = x_283; goto lbl_11; } } } } else { obj* x_285; lean::dec(x_222); x_285 = lean::nat_dec_eq(x_3, x_220); lean::dec(x_220); lean::dec(x_3); if (lean::obj_tag(x_285) == 0) { obj* x_290; obj* x_292; obj* x_293; obj* x_294; obj* x_296; lean::dec(x_285); lean::dec(x_9); x_290 = _l_s4_lean_s6_parser_s19_parse__quoted__char_s6___rarg_s11___lambda__7_s11___closed__1; lean::inc(x_290); x_292 = _l_s4_lean_s6_parser_s13_monad__parsec_s14_unexpected__at_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__9_s6___rarg(x_290, x_0, x_5); x_293 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_292); x_294 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_294); x_296 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_294, x_293); return x_296; } else { unsigned char x_299; lean::dec(x_285); lean::dec(x_0); x_299 = 0; x_10 = x_299; goto lbl_11; } } } lbl_15: { obj* x_300; x_300 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__7(x_5); if (lean::obj_tag(x_300) == 0) { obj* x_301; obj* x_303; obj* x_305; obj* x_307; obj* x_308; x_301 = lean::cnstr_get(x_300, 0); lean::inc(x_301); x_303 = lean::cnstr_get(x_300, 1); lean::inc(x_303); x_305 = lean::cnstr_get(x_300, 2); lean::inc(x_305); if (lean::is_shared(x_300)) { lean::dec(x_300); x_307 = lean::box(0); } else { lean::cnstr_release(x_300, 0); lean::cnstr_release(x_300, 1); lean::cnstr_release(x_300, 2); x_307 = x_300; } x_308 = _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__7(x_303); if (lean::obj_tag(x_308) == 0) { obj* x_309; obj* x_311; obj* x_313; obj* x_316; obj* x_317; obj* x_320; obj* x_323; obj* x_324; x_309 = lean::cnstr_get(x_308, 0); lean::inc(x_309); x_311 = lean::cnstr_get(x_308, 1); lean::inc(x_311); x_313 = lean::cnstr_get(x_308, 2); lean::inc(x_313); lean::dec(x_308); x_316 = lean::mk_nat_obj(16u); x_317 = lean::nat_mul(x_316, x_301); lean::dec(x_301); lean::dec(x_316); x_320 = lean::nat_add(x_317, x_309); lean::dec(x_309); lean::dec(x_317); x_323 = lean::mk_nat_obj(55296u); x_324 = lean::nat_dec_lt(x_320, x_323); lean::dec(x_323); if (lean::obj_tag(x_324) == 0) { obj* x_327; obj* x_328; lean::dec(x_324); x_327 = lean::mk_nat_obj(57343u); x_328 = lean::nat_dec_lt(x_327, x_320); lean::dec(x_327); if (lean::obj_tag(x_328) == 0) { obj* x_332; obj* x_333; obj* x_335; obj* x_336; obj* x_337; obj* x_338; obj* x_340; lean::dec(x_328); lean::dec(x_320); x_332 = lean::mk_nat_obj(0u); x_333 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_333); if (lean::is_scalar(x_307)) { x_335 = lean::alloc_cnstr(0, 3, 0); } else { x_335 = x_307; } lean::cnstr_set(x_335, 0, x_332); lean::cnstr_set(x_335, 1, x_311); lean::cnstr_set(x_335, 2, x_333); x_336 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_313, x_335); x_337 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_305, x_336); x_338 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_337); lean::inc(x_333); x_340 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_333, x_338); return x_340; } else { obj* x_342; obj* x_343; lean::dec(x_328); x_342 = lean::mk_nat_obj(1114112u); x_343 = lean::nat_dec_lt(x_320, x_342); lean::dec(x_342); if (lean::obj_tag(x_343) == 0) { obj* x_347; obj* x_348; obj* x_350; obj* x_351; obj* x_352; obj* x_353; obj* x_355; lean::dec(x_343); lean::dec(x_320); x_347 = lean::mk_nat_obj(0u); x_348 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_348); if (lean::is_scalar(x_307)) { x_350 = lean::alloc_cnstr(0, 3, 0); } else { x_350 = x_307; } lean::cnstr_set(x_350, 0, x_347); lean::cnstr_set(x_350, 1, x_311); lean::cnstr_set(x_350, 2, x_348); x_351 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_313, x_350); x_352 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_305, x_351); x_353 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_352); lean::inc(x_348); x_355 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_348, x_353); return x_355; } else { obj* x_357; obj* x_359; obj* x_360; obj* x_361; obj* x_362; obj* x_364; lean::dec(x_343); x_357 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_357); if (lean::is_scalar(x_307)) { x_359 = lean::alloc_cnstr(0, 3, 0); } else { x_359 = x_307; } lean::cnstr_set(x_359, 0, x_320); lean::cnstr_set(x_359, 1, x_311); lean::cnstr_set(x_359, 2, x_357); x_360 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_313, x_359); x_361 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_305, x_360); x_362 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_361); lean::inc(x_357); x_364 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_357, x_362); return x_364; } } } else { obj* x_366; obj* x_368; obj* x_369; obj* x_370; obj* x_371; obj* x_373; lean::dec(x_324); x_366 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_366); if (lean::is_scalar(x_307)) { x_368 = lean::alloc_cnstr(0, 3, 0); } else { x_368 = x_307; } lean::cnstr_set(x_368, 0, x_320); lean::cnstr_set(x_368, 1, x_311); lean::cnstr_set(x_368, 2, x_366); x_369 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_313, x_368); x_370 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_305, x_369); x_371 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_370); lean::inc(x_366); x_373 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_366, x_371); return x_373; } } else { obj* x_376; unsigned char x_378; obj* x_379; obj* x_380; obj* x_381; obj* x_382; obj* x_383; obj* x_384; obj* x_386; lean::dec(x_301); lean::dec(x_307); x_376 = lean::cnstr_get(x_308, 0); lean::inc(x_376); x_378 = lean::cnstr_get_scalar(x_308, sizeof(void*)*1); if (lean::is_shared(x_308)) { lean::dec(x_308); x_379 = lean::box(0); } else { lean::cnstr_release(x_308, 0); x_379 = x_308; } if (lean::is_scalar(x_379)) { x_380 = lean::alloc_cnstr(1, 1, 1); } else { x_380 = x_379; } lean::cnstr_set(x_380, 0, x_376); lean::cnstr_set_scalar(x_380, sizeof(void*)*1, x_378); x_381 = x_380; x_382 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_305, x_381); x_383 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_382); x_384 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_384); x_386 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_384, x_383); return x_386; } } else { obj* x_387; unsigned char x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; obj* x_394; obj* x_396; x_387 = lean::cnstr_get(x_300, 0); lean::inc(x_387); x_389 = lean::cnstr_get_scalar(x_300, sizeof(void*)*1); if (lean::is_shared(x_300)) { lean::dec(x_300); x_390 = lean::box(0); } else { lean::cnstr_release(x_300, 0); x_390 = x_300; } if (lean::is_scalar(x_390)) { x_391 = lean::alloc_cnstr(1, 1, 1); } else { x_391 = x_390; } lean::cnstr_set(x_391, 0, x_387); lean::cnstr_set_scalar(x_391, sizeof(void*)*1, x_389); x_392 = x_391; x_393 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_392); x_394 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_394); x_396 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_394, x_393); return x_396; } } lbl_17: { obj* x_397; obj* x_398; obj* x_399; x_397 = lean::mk_nat_obj(120u); x_398 = lean::mk_nat_obj(55296u); x_399 = lean::nat_dec_lt(x_397, x_398); lean::dec(x_398); if (lean::obj_tag(x_399) == 0) { obj* x_402; obj* x_403; lean::dec(x_399); x_402 = lean::mk_nat_obj(57343u); x_403 = lean::nat_dec_lt(x_402, x_397); lean::dec(x_402); if (lean::obj_tag(x_403) == 0) { obj* x_407; obj* x_408; lean::dec(x_403); lean::dec(x_397); x_407 = lean::mk_nat_obj(0u); x_408 = lean::nat_dec_eq(x_3, x_407); lean::dec(x_407); if (lean::obj_tag(x_408) == 0) { unsigned char x_411; lean::dec(x_408); x_411 = 0; x_12 = x_411; goto lbl_13; } else { unsigned char x_416; lean::dec(x_9); lean::dec(x_0); lean::dec(x_3); lean::dec(x_408); x_416 = 0; x_14 = x_416; goto lbl_15; } } else { obj* x_418; obj* x_419; lean::dec(x_403); x_418 = lean::mk_nat_obj(1114112u); x_419 = lean::nat_dec_lt(x_397, x_418); lean::dec(x_418); if (lean::obj_tag(x_419) == 0) { obj* x_423; obj* x_424; lean::dec(x_419); lean::dec(x_397); x_423 = lean::mk_nat_obj(0u); x_424 = lean::nat_dec_eq(x_3, x_423); lean::dec(x_423); if (lean::obj_tag(x_424) == 0) { unsigned char x_427; lean::dec(x_424); x_427 = 0; x_12 = x_427; goto lbl_13; } else { unsigned char x_432; lean::dec(x_9); lean::dec(x_0); lean::dec(x_3); lean::dec(x_424); x_432 = 0; x_14 = x_432; goto lbl_15; } } else { obj* x_434; lean::dec(x_419); x_434 = lean::nat_dec_eq(x_3, x_397); lean::dec(x_397); if (lean::obj_tag(x_434) == 0) { unsigned char x_437; lean::dec(x_434); x_437 = 0; x_12 = x_437; goto lbl_13; } else { unsigned char x_442; lean::dec(x_9); lean::dec(x_0); lean::dec(x_3); lean::dec(x_434); x_442 = 0; x_14 = x_442; goto lbl_15; } } } } else { obj* x_444; lean::dec(x_399); x_444 = lean::nat_dec_eq(x_3, x_397); lean::dec(x_397); if (lean::obj_tag(x_444) == 0) { unsigned char x_447; lean::dec(x_444); x_447 = 0; x_12 = x_447; goto lbl_13; } else { unsigned char x_452; lean::dec(x_9); lean::dec(x_0); lean::dec(x_3); lean::dec(x_444); x_452 = 0; x_14 = x_452; goto lbl_15; } } } lbl_19: { obj* x_453; obj* x_454; obj* x_455; unsigned x_456; x_453 = lean::mk_nat_obj(116u); x_454 = lean::mk_nat_obj(55296u); x_455 = lean::nat_dec_lt(x_453, x_454); if (lean::obj_tag(x_455) == 0) { obj* x_459; obj* x_460; lean::dec(x_455); x_459 = lean::mk_nat_obj(57343u); x_460 = lean::nat_dec_lt(x_459, x_453); lean::dec(x_459); if (lean::obj_tag(x_460) == 0) { obj* x_464; unsigned x_465; lean::dec(x_460); lean::dec(x_453); x_464 = lean::mk_nat_obj(0u); x_465 = lean::unbox_uint32(x_464); lean::dec(x_464); x_456 = x_465; goto lbl_457; } else { obj* x_468; obj* x_469; lean::dec(x_460); x_468 = lean::mk_nat_obj(1114112u); x_469 = lean::nat_dec_lt(x_453, x_468); lean::dec(x_468); if (lean::obj_tag(x_469) == 0) { obj* x_473; unsigned x_474; lean::dec(x_469); lean::dec(x_453); x_473 = lean::mk_nat_obj(0u); x_474 = lean::unbox_uint32(x_473); lean::dec(x_473); x_456 = x_474; goto lbl_457; } else { unsigned x_477; lean::dec(x_469); x_477 = lean::unbox_uint32(x_453); lean::dec(x_453); x_456 = x_477; goto lbl_457; } } } else { unsigned x_480; lean::dec(x_455); x_480 = lean::unbox_uint32(x_453); lean::dec(x_453); x_456 = x_480; goto lbl_457; } lbl_457: { obj* x_482; obj* x_483; x_482 = lean::box_uint32(x_456); x_483 = lean::nat_dec_eq(x_3, x_482); lean::dec(x_482); if (lean::obj_tag(x_483) == 0) { unsigned char x_487; lean::dec(x_454); lean::dec(x_483); x_487 = 0; x_16 = x_487; goto lbl_17; } else { obj* x_492; obj* x_493; lean::dec(x_9); lean::dec(x_0); lean::dec(x_3); lean::dec(x_483); x_492 = lean::mk_nat_obj(9u); x_493 = lean::nat_dec_lt(x_492, x_454); lean::dec(x_454); if (lean::obj_tag(x_493) == 0) { obj* x_496; obj* x_497; lean::dec(x_493); x_496 = lean::mk_nat_obj(57343u); x_497 = lean::nat_dec_lt(x_496, x_492); lean::dec(x_496); if (lean::obj_tag(x_497) == 0) { obj* x_501; obj* x_502; obj* x_504; obj* x_505; obj* x_507; lean::dec(x_497); lean::dec(x_492); x_501 = lean::mk_nat_obj(0u); x_502 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_502); x_504 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_504, 0, x_501); lean::cnstr_set(x_504, 1, x_5); lean::cnstr_set(x_504, 2, x_502); x_505 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_504); lean::inc(x_502); x_507 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_502, x_505); return x_507; } else { obj* x_509; obj* x_510; lean::dec(x_497); x_509 = lean::mk_nat_obj(1114112u); x_510 = lean::nat_dec_lt(x_492, x_509); lean::dec(x_509); if (lean::obj_tag(x_510) == 0) { obj* x_514; obj* x_515; obj* x_517; obj* x_518; obj* x_520; lean::dec(x_510); lean::dec(x_492); x_514 = lean::mk_nat_obj(0u); x_515 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_515); x_517 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_517, 0, x_514); lean::cnstr_set(x_517, 1, x_5); lean::cnstr_set(x_517, 2, x_515); x_518 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_517); lean::inc(x_515); x_520 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_515, x_518); return x_520; } else { obj* x_522; obj* x_524; obj* x_525; obj* x_527; lean::dec(x_510); x_522 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_522); x_524 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_524, 0, x_492); lean::cnstr_set(x_524, 1, x_5); lean::cnstr_set(x_524, 2, x_522); x_525 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_524); lean::inc(x_522); x_527 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_522, x_525); return x_527; } } } else { obj* x_529; obj* x_531; obj* x_532; obj* x_534; lean::dec(x_493); x_529 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_529); x_531 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_531, 0, x_492); lean::cnstr_set(x_531, 1, x_5); lean::cnstr_set(x_531, 2, x_529); x_532 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_531); lean::inc(x_529); x_534 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_529, x_532); return x_534; } } } } lbl_21: { obj* x_535; obj* x_536; obj* x_537; unsigned x_538; x_535 = lean::mk_nat_obj(110u); x_536 = lean::mk_nat_obj(55296u); x_537 = lean::nat_dec_lt(x_535, x_536); if (lean::obj_tag(x_537) == 0) { obj* x_541; obj* x_542; lean::dec(x_537); x_541 = lean::mk_nat_obj(57343u); x_542 = lean::nat_dec_lt(x_541, x_535); lean::dec(x_541); if (lean::obj_tag(x_542) == 0) { obj* x_546; unsigned x_547; lean::dec(x_542); lean::dec(x_535); x_546 = lean::mk_nat_obj(0u); x_547 = lean::unbox_uint32(x_546); lean::dec(x_546); x_538 = x_547; goto lbl_539; } else { obj* x_550; obj* x_551; lean::dec(x_542); x_550 = lean::mk_nat_obj(1114112u); x_551 = lean::nat_dec_lt(x_535, x_550); lean::dec(x_550); if (lean::obj_tag(x_551) == 0) { obj* x_555; unsigned x_556; lean::dec(x_551); lean::dec(x_535); x_555 = lean::mk_nat_obj(0u); x_556 = lean::unbox_uint32(x_555); lean::dec(x_555); x_538 = x_556; goto lbl_539; } else { unsigned x_559; lean::dec(x_551); x_559 = lean::unbox_uint32(x_535); lean::dec(x_535); x_538 = x_559; goto lbl_539; } } } else { unsigned x_562; lean::dec(x_537); x_562 = lean::unbox_uint32(x_535); lean::dec(x_535); x_538 = x_562; goto lbl_539; } lbl_539: { obj* x_564; obj* x_565; x_564 = lean::box_uint32(x_538); x_565 = lean::nat_dec_eq(x_3, x_564); lean::dec(x_564); if (lean::obj_tag(x_565) == 0) { unsigned char x_569; lean::dec(x_565); lean::dec(x_536); x_569 = 0; x_18 = x_569; goto lbl_19; } else { obj* x_574; obj* x_575; lean::dec(x_565); lean::dec(x_9); lean::dec(x_0); lean::dec(x_3); x_574 = lean::mk_nat_obj(10u); x_575 = lean::nat_dec_lt(x_574, x_536); lean::dec(x_536); if (lean::obj_tag(x_575) == 0) { obj* x_578; obj* x_579; lean::dec(x_575); x_578 = lean::mk_nat_obj(57343u); x_579 = lean::nat_dec_lt(x_578, x_574); lean::dec(x_578); if (lean::obj_tag(x_579) == 0) { obj* x_583; obj* x_584; obj* x_586; obj* x_587; obj* x_589; lean::dec(x_579); lean::dec(x_574); x_583 = lean::mk_nat_obj(0u); x_584 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_584); x_586 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_586, 0, x_583); lean::cnstr_set(x_586, 1, x_5); lean::cnstr_set(x_586, 2, x_584); x_587 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_586); lean::inc(x_584); x_589 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_584, x_587); return x_589; } else { obj* x_591; obj* x_592; lean::dec(x_579); x_591 = lean::mk_nat_obj(1114112u); x_592 = lean::nat_dec_lt(x_574, x_591); lean::dec(x_591); if (lean::obj_tag(x_592) == 0) { obj* x_596; obj* x_597; obj* x_599; obj* x_600; obj* x_602; lean::dec(x_592); lean::dec(x_574); x_596 = lean::mk_nat_obj(0u); x_597 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_597); x_599 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_599, 0, x_596); lean::cnstr_set(x_599, 1, x_5); lean::cnstr_set(x_599, 2, x_597); x_600 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_599); lean::inc(x_597); x_602 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_597, x_600); return x_602; } else { obj* x_604; obj* x_606; obj* x_607; obj* x_609; lean::dec(x_592); x_604 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_604); x_606 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_606, 0, x_574); lean::cnstr_set(x_606, 1, x_5); lean::cnstr_set(x_606, 2, x_604); x_607 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_606); lean::inc(x_604); x_609 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_604, x_607); return x_609; } } } else { obj* x_611; obj* x_613; obj* x_614; obj* x_616; lean::dec(x_575); x_611 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_611); x_613 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_613, 0, x_574); lean::cnstr_set(x_613, 1, x_5); lean::cnstr_set(x_613, 2, x_611); x_614 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_613); lean::inc(x_611); x_616 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_611, x_614); return x_616; } } } } lbl_23: { obj* x_617; obj* x_618; obj* x_619; unsigned x_621; x_617 = lean::mk_nat_obj(39u); x_618 = lean::mk_nat_obj(55296u); x_619 = lean::nat_dec_lt(x_617, x_618); lean::dec(x_618); if (lean::obj_tag(x_619) == 0) { obj* x_624; obj* x_625; lean::dec(x_619); x_624 = lean::mk_nat_obj(57343u); x_625 = lean::nat_dec_lt(x_624, x_617); lean::dec(x_624); if (lean::obj_tag(x_625) == 0) { obj* x_629; unsigned x_630; lean::dec(x_625); lean::dec(x_617); x_629 = lean::mk_nat_obj(0u); x_630 = lean::unbox_uint32(x_629); lean::dec(x_629); x_621 = x_630; goto lbl_622; } else { obj* x_633; obj* x_634; lean::dec(x_625); x_633 = lean::mk_nat_obj(1114112u); x_634 = lean::nat_dec_lt(x_617, x_633); lean::dec(x_633); if (lean::obj_tag(x_634) == 0) { obj* x_638; unsigned x_639; lean::dec(x_634); lean::dec(x_617); x_638 = lean::mk_nat_obj(0u); x_639 = lean::unbox_uint32(x_638); lean::dec(x_638); x_621 = x_639; goto lbl_622; } else { unsigned x_642; lean::dec(x_634); x_642 = lean::unbox_uint32(x_617); lean::dec(x_617); x_621 = x_642; goto lbl_622; } } } else { unsigned x_645; lean::dec(x_619); x_645 = lean::unbox_uint32(x_617); lean::dec(x_617); x_621 = x_645; goto lbl_622; } lbl_622: { obj* x_647; obj* x_648; x_647 = lean::box_uint32(x_621); x_648 = lean::nat_dec_eq(x_3, x_647); if (lean::obj_tag(x_648) == 0) { unsigned char x_651; lean::dec(x_648); lean::dec(x_647); x_651 = 0; x_20 = x_651; goto lbl_21; } else { obj* x_656; obj* x_658; obj* x_659; obj* x_661; lean::dec(x_648); lean::dec(x_9); lean::dec(x_0); lean::dec(x_3); x_656 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_656); x_658 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_658, 0, x_647); lean::cnstr_set(x_658, 1, x_5); lean::cnstr_set(x_658, 2, x_656); x_659 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_658); lean::inc(x_656); x_661 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_656, x_659); return x_661; } } } lbl_25: { obj* x_662; obj* x_663; obj* x_664; unsigned x_666; x_662 = lean::mk_nat_obj(34u); x_663 = lean::mk_nat_obj(55296u); x_664 = lean::nat_dec_lt(x_662, x_663); lean::dec(x_663); if (lean::obj_tag(x_664) == 0) { obj* x_669; obj* x_670; lean::dec(x_664); x_669 = lean::mk_nat_obj(57343u); x_670 = lean::nat_dec_lt(x_669, x_662); lean::dec(x_669); if (lean::obj_tag(x_670) == 0) { obj* x_674; unsigned x_675; lean::dec(x_662); lean::dec(x_670); x_674 = lean::mk_nat_obj(0u); x_675 = lean::unbox_uint32(x_674); lean::dec(x_674); x_666 = x_675; goto lbl_667; } else { obj* x_678; obj* x_679; lean::dec(x_670); x_678 = lean::mk_nat_obj(1114112u); x_679 = lean::nat_dec_lt(x_662, x_678); lean::dec(x_678); if (lean::obj_tag(x_679) == 0) { obj* x_683; unsigned x_684; lean::dec(x_679); lean::dec(x_662); x_683 = lean::mk_nat_obj(0u); x_684 = lean::unbox_uint32(x_683); lean::dec(x_683); x_666 = x_684; goto lbl_667; } else { unsigned x_687; lean::dec(x_679); x_687 = lean::unbox_uint32(x_662); lean::dec(x_662); x_666 = x_687; goto lbl_667; } } } else { unsigned x_690; lean::dec(x_664); x_690 = lean::unbox_uint32(x_662); lean::dec(x_662); x_666 = x_690; goto lbl_667; } lbl_667: { obj* x_692; obj* x_693; x_692 = lean::box_uint32(x_666); x_693 = lean::nat_dec_eq(x_3, x_692); if (lean::obj_tag(x_693) == 0) { unsigned char x_696; lean::dec(x_693); lean::dec(x_692); x_696 = 0; x_22 = x_696; goto lbl_23; } else { obj* x_701; obj* x_703; obj* x_704; obj* x_706; lean::dec(x_693); lean::dec(x_9); lean::dec(x_0); lean::dec(x_3); x_701 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_701); x_703 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_703, 0, x_692); lean::cnstr_set(x_703, 1, x_5); lean::cnstr_set(x_703, 2, x_701); x_704 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_703); lean::inc(x_701); x_706 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_701, x_704); return x_706; } } } lbl_31: { obj* x_707; obj* x_708; x_707 = lean::box_uint32(x_30); x_708 = lean::nat_dec_eq(x_3, x_707); if (lean::obj_tag(x_708) == 0) { unsigned char x_711; lean::dec(x_708); lean::dec(x_707); x_711 = 0; x_24 = x_711; goto lbl_25; } else { obj* x_716; obj* x_718; obj* x_719; obj* x_721; lean::dec(x_708); lean::dec(x_9); lean::dec(x_0); lean::dec(x_3); x_716 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_716); x_718 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_718, 0, x_707); lean::cnstr_set(x_718, 1, x_5); lean::cnstr_set(x_718, 2, x_716); x_719 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_7, x_718); lean::inc(x_716); x_721 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_716, x_719); return x_721; } } } else { obj* x_723; unsigned char x_725; obj* x_726; obj* x_727; obj* x_728; obj* x_729; obj* x_731; lean::dec(x_0); x_723 = lean::cnstr_get(x_2, 0); lean::inc(x_723); x_725 = lean::cnstr_get_scalar(x_2, sizeof(void*)*1); if (lean::is_shared(x_2)) { lean::dec(x_2); x_726 = lean::box(0); } else { lean::cnstr_release(x_2, 0); x_726 = x_2; } if (lean::is_scalar(x_726)) { x_727 = lean::alloc_cnstr(1, 1, 1); } else { x_727 = x_726; } lean::cnstr_set(x_727, 0, x_723); lean::cnstr_set_scalar(x_727, sizeof(void*)*1, x_725); x_728 = x_727; x_729 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_729); x_731 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_729, x_728); return x_731; } } } obj* _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__4(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; lean::dec(x_4); x_6 = _l_s4_lean_s6_parser_s13_monad__parsec_s3_any_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__5(x_2); 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; unsigned char x_18; obj* x_20; obj* x_21; obj* x_22; unsigned x_24; 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(1u); x_15 = lean::nat_sub(x_0, x_14); lean::dec(x_14); lean::dec(x_0); x_20 = lean::mk_nat_obj(92u); x_21 = lean::mk_nat_obj(55296u); x_22 = lean::nat_dec_lt(x_20, x_21); lean::dec(x_21); if (lean::obj_tag(x_22) == 0) { obj* x_27; obj* x_28; lean::dec(x_22); x_27 = lean::mk_nat_obj(57343u); x_28 = lean::nat_dec_lt(x_27, x_20); lean::dec(x_27); if (lean::obj_tag(x_28) == 0) { unsigned x_32; lean::dec(x_20); lean::dec(x_28); x_32 = lean::unbox_uint32(x_3); x_24 = x_32; goto lbl_25; } else { obj* x_34; obj* x_35; lean::dec(x_28); x_34 = lean::mk_nat_obj(1114112u); x_35 = lean::nat_dec_lt(x_20, x_34); lean::dec(x_34); if (lean::obj_tag(x_35) == 0) { unsigned x_39; lean::dec(x_20); lean::dec(x_35); x_39 = lean::unbox_uint32(x_3); x_24 = x_39; goto lbl_25; } else { unsigned x_41; lean::dec(x_35); x_41 = lean::unbox_uint32(x_20); lean::dec(x_20); x_24 = x_41; goto lbl_25; } } } else { unsigned x_44; lean::dec(x_22); x_44 = lean::unbox_uint32(x_20); lean::dec(x_20); x_24 = x_44; goto lbl_25; } lbl_19: { obj* x_46; obj* x_47; obj* x_48; unsigned x_50; x_46 = lean::mk_nat_obj(34u); x_47 = lean::mk_nat_obj(55296u); x_48 = lean::nat_dec_lt(x_46, x_47); lean::dec(x_47); if (lean::obj_tag(x_48) == 0) { obj* x_53; obj* x_54; lean::dec(x_48); x_53 = lean::mk_nat_obj(57343u); x_54 = lean::nat_dec_lt(x_53, x_46); lean::dec(x_53); if (lean::obj_tag(x_54) == 0) { unsigned x_58; lean::dec(x_54); lean::dec(x_46); x_58 = lean::unbox_uint32(x_3); lean::dec(x_3); x_50 = x_58; goto lbl_51; } else { obj* x_61; obj* x_62; lean::dec(x_54); x_61 = lean::mk_nat_obj(1114112u); x_62 = lean::nat_dec_lt(x_46, x_61); lean::dec(x_61); if (lean::obj_tag(x_62) == 0) { unsigned x_66; lean::dec(x_62); lean::dec(x_46); x_66 = lean::unbox_uint32(x_3); lean::dec(x_3); x_50 = x_66; goto lbl_51; } else { unsigned x_70; lean::dec(x_62); lean::dec(x_3); x_70 = lean::unbox_uint32(x_46); lean::dec(x_46); x_50 = x_70; goto lbl_51; } } } else { unsigned x_74; lean::dec(x_48); lean::dec(x_3); x_74 = lean::unbox_uint32(x_46); lean::dec(x_46); x_50 = x_74; goto lbl_51; } lbl_51: { obj* x_76; obj* x_77; x_76 = lean::box_uint32(x_50); x_77 = lean::nat_dec_eq(x_7, x_76); lean::dec(x_76); if (lean::obj_tag(x_77) == 0) { unsigned x_81; obj* x_83; obj* x_84; obj* x_85; lean::dec(x_13); lean::dec(x_77); x_81 = lean::unbox_uint32(x_7); lean::dec(x_7); x_83 = lean::string_push(x_1, x_81); x_84 = _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__4(x_15, x_83, x_9); x_85 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_11, x_84); return x_85; } else { obj* x_89; obj* x_91; obj* x_92; lean::dec(x_15); lean::dec(x_77); lean::dec(x_7); x_89 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_89); if (lean::is_scalar(x_13)) { x_91 = lean::alloc_cnstr(0, 3, 0); } else { x_91 = x_13; } lean::cnstr_set(x_91, 0, x_1); lean::cnstr_set(x_91, 1, x_9); lean::cnstr_set(x_91, 2, x_89); x_92 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_11, x_91); return x_92; } } } lbl_25: { obj* x_93; obj* x_94; x_93 = lean::box_uint32(x_24); x_94 = lean::nat_dec_eq(x_7, x_93); lean::dec(x_93); if (lean::obj_tag(x_94) == 0) { unsigned char x_97; lean::dec(x_94); x_97 = 0; x_18 = x_97; goto lbl_19; } else { obj* x_102; lean::dec(x_13); lean::dec(x_94); lean::dec(x_7); lean::dec(x_3); x_102 = _l_s4_lean_s6_parser_s19_parse__quoted__char_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__6(x_9); if (lean::obj_tag(x_102) == 0) { obj* x_103; obj* x_105; obj* x_107; unsigned x_110; obj* x_112; obj* x_113; obj* x_114; obj* x_115; x_103 = lean::cnstr_get(x_102, 0); lean::inc(x_103); x_105 = lean::cnstr_get(x_102, 1); lean::inc(x_105); x_107 = lean::cnstr_get(x_102, 2); lean::inc(x_107); lean::dec(x_102); x_110 = lean::unbox_uint32(x_103); lean::dec(x_103); x_112 = lean::string_push(x_1, x_110); x_113 = _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__4(x_15, x_112, x_105); x_114 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_107, x_113); x_115 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_11, x_114); return x_115; } else { obj* x_118; unsigned char x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; lean::dec(x_15); lean::dec(x_1); x_118 = lean::cnstr_get(x_102, 0); lean::inc(x_118); x_120 = lean::cnstr_get_scalar(x_102, sizeof(void*)*1); if (lean::is_shared(x_102)) { lean::dec(x_102); x_121 = lean::box(0); } else { lean::cnstr_release(x_102, 0); x_121 = x_102; } if (lean::is_scalar(x_121)) { x_122 = lean::alloc_cnstr(1, 1, 1); } else { x_122 = x_121; } lean::cnstr_set(x_122, 0, x_118); lean::cnstr_set_scalar(x_122, sizeof(void*)*1, x_120); x_123 = x_122; x_124 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_11, x_123); return x_124; } } } } else { obj* x_128; unsigned char x_130; obj* x_131; obj* x_132; obj* x_133; lean::dec(x_0); lean::dec(x_1); lean::dec(x_3); x_128 = lean::cnstr_get(x_6, 0); lean::inc(x_128); x_130 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); if (lean::is_shared(x_6)) { lean::dec(x_6); x_131 = lean::box(0); } else { lean::cnstr_release(x_6, 0); x_131 = x_6; } if (lean::is_scalar(x_131)) { x_132 = lean::alloc_cnstr(1, 1, 1); } else { x_132 = x_131; } lean::cnstr_set(x_132, 0, x_128); lean::cnstr_set_scalar(x_132, sizeof(void*)*1, x_130); x_133 = x_132; return x_133; } } else { obj* x_136; obj* x_137; obj* x_138; lean::dec(x_4); lean::dec(x_0); x_136 = lean::mk_nat_obj(34u); x_137 = lean::mk_nat_obj(55296u); x_138 = lean::nat_dec_lt(x_136, x_137); lean::dec(x_137); if (lean::obj_tag(x_138) == 0) { obj* x_141; obj* x_142; lean::dec(x_138); x_141 = lean::mk_nat_obj(57343u); x_142 = lean::nat_dec_lt(x_141, x_136); lean::dec(x_141); if (lean::obj_tag(x_142) == 0) { unsigned x_146; obj* x_148; lean::dec(x_136); lean::dec(x_142); x_146 = lean::unbox_uint32(x_3); lean::dec(x_3); x_148 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__2(x_146, x_2); if (lean::obj_tag(x_148) == 0) { obj* x_149; obj* x_151; obj* x_153; obj* x_154; obj* x_156; obj* x_157; x_149 = lean::cnstr_get(x_148, 1); lean::inc(x_149); x_151 = lean::cnstr_get(x_148, 2); lean::inc(x_151); if (lean::is_shared(x_148)) { lean::dec(x_148); x_153 = lean::box(0); } else { lean::cnstr_release(x_148, 0); lean::cnstr_release(x_148, 1); lean::cnstr_release(x_148, 2); x_153 = x_148; } x_154 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_154); if (lean::is_scalar(x_153)) { x_156 = lean::alloc_cnstr(0, 3, 0); } else { x_156 = x_153; } lean::cnstr_set(x_156, 0, x_1); lean::cnstr_set(x_156, 1, x_149); lean::cnstr_set(x_156, 2, x_154); x_157 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_151, x_156); return x_157; } else { obj* x_159; unsigned char x_161; obj* x_162; obj* x_163; obj* x_164; lean::dec(x_1); x_159 = lean::cnstr_get(x_148, 0); lean::inc(x_159); x_161 = lean::cnstr_get_scalar(x_148, sizeof(void*)*1); if (lean::is_shared(x_148)) { lean::dec(x_148); x_162 = lean::box(0); } else { lean::cnstr_release(x_148, 0); x_162 = x_148; } if (lean::is_scalar(x_162)) { x_163 = lean::alloc_cnstr(1, 1, 1); } else { x_163 = x_162; } lean::cnstr_set(x_163, 0, x_159); lean::cnstr_set_scalar(x_163, sizeof(void*)*1, x_161); x_164 = x_163; return x_164; } } else { obj* x_166; obj* x_167; lean::dec(x_142); x_166 = lean::mk_nat_obj(1114112u); x_167 = lean::nat_dec_lt(x_136, x_166); lean::dec(x_166); if (lean::obj_tag(x_167) == 0) { unsigned x_171; obj* x_173; lean::dec(x_167); lean::dec(x_136); x_171 = lean::unbox_uint32(x_3); lean::dec(x_3); x_173 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__2(x_171, x_2); if (lean::obj_tag(x_173) == 0) { obj* x_174; obj* x_176; obj* x_178; obj* x_179; obj* x_181; obj* x_182; x_174 = lean::cnstr_get(x_173, 1); lean::inc(x_174); x_176 = lean::cnstr_get(x_173, 2); lean::inc(x_176); if (lean::is_shared(x_173)) { lean::dec(x_173); x_178 = lean::box(0); } else { lean::cnstr_release(x_173, 0); lean::cnstr_release(x_173, 1); lean::cnstr_release(x_173, 2); x_178 = x_173; } x_179 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_179); if (lean::is_scalar(x_178)) { x_181 = lean::alloc_cnstr(0, 3, 0); } else { x_181 = x_178; } lean::cnstr_set(x_181, 0, x_1); lean::cnstr_set(x_181, 1, x_174); lean::cnstr_set(x_181, 2, x_179); x_182 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_176, x_181); return x_182; } else { obj* x_184; unsigned char x_186; obj* x_187; obj* x_188; obj* x_189; lean::dec(x_1); x_184 = lean::cnstr_get(x_173, 0); lean::inc(x_184); x_186 = lean::cnstr_get_scalar(x_173, sizeof(void*)*1); if (lean::is_shared(x_173)) { lean::dec(x_173); x_187 = lean::box(0); } else { lean::cnstr_release(x_173, 0); x_187 = x_173; } if (lean::is_scalar(x_187)) { x_188 = lean::alloc_cnstr(1, 1, 1); } else { x_188 = x_187; } lean::cnstr_set(x_188, 0, x_184); lean::cnstr_set_scalar(x_188, sizeof(void*)*1, x_186); x_189 = x_188; return x_189; } } else { unsigned x_192; obj* x_194; lean::dec(x_167); lean::dec(x_3); x_192 = lean::unbox_uint32(x_136); lean::dec(x_136); x_194 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__2(x_192, x_2); if (lean::obj_tag(x_194) == 0) { obj* x_195; obj* x_197; obj* x_199; obj* x_200; obj* x_202; obj* x_203; x_195 = lean::cnstr_get(x_194, 1); lean::inc(x_195); x_197 = lean::cnstr_get(x_194, 2); lean::inc(x_197); if (lean::is_shared(x_194)) { lean::dec(x_194); x_199 = lean::box(0); } else { lean::cnstr_release(x_194, 0); lean::cnstr_release(x_194, 1); lean::cnstr_release(x_194, 2); x_199 = x_194; } x_200 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_200); if (lean::is_scalar(x_199)) { x_202 = lean::alloc_cnstr(0, 3, 0); } else { x_202 = x_199; } lean::cnstr_set(x_202, 0, x_1); lean::cnstr_set(x_202, 1, x_195); lean::cnstr_set(x_202, 2, x_200); x_203 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_197, x_202); return x_203; } else { obj* x_205; unsigned char x_207; obj* x_208; obj* x_209; obj* x_210; lean::dec(x_1); x_205 = lean::cnstr_get(x_194, 0); lean::inc(x_205); x_207 = lean::cnstr_get_scalar(x_194, sizeof(void*)*1); if (lean::is_shared(x_194)) { lean::dec(x_194); x_208 = lean::box(0); } else { lean::cnstr_release(x_194, 0); x_208 = x_194; } if (lean::is_scalar(x_208)) { x_209 = lean::alloc_cnstr(1, 1, 1); } else { x_209 = x_208; } lean::cnstr_set(x_209, 0, x_205); lean::cnstr_set_scalar(x_209, sizeof(void*)*1, x_207); x_210 = x_209; return x_210; } } } } else { unsigned x_213; obj* x_215; lean::dec(x_138); lean::dec(x_3); x_213 = lean::unbox_uint32(x_136); lean::dec(x_136); x_215 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__2(x_213, x_2); if (lean::obj_tag(x_215) == 0) { obj* x_216; obj* x_218; obj* x_220; obj* x_221; obj* x_223; obj* x_224; x_216 = lean::cnstr_get(x_215, 1); lean::inc(x_216); x_218 = lean::cnstr_get(x_215, 2); lean::inc(x_218); if (lean::is_shared(x_215)) { lean::dec(x_215); x_220 = lean::box(0); } else { lean::cnstr_release(x_215, 0); lean::cnstr_release(x_215, 1); lean::cnstr_release(x_215, 2); x_220 = x_215; } x_221 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_221); if (lean::is_scalar(x_220)) { x_223 = lean::alloc_cnstr(0, 3, 0); } else { x_223 = x_220; } lean::cnstr_set(x_223, 0, x_1); lean::cnstr_set(x_223, 1, x_216); lean::cnstr_set(x_223, 2, x_221); x_224 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_218, x_223); return x_224; } else { obj* x_226; unsigned char x_228; obj* x_229; obj* x_230; obj* x_231; lean::dec(x_1); x_226 = lean::cnstr_get(x_215, 0); lean::inc(x_226); x_228 = lean::cnstr_get_scalar(x_215, sizeof(void*)*1); if (lean::is_shared(x_215)) { lean::dec(x_215); x_229 = lean::box(0); } else { lean::cnstr_release(x_215, 0); x_229 = x_215; } if (lean::is_scalar(x_229)) { x_230 = lean::alloc_cnstr(1, 1, 1); } else { x_230 = x_229; } lean::cnstr_set(x_230, 0, x_226); lean::cnstr_set_scalar(x_230, sizeof(void*)*1, x_228); x_231 = x_230; return x_231; } } } } } obj* _l_s4_lean_s6_parser_s22_parse__string__literal_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__1(obj* x_0) { { obj* x_1; obj* x_2; obj* x_3; x_1 = lean::mk_nat_obj(34u); x_2 = lean::mk_nat_obj(55296u); x_3 = lean::nat_dec_lt(x_1, x_2); lean::dec(x_2); if (lean::obj_tag(x_3) == 0) { obj* x_6; obj* x_7; lean::dec(x_3); x_6 = lean::mk_nat_obj(57343u); x_7 = lean::nat_dec_lt(x_6, x_1); lean::dec(x_6); if (lean::obj_tag(x_7) == 0) { obj* x_11; unsigned x_12; obj* x_14; lean::dec(x_7); lean::dec(x_1); x_11 = lean::mk_nat_obj(0u); x_12 = lean::unbox_uint32(x_11); lean::dec(x_11); x_14 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__2(x_12, x_0); if (lean::obj_tag(x_14) == 0) { obj* x_15; obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_27; x_15 = lean::cnstr_get(x_14, 1); lean::inc(x_15); x_17 = lean::cnstr_get(x_14, 2); lean::inc(x_17); lean::dec(x_14); x_20 = lean::string_iterator_remaining(x_15); x_21 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_21); x_23 = _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__4(x_20, x_21, x_15); x_24 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_24); x_26 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_24, x_23); x_27 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_17, x_26); return x_27; } else { obj* x_28; unsigned char x_30; obj* x_31; obj* x_32; obj* x_33; x_28 = lean::cnstr_get(x_14, 0); lean::inc(x_28); x_30 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); if (lean::is_shared(x_14)) { lean::dec(x_14); x_31 = lean::box(0); } else { lean::cnstr_release(x_14, 0); x_31 = x_14; } if (lean::is_scalar(x_31)) { x_32 = lean::alloc_cnstr(1, 1, 1); } else { x_32 = x_31; } lean::cnstr_set(x_32, 0, x_28); lean::cnstr_set_scalar(x_32, sizeof(void*)*1, x_30); x_33 = x_32; return x_33; } } else { obj* x_35; obj* x_36; lean::dec(x_7); x_35 = lean::mk_nat_obj(1114112u); x_36 = lean::nat_dec_lt(x_1, x_35); lean::dec(x_35); if (lean::obj_tag(x_36) == 0) { obj* x_40; unsigned x_41; obj* x_43; lean::dec(x_1); lean::dec(x_36); x_40 = lean::mk_nat_obj(0u); x_41 = lean::unbox_uint32(x_40); lean::dec(x_40); x_43 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__2(x_41, x_0); if (lean::obj_tag(x_43) == 0) { obj* x_44; obj* x_46; obj* x_49; obj* x_50; obj* x_52; obj* x_53; obj* x_55; obj* x_56; x_44 = lean::cnstr_get(x_43, 1); lean::inc(x_44); x_46 = lean::cnstr_get(x_43, 2); lean::inc(x_46); lean::dec(x_43); x_49 = lean::string_iterator_remaining(x_44); x_50 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_50); x_52 = _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__4(x_49, x_50, x_44); x_53 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_53); x_55 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_53, x_52); x_56 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_46, x_55); return x_56; } else { obj* x_57; unsigned char x_59; obj* x_60; obj* x_61; obj* x_62; x_57 = lean::cnstr_get(x_43, 0); lean::inc(x_57); x_59 = lean::cnstr_get_scalar(x_43, sizeof(void*)*1); if (lean::is_shared(x_43)) { lean::dec(x_43); x_60 = lean::box(0); } else { lean::cnstr_release(x_43, 0); x_60 = x_43; } if (lean::is_scalar(x_60)) { x_61 = lean::alloc_cnstr(1, 1, 1); } else { x_61 = x_60; } lean::cnstr_set(x_61, 0, x_57); lean::cnstr_set_scalar(x_61, sizeof(void*)*1, x_59); x_62 = x_61; return x_62; } } else { unsigned x_64; obj* x_66; lean::dec(x_36); x_64 = lean::unbox_uint32(x_1); lean::dec(x_1); x_66 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__2(x_64, x_0); if (lean::obj_tag(x_66) == 0) { obj* x_67; obj* x_69; obj* x_72; obj* x_73; obj* x_75; obj* x_76; obj* x_78; obj* x_79; x_67 = lean::cnstr_get(x_66, 1); lean::inc(x_67); x_69 = lean::cnstr_get(x_66, 2); lean::inc(x_69); lean::dec(x_66); x_72 = lean::string_iterator_remaining(x_67); x_73 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_73); x_75 = _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__4(x_72, x_73, x_67); x_76 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_76); x_78 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_76, x_75); x_79 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_69, x_78); return x_79; } else { obj* x_80; unsigned char x_82; obj* x_83; obj* x_84; obj* x_85; x_80 = lean::cnstr_get(x_66, 0); lean::inc(x_80); x_82 = lean::cnstr_get_scalar(x_66, sizeof(void*)*1); if (lean::is_shared(x_66)) { lean::dec(x_66); x_83 = lean::box(0); } else { lean::cnstr_release(x_66, 0); x_83 = x_66; } if (lean::is_scalar(x_83)) { x_84 = lean::alloc_cnstr(1, 1, 1); } else { x_84 = x_83; } lean::cnstr_set(x_84, 0, x_80); lean::cnstr_set_scalar(x_84, sizeof(void*)*1, x_82); x_85 = x_84; return x_85; } } } } else { unsigned x_87; obj* x_89; lean::dec(x_3); x_87 = lean::unbox_uint32(x_1); lean::dec(x_1); x_89 = _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__2(x_87, x_0); if (lean::obj_tag(x_89) == 0) { obj* x_90; obj* x_92; obj* x_95; obj* x_96; obj* x_98; obj* x_99; obj* x_101; obj* x_102; x_90 = lean::cnstr_get(x_89, 1); lean::inc(x_90); x_92 = lean::cnstr_get(x_89, 2); lean::inc(x_92); lean::dec(x_89); x_95 = lean::string_iterator_remaining(x_90); x_96 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_96); x_98 = _l_s4_lean_s6_parser_s27_parse__string__literal__aux_s6___main_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__4(x_95, x_96, x_90); x_99 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_99); x_101 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_99, x_98); x_102 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_92, x_101); return x_102; } else { obj* x_103; unsigned char x_105; obj* x_106; obj* x_107; obj* x_108; x_103 = lean::cnstr_get(x_89, 0); lean::inc(x_103); x_105 = lean::cnstr_get_scalar(x_89, sizeof(void*)*1); if (lean::is_shared(x_89)) { lean::dec(x_89); x_106 = lean::box(0); } else { lean::cnstr_release(x_89, 0); x_106 = x_89; } if (lean::is_scalar(x_106)) { x_107 = lean::alloc_cnstr(1, 1, 1); } else { x_107 = x_106; } lean::cnstr_set(x_107, 0, x_103); lean::cnstr_set_scalar(x_107, sizeof(void*)*1, x_105); x_108 = x_107; return x_108; } } } } obj* _l_s4_lean_s6_parser_s13_monad__parsec_s2_ch_s4___at_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__2_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_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s9___spec__2(x_2, x_1); return x_3; } } obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s6___rarg(obj* x_0) { { obj* x_1; obj* x_3; x_1 = _l_s4_lean_s6_parser_s5_ident_s6_parser_s6___rarg_s11___closed__1; lean::inc(x_1); x_3 = lean::apply_2(x_0, lean::box(0), x_1); return x_3; } } obj* _init__l_s4_lean_s6_parser_s5_ident_s6_parser_s6___rarg_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::mk_string("identifier"); x_1 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_1, 0, x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s5_ident_s6_parser_s6___rarg_s11___lambda__1), 4, 1); lean::closure_set(x_2, 0, x_1); return x_2; } } obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s6___rarg_s11___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_6; obj* x_7; obj* x_9; obj* x_11; lean::inc(x_2); lean::inc(x_1); x_6 = _l_s4_lean_s6_parser_s5_token(x_1, x_2, x_3); x_7 = lean::cnstr_get(x_6, 0); lean::inc(x_7); x_9 = lean::cnstr_get(x_6, 1); lean::inc(x_9); if (lean::is_shared(x_6)) { lean::dec(x_6); x_11 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); x_11 = x_6; } if (lean::obj_tag(x_7) == 0) { obj* x_12; obj* x_14; obj* x_16; obj* x_18; unsigned char x_19; x_12 = lean::cnstr_get(x_7, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_7, 1); lean::inc(x_14); x_16 = lean::cnstr_get(x_7, 2); lean::inc(x_16); if (lean::is_shared(x_7)) { lean::dec(x_7); x_18 = lean::box(0); } else { lean::cnstr_release(x_7, 0); lean::cnstr_release(x_7, 1); lean::cnstr_release(x_7, 2); x_18 = x_7; } switch (lean::obj_tag(x_12)) { case 0: { unsigned char x_23; lean::dec(x_12); lean::dec(x_18); x_23 = 0; x_19 = x_23; goto lbl_20; } case 1: { obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_35; lean::dec(x_11); lean::dec(x_1); lean::dec(x_2); x_27 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_27); if (lean::is_scalar(x_18)) { x_29 = lean::alloc_cnstr(0, 3, 0); } else { x_29 = x_18; } lean::cnstr_set(x_29, 0, x_12); lean::cnstr_set(x_29, 1, x_14); lean::cnstr_set(x_29, 2, x_27); x_30 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_29); lean::inc(x_27); x_32 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_27, x_30); x_33 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_32, x_0); x_34 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_33); x_35 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_35, 0, x_34); lean::cnstr_set(x_35, 1, x_9); return x_35; } case 2: { unsigned char x_38; lean::dec(x_12); lean::dec(x_18); x_38 = 0; x_19 = x_38; goto lbl_20; } default: { unsigned char x_41; lean::dec(x_12); lean::dec(x_18); x_41 = 0; x_19 = x_41; goto lbl_20; } } lbl_20: { obj* x_42; obj* x_43; obj* x_44; obj* x_47; obj* x_48; obj* x_50; obj* x_53; obj* x_54; obj* x_56; obj* x_57; obj* x_58; obj* x_59; x_42 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_42, 0, x_2); x_43 = lean::box(0); x_44 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_0); lean::inc(x_44); x_47 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_44, x_0, x_42, x_43, x_1, x_14, x_9); x_48 = lean::cnstr_get(x_47, 0); lean::inc(x_48); x_50 = lean::cnstr_get(x_47, 1); lean::inc(x_50); lean::dec(x_47); x_53 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_48); x_54 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_54); x_56 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_54, x_53); x_57 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_56, x_0); x_58 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_57); if (lean::is_scalar(x_11)) { x_59 = lean::alloc_cnstr(0, 2, 0); } else { x_59 = x_11; } lean::cnstr_set(x_59, 0, x_58); lean::cnstr_set(x_59, 1, x_50); return x_59; } } else { obj* x_62; unsigned char x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_70; obj* x_71; obj* x_72; obj* x_73; lean::dec(x_1); lean::dec(x_2); x_62 = lean::cnstr_get(x_7, 0); lean::inc(x_62); x_64 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); if (lean::is_shared(x_7)) { lean::dec(x_7); x_65 = lean::box(0); } else { lean::cnstr_release(x_7, 0); x_65 = x_7; } if (lean::is_scalar(x_65)) { x_66 = lean::alloc_cnstr(1, 1, 1); } else { x_66 = x_65; } lean::cnstr_set(x_66, 0, x_62); lean::cnstr_set_scalar(x_66, sizeof(void*)*1, x_64); x_67 = x_66; x_68 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_68); x_70 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_68, x_67); x_71 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_70, x_0); x_72 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_71); if (lean::is_scalar(x_11)) { x_73 = lean::alloc_cnstr(0, 2, 0); } else { x_73 = x_11; } lean::cnstr_set(x_73, 0, x_72); lean::cnstr_set(x_73, 1, x_9); return x_73; } } } obj* _l_s4_lean_s6_parser_s5_ident_s6_parser(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s5_ident_s6_parser_s6___rarg), 1, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s6_tokens(obj* x_0, obj* x_1) { { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::box(0); return x_4; } } obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg(obj* x_0) { { obj* x_2; obj* x_3; obj* x_6; lean::dec(x_0); x_2 = _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___closed__1; x_3 = _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___closed__2; lean::inc(x_3); lean::inc(x_2); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_2); lean::cnstr_set(x_6, 1, x_3); return x_6; } } obj* _init__l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___closed__1() { { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1), 1, 0); return x_0; } } obj* _init__l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___closed__2() { { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__2), 1, 0); return x_0; } } obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1(obj* x_0) { { switch (lean::obj_tag(x_0)) { case 0: { obj* x_2; lean::dec(x_0); x_2 = _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1_s11___closed__2; lean::inc(x_2); return x_2; } case 1: { obj* x_4; x_4 = lean::cnstr_get(x_0, 0); lean::inc(x_4); lean::dec(x_0); return x_4; } case 2: { obj* x_8; lean::dec(x_0); x_8 = _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1_s11___closed__2; lean::inc(x_8); return x_8; } default: { obj* x_11; lean::dec(x_0); x_11 = _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1_s11___closed__2; lean::inc(x_11); return x_11; } } } } obj* _init__l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_8; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = _l_s4_lean_s6_parser_s9_substring_s10_of__string(x_1); lean::inc(x_0); x_5 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_5, 0, x_0); lean::cnstr_set(x_5, 1, x_1); lean::inc(x_0); lean::inc(x_0); x_8 = lean::alloc_cnstr(0, 5, 0); lean::cnstr_set(x_8, 0, x_0); lean::cnstr_set(x_8, 1, x_3); lean::cnstr_set(x_8, 2, x_5); lean::cnstr_set(x_8, 3, x_0); lean::cnstr_set(x_8, 4, x_0); return x_8; } } obj* _init__l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1_s11___closed__2() { { obj* x_0; x_0 = _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1_s11___closed__1; lean::inc(x_0); return x_0; } } obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__2(obj* x_0) { { obj* x_1; x_1 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg), 1, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s6___rarg(obj* x_0) { { obj* x_1; obj* x_3; x_1 = _l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s6___rarg_s11___closed__1; lean::inc(x_1); x_3 = lean::apply_2(x_0, lean::box(0), x_1); return x_3; } } obj* _init__l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s6___rarg_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(_l_s9___private_3519775105__s9_ident_x27), 3, 0); x_1 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s14_with__trailing_s4___at_s4_lean_s6_parser_s5_token_s9___spec__3), 4, 0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); return x_2; } } obj* _l_s4_lean_s6_parser_s10_raw__ident_s6_parser(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s6___rarg), 1, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s6_tokens(obj* x_0, obj* x_1) { { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::box(0); return x_4; } } obj* _l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s4_view_s6___rarg(obj* x_0) { { obj* x_2; obj* x_3; obj* x_6; lean::dec(x_0); x_2 = _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___closed__1; x_3 = _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___closed__2; lean::inc(x_3); lean::inc(x_2); x_6 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_6, 0, x_2); lean::cnstr_set(x_6, 1, x_3); return x_6; } } obj* _l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s4_view(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s4_view_s6___rarg), 1, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s17_symbol__or__ident_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; obj* x_3; x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s17_symbol__or__ident_s6___rarg_s11___lambda__1), 4, 1); lean::closure_set(x_2, 0, x_1); x_3 = lean::apply_2(x_0, lean::box(0), x_2); return x_3; } } obj* _l_s4_lean_s6_parser_s17_symbol__or__ident_s6___rarg_s11___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_6; obj* x_7; obj* x_9; obj* x_11; lean::inc(x_2); lean::inc(x_1); x_6 = _l_s4_lean_s6_parser_s5_token(x_1, x_2, x_3); x_7 = lean::cnstr_get(x_6, 0); lean::inc(x_7); x_9 = lean::cnstr_get(x_6, 1); lean::inc(x_9); if (lean::is_shared(x_6)) { lean::dec(x_6); x_11 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); x_11 = x_6; } if (lean::obj_tag(x_7) == 0) { obj* x_12; obj* x_14; obj* x_16; obj* x_18; obj* x_19; x_12 = lean::cnstr_get(x_7, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_7, 1); lean::inc(x_14); x_16 = lean::cnstr_get(x_7, 2); lean::inc(x_16); if (lean::is_shared(x_7)) { lean::dec(x_7); x_18 = lean::box(0); } else { lean::cnstr_release(x_7, 0); lean::cnstr_release(x_7, 1); lean::cnstr_release(x_7, 2); x_18 = x_7; } switch (lean::obj_tag(x_12)) { case 0: { obj* x_21; obj* x_23; obj* x_26; x_21 = lean::cnstr_get(x_12, 0); lean::inc(x_21); x_23 = lean::cnstr_get(x_21, 1); lean::inc(x_23); lean::dec(x_21); x_26 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_26, 0, x_23); x_19 = x_26; goto lbl_20; } case 1: { obj* x_27; obj* x_29; obj* x_32; obj* x_33; x_27 = lean::cnstr_get(x_12, 0); lean::inc(x_27); x_29 = lean::cnstr_get(x_27, 1); lean::inc(x_29); lean::dec(x_27); x_32 = _l_s4_lean_s6_parser_s9_substring_s10_to__string(x_29); x_33 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_33, 0, x_32); x_19 = x_33; goto lbl_20; } case 2: { obj* x_34; x_34 = lean::box(0); x_19 = x_34; goto lbl_20; } default: { obj* x_35; x_35 = lean::box(0); x_19 = x_35; goto lbl_20; } } lbl_20: { obj* x_36; if (lean::obj_tag(x_19) == 0) { obj* x_39; lean::dec(x_19); x_39 = lean::box(1); x_36 = x_39; goto lbl_37; } else { obj* x_40; obj* x_43; x_40 = lean::cnstr_get(x_19, 0); lean::inc(x_40); lean::dec(x_19); x_43 = lean::string_dec_eq(x_40, x_0); lean::dec(x_40); if (lean::obj_tag(x_43) == 0) { obj* x_46; lean::dec(x_43); x_46 = lean::box(1); x_36 = x_46; goto lbl_37; } else { obj* x_48; lean::dec(x_43); x_48 = lean::box(0); x_36 = x_48; goto lbl_37; } } lbl_37: { if (lean::obj_tag(x_36) == 0) { obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_59; obj* x_60; obj* x_61; lean::dec(x_36); lean::dec(x_0); lean::dec(x_1); lean::dec(x_2); x_53 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_53); if (lean::is_scalar(x_18)) { x_55 = lean::alloc_cnstr(0, 3, 0); } else { x_55 = x_18; } lean::cnstr_set(x_55, 0, x_12); lean::cnstr_set(x_55, 1, x_14); lean::cnstr_set(x_55, 2, x_53); x_56 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_55); x_57 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_57); x_59 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_57, x_56); x_60 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_59); if (lean::is_scalar(x_11)) { x_61 = lean::alloc_cnstr(0, 2, 0); } else { x_61 = x_11; } lean::cnstr_set(x_61, 0, x_60); lean::cnstr_set(x_61, 1, x_9); return x_61; } else { obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_69; obj* x_70; obj* x_72; lean::dec(x_36); x_63 = _l_s6_string_s5_quote(x_0); x_64 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_64, 0, x_63); x_65 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_65, 0, x_2); x_66 = lean::box(0); x_67 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_67); x_69 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_67, x_64, x_65, x_66, x_1, x_14, x_9); x_70 = lean::cnstr_get(x_69, 0); lean::inc(x_70); x_72 = lean::cnstr_get(x_69, 1); lean::inc(x_72); lean::dec(x_69); if (lean::obj_tag(x_70) == 0) { obj* x_75; obj* x_77; obj* x_80; obj* x_82; obj* x_83; obj* x_84; obj* x_86; obj* x_87; obj* x_88; x_75 = lean::cnstr_get(x_70, 1); lean::inc(x_75); x_77 = lean::cnstr_get(x_70, 2); lean::inc(x_77); lean::dec(x_70); x_80 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_80); if (lean::is_scalar(x_18)) { x_82 = lean::alloc_cnstr(0, 3, 0); } else { x_82 = x_18; } lean::cnstr_set(x_82, 0, x_12); lean::cnstr_set(x_82, 1, x_75); lean::cnstr_set(x_82, 2, x_80); x_83 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_77, x_82); x_84 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_83); lean::inc(x_80); x_86 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_80, x_84); x_87 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_86); if (lean::is_scalar(x_11)) { x_88 = lean::alloc_cnstr(0, 2, 0); } else { x_88 = x_11; } lean::cnstr_set(x_88, 0, x_87); lean::cnstr_set(x_88, 1, x_72); return x_88; } else { obj* x_91; unsigned char x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_100; obj* x_101; obj* x_102; lean::dec(x_12); lean::dec(x_18); x_91 = lean::cnstr_get(x_70, 0); lean::inc(x_91); x_93 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); if (lean::is_shared(x_70)) { lean::dec(x_70); x_94 = lean::box(0); } else { lean::cnstr_release(x_70, 0); x_94 = x_70; } if (lean::is_scalar(x_94)) { x_95 = lean::alloc_cnstr(1, 1, 1); } else { x_95 = x_94; } lean::cnstr_set(x_95, 0, x_91); lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_93); x_96 = x_95; x_97 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_16, x_96); x_98 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_98); x_100 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_98, x_97); x_101 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_100); if (lean::is_scalar(x_11)) { x_102 = lean::alloc_cnstr(0, 2, 0); } else { x_102 = x_11; } lean::cnstr_set(x_102, 0, x_101); lean::cnstr_set(x_102, 1, x_72); return x_102; } } } } } else { obj* x_106; unsigned char x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_114; obj* x_115; obj* x_116; lean::dec(x_0); lean::dec(x_1); lean::dec(x_2); x_106 = lean::cnstr_get(x_7, 0); lean::inc(x_106); x_108 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); if (lean::is_shared(x_7)) { lean::dec(x_7); x_109 = lean::box(0); } else { lean::cnstr_release(x_7, 0); x_109 = x_7; } if (lean::is_scalar(x_109)) { x_110 = lean::alloc_cnstr(1, 1, 1); } else { x_110 = x_109; } lean::cnstr_set(x_110, 0, x_106); lean::cnstr_set_scalar(x_110, sizeof(void*)*1, x_108); x_111 = x_110; x_112 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_112); x_114 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_112, x_111); x_115 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_114); if (lean::is_scalar(x_11)) { x_116 = lean::alloc_cnstr(0, 2, 0); } else { x_116 = x_11; } lean::cnstr_set(x_116, 0, x_115); lean::cnstr_set(x_116, 1, x_9); return x_116; } } } obj* _l_s4_lean_s6_parser_s17_symbol__or__ident(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s17_symbol__or__ident_s6___rarg), 2, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s17_symbol__or__ident_s6_tokens(obj* x_0, obj* x_1, obj* x_2) { { obj* x_6; lean::dec(x_2); lean::dec(x_1); lean::dec(x_0); x_6 = lean::box(0); return x_6; } } obj* _l_s4_lean_s6_parser_s17_symbol__or__ident_s4_view_s6___rarg(obj* x_0, obj* x_1) { { obj* x_4; obj* x_7; lean::dec(x_1); lean::dec(x_0); x_4 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_4); lean::inc(x_4); x_7 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_7, 0, x_4); lean::cnstr_set(x_7, 1, x_4); return x_7; } } obj* _l_s4_lean_s6_parser_s17_symbol__or__ident_s4_view(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s17_symbol__or__ident_s4_view_s6___rarg), 2, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s15_unicode__symbol_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; x_4 = _l_s6_string_s4_trim(x_1); lean::inc(x_4); x_6 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_6, 0, x_4); lean::inc(x_3); x_8 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s12_symbol__core_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__1), 6, 3); lean::closure_set(x_8, 0, x_4); lean::closure_set(x_8, 1, x_3); lean::closure_set(x_8, 2, x_6); x_9 = _l_s6_string_s4_trim(x_2); lean::inc(x_9); x_11 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_11, 0, x_9); x_12 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s12_symbol__core_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__1), 6, 3); lean::closure_set(x_12, 0, x_9); lean::closure_set(x_12, 1, x_3); lean::closure_set(x_12, 2, x_11); x_13 = lean::box(0); x_14 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_14, 0, x_12); lean::cnstr_set(x_14, 1, x_13); x_15 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_15, 0, x_8); lean::cnstr_set(x_15, 1, x_14); x_16 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_combinators_s7_any__of_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__2), 4, 1); lean::closure_set(x_16, 0, x_15); x_17 = lean::apply_2(x_0, lean::box(0), x_16); return x_17; } } obj* _l_s4_lean_s6_parser_s15_unicode__symbol(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s15_unicode__symbol_s6___rarg), 4, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s12_symbol__core_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { { obj* x_9; obj* x_10; obj* x_12; obj* x_14; obj* x_16; lean::dec(x_1); lean::inc(x_4); lean::inc(x_3); x_9 = _l_s4_lean_s6_parser_s5_token(x_3, x_4, x_5); x_10 = lean::cnstr_get(x_9, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_9, 1); lean::inc(x_12); if (lean::is_shared(x_9)) { lean::dec(x_9); x_14 = lean::box(0); } else { lean::cnstr_release(x_9, 0); lean::cnstr_release(x_9, 1); x_14 = x_9; } lean::inc(x_0); x_16 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_16, 0, x_0); if (lean::obj_tag(x_10) == 0) { obj* x_17; obj* x_19; obj* x_21; obj* x_23; unsigned char x_24; x_17 = lean::cnstr_get(x_10, 0); lean::inc(x_17); x_19 = lean::cnstr_get(x_10, 1); lean::inc(x_19); x_21 = lean::cnstr_get(x_10, 2); lean::inc(x_21); if (lean::is_shared(x_10)) { lean::dec(x_10); x_23 = lean::box(0); } else { lean::cnstr_release(x_10, 0); lean::cnstr_release(x_10, 1); lean::cnstr_release(x_10, 2); x_23 = x_10; } switch (lean::obj_tag(x_17)) { case 0: { obj* x_27; obj* x_29; obj* x_32; lean::dec(x_14); x_27 = lean::cnstr_get(x_17, 0); lean::inc(x_27); x_29 = lean::cnstr_get(x_27, 1); lean::inc(x_29); lean::dec(x_27); x_32 = lean::string_dec_eq(x_0, x_29); lean::dec(x_0); if (lean::obj_tag(x_32) == 0) { obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_40; obj* x_42; lean::dec(x_32); x_35 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_35, 0, x_4); x_36 = lean::box(0); x_37 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_29, x_2, x_35, x_36, x_3, x_19, x_12); x_38 = lean::cnstr_get(x_37, 0); lean::inc(x_38); x_40 = lean::cnstr_get(x_37, 1); lean::inc(x_40); if (lean::is_shared(x_37)) { lean::dec(x_37); x_42 = lean::box(0); } else { lean::cnstr_release(x_37, 0); lean::cnstr_release(x_37, 1); x_42 = x_37; } if (lean::obj_tag(x_38) == 0) { obj* x_43; obj* x_45; obj* x_48; obj* x_50; obj* x_51; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; x_43 = lean::cnstr_get(x_38, 1); lean::inc(x_43); x_45 = lean::cnstr_get(x_38, 2); lean::inc(x_45); lean::dec(x_38); x_48 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_48); if (lean::is_scalar(x_23)) { x_50 = lean::alloc_cnstr(0, 3, 0); } else { x_50 = x_23; } lean::cnstr_set(x_50, 0, x_17); lean::cnstr_set(x_50, 1, x_43); lean::cnstr_set(x_50, 2, x_48); x_51 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_45, x_50); x_52 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_21, x_51); lean::inc(x_48); x_54 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_48, x_52); x_55 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_54, x_16); x_56 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_55); if (lean::is_scalar(x_42)) { x_57 = lean::alloc_cnstr(0, 2, 0); } else { x_57 = x_42; } lean::cnstr_set(x_57, 0, x_56); lean::cnstr_set(x_57, 1, x_40); return x_57; } else { obj* x_60; unsigned char x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_69; obj* x_70; obj* x_71; obj* x_72; lean::dec(x_17); lean::dec(x_23); x_60 = lean::cnstr_get(x_38, 0); lean::inc(x_60); x_62 = lean::cnstr_get_scalar(x_38, sizeof(void*)*1); if (lean::is_shared(x_38)) { lean::dec(x_38); x_63 = lean::box(0); } else { lean::cnstr_release(x_38, 0); x_63 = x_38; } if (lean::is_scalar(x_63)) { x_64 = lean::alloc_cnstr(1, 1, 1); } else { x_64 = x_63; } lean::cnstr_set(x_64, 0, x_60); lean::cnstr_set_scalar(x_64, sizeof(void*)*1, x_62); x_65 = x_64; x_66 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_21, x_65); x_67 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_67); x_69 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_67, x_66); x_70 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_69, x_16); x_71 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_70); if (lean::is_scalar(x_42)) { x_72 = lean::alloc_cnstr(0, 2, 0); } else { x_72 = x_42; } lean::cnstr_set(x_72, 0, x_71); lean::cnstr_set(x_72, 1, x_40); return x_72; } } else { obj* x_78; obj* x_80; obj* x_81; obj* x_82; obj* x_84; obj* x_85; obj* x_86; obj* x_87; lean::dec(x_4); lean::dec(x_2); lean::dec(x_3); lean::dec(x_29); lean::dec(x_32); x_78 = _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2; lean::inc(x_78); if (lean::is_scalar(x_23)) { x_80 = lean::alloc_cnstr(0, 3, 0); } else { x_80 = x_23; } lean::cnstr_set(x_80, 0, x_17); lean::cnstr_set(x_80, 1, x_19); lean::cnstr_set(x_80, 2, x_78); x_81 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_21, x_80); x_82 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_82); x_84 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_82, x_81); x_85 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_84, x_16); x_86 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_85); x_87 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_87, 0, x_86); lean::cnstr_set(x_87, 1, x_12); return x_87; } } case 1: { unsigned char x_91; lean::dec(x_17); lean::dec(x_0); lean::dec(x_23); x_91 = 0; x_24 = x_91; goto lbl_25; } case 2: { unsigned char x_95; lean::dec(x_17); lean::dec(x_0); lean::dec(x_23); x_95 = 0; x_24 = x_95; goto lbl_25; } default: { unsigned char x_99; lean::dec(x_17); lean::dec(x_0); lean::dec(x_23); x_99 = 0; x_24 = x_99; goto lbl_25; } } lbl_25: { obj* x_100; obj* x_101; obj* x_102; obj* x_104; obj* x_105; obj* x_107; obj* x_110; obj* x_111; obj* x_113; obj* x_114; obj* x_115; obj* x_116; x_100 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_100, 0, x_4); x_101 = lean::box(0); x_102 = _l_s6_string_s4_join_s11___closed__1; lean::inc(x_102); x_104 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_102, x_2, x_100, x_101, x_3, x_19, x_12); x_105 = lean::cnstr_get(x_104, 0); lean::inc(x_105); x_107 = lean::cnstr_get(x_104, 1); lean::inc(x_107); lean::dec(x_104); x_110 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_21, x_105); x_111 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_111); x_113 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_111, x_110); x_114 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_113, x_16); x_115 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_114); if (lean::is_scalar(x_14)) { x_116 = lean::alloc_cnstr(0, 2, 0); } else { x_116 = x_14; } lean::cnstr_set(x_116, 0, x_115); lean::cnstr_set(x_116, 1, x_107); return x_116; } } else { obj* x_121; unsigned char x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_129; obj* x_130; obj* x_131; obj* x_132; lean::dec(x_4); lean::dec(x_0); lean::dec(x_2); lean::dec(x_3); x_121 = lean::cnstr_get(x_10, 0); lean::inc(x_121); x_123 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); if (lean::is_shared(x_10)) { lean::dec(x_10); x_124 = lean::box(0); } else { lean::cnstr_release(x_10, 0); x_124 = x_10; } if (lean::is_scalar(x_124)) { x_125 = lean::alloc_cnstr(1, 1, 1); } else { x_125 = x_124; } lean::cnstr_set(x_125, 0, x_121); lean::cnstr_set_scalar(x_125, sizeof(void*)*1, x_123); x_126 = x_125; x_127 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_127); x_129 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_127, x_126); x_130 = _l_s4_lean_s6_parser_s9_parsec__t_s15_labels__mk__res_s6___rarg(x_129, x_16); x_131 = _l_s4_lean_s6_parser_s9_parsec__t_s12_try__mk__res_s6___rarg(x_130); if (lean::is_scalar(x_14)) { x_132 = lean::alloc_cnstr(0, 2, 0); } else { x_132 = x_14; } lean::cnstr_set(x_132, 0, x_131); lean::cnstr_set(x_132, 1, x_12); return x_132; } } } obj* _l_s4_list_s5_foldl_s6___main_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { if (lean::obj_tag(x_1) == 0) { obj* x_6; lean::dec(x_1); x_6 = lean::apply_3(x_0, x_2, x_3, x_4); return x_6; } else { obj* x_7; obj* x_9; obj* x_12; obj* x_13; x_7 = lean::cnstr_get(x_1, 0); lean::inc(x_7); x_9 = lean::cnstr_get(x_1, 1); lean::inc(x_9); lean::dec(x_1); x_12 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s6_orelse_s4___at_s4_lean_s6_parser_s15_parse__bin__lit_s9___spec__1_s6___rarg), 5, 2); lean::closure_set(x_12, 0, x_0); lean::closure_set(x_12, 1, x_7); x_13 = _l_s4_list_s5_foldl_s6___main_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__3(x_12, x_9, x_2, x_3, x_4); return x_13; } } } obj* _l_s4_lean_s6_parser_s11_combinators_s7_any__of_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { if (lean::obj_tag(x_0) == 0) { obj* x_5; obj* x_6; obj* x_7; obj* x_11; lean::dec(x_0); x_5 = lean::box(0); x_6 = _l_s4_lean_s6_parser_s11_combinators_s7_any__of_s6___rarg_s11___closed__1; x_7 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_5); lean::inc(x_7); lean::inc(x_6); x_11 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_6, x_7, x_5, x_5, x_1, x_2, x_3); return x_11; } else { obj* x_12; obj* x_14; obj* x_17; x_12 = lean::cnstr_get(x_0, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_0, 1); lean::inc(x_14); lean::dec(x_0); x_17 = _l_s4_list_s5_foldl_s6___main_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__3(x_12, x_14, x_1, x_2, x_3); return x_17; } } } obj* _l_s4_lean_s6_parser_s15_unicode__symbol_s4_lean_s6_parser_s9_has__view_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_26; obj* x_27; x_4 = _l_s6_string_s4_trim(x_1); lean::inc(x_4); x_6 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_6, 0, x_4); lean::inc(x_3); x_8 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s12_symbol__core_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__1), 6, 3); lean::closure_set(x_8, 0, x_4); lean::closure_set(x_8, 1, x_3); lean::closure_set(x_8, 2, x_6); x_9 = _l_s6_string_s4_trim(x_2); lean::inc(x_9); x_11 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_11, 0, x_9); x_12 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s12_symbol__core_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__1), 6, 3); lean::closure_set(x_12, 0, x_9); lean::closure_set(x_12, 1, x_3); lean::closure_set(x_12, 2, x_11); x_13 = lean::box(0); x_14 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_14, 0, x_12); lean::cnstr_set(x_14, 1, x_13); x_15 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_15, 0, x_8); lean::cnstr_set(x_15, 1, x_14); lean::inc(x_15); x_17 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_combinators_s7_any__of_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__2), 4, 1); lean::closure_set(x_17, 0, x_15); x_18 = _l_s4_lean_s6_parser_s16_basic__parser__m_s5_monad; x_19 = _l_s4_lean_s6_parser_s16_basic__parser__m_s13_monad__except; x_20 = _l_s4_lean_s6_parser_s16_basic__parser__m_s4_lean_s6_parser_s13_monad__parsec; x_21 = _l_s4_lean_s6_parser_s16_basic__parser__m_s11_alternative; lean::inc(x_21); lean::inc(x_20); lean::inc(x_19); lean::inc(x_18); x_26 = _l_s4_lean_s6_parser_s11_combinators_s7_any__of_s4_view_s6___rarg(x_18, x_19, x_20, x_21, x_15); x_27 = _l_s4_lean_s6_parser_s11_combinators_s11_monad__lift_s4_view_s6___rarg(x_0, x_17, x_26); return x_27; } } obj* _l_s4_lean_s6_parser_s15_unicode__symbol_s4_lean_s6_parser_s9_has__view(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s15_unicode__symbol_s4_lean_s6_parser_s9_has__view_s6___rarg), 4, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s15_unicode__symbol_s4_lean_s6_parser_s11_has__tokens_s6___rarg(obj* x_0, obj* x_1, obj* x_2) { { obj* x_4; obj* x_6; obj* x_8; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_18; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; lean::inc(x_0); x_4 = _l_s6_string_s4_trim(x_0); lean::inc(x_4); x_6 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_6, 0, x_4); lean::inc(x_2); x_8 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s12_symbol__core_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__1), 6, 3); lean::closure_set(x_8, 0, x_4); lean::closure_set(x_8, 1, x_2); lean::closure_set(x_8, 2, x_6); lean::inc(x_1); x_10 = _l_s6_string_s4_trim(x_1); lean::inc(x_10); x_12 = lean::alloc_closure(reinterpret_cast(_l_s5_dlist_s9_singleton_s6___rarg), 2, 1); lean::closure_set(x_12, 0, x_10); lean::inc(x_2); x_14 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s12_symbol__core_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__1), 6, 3); lean::closure_set(x_14, 0, x_10); lean::closure_set(x_14, 1, x_2); lean::closure_set(x_14, 2, x_12); x_15 = lean::box(0); lean::inc(x_15); lean::inc(x_14); x_18 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_18, 0, x_14); lean::cnstr_set(x_18, 1, x_15); lean::inc(x_18); lean::inc(x_8); x_21 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_21, 0, x_8); lean::cnstr_set(x_21, 1, x_18); lean::inc(x_21); x_23 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_combinators_s7_any__of_s4___at_s4_lean_s6_parser_s15_unicode__symbol_s9___spec__2), 4, 1); lean::closure_set(x_23, 0, x_21); lean::inc(x_2); x_25 = _l_s4_lean_s6_parser_s6_symbol_s6_tokens_s6___rarg(x_0, x_2); x_26 = _l_s4_lean_s6_parser_s6_symbol_s6_tokens_s6___rarg(x_1, x_2); lean::inc(x_15); x_28 = _l_s4_lean_s6_parser_s4_list_s4_cons_s6_tokens_s6___rarg(x_14, x_15, x_26, x_15); x_29 = _l_s4_lean_s6_parser_s4_list_s4_cons_s6_tokens_s6___rarg(x_8, x_18, x_25, x_28); x_30 = _l_s4_lean_s6_parser_s6_tokens(lean::box(0), x_21); x_31 = lean::apply_1(x_30, x_29); x_32 = _l_s4_lean_s6_parser_s6_tokens(lean::box(0), x_23); x_33 = lean::apply_1(x_32, x_31); return x_33; } } obj* _l_s4_lean_s6_parser_s15_unicode__symbol_s4_lean_s6_parser_s11_has__tokens(obj* x_0, obj* x_1) { { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s15_unicode__symbol_s4_lean_s6_parser_s11_has__tokens_s6___rarg), 3, 0); return x_4; } } obj* _l_s4_lean_s6_parser_s15_unicode__symbol_s13_view__default_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { obj* x_8; lean::dec(x_3); lean::dec(x_2); lean::dec(x_1); lean::dec(x_0); x_8 = lean::box(0); return x_8; } } obj* _l_s4_lean_s6_parser_s15_unicode__symbol_s13_view__default(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s15_unicode__symbol_s13_view__default_s6___rarg), 4, 0); return x_2; } } obj* _l_s4_lean_s6_parser_s7_indexed_s6___rarg(obj* x_0, obj* x_1, obj* x_2) { { obj* x_4; obj* x_5; obj* x_7; obj* x_8; lean::dec(x_1); x_4 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s7_indexed_s6___rarg_s11___lambda__1), 5, 1); lean::closure_set(x_4, 0, x_2); x_5 = _l_s4_lean_s6_parser_s7_indexed_s6___rarg_s11___closed__1; lean::inc(x_5); x_7 = lean::alloc_closure(reinterpret_cast(_l_s9_reader__t_s4_bind_s4___at_s4_lean_s6_parser_s14_with__trailing_s9___spec__2_s6___rarg), 5, 2); lean::closure_set(x_7, 0, x_5); lean::closure_set(x_7, 1, x_4); x_8 = lean::apply_2(x_0, lean::box(0), x_7); return x_8; } } obj* _init__l_s4_lean_s6_parser_s7_indexed_s6___rarg_s11___closed__1() { { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s11_peek__token), 3, 0); return x_0; } } obj* _l_s4_lean_s6_parser_s7_indexed_s6___rarg_s11___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { { if (lean::obj_tag(x_1) == 0) { obj* x_7; obj* x_8; obj* x_9; obj* x_13; lean::dec(x_0); lean::dec(x_1); x_7 = lean::box(0); x_8 = _l_s6_string_s4_join_s11___closed__1; x_9 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_7); lean::inc(x_9); lean::inc(x_8); x_13 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_8, x_9, x_7, x_7, x_2, x_3, x_4); return x_13; } else { obj* x_14; x_14 = lean::cnstr_get(x_1, 0); lean::inc(x_14); lean::dec(x_1); switch (lean::obj_tag(x_14)) { case 0: { obj* x_17; obj* x_20; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_34; obj* x_35; x_17 = lean::cnstr_get(x_14, 0); lean::inc(x_17); lean::dec(x_14); x_20 = lean::cnstr_get(x_17, 1); lean::inc(x_20); lean::dec(x_17); x_23 = lean::box(0); x_24 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_24, 0, x_23); lean::cnstr_set(x_24, 1, x_20); x_25 = _l_s6_rbnode_s4_find_s6___main_s4___at_s4_lean_s6_parser_s10_token__map_s6_insert_s9___spec__2_s6___rarg(x_0, x_24); x_26 = _l_s6_option_s9_to__monad_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__2_s6___rarg(x_25, x_2, x_3, x_4); x_27 = lean::cnstr_get(x_26, 0); lean::inc(x_27); x_29 = lean::cnstr_get(x_26, 1); lean::inc(x_29); if (lean::is_shared(x_26)) { lean::dec(x_26); x_31 = lean::box(0); } else { lean::cnstr_release(x_26, 0); lean::cnstr_release(x_26, 1); x_31 = x_26; } x_32 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_32); x_34 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_32, x_27); if (lean::is_scalar(x_31)) { x_35 = lean::alloc_cnstr(0, 2, 0); } else { x_35 = x_31; } lean::cnstr_set(x_35, 0, x_34); lean::cnstr_set(x_35, 1, x_29); return x_35; } case 1: { obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_46; obj* x_48; obj* x_49; lean::dec(x_14); x_37 = _l_s4_lean_s6_parser_s7_indexed_s6___rarg_s11___lambda__1_s11___closed__1; lean::inc(x_37); x_39 = _l_s6_rbnode_s4_find_s6___main_s4___at_s4_lean_s6_parser_s10_token__map_s6_insert_s9___spec__2_s6___rarg(x_0, x_37); x_40 = _l_s6_option_s9_to__monad_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__2_s6___rarg(x_39, x_2, x_3, x_4); x_41 = lean::cnstr_get(x_40, 0); lean::inc(x_41); x_43 = lean::cnstr_get(x_40, 1); lean::inc(x_43); if (lean::is_shared(x_40)) { lean::dec(x_40); x_45 = lean::box(0); } else { lean::cnstr_release(x_40, 0); lean::cnstr_release(x_40, 1); x_45 = x_40; } x_46 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_46); x_48 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_46, x_41); if (lean::is_scalar(x_45)) { x_49 = lean::alloc_cnstr(0, 2, 0); } else { x_49 = x_45; } lean::cnstr_set(x_49, 0, x_48); lean::cnstr_set(x_49, 1, x_43); return x_49; } case 2: { obj* x_50; obj* x_53; obj* x_56; obj* x_57; obj* x_58; obj* x_60; obj* x_62; obj* x_63; obj* x_65; obj* x_66; x_50 = lean::cnstr_get(x_14, 0); lean::inc(x_50); lean::dec(x_14); x_53 = lean::cnstr_get(x_50, 0); lean::inc(x_53); lean::dec(x_50); x_56 = _l_s6_rbnode_s4_find_s6___main_s4___at_s4_lean_s6_parser_s10_token__map_s6_insert_s9___spec__2_s6___rarg(x_0, x_53); x_57 = _l_s6_option_s9_to__monad_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__2_s6___rarg(x_56, x_2, x_3, x_4); x_58 = lean::cnstr_get(x_57, 0); lean::inc(x_58); x_60 = lean::cnstr_get(x_57, 1); lean::inc(x_60); if (lean::is_shared(x_57)) { lean::dec(x_57); x_62 = lean::box(0); } else { lean::cnstr_release(x_57, 0); lean::cnstr_release(x_57, 1); x_62 = x_57; } x_63 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_63); x_65 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_63, x_58); if (lean::is_scalar(x_62)) { x_66 = lean::alloc_cnstr(0, 2, 0); } else { x_66 = x_62; } lean::cnstr_set(x_66, 0, x_65); lean::cnstr_set(x_66, 1, x_60); return x_66; } default: { obj* x_68; obj* x_69; obj* x_70; obj* x_75; obj* x_76; obj* x_78; obj* x_80; lean::dec(x_14); x_68 = lean::box(0); x_69 = _l_s6_string_s4_join_s11___closed__1; x_70 = _l_s5_mjoin_s6___rarg_s11___closed__1; lean::inc(x_2); lean::inc(x_68); lean::inc(x_70); lean::inc(x_69); x_75 = _l_s4_lean_s6_parser_s13_monad__parsec_s5_error_s4___at_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s9___spec__1_s6___rarg(x_69, x_70, x_68, x_68, x_2, x_3, x_4); x_76 = lean::cnstr_get(x_75, 0); lean::inc(x_76); x_78 = lean::cnstr_get(x_75, 1); lean::inc(x_78); if (lean::is_shared(x_75)) { lean::dec(x_75); x_80 = lean::box(0); } else { lean::cnstr_release(x_75, 0); lean::cnstr_release(x_75, 1); x_80 = x_75; } if (lean::obj_tag(x_76) == 0) { obj* x_81; obj* x_83; obj* x_85; obj* x_88; obj* x_89; obj* x_90; obj* x_92; obj* x_95; obj* x_96; x_81 = lean::cnstr_get(x_76, 0); lean::inc(x_81); x_83 = lean::cnstr_get(x_76, 1); lean::inc(x_83); x_85 = lean::cnstr_get(x_76, 2); lean::inc(x_85); lean::dec(x_76); x_88 = _l_s6_rbnode_s4_find_s6___main_s4___at_s4_lean_s6_parser_s10_token__map_s6_insert_s9___spec__2_s6___rarg(x_0, x_81); x_89 = _l_s6_option_s9_to__monad_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__2_s6___rarg(x_88, x_2, x_83, x_78); x_90 = lean::cnstr_get(x_89, 0); lean::inc(x_90); x_92 = lean::cnstr_get(x_89, 1); lean::inc(x_92); lean::dec(x_89); x_95 = _l_s4_lean_s6_parser_s9_parsec__t_s13_bind__mk__res_s6___rarg(x_85, x_90); if (lean::is_scalar(x_80)) { x_96 = lean::alloc_cnstr(0, 2, 0); } else { x_96 = x_80; } lean::cnstr_set(x_96, 0, x_95); lean::cnstr_set(x_96, 1, x_92); return x_96; } else { obj* x_99; unsigned char x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; lean::dec(x_0); lean::dec(x_2); x_99 = lean::cnstr_get(x_76, 0); lean::inc(x_99); x_101 = lean::cnstr_get_scalar(x_76, sizeof(void*)*1); if (lean::is_shared(x_76)) { lean::dec(x_76); x_102 = lean::box(0); } else { lean::cnstr_release(x_76, 0); x_102 = x_76; } if (lean::is_scalar(x_102)) { x_103 = lean::alloc_cnstr(1, 1, 1); } else { x_103 = x_102; } lean::cnstr_set(x_103, 0, x_99); lean::cnstr_set_scalar(x_103, sizeof(void*)*1, x_101); x_104 = x_103; if (lean::is_scalar(x_80)) { x_105 = lean::alloc_cnstr(0, 2, 0); } else { x_105 = x_80; } lean::cnstr_set(x_105, 0, x_104); lean::cnstr_set(x_105, 1, x_78); return x_105; } } } } } } obj* _init__l_s4_lean_s6_parser_s7_indexed_s6___rarg_s11___lambda__1_s11___closed__1() { { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::box(0); x_1 = lean::mk_string("ident"); x_2 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_2, 0, x_0); lean::cnstr_set(x_2, 1, x_1); return x_2; } } obj* _l_s4_lean_s6_parser_s7_indexed(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s4_lean_s6_parser_s7_indexed_s6___rarg), 3, 0); return x_2; } } obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__1_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; x_2 = _l_s6_rbnode_s4_find_s6___main_s4___at_s4_lean_s6_parser_s10_token__map_s6_insert_s9___spec__2_s6___rarg(x_0, x_1); return x_2; } } obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__1(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__1_s6___rarg), 2, 0); return x_2; } } obj* _l_s6_option_s9_to__monad_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__2_s6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { { lean::dec(x_1); if (lean::obj_tag(x_0) == 0) { obj* x_6; lean::dec(x_0); x_6 = _l_s4_lean_s6_parser_s9_parsec__t_s7_failure_s4___at_s4_lean_s6_parser_s5_token_s9___spec__4_s6___rarg(x_2, x_3); return x_6; } else { obj* x_7; obj* x_10; obj* x_12; obj* x_13; x_7 = lean::cnstr_get(x_0, 0); lean::inc(x_7); lean::dec(x_0); x_10 = _l_s4_lean_s6_parser_s6_parsec_s6_result_s7_mk__eps_s6___rarg_s11___closed__1; lean::inc(x_10); x_12 = lean::alloc_cnstr(0, 3, 0); lean::cnstr_set(x_12, 0, x_7); lean::cnstr_set(x_12, 1, x_2); lean::cnstr_set(x_12, 2, x_10); x_13 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_13, 0, x_12); lean::cnstr_set(x_13, 1, x_3); return x_13; } } } obj* _l_s6_option_s9_to__monad_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__2(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s6_option_s9_to__monad_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__2_s6___rarg), 4, 0); return x_2; } } obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__3_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; x_2 = _l_s6_rbnode_s4_find_s6___main_s4___at_s4_lean_s6_parser_s10_token__map_s6_insert_s9___spec__2_s6___rarg(x_0, x_1); return x_2; } } obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__3(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__3_s6___rarg), 2, 0); return x_2; } } obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__4_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; x_2 = _l_s6_rbnode_s4_find_s6___main_s4___at_s4_lean_s6_parser_s10_token__map_s6_insert_s9___spec__2_s6___rarg(x_0, x_1); return x_2; } } obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__4(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__4_s6___rarg), 2, 0); return x_2; } } obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__5_s6___rarg(obj* x_0, obj* x_1) { { obj* x_2; x_2 = _l_s6_rbnode_s4_find_s6___main_s4___at_s4_lean_s6_parser_s10_token__map_s6_insert_s9___spec__2_s6___rarg(x_0, x_1); return x_2; } } obj* _l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__5(obj* x_0) { { obj* x_2; lean::dec(x_0); x_2 = lean::alloc_closure(reinterpret_cast(_l_s5_rbmap_s4_find_s6___main_s4___at_s4_lean_s6_parser_s7_indexed_s9___spec__5_s6___rarg), 2, 0); return x_2; } } void _l_initialize__l_s4_init_s4_lean_s6_parser_s11_combinators(); 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_s6_parser_s5_token() { if (_G_initialized) return; _G_initialized = true; _l_initialize__l_s4_init_s4_lean_s6_parser_s11_combinators(); _l_initialize__l_s4_init_s4_lean_s6_parser_s15_string__literal(); _l_s4_lean_s6_parser_s12_match__token_s11___closed__1 = _init__l_s4_lean_s6_parser_s12_match__token_s11___closed__1(); _l_s4_lean_s6_parser_s12_match__token_s11___closed__2 = _init__l_s4_lean_s6_parser_s12_match__token_s11___closed__2(); _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__1 = _init__l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__1(); _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__2 = _init__l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__2(); _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__3 = _init__l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__3(); _l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__4 = _init__l_s9___private_4089500695__s27_finish__comment__block__aux_s6___main_s11___closed__4(); _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__1 = _init__l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__1(); _l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2 = _init__l_s4_lean_s6_parser_s22_finish__comment__block_s11___closed__2(); _l_s9___private_2012034129__s15_whitespace__aux_s6___main_s11___closed__1 = _init__l_s9___private_2012034129__s15_whitespace__aux_s6___main_s11___closed__1(); _l_s9___private_2012034129__s15_whitespace__aux_s6___main_s11___closed__2 = _init__l_s9___private_2012034129__s15_whitespace__aux_s6___main_s11___closed__2(); _l_s9___private_2012034129__s15_whitespace__aux_s6___main_s11___closed__3 = _init__l_s9___private_2012034129__s15_whitespace__aux_s6___main_s11___closed__3(); _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__4_s11___closed__1 = _init__l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__4_s11___closed__1(); _l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__4_s11___closed__2 = _init__l_s4_lean_s6_parser_s9_parsec__t_s9_lookahead_s4___at_s9___private_2012034129__s15_whitespace__aux_s6___main_s9___spec__4_s11___closed__2(); _l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___closed__1 = _init__l_s4_lean_s6_parser_s14_with__trailing_s6___rarg_s11___closed__1(); _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___closed__1 = _init__l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___closed__1(); _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___closed__2 = _init__l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___closed__2(); _l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3_s11___closed__1 = _init__l_s4_lean_s6_parser_s3_raw_s4_view_s6___rarg_s11___lambda__3_s11___closed__1(); _l_s4_lean_s6_parser_s28_detail__ident__part__escaped = _init__l_s4_lean_s6_parser_s28_detail__ident__part__escaped(); _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27 = _init__l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27(); _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27_s11___lambda__1_s11___closed__1 = _init__l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s13_has__view_x27_s11___lambda__1_s11___closed__1(); _l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s9_has__view = _init__l_s4_lean_s6_parser_s28_detail__ident__part__escaped_s9_has__view(); _l_s4_lean_s6_parser_s19_detail__ident__part = _init__l_s4_lean_s6_parser_s19_detail__ident__part(); _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27 = _init__l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27(); _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__1 = _init__l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__1(); _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__2 = _init__l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__2(); _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__3 = _init__l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__1_s11___closed__3(); _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2_s11___closed__1 = _init__l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2_s11___closed__1(); _l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2_s11___closed__2 = _init__l_s4_lean_s6_parser_s19_detail__ident__part_s13_has__view_x27_s11___lambda__2_s11___closed__2(); _l_s4_lean_s6_parser_s19_detail__ident__part_s9_has__view = _init__l_s4_lean_s6_parser_s19_detail__ident__part_s9_has__view(); _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___closed__1 = _init__l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s11___closed__1(); _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view = _init__l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s9_has__view(); _l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens = _init__l_s4_lean_s6_parser_s19_detail__ident__part_s6_parser_s4_lean_s6_parser_s11_has__tokens(); _l_s4_lean_s6_parser_s21_detail__ident__suffix = _init__l_s4_lean_s6_parser_s21_detail__ident__suffix(); _l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27 = _init__l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27(); _l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__1_s11___closed__1 = _init__l_s4_lean_s6_parser_s21_detail__ident__suffix_s13_has__view_x27_s11___lambda__1_s11___closed__1(); _l_s4_lean_s6_parser_s21_detail__ident__suffix_s9_has__view = _init__l_s4_lean_s6_parser_s21_detail__ident__suffix_s9_has__view(); _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s11___closed__1 = _init__l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s11___closed__1(); _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view = _init__l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s9_has__view(); _l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s11_has__tokens = _init__l_s4_lean_s6_parser_s21_detail__ident__suffix_s6_parser_s4_lean_s6_parser_s11_has__tokens(); _l_s4_lean_s6_parser_s13_detail__ident = _init__l_s4_lean_s6_parser_s13_detail__ident(); _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27 = _init__l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27(); _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__1 = _init__l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__1(); _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__2 = _init__l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__1_s11___closed__2(); _l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__2_s11___closed__1 = _init__l_s4_lean_s6_parser_s13_detail__ident_s13_has__view_x27_s11___lambda__2_s11___closed__1(); _l_s4_lean_s6_parser_s13_detail__ident_s9_has__view = _init__l_s4_lean_s6_parser_s13_detail__ident_s9_has__view(); _l_s4_lean_s6_parser_s17_detail__ident_x27_s11___closed__1 = _init__l_s4_lean_s6_parser_s17_detail__ident_x27_s11___closed__1(); _l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___closed__1 = _init__l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___closed__1(); _l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___closed__2 = _init__l_s4_lean_s6_parser_s13_detail__ident_s6_parser_s11___closed__2(); _l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__1_s11___closed__1 = _init__l_s4_lean_s6_parser_s6_rec__t_s11_run__parsec_s4___at_s4_lean_s6_parser_s13_detail__ident_s6_parser_s9___spec__1_s11___closed__1(); _l_s4_lean_s6_parser_s6_number = _init__l_s4_lean_s6_parser_s6_number(); _l_s4_lean_s6_parser_s6_number_s13_has__view_x27 = _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27(); _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__1 = _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__1(); _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__2 = _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__2(); _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__3 = _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__3(); _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__4 = _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__4(); _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__5 = _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__5(); _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__6 = _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__1_s11___closed__6(); _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__2_s11___closed__1 = _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__2_s11___closed__1(); _l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__2_s11___closed__2 = _init__l_s4_lean_s6_parser_s6_number_s13_has__view_x27_s11___lambda__2_s11___closed__2(); _l_s4_lean_s6_parser_s6_number_s9_has__view = _init__l_s4_lean_s6_parser_s6_number_s9_has__view(); _l_s4_lean_s6_parser_s10_number_x27_s11___closed__1 = _init__l_s4_lean_s6_parser_s10_number_x27_s11___closed__1(); _l_s4_lean_s6_parser_s11_string__lit = _init__l_s4_lean_s6_parser_s11_string__lit(); _l_s4_lean_s6_parser_s11_string__lit_s13_has__view_x27 = _init__l_s4_lean_s6_parser_s11_string__lit_s13_has__view_x27(); _l_s4_lean_s6_parser_s11_string__lit_s9_has__view = _init__l_s4_lean_s6_parser_s11_string__lit_s9_has__view(); _l_s4_lean_s6_parser_s15_string__lit_x27_s11___closed__1 = _init__l_s4_lean_s6_parser_s15_string__lit_x27_s11___closed__1(); _l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_s11___closed__1 = _init__l_s4_lean_s6_parser_s17_parse__hex__digit_s4___at_s4_lean_s6_parser_s15_string__lit_x27_s9___spec__4_s11___closed__1(); _l_s4_lean_s6_parser_s5_token_s11___closed__1 = _init__l_s4_lean_s6_parser_s5_token_s11___closed__1(); _l_s4_lean_s6_parser_s6_number_s6_parser_s6___rarg_s11___closed__1 = _init__l_s4_lean_s6_parser_s6_number_s6_parser_s6___rarg_s11___closed__1(); _l_s4_lean_s6_parser_s6_number_s6_parser_s4_view_s6___rarg_s11___closed__1 = _init__l_s4_lean_s6_parser_s6_number_s6_parser_s4_view_s6___rarg_s11___closed__1(); _l_s4_lean_s6_parser_s6_number_s6_parser_s4_view_s6___rarg_s11___closed__2 = _init__l_s4_lean_s6_parser_s6_number_s6_parser_s4_view_s6___rarg_s11___closed__2(); _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s6___rarg_s11___closed__1 = _init__l_s4_lean_s6_parser_s11_string__lit_s6_parser_s6___rarg_s11___closed__1(); _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view_s6___rarg_s11___closed__1 = _init__l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view_s6___rarg_s11___closed__1(); _l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view_s6___rarg_s11___closed__2 = _init__l_s4_lean_s6_parser_s11_string__lit_s6_parser_s4_view_s6___rarg_s11___closed__2(); _l_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s11___closed__1 = _init__l_s4_lean_s6_parser_s11_string__lit_s4_view_s5_value_s11___closed__1(); _l_s4_lean_s6_parser_s5_ident_s6_parser_s6___rarg_s11___closed__1 = _init__l_s4_lean_s6_parser_s5_ident_s6_parser_s6___rarg_s11___closed__1(); _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___closed__1 = _init__l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___closed__1(); _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___closed__2 = _init__l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___closed__2(); _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1_s11___closed__1 = _init__l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1_s11___closed__1(); _l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1_s11___closed__2 = _init__l_s4_lean_s6_parser_s5_ident_s6_parser_s4_view_s6___rarg_s11___lambda__1_s11___closed__2(); _l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s6___rarg_s11___closed__1 = _init__l_s4_lean_s6_parser_s10_raw__ident_s6_parser_s6___rarg_s11___closed__1(); _l_s4_lean_s6_parser_s7_indexed_s6___rarg_s11___closed__1 = _init__l_s4_lean_s6_parser_s7_indexed_s6___rarg_s11___closed__1(); _l_s4_lean_s6_parser_s7_indexed_s6___rarg_s11___lambda__1_s11___closed__1 = _init__l_s4_lean_s6_parser_s7_indexed_s6___rarg_s11___lambda__1_s11___closed__1(); }