// Lean compiler output // Module: init.lean.ir.format // Imports: init.lean.format init.lean.parser.identifier init.lean.ir.reserved init.lean.ir.ir #include "runtime/object.h" #include "runtime/apply.h" typedef lean::object obj; typedef lean::usize usize; typedef lean::uint8 uint8; typedef lean::uint16 uint16; typedef lean::uint32 uint32; typedef lean::uint64 uint64; #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" #pragma clang diagnostic ignored "-Wunused-label" #elif defined(__GNUC__) && !defined(__CLANG__) #pragma GCC diagnostic ignored "-Wunused-parameter" #pragma GCC diagnostic ignored "-Wunused-label" #pragma GCC diagnostic ignored "-Wunused-but-set-variable" #endif obj* l_lean_ir_block_decorate__error(obj*, obj*); obj* l_lean_ir_assign__binop_to__format___main___closed__18; obj* l_lean_uint16__has__to__format___boxed(obj*); obj* l_lean_ir_assign__binop_to__format___main___closed__2; obj* l_lean_ir_unop_to__format___main___closed__1; obj* l_lean_ir_decl_has__to__format; obj* l_lean_ir_should__escape__aux___main___boxed(obj*, obj*, obj*); obj* l_lean_ir_unop_to__format___main(uint8); obj* l_lean_ir_var_has__to__format(obj*); obj* l_lean_ir_phi_decorate__error___rarg___lambda__1___closed__2; obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__6(usize); obj* l_lean_ir_terminator_to__format___main(obj*); extern obj* l_lean_format_paren___closed__1; obj* l_lean_ir_terminator_to__format(obj*); obj* l_lean_ir_block_to__format___main(obj*); obj* l_lean_ir_unop_has__to__format; obj* l_lean_ir_instr_to__format___main___closed__12; namespace lean { obj* uint16_to_nat(uint16); } obj* l_lean_ir_decl_to__format(obj*); obj* l_lean_ir_assign__unop_to__format___main___closed__17; obj* l_lean_ir_should__escape__aux___main(obj*, uint8, obj*); obj* l_lean_ir_instr_to__format___main(obj*); obj* l_lean_to__fmt___at_lean_ir_type_has__to__string___spec__1(uint8); obj* l_lean_ir_type_to__format___main___boxed(obj*); obj* l_lean_ir_assign__binop_to__format___main___closed__14; obj* l_lean_ir_assign__binop_to__format___boxed(obj*); obj* l_lean_ir_header_has__to__format; obj* l_lean_ir_arg_to__format___main(obj*); obj* l_lean_ir_assign__binop_to__format___main___closed__11; obj* l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__2(obj*); obj* l_lean_ir_terminator_to__format___main___closed__1; obj* l_lean_ir_result_has__to__string; obj* l_lean_ir_assign__unop_has__to__format; obj* l_lean_ir_assign__unop_to__format___main___closed__13; obj* l_lean_ir_assign__unop_to__format___main___boxed(obj*); obj* l_lean_format_prefix__join___main___at_lean_ir_instr_to__format___main___spec__3(obj*, obj*); obj* l_lean_ir_assign__binop_to__format___main___closed__24; extern obj* l_lean_id__end__escape; obj* l_lean_ir_assign__binop_to__format___main___closed__21; obj* l_lean_ir_assign__binop_to__format___main___closed__1; obj* l_lean_to__fmt___at_lean_ir_assign__unop_has__to__string___spec__1___boxed(obj*); obj* l_lean_format_join__sep___main___at_lean_ir_terminator_to__format___main___spec__3(obj*, obj*); obj* l_lean_ir_instr_to__format___main___closed__7; obj* l_lean_ir_should__escape__aux___boxed(obj*, obj*, obj*); obj* l_lean_ir_instr_to__format___main___closed__1; obj* l_lean_ir_assign__binop_to__format___main___closed__25; obj* l_lean_ir_assign__binop_to__format(uint8); obj* l_lean_ir_unop_to__format___main___closed__6; obj* l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1___closed__1; obj* l_lean_ir_phi_to__format___main___closed__1; obj* l_lean_ir_type_to__format___main___closed__5; obj* l_lean_ir_unop_to__format___boxed(obj*); obj* l_lean_ir_phi_decorate__error(obj*, obj*); obj* l_lean_ir_type_to__format(uint8); obj* l_lean_ir_instr_to__format(obj*); obj* l_lean_ir_instr_to__format___main___closed__11; obj* l_lean_list_to__format___main___at_lean_ir_terminator_to__format___main___spec__2(obj*); obj* l_lean_ir_assign__binop_has__to__string; obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__5___boxed(obj*); obj* l_lean_ir_assign__binop_to__format___main___closed__13; obj* l_lean_ir_unop_to__format___main___closed__2; obj* l_lean_ir_assign__unop_has__to__string; obj* l_lean_to__fmt___at_lean_ir_result_has__to__string___spec__1(obj*); obj* l_lean_ir_phi_decorate__error___rarg___lambda__1(obj*, obj*, obj*); obj* l_lean_ir_assign__binop_to__format___main___closed__4; obj* l_lean_ir_id_to__string(obj*); obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(obj*); obj* l_lean_has__repr___lambda__1(obj*); obj* l_lean_ir_assign__unop_to__format___main___closed__10; obj* l_string_quote(obj*); obj* l_lean_ir_type_to__format___main___closed__3; obj* l_int_repr___main(obj*); extern obj* l_lean_list_to__format___main___rarg___closed__1; obj* l_lean_ir_type_to__format___main(uint8); obj* l_lean_ir_assign__unop_to__format___main___closed__1; obj* l_lean_format_join__sep___main___at_lean_ir_decl_to__format___main___spec__1(obj*, obj*); namespace lean { obj* string_iterator_next(obj*); } obj* l_lean_ir_assign__binop_to__format___main___closed__19; obj* l_lean_ir_arg_has__to__string; obj* l_lean_ir_blockid_has__to__format(obj*); obj* l_lean_ir_literal_to__format(obj*); obj* l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1___closed__2; obj* l_lean_ir_type_to__format___main___closed__11; obj* l_lean_ir_assign__binop_to__format___main(uint8); obj* l_lean_ir_block_to__format(obj*); obj* l_lean_ir_type_to__format___main___closed__9; obj* l_lean_ir_literal_has__to__string; obj* l_lean_ir_block_has__to__format; obj* l_lean_ir_assign__binop_to__format___main___closed__10; namespace lean { obj* string_length(obj*); } obj* l_lean_ir_instr_decorate__error___rarg(obj*, obj*, obj*); obj* l_lean_ir_assign__binop_to__format___main___boxed(obj*); obj* l_lean_ir_assign__binop_to__format___main___closed__5; uint8 l_lean_ir_is__reserved(obj*); obj* l_lean_ir_instr_to__format___main___closed__9; obj* l_lean_ir_assign__binop_to__format___main___closed__22; obj* l_lean_ir_tag_has__to__format; obj* l_lean_ir_assign__unop_to__format___main___closed__12; namespace lean { uint32 string_iterator_curr(obj*); } extern obj* l_lean_name_to__string___closed__1; obj* l_lean_ir_decl_has__to__string; obj* l_lean_to__fmt___at_lean_ir_arg_has__to__string___spec__1(obj*); obj* l_lean_ir_instr_to__format___main___closed__13; namespace lean { obj* string_append(obj*, obj*); } obj* l_uint16_has__to__string___boxed(obj*); obj* l_lean_ir_assign__unop_to__format___main___closed__14; extern obj* l_lean_format_sbracket___closed__2; obj* l_function_comp___rarg(obj*, obj*, obj*); obj* l_lean_ir_assign__unop_to__format___main___closed__18; obj* l_lean_format_join__sep___main___at_lean_ir_header_to__format___spec__1(obj*, obj*); obj* l_lean_ir_instr_has__to__string; obj* l_lean_ir_assign__unop_to__format___main___closed__16; obj* l_lean_ir_literal_to__format___main(obj*); obj* l_lean_ir_unop_to__format___main___closed__4; obj* l_lean_ir_escape__string___closed__2; obj* l_lean_ir_assign__unop_to__format___main___closed__3; obj* l_lean_ir_arg_has__to__format; obj* l_lean_format_join__sep___main___at_lean_ir_instr_to__format___main___spec__7(obj*, obj*); obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__2(obj*); obj* l_lean_ir_terminator_has__to__string; obj* l_lean_ir_assign__unop_to__format___main___closed__2; obj* l_lean_format_join__suffix___main___at_lean_ir_block_to__format___main___spec__1(obj*, obj*); obj* l_lean_ir_terminator_decorate__error___rarg___lambda__1___closed__1; obj* l_lean_ir_decl_header___main(obj*); obj* l_lean_ir_unop_to__format___main___closed__9; obj* l_lean_ir_id_to__string___main(obj*); obj* l_lean_to__fmt___at_lean_ir_instr_has__to__string___spec__1(obj*); obj* l_lean_to__fmt___at_lean_ir_type_has__to__string___spec__1___boxed(obj*); obj* l_lean_ir_result_to__format(obj*); obj* l_lean_ir_instr_to__format___main___closed__6; uint8 l_lean_is__id__rest(uint32); obj* l_lean_ir_result_to__format___main(obj*); obj* l_lean_ir_assign__binop_to__format___main___closed__20; obj* l_lean_ir_phi_to__format___main(obj*); obj* l_lean_ir_type_to__format___main___closed__1; obj* l_lean_ir_arg_to__format(obj*); obj* l_lean_ir_type_to__format___main___closed__8; obj* l_lean_ir_should__escape(obj*); obj* l_lean_ir_result_has__to__format; obj* l_lean_ir_unop_to__format___main___closed__5; obj* l_lean_ir_unop_has__to__string; obj* l_lean_ir_assign__binop_to__format___main___closed__23; obj* l_lean_ir_assign__binop_has__to__format; obj* l_lean_ir_decl_to__format___main___closed__1; obj* l_lean_ir_block_to__format___main___closed__1; obj* l_lean_ir_unop_to__format___main___closed__7; obj* l_lean_format_join__suffix___main___at_lean_ir_block_to__format___main___spec__2(obj*, obj*); obj* l_lean_to__fmt___at_lean_ir_unop_has__to__string___spec__1(uint8); obj* l_lean_ir_instr_to__format___main___closed__10; obj* l_lean_ir_phi_has__to__format; extern obj* l_lean_format_sbracket___closed__1; obj* l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1(uint8); obj* l_lean_ir_header_decorate__error___rarg___lambda__1___closed__1; obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__4___boxed(obj*); obj* l_lean_ir_assign__binop_to__format___main___closed__15; extern obj* l_lean_list_to__format___main___rarg___closed__2; obj* l_lean_to__fmt___at_lean_ir_assign__unop_has__to__string___spec__1(uint8); obj* l_lean_ir_assign__binop_to__format___main___closed__12; obj* l_lean_ir_block_has__to__string; obj* l_lean_ir_decl_to__format___main___closed__2; obj* l_lean_ir_header_decorate__error___rarg___lambda__1(obj*, obj*, obj*); obj* l_lean_ir_type_to__format___main___closed__10; obj* l_lean_ir_block_decorate__error___rarg(obj*, obj*, obj*); obj* l_lean_ir_decl_to__format___main(obj*); obj* l_lean_ir_decl_decorate__error(obj*, obj*); obj* l_lean_ir_header_decorate__error___rarg(obj*, obj*, obj*); obj* l_lean_ir_terminator_decorate__error___rarg(obj*, obj*, obj*); obj* l_lean_ir_assign__binop_to__format___main___closed__27; obj* l_lean_to__fmt___at_lean_ir_terminator_has__to__string___spec__1(obj*); obj* l_lean_ir_sizet__entry_to__format___main(obj*); obj* l_lean_ir_sizet__entry_to__format___main___closed__1; obj* l_lean_to__fmt___at_lean_ir_assign__binop_has__to__string___spec__1___boxed(obj*); obj* l_lean_ir_assign__unop_to__format(uint8); obj* l_lean_ir_phi_has__to__string; obj* l_lean_ir_phi_to__format(obj*); obj* l_lean_ir_type_has__to__string; obj* l_lean_format_group___main(obj*); obj* l_lean_to__fmt___at_lean_ir_header_has__to__string___spec__1(obj*); obj* l_lean_ir_assign__unop_to__format___boxed(obj*); obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__5(uint16); extern obj* l_lean_id__begin__escape; obj* l_lean_ir_assign__binop_to__format___main___closed__17; obj* l_lean_ir_id__part_to__string(obj*); obj* l_lean_ir_header_to__format(obj*); obj* l_lean_ir_instr_to__format___main___closed__3; obj* l_lean_ir_assign__unop_to__format___main___closed__5; obj* l_lean_ir_assign__unop_to__format___main___closed__9; obj* l_lean_to__fmt___at_lean_ir_terminator_to__format___main___spec__1(obj*); obj* l_lean_ir_instr_to__format___main___closed__2; obj* l_lean_ir_type_to__format___main___closed__12; obj* l_lean_ir_type_to__format___main___closed__4; obj* l_lean_ir_instr_decorate__error___rarg___lambda__1(obj*, obj*, obj*); obj* l_lean_ir_type_has__to__format; obj* l_lean_ir_type_to__format___main___closed__2; obj* l_lean_ir_assign__binop_to__format___main___closed__16; obj* l_lean_ir_escape__string(obj*); obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__4(uint16); namespace lean { uint8 name_dec_eq(obj*, obj*); } obj* l_lean_ir_unop_to__format___main___boxed(obj*); obj* l_lean_ir_block_to__format___main___closed__2; obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__6___boxed(obj*); obj* l_lean_ir_terminator_has__to__format; obj* l_lean_ir_assign__binop_to__format___main___closed__7; obj* l_lean_ir_assign__binop_to__format___main___closed__26; obj* l_lean_to__fmt___at_lean_ir_assign__binop_has__to__string___spec__1(uint8); obj* l_lean_ir_terminator_decorate__error___rarg___lambda__1(obj*, obj*, obj*); obj* l_lean_ir_unop_to__format___main___closed__8; obj* l_lean_ir_tag_has__to__string; obj* l_lean_ir_escape__string___closed__1; obj* l_lean_ir_phi_decorate__error___rarg___lambda__1___closed__1; obj* l_lean_ir_id_to__string___main___closed__1; extern obj* l_lean_format_flatten___main___closed__1; obj* l_lean_ir_assign__unop_to__format___main___closed__11; obj* l_lean_ir_assign__unop_to__format___main___closed__8; namespace lean { obj* string_mk_iterator(obj*); } obj* l_lean_to__fmt___at_lean_ir_terminator_to__format___main___spec__4(obj*); obj* l_lean_ir_header_has__to__string; extern obj* l_lean_format_paren___closed__2; obj* l_lean_to__fmt___at_lean_ir_phi_has__to__string___spec__1(obj*); obj* l_lean_to__fmt___at_lean_ir_literal_has__to__string___spec__1(obj*); obj* l_lean_ir_assign__unop_to__format___main___closed__15; obj* l_lean_ir_decl_decorate__error___rarg(obj*, obj*, obj*); obj* l_lean_ir_literal_has__to__format; obj* l_lean_ir_assign__binop_to__format___main___closed__8; obj* l_lean_to__fmt___at_lean_ir_unop_has__to__string___spec__1___boxed(obj*); obj* l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__3(obj*); obj* l_lean_ir_type_to__format___main___closed__7; extern obj* l_lean_format_sbracket___closed__3; obj* l_lean_to__fmt___at_lean_ir_decl_has__to__string___spec__1(obj*); obj* l_lean_ir_assign__unop_to__format___main(uint8); obj* l_lean_ir_block_decorate__error___rarg___lambda__1___closed__1; obj* l_lean_ir_instr_decorate__error(obj*, obj*); obj* l_lean_ir_should__escape__aux(obj*, uint8, obj*); obj* l_lean_ir_assign__unop_to__format___main___closed__6; obj* l_lean_ir_unop_to__format(uint8); uint8 l_lean_is__id__first(uint32); obj* l_lean_ir_terminator_to__format___main___closed__2; obj* l_lean_ir_instr_has__to__format; obj* l_nat_repr(obj*); obj* l_lean_ir_type_to__format___main___closed__6; obj* l_lean_ir_sizet__entry_to__format(obj*); obj* l_lean_ir_fnid_has__to__format(obj*); obj* l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1___boxed(obj*); obj* l_lean_to__fmt___at_lean_ir_block_has__to__string___spec__1(obj*); obj* l_lean_ir_assign__binop_to__format___main___closed__6; obj* l_lean_ir_instr_to__format___main___closed__5; obj* l_lean_to__fmt___at_lean_ir_sizet__entry_to__format___main___spec__1(obj*); obj* l_lean_ir_instr_to__format___main___closed__4; obj* l_lean_ir_terminator_decorate__error(obj*, obj*); namespace lean { obj* string_push(obj*, uint32); } obj* l_lean_ir_header_decorate__error(obj*, obj*); obj* l_lean_ir_assign__unop_to__format___main___closed__7; obj* l_lean_ir_fnid_has__to__string(obj*); obj* l_lean_ir_assign__binop_to__format___main___closed__3; obj* l_lean_ir_instr_to__format___main___closed__8; obj* l_lean_ir_block_decorate__error___rarg___lambda__1(obj*, obj*, obj*); obj* l_lean_ir_type_to__format___boxed(obj*); namespace lean { obj* usize_to_nat(usize); } obj* l_lean_ir_assign__binop_to__format___main___closed__9; obj* l_lean_ir_terminator_to__format___main___closed__3; obj* l_lean_ir_assign__unop_to__format___main___closed__4; obj* l_lean_ir_phi_decorate__error___rarg(obj*, obj*, obj*); obj* l_lean_ir_instr_decorate__error___rarg___lambda__1___closed__1; obj* l_lean_ir_unop_to__format___main___closed__3; obj* l_lean_ir_should__escape__aux___main(obj* x_0, uint8 x_1, obj* x_2) { _start: { obj* x_3; uint8 x_4; x_3 = lean::mk_nat_obj(0u); x_4 = lean::nat_dec_eq(x_0, x_3); lean::dec(x_3); if (x_4 == 0) { obj* x_6; obj* x_7; x_6 = lean::mk_nat_obj(1u); x_7 = lean::nat_sub(x_0, x_6); lean::dec(x_6); lean::dec(x_0); if (x_1 == 0) { uint32 x_10; uint8 x_11; x_10 = lean::string_iterator_curr(x_2); x_11 = l_lean_is__id__rest(x_10); if (x_11 == 0) { uint8 x_14; obj* x_15; lean::dec(x_7); lean::dec(x_2); x_14 = 1; x_15 = lean::box(x_14); return x_15; } else { if (x_1 == 0) { obj* x_16; x_16 = lean::string_iterator_next(x_2); x_0 = x_7; x_2 = x_16; goto _start; } else { obj* x_20; lean::dec(x_7); lean::dec(x_2); x_20 = lean::box(x_1); return x_20; } } } else { uint32 x_21; uint8 x_22; x_21 = lean::string_iterator_curr(x_2); x_22 = l_lean_is__id__first(x_21); if (x_22 == 0) { if (x_1 == 0) { obj* x_23; x_23 = lean::string_iterator_next(x_2); x_0 = x_7; x_2 = x_23; goto _start; } else { obj* x_27; lean::dec(x_7); lean::dec(x_2); x_27 = lean::box(x_1); return x_27; } } else { obj* x_28; uint8 x_29; x_28 = lean::string_iterator_next(x_2); x_29 = 0; x_0 = x_7; x_1 = x_29; x_2 = x_28; goto _start; } } } else { uint8 x_33; obj* x_34; lean::dec(x_0); lean::dec(x_2); x_33 = 0; x_34 = lean::box(x_33); return x_34; } } } obj* l_lean_ir_should__escape__aux___main___boxed(obj* x_0, obj* x_1, obj* x_2) { _start: { uint8 x_3; obj* x_4; x_3 = lean::unbox(x_1); x_4 = l_lean_ir_should__escape__aux___main(x_0, x_3, x_2); return x_4; } } obj* l_lean_ir_should__escape__aux(obj* x_0, uint8 x_1, obj* x_2) { _start: { obj* x_3; x_3 = l_lean_ir_should__escape__aux___main(x_0, x_1, x_2); return x_3; } } obj* l_lean_ir_should__escape__aux___boxed(obj* x_0, obj* x_1, obj* x_2) { _start: { uint8 x_3; obj* x_4; x_3 = lean::unbox(x_1); x_4 = l_lean_ir_should__escape__aux(x_0, x_3, x_2); return x_4; } } obj* l_lean_ir_should__escape(obj* x_0) { _start: { obj* x_1; obj* x_2; uint8 x_3; obj* x_4; x_1 = lean::string_length(x_0); x_2 = lean::string_mk_iterator(x_0); x_3 = 1; x_4 = l_lean_ir_should__escape__aux___main(x_1, x_3, x_2); return x_4; } } obj* _init_l_lean_ir_escape__string___closed__1() { _start: { obj* x_0; obj* x_1; uint32 x_2; obj* x_3; x_0 = lean::mk_string(""); x_1 = l_lean_id__begin__escape; x_2 = lean::unbox_uint32(x_1); x_3 = lean::string_push(x_0, x_2); return x_3; } } obj* _init_l_lean_ir_escape__string___closed__2() { _start: { obj* x_0; obj* x_1; uint32 x_2; obj* x_3; x_0 = lean::mk_string(""); x_1 = l_lean_id__end__escape; x_2 = lean::unbox_uint32(x_1); x_3 = lean::string_push(x_0, x_2); return x_3; } } obj* l_lean_ir_escape__string(obj* x_0) { _start: { obj* x_1; obj* x_3; obj* x_5; obj* x_6; x_1 = l_lean_ir_escape__string___closed__1; lean::inc(x_1); x_3 = lean::string_append(x_1, x_0); lean::dec(x_0); x_5 = l_lean_ir_escape__string___closed__2; x_6 = lean::string_append(x_3, x_5); return x_6; } } obj* l_lean_ir_id__part_to__string(obj* x_0) { _start: { obj* x_2; uint8 x_3; lean::inc(x_0); x_2 = l_lean_ir_should__escape(x_0); x_3 = lean::unbox(x_2); lean::dec(x_2); if (x_3 == 0) { return x_0; } else { obj* x_5; x_5 = l_lean_ir_escape__string(x_0); return x_5; } } } obj* _init_l_lean_ir_id_to__string___main___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string(""); x_1 = l_lean_ir_escape__string(x_0); return x_1; } } obj* l_lean_ir_id_to__string___main(obj* x_0) { _start: { switch (lean::obj_tag(x_0)) { case 0: { obj* x_2; lean::dec(x_0); x_2 = l_lean_ir_id_to__string___main___closed__1; lean::inc(x_2); return x_2; } case 1: { obj* x_4; obj* x_6; obj* x_9; uint8 x_10; x_4 = lean::cnstr_get(x_0, 0); lean::inc(x_4); x_6 = lean::cnstr_get(x_0, 1); lean::inc(x_6); lean::dec(x_0); x_9 = lean::box(0); x_10 = lean::name_dec_eq(x_4, x_9); lean::dec(x_9); if (x_10 == 0) { obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; x_12 = l_lean_ir_id_to__string___main(x_4); x_13 = l_lean_name_to__string___closed__1; x_14 = lean::string_append(x_12, x_13); x_15 = l_lean_ir_id__part_to__string(x_6); x_16 = lean::string_append(x_14, x_15); lean::dec(x_15); return x_16; } else { uint8 x_20; lean::dec(x_4); lean::inc(x_6); x_20 = l_lean_ir_is__reserved(x_6); if (x_20 == 0) { obj* x_21; x_21 = l_lean_ir_id__part_to__string(x_6); return x_21; } else { obj* x_22; x_22 = l_lean_ir_escape__string(x_6); return x_22; } } } default: { obj* x_23; obj* x_25; obj* x_28; uint8 x_29; x_23 = lean::cnstr_get(x_0, 0); lean::inc(x_23); x_25 = lean::cnstr_get(x_0, 1); lean::inc(x_25); lean::dec(x_0); x_28 = lean::box(0); x_29 = lean::name_dec_eq(x_23, x_28); lean::dec(x_28); if (x_29 == 0) { obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; x_31 = l_lean_ir_id_to__string___main(x_23); x_32 = l_lean_name_to__string___closed__1; x_33 = lean::string_append(x_31, x_32); x_34 = l_nat_repr(x_25); x_35 = l_lean_ir_escape__string(x_34); x_36 = lean::string_append(x_33, x_35); lean::dec(x_35); return x_36; } else { obj* x_39; obj* x_40; lean::dec(x_23); x_39 = l_nat_repr(x_25); x_40 = l_lean_ir_escape__string(x_39); return x_40; } } } } } obj* l_lean_ir_id_to__string(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_id_to__string___main(x_0); return x_1; } } obj* l_lean_ir_var_has__to__format(obj* x_0) { _start: { obj* x_1; obj* x_2; x_1 = l_lean_ir_id_to__string___main(x_0); x_2 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_2, 0, x_1); return x_2; } } obj* l_lean_ir_blockid_has__to__format(obj* x_0) { _start: { obj* x_1; obj* x_2; x_1 = l_lean_ir_id_to__string___main(x_0); x_2 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_2, 0, x_1); return x_2; } } obj* l_lean_ir_fnid_has__to__format(obj* x_0) { _start: { obj* x_1; obj* x_2; x_1 = l_lean_ir_id_to__string___main(x_0); x_2 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_2, 0, x_1); return x_2; } } obj* l_lean_ir_fnid_has__to__string(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_id_to__string___main(x_0); return x_1; } } obj* _init_l_lean_ir_tag_has__to__format() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_uint16__has__to__format___boxed), 1, 0); return x_0; } } obj* _init_l_lean_ir_tag_has__to__string() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_uint16_has__to__string___boxed), 1, 0); return x_0; } } obj* _init_l_lean_ir_type_to__format___main___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("bool"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_type_to__format___main___closed__2() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("byte"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_type_to__format___main___closed__3() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("uint16"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_type_to__format___main___closed__4() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("uint32"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_type_to__format___main___closed__5() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("uint64"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_type_to__format___main___closed__6() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("usize"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_type_to__format___main___closed__7() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("int16"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_type_to__format___main___closed__8() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("int32"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_type_to__format___main___closed__9() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("int64"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_type_to__format___main___closed__10() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("float"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_type_to__format___main___closed__11() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("double"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_type_to__format___main___closed__12() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("object"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_type_to__format___main(uint8 x_0) { _start: { switch (x_0) { case 0: { obj* x_1; x_1 = l_lean_ir_type_to__format___main___closed__1; lean::inc(x_1); return x_1; } case 1: { obj* x_3; x_3 = l_lean_ir_type_to__format___main___closed__2; lean::inc(x_3); return x_3; } case 2: { obj* x_5; x_5 = l_lean_ir_type_to__format___main___closed__3; lean::inc(x_5); return x_5; } case 3: { obj* x_7; x_7 = l_lean_ir_type_to__format___main___closed__4; lean::inc(x_7); return x_7; } case 4: { obj* x_9; x_9 = l_lean_ir_type_to__format___main___closed__5; lean::inc(x_9); return x_9; } case 5: { obj* x_11; x_11 = l_lean_ir_type_to__format___main___closed__6; lean::inc(x_11); return x_11; } case 6: { obj* x_13; x_13 = l_lean_ir_type_to__format___main___closed__7; lean::inc(x_13); return x_13; } case 7: { obj* x_15; x_15 = l_lean_ir_type_to__format___main___closed__8; lean::inc(x_15); return x_15; } case 8: { obj* x_17; x_17 = l_lean_ir_type_to__format___main___closed__9; lean::inc(x_17); return x_17; } case 9: { obj* x_19; x_19 = l_lean_ir_type_to__format___main___closed__10; lean::inc(x_19); return x_19; } case 10: { obj* x_21; x_21 = l_lean_ir_type_to__format___main___closed__11; lean::inc(x_21); return x_21; } default: { obj* x_23; x_23 = l_lean_ir_type_to__format___main___closed__12; lean::inc(x_23); return x_23; } } } } obj* l_lean_ir_type_to__format___main___boxed(obj* x_0) { _start: { uint8 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_ir_type_to__format___main(x_1); return x_2; } } obj* l_lean_ir_type_to__format(uint8 x_0) { _start: { obj* x_1; x_1 = l_lean_ir_type_to__format___main(x_0); return x_1; } } obj* l_lean_ir_type_to__format___boxed(obj* x_0) { _start: { uint8 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_ir_type_to__format(x_1); return x_2; } } obj* _init_l_lean_ir_type_has__to__format() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_ir_type_to__format___boxed), 1, 0); return x_0; } } obj* l_lean_to__fmt___at_lean_ir_type_has__to__string___spec__1(uint8 x_0) { _start: { obj* x_1; x_1 = l_lean_ir_type_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_type_has__to__string() { _start: { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_has__repr___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_to__fmt___at_lean_ir_type_has__to__string___spec__1___boxed), 1, 0); x_2 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); return x_2; } } obj* l_lean_to__fmt___at_lean_ir_type_has__to__string___spec__1___boxed(obj* x_0) { _start: { uint8 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_to__fmt___at_lean_ir_type_has__to__string___spec__1(x_1); return x_2; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("not"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__2() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("neg"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__3() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("ineg"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__4() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("nat2int"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__5() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("is_scalar"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__6() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("is_shared"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__7() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("is_null"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__8() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("cast"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__9() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("box"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__10() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("unbox"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__11() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("array_copy"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__12() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("sarray_copy"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__13() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("array_size"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__14() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("sarray_size"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__15() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("string_len"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__16() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("succ"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__17() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("tag"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_to__format___main___closed__18() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("tag_ref"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_assign__unop_to__format___main(uint8 x_0) { _start: { switch (x_0) { case 0: { obj* x_1; x_1 = l_lean_ir_assign__unop_to__format___main___closed__1; lean::inc(x_1); return x_1; } case 1: { obj* x_3; x_3 = l_lean_ir_assign__unop_to__format___main___closed__2; lean::inc(x_3); return x_3; } case 2: { obj* x_5; x_5 = l_lean_ir_assign__unop_to__format___main___closed__3; lean::inc(x_5); return x_5; } case 3: { obj* x_7; x_7 = l_lean_ir_assign__unop_to__format___main___closed__4; lean::inc(x_7); return x_7; } case 4: { obj* x_9; x_9 = l_lean_ir_assign__unop_to__format___main___closed__5; lean::inc(x_9); return x_9; } case 5: { obj* x_11; x_11 = l_lean_ir_assign__unop_to__format___main___closed__6; lean::inc(x_11); return x_11; } case 6: { obj* x_13; x_13 = l_lean_ir_assign__unop_to__format___main___closed__7; lean::inc(x_13); return x_13; } case 7: { obj* x_15; x_15 = l_lean_ir_assign__unop_to__format___main___closed__8; lean::inc(x_15); return x_15; } case 8: { obj* x_17; x_17 = l_lean_ir_assign__unop_to__format___main___closed__9; lean::inc(x_17); return x_17; } case 9: { obj* x_19; x_19 = l_lean_ir_assign__unop_to__format___main___closed__10; lean::inc(x_19); return x_19; } case 10: { obj* x_21; x_21 = l_lean_ir_assign__unop_to__format___main___closed__11; lean::inc(x_21); return x_21; } case 11: { obj* x_23; x_23 = l_lean_ir_assign__unop_to__format___main___closed__12; lean::inc(x_23); return x_23; } case 12: { obj* x_25; x_25 = l_lean_ir_assign__unop_to__format___main___closed__13; lean::inc(x_25); return x_25; } case 13: { obj* x_27; x_27 = l_lean_ir_assign__unop_to__format___main___closed__14; lean::inc(x_27); return x_27; } case 14: { obj* x_29; x_29 = l_lean_ir_assign__unop_to__format___main___closed__15; lean::inc(x_29); return x_29; } case 15: { obj* x_31; x_31 = l_lean_ir_assign__unop_to__format___main___closed__16; lean::inc(x_31); return x_31; } case 16: { obj* x_33; x_33 = l_lean_ir_assign__unop_to__format___main___closed__17; lean::inc(x_33); return x_33; } default: { obj* x_35; x_35 = l_lean_ir_assign__unop_to__format___main___closed__18; lean::inc(x_35); return x_35; } } } } obj* l_lean_ir_assign__unop_to__format___main___boxed(obj* x_0) { _start: { uint8 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_ir_assign__unop_to__format___main(x_1); return x_2; } } obj* l_lean_ir_assign__unop_to__format(uint8 x_0) { _start: { obj* x_1; x_1 = l_lean_ir_assign__unop_to__format___main(x_0); return x_1; } } obj* l_lean_ir_assign__unop_to__format___boxed(obj* x_0) { _start: { uint8 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_ir_assign__unop_to__format(x_1); return x_2; } } obj* _init_l_lean_ir_assign__unop_has__to__format() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_ir_assign__unop_to__format___boxed), 1, 0); return x_0; } } obj* l_lean_to__fmt___at_lean_ir_assign__unop_has__to__string___spec__1(uint8 x_0) { _start: { obj* x_1; x_1 = l_lean_ir_assign__unop_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_assign__unop_has__to__string() { _start: { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_has__repr___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_to__fmt___at_lean_ir_assign__unop_has__to__string___spec__1___boxed), 1, 0); x_2 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); return x_2; } } obj* l_lean_to__fmt___at_lean_ir_assign__unop_has__to__string___spec__1___boxed(obj* x_0) { _start: { uint8 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_to__fmt___at_lean_ir_assign__unop_has__to__string___spec__1(x_1); return x_2; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("add"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__2() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("sub"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__3() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("mul"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__4() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("div"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__5() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("mod"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__6() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("iadd"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__7() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("isub"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__8() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("imul"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__9() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("idiv"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__10() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("imod"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__11() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("shl"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__12() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("shr"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__13() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("and"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__14() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("or"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__15() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("xor"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__16() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("le"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__17() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("lt"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__18() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("eq"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__19() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("ne"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__20() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("ile"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__21() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("ilt"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__22() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("ieq"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__23() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("ine"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__24() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("array_read"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__25() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("array_push"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__26() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("string_push"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_to__format___main___closed__27() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("string_append"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_assign__binop_to__format___main(uint8 x_0) { _start: { switch (x_0) { case 0: { obj* x_1; x_1 = l_lean_ir_assign__binop_to__format___main___closed__1; lean::inc(x_1); return x_1; } case 1: { obj* x_3; x_3 = l_lean_ir_assign__binop_to__format___main___closed__2; lean::inc(x_3); return x_3; } case 2: { obj* x_5; x_5 = l_lean_ir_assign__binop_to__format___main___closed__3; lean::inc(x_5); return x_5; } case 3: { obj* x_7; x_7 = l_lean_ir_assign__binop_to__format___main___closed__4; lean::inc(x_7); return x_7; } case 4: { obj* x_9; x_9 = l_lean_ir_assign__binop_to__format___main___closed__5; lean::inc(x_9); return x_9; } case 5: { obj* x_11; x_11 = l_lean_ir_assign__binop_to__format___main___closed__6; lean::inc(x_11); return x_11; } case 6: { obj* x_13; x_13 = l_lean_ir_assign__binop_to__format___main___closed__7; lean::inc(x_13); return x_13; } case 7: { obj* x_15; x_15 = l_lean_ir_assign__binop_to__format___main___closed__8; lean::inc(x_15); return x_15; } case 8: { obj* x_17; x_17 = l_lean_ir_assign__binop_to__format___main___closed__9; lean::inc(x_17); return x_17; } case 9: { obj* x_19; x_19 = l_lean_ir_assign__binop_to__format___main___closed__10; lean::inc(x_19); return x_19; } case 10: { obj* x_21; x_21 = l_lean_ir_assign__binop_to__format___main___closed__11; lean::inc(x_21); return x_21; } case 11: { obj* x_23; x_23 = l_lean_ir_assign__binop_to__format___main___closed__12; lean::inc(x_23); return x_23; } case 12: { obj* x_25; x_25 = l_lean_ir_assign__binop_to__format___main___closed__13; lean::inc(x_25); return x_25; } case 13: { obj* x_27; x_27 = l_lean_ir_assign__binop_to__format___main___closed__14; lean::inc(x_27); return x_27; } case 14: { obj* x_29; x_29 = l_lean_ir_assign__binop_to__format___main___closed__15; lean::inc(x_29); return x_29; } case 15: { obj* x_31; x_31 = l_lean_ir_assign__binop_to__format___main___closed__16; lean::inc(x_31); return x_31; } case 16: { obj* x_33; x_33 = l_lean_ir_assign__binop_to__format___main___closed__17; lean::inc(x_33); return x_33; } case 17: { obj* x_35; x_35 = l_lean_ir_assign__binop_to__format___main___closed__18; lean::inc(x_35); return x_35; } case 18: { obj* x_37; x_37 = l_lean_ir_assign__binop_to__format___main___closed__19; lean::inc(x_37); return x_37; } case 19: { obj* x_39; x_39 = l_lean_ir_assign__binop_to__format___main___closed__20; lean::inc(x_39); return x_39; } case 20: { obj* x_41; x_41 = l_lean_ir_assign__binop_to__format___main___closed__21; lean::inc(x_41); return x_41; } case 21: { obj* x_43; x_43 = l_lean_ir_assign__binop_to__format___main___closed__22; lean::inc(x_43); return x_43; } case 22: { obj* x_45; x_45 = l_lean_ir_assign__binop_to__format___main___closed__23; lean::inc(x_45); return x_45; } case 23: { obj* x_47; x_47 = l_lean_ir_assign__binop_to__format___main___closed__24; lean::inc(x_47); return x_47; } case 24: { obj* x_49; x_49 = l_lean_ir_assign__binop_to__format___main___closed__25; lean::inc(x_49); return x_49; } case 25: { obj* x_51; x_51 = l_lean_ir_assign__binop_to__format___main___closed__26; lean::inc(x_51); return x_51; } default: { obj* x_53; x_53 = l_lean_ir_assign__binop_to__format___main___closed__27; lean::inc(x_53); return x_53; } } } } obj* l_lean_ir_assign__binop_to__format___main___boxed(obj* x_0) { _start: { uint8 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_ir_assign__binop_to__format___main(x_1); return x_2; } } obj* l_lean_ir_assign__binop_to__format(uint8 x_0) { _start: { obj* x_1; x_1 = l_lean_ir_assign__binop_to__format___main(x_0); return x_1; } } obj* l_lean_ir_assign__binop_to__format___boxed(obj* x_0) { _start: { uint8 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_ir_assign__binop_to__format(x_1); return x_2; } } obj* _init_l_lean_ir_assign__binop_has__to__format() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_ir_assign__binop_to__format___boxed), 1, 0); return x_0; } } obj* l_lean_to__fmt___at_lean_ir_assign__binop_has__to__string___spec__1(uint8 x_0) { _start: { obj* x_1; x_1 = l_lean_ir_assign__binop_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_assign__binop_has__to__string() { _start: { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_has__repr___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_to__fmt___at_lean_ir_assign__binop_has__to__string___spec__1___boxed), 1, 0); x_2 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); return x_2; } } obj* l_lean_to__fmt___at_lean_ir_assign__binop_has__to__string___spec__1___boxed(obj* x_0) { _start: { uint8 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_to__fmt___at_lean_ir_assign__binop_has__to__string___spec__1(x_1); return x_2; } } obj* _init_l_lean_ir_unop_to__format___main___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("inc_ref"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_unop_to__format___main___closed__2() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("dec_ref"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_unop_to__format___main___closed__3() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("dec_sref"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_unop_to__format___main___closed__4() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("inc"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_unop_to__format___main___closed__5() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("dec"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_unop_to__format___main___closed__6() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("free"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_unop_to__format___main___closed__7() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("dealloc"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_unop_to__format___main___closed__8() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("array_pop"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_unop_to__format___main___closed__9() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("sarray_pop"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_unop_to__format___main(uint8 x_0) { _start: { switch (x_0) { case 0: { obj* x_1; x_1 = l_lean_ir_unop_to__format___main___closed__1; lean::inc(x_1); return x_1; } case 1: { obj* x_3; x_3 = l_lean_ir_unop_to__format___main___closed__2; lean::inc(x_3); return x_3; } case 2: { obj* x_5; x_5 = l_lean_ir_unop_to__format___main___closed__3; lean::inc(x_5); return x_5; } case 3: { obj* x_7; x_7 = l_lean_ir_unop_to__format___main___closed__4; lean::inc(x_7); return x_7; } case 4: { obj* x_9; x_9 = l_lean_ir_unop_to__format___main___closed__5; lean::inc(x_9); return x_9; } case 5: { obj* x_11; x_11 = l_lean_ir_unop_to__format___main___closed__6; lean::inc(x_11); return x_11; } case 6: { obj* x_13; x_13 = l_lean_ir_unop_to__format___main___closed__7; lean::inc(x_13); return x_13; } case 7: { obj* x_15; x_15 = l_lean_ir_unop_to__format___main___closed__8; lean::inc(x_15); return x_15; } default: { obj* x_17; x_17 = l_lean_ir_unop_to__format___main___closed__9; lean::inc(x_17); return x_17; } } } } obj* l_lean_ir_unop_to__format___main___boxed(obj* x_0) { _start: { uint8 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_ir_unop_to__format___main(x_1); return x_2; } } obj* l_lean_ir_unop_to__format(uint8 x_0) { _start: { obj* x_1; x_1 = l_lean_ir_unop_to__format___main(x_0); return x_1; } } obj* l_lean_ir_unop_to__format___boxed(obj* x_0) { _start: { uint8 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_ir_unop_to__format(x_1); return x_2; } } obj* _init_l_lean_ir_unop_has__to__format() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_ir_unop_to__format___boxed), 1, 0); return x_0; } } obj* l_lean_to__fmt___at_lean_ir_unop_has__to__string___spec__1(uint8 x_0) { _start: { obj* x_1; x_1 = l_lean_ir_unop_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_unop_has__to__string() { _start: { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_has__repr___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_to__fmt___at_lean_ir_unop_has__to__string___spec__1___boxed), 1, 0); x_2 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); return x_2; } } obj* l_lean_to__fmt___at_lean_ir_unop_has__to__string___spec__1___boxed(obj* x_0) { _start: { uint8 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_to__fmt___at_lean_ir_unop_has__to__string___spec__1(x_1); return x_2; } } obj* _init_l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("ff"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1___closed__2() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("tt"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1(uint8 x_0) { _start: { if (x_0 == 0) { obj* x_1; x_1 = l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1___closed__1; lean::inc(x_1); return x_1; } else { obj* x_3; x_3 = l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1___closed__2; lean::inc(x_3); return x_3; } } } obj* l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__2(obj* x_0) { _start: { obj* x_1; obj* x_2; x_1 = l_int_repr___main(x_0); x_2 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_2, 0, x_1); return x_2; } } obj* l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__3(obj* x_0) { _start: { obj* x_1; x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_literal_to__format___main(obj* x_0) { _start: { switch (lean::obj_tag(x_0)) { case 0: { uint8 x_1; obj* x_3; x_1 = lean::cnstr_get_scalar(x_0, 0); lean::dec(x_0); x_3 = l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1(x_1); return x_3; } case 1: { obj* x_4; obj* x_7; obj* x_8; x_4 = lean::cnstr_get(x_0, 0); lean::inc(x_4); lean::dec(x_0); x_7 = l_string_quote(x_4); x_8 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_8, 0, x_7); return x_8; } case 2: { obj* x_9; obj* x_12; x_9 = lean::cnstr_get(x_0, 0); lean::inc(x_9); lean::dec(x_0); x_12 = l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__2(x_9); return x_12; } default: { obj* x_13; obj* x_16; x_13 = lean::cnstr_get(x_0, 0); lean::inc(x_13); lean::dec(x_0); x_16 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_16, 0, x_13); return x_16; } } } } obj* l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1___boxed(obj* x_0) { _start: { uint8 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1(x_1); return x_2; } } obj* l_lean_ir_literal_to__format(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_literal_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_literal_has__to__format() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_ir_literal_to__format), 1, 0); return x_0; } } obj* l_lean_to__fmt___at_lean_ir_literal_has__to__string___spec__1(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_literal_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_literal_has__to__string() { _start: { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_has__repr___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_to__fmt___at_lean_ir_literal_has__to__string___spec__1), 1, 0); x_2 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); return x_2; } } obj* l_lean_to__fmt___at_lean_ir_sizet__entry_to__format___main___spec__1(obj* x_0) { _start: { obj* x_1; obj* x_2; x_1 = l_nat_repr(x_0); x_2 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_2, 0, x_1); return x_2; } } obj* _init_l_lean_ir_sizet__entry_to__format___main___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string(":"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_sizet__entry_to__format___main(obj* x_0) { _start: { obj* x_1; obj* x_3; obj* x_6; uint8 x_7; 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 = lean::mk_nat_obj(1u); x_7 = lean::nat_dec_eq(x_1, x_6); lean::dec(x_6); if (x_7 == 0) { obj* x_9; uint8 x_10; obj* x_11; obj* x_13; obj* x_14; uint8 x_15; obj* x_17; obj* x_18; obj* x_19; x_9 = l_lean_to__fmt___at_lean_ir_sizet__entry_to__format___main___spec__1(x_1); x_10 = 0; x_11 = l_lean_ir_sizet__entry_to__format___main___closed__1; lean::inc(x_11); x_13 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_13, 0, x_9); lean::cnstr_set(x_13, 1, x_11); lean::cnstr_set_scalar(x_13, sizeof(void*)*2, x_10); x_14 = x_13; x_15 = lean::unbox(x_3); lean::dec(x_3); x_17 = l_lean_ir_type_to__format___main(x_15); x_18 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_18, 0, x_14); lean::cnstr_set(x_18, 1, x_17); lean::cnstr_set_scalar(x_18, sizeof(void*)*2, x_10); x_19 = x_18; return x_19; } else { uint8 x_21; obj* x_23; lean::dec(x_1); x_21 = lean::unbox(x_3); lean::dec(x_3); x_23 = l_lean_ir_type_to__format___main(x_21); return x_23; } } } obj* l_lean_ir_sizet__entry_to__format(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_sizet__entry_to__format___main(x_0); return x_1; } } obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(obj* x_0) { _start: { obj* x_1; obj* x_2; x_1 = l_lean_ir_id_to__string___main(x_0); x_2 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_2, 0, x_1); return x_2; } } obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__2(obj* x_0) { _start: { obj* x_1; obj* x_2; x_1 = l_lean_ir_id_to__string___main(x_0); x_2 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_2, 0, x_1); return x_2; } } obj* l_lean_format_prefix__join___main___at_lean_ir_instr_to__format___main___spec__3(obj* x_0, obj* x_1) { _start: { if (lean::obj_tag(x_1) == 0) { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::box(0); return x_4; } else { obj* x_5; obj* x_7; obj* x_10; uint8 x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; x_5 = lean::cnstr_get(x_1, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_1, 1); lean::inc(x_7); lean::dec(x_1); x_10 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_5); x_11 = 0; lean::inc(x_0); x_13 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_13, 0, x_0); lean::cnstr_set(x_13, 1, x_10); lean::cnstr_set_scalar(x_13, sizeof(void*)*2, x_11); x_14 = x_13; x_15 = l_lean_format_prefix__join___main___at_lean_ir_instr_to__format___main___spec__3(x_0, x_7); x_16 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_16, 0, x_14); lean::cnstr_set(x_16, 1, x_15); lean::cnstr_set_scalar(x_16, sizeof(void*)*2, x_11); x_17 = x_16; return x_17; } } } obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__4(uint16 x_0) { _start: { obj* x_1; obj* x_2; obj* x_3; x_1 = lean::uint16_to_nat(x_0); x_2 = l_nat_repr(x_1); x_3 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_3, 0, x_2); return x_3; } } obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__5(uint16 x_0) { _start: { obj* x_1; obj* x_2; obj* x_3; x_1 = lean::uint16_to_nat(x_0); x_2 = l_nat_repr(x_1); x_3 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_3, 0, x_2); return x_3; } } obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__6(usize x_0) { _start: { obj* x_1; obj* x_2; obj* x_3; x_1 = lean::usize_to_nat(x_0); x_2 = l_nat_repr(x_1); x_3 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_3, 0, x_2); return x_3; } } obj* l_lean_format_join__sep___main___at_lean_ir_instr_to__format___main___spec__7(obj* x_0, obj* x_1) { _start: { if (lean::obj_tag(x_0) == 0) { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::box(0); return x_4; } else { obj* x_5; obj* x_7; x_5 = lean::cnstr_get(x_0, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_0, 1); lean::inc(x_7); lean::dec(x_0); if (lean::obj_tag(x_7) == 0) { obj* x_12; lean::dec(x_7); lean::dec(x_1); x_12 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_5); return x_12; } else { obj* x_13; uint8 x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; x_13 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_5); x_14 = 0; lean::inc(x_1); x_16 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_16, 0, x_13); lean::cnstr_set(x_16, 1, x_1); lean::cnstr_set_scalar(x_16, sizeof(void*)*2, x_14); x_17 = x_16; x_18 = l_lean_format_join__sep___main___at_lean_ir_instr_to__format___main___spec__7(x_7, x_1); x_19 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_19, 0, x_17); lean::cnstr_set(x_19, 1, x_18); lean::cnstr_set_scalar(x_19, sizeof(void*)*2, x_14); x_20 = x_19; return x_20; } } } } obj* _init_l_lean_ir_instr_to__format___main___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string(" : "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_instr_to__format___main___closed__2() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string(" := "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_instr_to__format___main___closed__3() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string(" := call "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_instr_to__format___main___closed__4() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string(" := cnstr "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_instr_to__format___main___closed__5() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("set "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_instr_to__format___main___closed__6() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string(" := get "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_instr_to__format___main___closed__7() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("sset "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_instr_to__format___main___closed__8() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string(" := sget "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_instr_to__format___main___closed__9() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string(" := closure "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_instr_to__format___main___closed__10() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string(" := apply "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_instr_to__format___main___closed__11() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string(" := array "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_instr_to__format___main___closed__12() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string(" := sarray "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_instr_to__format___main___closed__13() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("array_write "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_instr_to__format___main(obj* x_0) { _start: { switch (lean::obj_tag(x_0)) { case 0: { obj* x_1; uint8 x_3; obj* x_4; obj* x_7; uint8 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_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get_scalar(x_0, sizeof(void*)*2); x_4 = lean::cnstr_get(x_0, 1); lean::inc(x_4); lean::dec(x_0); x_7 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_1); x_8 = 0; x_9 = l_lean_ir_instr_to__format___main___closed__1; lean::inc(x_9); x_11 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_11, 0, x_7); lean::cnstr_set(x_11, 1, x_9); lean::cnstr_set_scalar(x_11, sizeof(void*)*2, x_8); x_12 = x_11; x_13 = l_lean_ir_type_to__format___main(x_3); x_14 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_14, 0, x_12); lean::cnstr_set(x_14, 1, x_13); lean::cnstr_set_scalar(x_14, sizeof(void*)*2, x_8); x_15 = x_14; x_16 = l_lean_ir_instr_to__format___main___closed__2; lean::inc(x_16); x_18 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_18, 0, x_15); lean::cnstr_set(x_18, 1, x_16); lean::cnstr_set_scalar(x_18, sizeof(void*)*2, x_8); x_19 = x_18; x_20 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_4); x_21 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_21, 0, x_19); lean::cnstr_set(x_21, 1, x_20); lean::cnstr_set_scalar(x_21, sizeof(void*)*2, x_8); x_22 = x_21; return x_22; } case 1: { obj* x_23; uint8 x_25; obj* x_26; obj* x_29; uint8 x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; x_23 = lean::cnstr_get(x_0, 0); lean::inc(x_23); x_25 = lean::cnstr_get_scalar(x_0, sizeof(void*)*2); x_26 = lean::cnstr_get(x_0, 1); lean::inc(x_26); lean::dec(x_0); x_29 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_23); x_30 = 0; x_31 = l_lean_ir_instr_to__format___main___closed__1; lean::inc(x_31); x_33 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_33, 0, x_29); lean::cnstr_set(x_33, 1, x_31); lean::cnstr_set_scalar(x_33, sizeof(void*)*2, x_30); x_34 = x_33; x_35 = l_lean_ir_type_to__format___main(x_25); x_36 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_36, 0, x_34); lean::cnstr_set(x_36, 1, x_35); lean::cnstr_set_scalar(x_36, sizeof(void*)*2, x_30); x_37 = x_36; x_38 = l_lean_ir_instr_to__format___main___closed__2; lean::inc(x_38); x_40 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_40, 0, x_37); lean::cnstr_set(x_40, 1, x_38); lean::cnstr_set_scalar(x_40, sizeof(void*)*2, x_30); x_41 = x_40; x_42 = l_lean_ir_literal_to__format___main(x_26); x_43 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_43, 0, x_41); lean::cnstr_set(x_43, 1, x_42); lean::cnstr_set_scalar(x_43, sizeof(void*)*2, x_30); x_44 = x_43; return x_44; } case 2: { obj* x_45; uint8 x_47; uint8 x_48; obj* x_49; obj* x_52; uint8 x_53; obj* x_54; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_63; obj* 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; obj* x_74; x_45 = lean::cnstr_get(x_0, 0); lean::inc(x_45); x_47 = lean::cnstr_get_scalar(x_0, sizeof(void*)*2); x_48 = lean::cnstr_get_scalar(x_0, sizeof(void*)*2 + 1); x_49 = lean::cnstr_get(x_0, 1); lean::inc(x_49); lean::dec(x_0); x_52 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_45); x_53 = 0; x_54 = l_lean_ir_instr_to__format___main___closed__1; lean::inc(x_54); x_56 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_56, 0, x_52); lean::cnstr_set(x_56, 1, x_54); lean::cnstr_set_scalar(x_56, sizeof(void*)*2, x_53); x_57 = x_56; x_58 = l_lean_ir_type_to__format___main(x_47); x_59 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_59, 0, x_57); lean::cnstr_set(x_59, 1, x_58); lean::cnstr_set_scalar(x_59, sizeof(void*)*2, x_53); x_60 = x_59; x_61 = l_lean_ir_instr_to__format___main___closed__2; lean::inc(x_61); x_63 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_63, 0, x_60); lean::cnstr_set(x_63, 1, x_61); lean::cnstr_set_scalar(x_63, sizeof(void*)*2, x_53); x_64 = x_63; x_65 = l_lean_ir_assign__unop_to__format___main(x_48); x_66 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_66, 0, x_64); lean::cnstr_set(x_66, 1, x_65); lean::cnstr_set_scalar(x_66, sizeof(void*)*2, x_53); x_67 = x_66; x_68 = l_lean_format_flatten___main___closed__1; lean::inc(x_68); x_70 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_70, 0, x_67); lean::cnstr_set(x_70, 1, x_68); lean::cnstr_set_scalar(x_70, sizeof(void*)*2, x_53); x_71 = x_70; x_72 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_49); x_73 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_73, 0, x_71); lean::cnstr_set(x_73, 1, x_72); lean::cnstr_set_scalar(x_73, sizeof(void*)*2, x_53); x_74 = x_73; return x_74; } case 3: { obj* x_75; uint8 x_77; uint8 x_78; obj* x_79; obj* x_81; obj* x_84; uint8 x_85; obj* x_86; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; x_75 = lean::cnstr_get(x_0, 0); lean::inc(x_75); x_77 = lean::cnstr_get_scalar(x_0, sizeof(void*)*3); x_78 = lean::cnstr_get_scalar(x_0, sizeof(void*)*3 + 1); x_79 = lean::cnstr_get(x_0, 1); lean::inc(x_79); x_81 = lean::cnstr_get(x_0, 2); lean::inc(x_81); lean::dec(x_0); x_84 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_75); x_85 = 0; x_86 = l_lean_ir_instr_to__format___main___closed__1; lean::inc(x_86); x_88 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_88, 0, x_84); lean::cnstr_set(x_88, 1, x_86); lean::cnstr_set_scalar(x_88, sizeof(void*)*2, x_85); x_89 = x_88; x_90 = l_lean_ir_type_to__format___main(x_77); x_91 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_91, 0, x_89); lean::cnstr_set(x_91, 1, x_90); lean::cnstr_set_scalar(x_91, sizeof(void*)*2, x_85); x_92 = x_91; x_93 = l_lean_ir_instr_to__format___main___closed__2; lean::inc(x_93); x_95 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_95, 0, x_92); lean::cnstr_set(x_95, 1, x_93); lean::cnstr_set_scalar(x_95, sizeof(void*)*2, x_85); x_96 = x_95; x_97 = l_lean_ir_assign__binop_to__format___main(x_78); x_98 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_98, 0, x_96); lean::cnstr_set(x_98, 1, x_97); lean::cnstr_set_scalar(x_98, sizeof(void*)*2, x_85); x_99 = x_98; x_100 = l_lean_format_flatten___main___closed__1; lean::inc(x_100); x_102 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_102, 0, x_99); lean::cnstr_set(x_102, 1, x_100); lean::cnstr_set_scalar(x_102, sizeof(void*)*2, x_85); x_103 = x_102; x_104 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_79); x_105 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_105, 0, x_103); lean::cnstr_set(x_105, 1, x_104); lean::cnstr_set_scalar(x_105, sizeof(void*)*2, x_85); x_106 = x_105; lean::inc(x_100); x_108 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_108, 0, x_106); lean::cnstr_set(x_108, 1, x_100); lean::cnstr_set_scalar(x_108, sizeof(void*)*2, x_85); x_109 = x_108; x_110 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_81); x_111 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_111, 0, x_109); lean::cnstr_set(x_111, 1, x_110); lean::cnstr_set_scalar(x_111, sizeof(void*)*2, x_85); x_112 = x_111; return x_112; } case 4: { uint8 x_113; obj* x_114; obj* x_117; uint8 x_118; obj* x_119; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; x_113 = lean::cnstr_get_scalar(x_0, sizeof(void*)*1); x_114 = lean::cnstr_get(x_0, 0); lean::inc(x_114); lean::dec(x_0); x_117 = l_lean_ir_unop_to__format___main(x_113); x_118 = 0; x_119 = l_lean_format_flatten___main___closed__1; lean::inc(x_119); x_121 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_121, 0, x_117); lean::cnstr_set(x_121, 1, x_119); lean::cnstr_set_scalar(x_121, sizeof(void*)*2, x_118); x_122 = x_121; x_123 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_114); x_124 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_124, 0, x_122); lean::cnstr_set(x_124, 1, x_123); lean::cnstr_set_scalar(x_124, sizeof(void*)*2, x_118); x_125 = x_124; return x_125; } case 5: { obj* x_126; obj* x_128; obj* x_130; obj* x_133; uint8 x_134; obj* x_135; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_144; obj* x_145; obj* x_146; x_126 = lean::cnstr_get(x_0, 0); lean::inc(x_126); x_128 = lean::cnstr_get(x_0, 1); lean::inc(x_128); x_130 = lean::cnstr_get(x_0, 2); lean::inc(x_130); lean::dec(x_0); x_133 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_126); x_134 = 0; x_135 = l_lean_ir_instr_to__format___main___closed__3; lean::inc(x_135); x_137 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_137, 0, x_133); lean::cnstr_set(x_137, 1, x_135); lean::cnstr_set_scalar(x_137, sizeof(void*)*2, x_134); x_138 = x_137; x_139 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__2(x_128); x_140 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_140, 0, x_138); lean::cnstr_set(x_140, 1, x_139); lean::cnstr_set_scalar(x_140, sizeof(void*)*2, x_134); x_141 = x_140; x_142 = l_lean_format_flatten___main___closed__1; lean::inc(x_142); x_144 = l_lean_format_prefix__join___main___at_lean_ir_instr_to__format___main___spec__3(x_142, x_130); x_145 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_145, 0, x_141); lean::cnstr_set(x_145, 1, x_144); lean::cnstr_set_scalar(x_145, sizeof(void*)*2, x_134); x_146 = x_145; return x_146; } case 6: { obj* x_147; uint16 x_149; uint16 x_150; usize x_151; obj* x_153; uint8 x_154; obj* x_155; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; x_147 = lean::cnstr_get(x_0, 0); lean::inc(x_147); x_149 = lean::cnstr_get_scalar(x_0, sizeof(void*)*2); x_150 = lean::cnstr_get_scalar(x_0, sizeof(void*)*2 + 2); x_151 = lean::cnstr_get_scalar(x_0, sizeof(void*)*1); lean::dec(x_0); x_153 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_147); x_154 = 0; x_155 = l_lean_ir_instr_to__format___main___closed__4; lean::inc(x_155); x_157 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_157, 0, x_153); lean::cnstr_set(x_157, 1, x_155); lean::cnstr_set_scalar(x_157, sizeof(void*)*2, x_154); x_158 = x_157; x_159 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__4(x_149); x_160 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_160, 0, x_158); lean::cnstr_set(x_160, 1, x_159); lean::cnstr_set_scalar(x_160, sizeof(void*)*2, x_154); x_161 = x_160; x_162 = l_lean_format_flatten___main___closed__1; lean::inc(x_162); x_164 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_164, 0, x_161); lean::cnstr_set(x_164, 1, x_162); lean::cnstr_set_scalar(x_164, sizeof(void*)*2, x_154); x_165 = x_164; x_166 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__5(x_150); x_167 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_167, 0, x_165); lean::cnstr_set(x_167, 1, x_166); lean::cnstr_set_scalar(x_167, sizeof(void*)*2, x_154); x_168 = x_167; lean::inc(x_162); x_170 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_170, 0, x_168); lean::cnstr_set(x_170, 1, x_162); lean::cnstr_set_scalar(x_170, sizeof(void*)*2, x_154); x_171 = x_170; x_172 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__6(x_151); x_173 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_173, 0, x_171); lean::cnstr_set(x_173, 1, x_172); lean::cnstr_set_scalar(x_173, sizeof(void*)*2, x_154); x_174 = x_173; return x_174; } case 7: { obj* x_175; uint16 x_177; obj* x_178; obj* x_181; uint8 x_182; obj* x_183; obj* x_185; obj* x_186; obj* x_187; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_195; obj* x_196; obj* x_197; obj* x_198; obj* x_199; x_175 = lean::cnstr_get(x_0, 0); lean::inc(x_175); x_177 = lean::cnstr_get_scalar(x_0, sizeof(void*)*2); x_178 = lean::cnstr_get(x_0, 1); lean::inc(x_178); lean::dec(x_0); x_181 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_175); x_182 = 0; x_183 = l_lean_ir_instr_to__format___main___closed__5; lean::inc(x_183); x_185 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_185, 0, x_183); lean::cnstr_set(x_185, 1, x_181); lean::cnstr_set_scalar(x_185, sizeof(void*)*2, x_182); x_186 = x_185; x_187 = l_lean_format_flatten___main___closed__1; lean::inc(x_187); x_189 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_189, 0, x_186); lean::cnstr_set(x_189, 1, x_187); lean::cnstr_set_scalar(x_189, sizeof(void*)*2, x_182); x_190 = x_189; x_191 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__5(x_177); x_192 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_192, 0, x_190); lean::cnstr_set(x_192, 1, x_191); lean::cnstr_set_scalar(x_192, sizeof(void*)*2, x_182); x_193 = x_192; lean::inc(x_187); x_195 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_195, 0, x_193); lean::cnstr_set(x_195, 1, x_187); lean::cnstr_set_scalar(x_195, sizeof(void*)*2, x_182); x_196 = x_195; x_197 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_178); x_198 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_198, 0, x_196); lean::cnstr_set(x_198, 1, x_197); lean::cnstr_set_scalar(x_198, sizeof(void*)*2, x_182); x_199 = x_198; return x_199; } case 8: { obj* x_200; obj* x_202; uint16 x_204; obj* x_206; uint8 x_207; obj* x_208; obj* x_210; obj* x_211; obj* x_212; obj* x_213; obj* x_214; obj* x_215; obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; x_200 = lean::cnstr_get(x_0, 0); lean::inc(x_200); x_202 = lean::cnstr_get(x_0, 1); lean::inc(x_202); x_204 = lean::cnstr_get_scalar(x_0, sizeof(void*)*2); lean::dec(x_0); x_206 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_200); x_207 = 0; x_208 = l_lean_ir_instr_to__format___main___closed__6; lean::inc(x_208); x_210 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_210, 0, x_206); lean::cnstr_set(x_210, 1, x_208); lean::cnstr_set_scalar(x_210, sizeof(void*)*2, x_207); x_211 = x_210; x_212 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_202); x_213 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_213, 0, x_211); lean::cnstr_set(x_213, 1, x_212); lean::cnstr_set_scalar(x_213, sizeof(void*)*2, x_207); x_214 = x_213; x_215 = l_lean_format_flatten___main___closed__1; lean::inc(x_215); x_217 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_217, 0, x_214); lean::cnstr_set(x_217, 1, x_215); lean::cnstr_set_scalar(x_217, sizeof(void*)*2, x_207); x_218 = x_217; x_219 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__5(x_204); x_220 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_220, 0, x_218); lean::cnstr_set(x_220, 1, x_219); lean::cnstr_set_scalar(x_220, sizeof(void*)*2, x_207); x_221 = x_220; return x_221; } case 9: { obj* x_222; usize x_224; obj* x_225; obj* x_228; uint8 x_229; obj* x_230; obj* x_232; obj* x_233; obj* x_234; obj* x_236; obj* x_237; obj* x_238; obj* x_239; obj* x_240; obj* x_242; obj* x_243; obj* x_244; obj* x_245; obj* x_246; x_222 = lean::cnstr_get(x_0, 0); lean::inc(x_222); x_224 = lean::cnstr_get_scalar(x_0, sizeof(void*)*2); x_225 = lean::cnstr_get(x_0, 1); lean::inc(x_225); lean::dec(x_0); x_228 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_222); x_229 = 0; x_230 = l_lean_ir_instr_to__format___main___closed__7; lean::inc(x_230); x_232 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_232, 0, x_230); lean::cnstr_set(x_232, 1, x_228); lean::cnstr_set_scalar(x_232, sizeof(void*)*2, x_229); x_233 = x_232; x_234 = l_lean_format_flatten___main___closed__1; lean::inc(x_234); x_236 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_236, 0, x_233); lean::cnstr_set(x_236, 1, x_234); lean::cnstr_set_scalar(x_236, sizeof(void*)*2, x_229); x_237 = x_236; x_238 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__6(x_224); x_239 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_239, 0, x_237); lean::cnstr_set(x_239, 1, x_238); lean::cnstr_set_scalar(x_239, sizeof(void*)*2, x_229); x_240 = x_239; lean::inc(x_234); x_242 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_242, 0, x_240); lean::cnstr_set(x_242, 1, x_234); lean::cnstr_set_scalar(x_242, sizeof(void*)*2, x_229); x_243 = x_242; x_244 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_225); x_245 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_245, 0, x_243); lean::cnstr_set(x_245, 1, x_244); lean::cnstr_set_scalar(x_245, sizeof(void*)*2, x_229); x_246 = x_245; return x_246; } case 10: { obj* x_247; uint8 x_249; obj* x_250; usize x_252; obj* x_254; uint8 x_255; obj* x_256; obj* x_258; obj* x_259; obj* x_260; obj* x_261; obj* x_262; obj* x_263; obj* x_265; obj* x_266; obj* x_267; obj* x_268; obj* x_269; obj* x_270; obj* x_272; obj* x_273; obj* x_274; obj* x_275; obj* x_276; x_247 = lean::cnstr_get(x_0, 0); lean::inc(x_247); x_249 = lean::cnstr_get_scalar(x_0, sizeof(void*)*3); x_250 = lean::cnstr_get(x_0, 1); lean::inc(x_250); x_252 = lean::cnstr_get_scalar(x_0, sizeof(void*)*2); lean::dec(x_0); x_254 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_247); x_255 = 0; x_256 = l_lean_ir_instr_to__format___main___closed__1; lean::inc(x_256); x_258 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_258, 0, x_254); lean::cnstr_set(x_258, 1, x_256); lean::cnstr_set_scalar(x_258, sizeof(void*)*2, x_255); x_259 = x_258; x_260 = l_lean_ir_type_to__format___main(x_249); x_261 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_261, 0, x_259); lean::cnstr_set(x_261, 1, x_260); lean::cnstr_set_scalar(x_261, sizeof(void*)*2, x_255); x_262 = x_261; x_263 = l_lean_ir_instr_to__format___main___closed__8; lean::inc(x_263); x_265 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_265, 0, x_262); lean::cnstr_set(x_265, 1, x_263); lean::cnstr_set_scalar(x_265, sizeof(void*)*2, x_255); x_266 = x_265; x_267 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_250); x_268 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_268, 0, x_266); lean::cnstr_set(x_268, 1, x_267); lean::cnstr_set_scalar(x_268, sizeof(void*)*2, x_255); x_269 = x_268; x_270 = l_lean_format_flatten___main___closed__1; lean::inc(x_270); x_272 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_272, 0, x_269); lean::cnstr_set(x_272, 1, x_270); lean::cnstr_set_scalar(x_272, sizeof(void*)*2, x_255); x_273 = x_272; x_274 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__6(x_252); x_275 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_275, 0, x_273); lean::cnstr_set(x_275, 1, x_274); lean::cnstr_set_scalar(x_275, sizeof(void*)*2, x_255); x_276 = x_275; return x_276; } case 11: { obj* x_277; obj* x_279; obj* x_281; obj* x_284; uint8 x_285; obj* x_286; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; obj* x_293; obj* x_295; obj* x_296; obj* x_297; x_277 = lean::cnstr_get(x_0, 0); lean::inc(x_277); x_279 = lean::cnstr_get(x_0, 1); lean::inc(x_279); x_281 = lean::cnstr_get(x_0, 2); lean::inc(x_281); lean::dec(x_0); x_284 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_277); x_285 = 0; x_286 = l_lean_ir_instr_to__format___main___closed__9; lean::inc(x_286); x_288 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_288, 0, x_284); lean::cnstr_set(x_288, 1, x_286); lean::cnstr_set_scalar(x_288, sizeof(void*)*2, x_285); x_289 = x_288; x_290 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__2(x_279); x_291 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_291, 0, x_289); lean::cnstr_set(x_291, 1, x_290); lean::cnstr_set_scalar(x_291, sizeof(void*)*2, x_285); x_292 = x_291; x_293 = l_lean_format_flatten___main___closed__1; lean::inc(x_293); x_295 = l_lean_format_prefix__join___main___at_lean_ir_instr_to__format___main___spec__3(x_293, x_281); x_296 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_296, 0, x_292); lean::cnstr_set(x_296, 1, x_295); lean::cnstr_set_scalar(x_296, sizeof(void*)*2, x_285); x_297 = x_296; return x_297; } case 12: { obj* x_298; obj* x_300; obj* x_303; uint8 x_304; obj* x_305; obj* x_307; obj* x_308; obj* x_309; obj* x_311; obj* x_312; obj* x_313; x_298 = lean::cnstr_get(x_0, 0); lean::inc(x_298); x_300 = lean::cnstr_get(x_0, 1); lean::inc(x_300); lean::dec(x_0); x_303 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_298); x_304 = 0; x_305 = l_lean_ir_instr_to__format___main___closed__10; lean::inc(x_305); x_307 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_307, 0, x_303); lean::cnstr_set(x_307, 1, x_305); lean::cnstr_set_scalar(x_307, sizeof(void*)*2, x_304); x_308 = x_307; x_309 = l_lean_format_flatten___main___closed__1; lean::inc(x_309); x_311 = l_lean_format_join__sep___main___at_lean_ir_instr_to__format___main___spec__7(x_300, x_309); x_312 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_312, 0, x_308); lean::cnstr_set(x_312, 1, x_311); lean::cnstr_set_scalar(x_312, sizeof(void*)*2, x_304); x_313 = x_312; return x_313; } case 13: { obj* x_314; obj* x_316; obj* x_318; obj* x_321; uint8 x_322; obj* x_323; obj* x_325; obj* x_326; obj* x_327; obj* x_328; obj* x_329; obj* x_330; obj* x_332; obj* x_333; obj* x_334; obj* x_335; obj* x_336; x_314 = lean::cnstr_get(x_0, 0); lean::inc(x_314); x_316 = lean::cnstr_get(x_0, 1); lean::inc(x_316); x_318 = lean::cnstr_get(x_0, 2); lean::inc(x_318); lean::dec(x_0); x_321 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_314); x_322 = 0; x_323 = l_lean_ir_instr_to__format___main___closed__11; lean::inc(x_323); x_325 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_325, 0, x_321); lean::cnstr_set(x_325, 1, x_323); lean::cnstr_set_scalar(x_325, sizeof(void*)*2, x_322); x_326 = x_325; x_327 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_316); x_328 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_328, 0, x_326); lean::cnstr_set(x_328, 1, x_327); lean::cnstr_set_scalar(x_328, sizeof(void*)*2, x_322); x_329 = x_328; x_330 = l_lean_format_flatten___main___closed__1; lean::inc(x_330); x_332 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_332, 0, x_329); lean::cnstr_set(x_332, 1, x_330); lean::cnstr_set_scalar(x_332, sizeof(void*)*2, x_322); x_333 = x_332; x_334 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_318); x_335 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_335, 0, x_333); lean::cnstr_set(x_335, 1, x_334); lean::cnstr_set_scalar(x_335, sizeof(void*)*2, x_322); x_336 = x_335; return x_336; } case 14: { obj* x_337; uint8 x_339; obj* x_340; obj* x_342; obj* x_345; uint8 x_346; obj* x_347; obj* x_349; obj* x_350; obj* x_351; obj* x_352; obj* x_353; obj* x_354; obj* x_356; obj* x_357; obj* x_358; obj* x_359; obj* x_360; obj* x_362; obj* x_363; obj* x_364; obj* x_365; obj* x_366; x_337 = lean::cnstr_get(x_0, 0); lean::inc(x_337); x_339 = lean::cnstr_get_scalar(x_0, sizeof(void*)*3); x_340 = lean::cnstr_get(x_0, 1); lean::inc(x_340); x_342 = lean::cnstr_get(x_0, 2); lean::inc(x_342); lean::dec(x_0); x_345 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_337); x_346 = 0; x_347 = l_lean_ir_instr_to__format___main___closed__12; lean::inc(x_347); x_349 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_349, 0, x_345); lean::cnstr_set(x_349, 1, x_347); lean::cnstr_set_scalar(x_349, sizeof(void*)*2, x_346); x_350 = x_349; x_351 = l_lean_ir_type_to__format___main(x_339); x_352 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_352, 0, x_350); lean::cnstr_set(x_352, 1, x_351); lean::cnstr_set_scalar(x_352, sizeof(void*)*2, x_346); x_353 = x_352; x_354 = l_lean_format_flatten___main___closed__1; lean::inc(x_354); x_356 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_356, 0, x_353); lean::cnstr_set(x_356, 1, x_354); lean::cnstr_set_scalar(x_356, sizeof(void*)*2, x_346); x_357 = x_356; x_358 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_340); x_359 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_359, 0, x_357); lean::cnstr_set(x_359, 1, x_358); lean::cnstr_set_scalar(x_359, sizeof(void*)*2, x_346); x_360 = x_359; lean::inc(x_354); x_362 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_362, 0, x_360); lean::cnstr_set(x_362, 1, x_354); lean::cnstr_set_scalar(x_362, sizeof(void*)*2, x_346); x_363 = x_362; x_364 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_342); x_365 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_365, 0, x_363); lean::cnstr_set(x_365, 1, x_364); lean::cnstr_set_scalar(x_365, sizeof(void*)*2, x_346); x_366 = x_365; return x_366; } default: { obj* x_367; obj* x_369; obj* x_371; obj* x_374; uint8 x_375; obj* x_376; obj* x_378; obj* x_379; obj* x_380; obj* x_382; obj* x_383; obj* x_384; obj* x_385; obj* x_386; obj* x_388; obj* x_389; obj* x_390; obj* x_391; obj* x_392; x_367 = lean::cnstr_get(x_0, 0); lean::inc(x_367); x_369 = lean::cnstr_get(x_0, 1); lean::inc(x_369); x_371 = lean::cnstr_get(x_0, 2); lean::inc(x_371); lean::dec(x_0); x_374 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_367); x_375 = 0; x_376 = l_lean_ir_instr_to__format___main___closed__13; lean::inc(x_376); x_378 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_378, 0, x_376); lean::cnstr_set(x_378, 1, x_374); lean::cnstr_set_scalar(x_378, sizeof(void*)*2, x_375); x_379 = x_378; x_380 = l_lean_format_flatten___main___closed__1; lean::inc(x_380); x_382 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_382, 0, x_379); lean::cnstr_set(x_382, 1, x_380); lean::cnstr_set_scalar(x_382, sizeof(void*)*2, x_375); x_383 = x_382; x_384 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_369); x_385 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_385, 0, x_383); lean::cnstr_set(x_385, 1, x_384); lean::cnstr_set_scalar(x_385, sizeof(void*)*2, x_375); x_386 = x_385; lean::inc(x_380); x_388 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_388, 0, x_386); lean::cnstr_set(x_388, 1, x_380); lean::cnstr_set_scalar(x_388, sizeof(void*)*2, x_375); x_389 = x_388; x_390 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_371); x_391 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_391, 0, x_389); lean::cnstr_set(x_391, 1, x_390); lean::cnstr_set_scalar(x_391, sizeof(void*)*2, x_375); x_392 = x_391; return x_392; } } } } obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__4___boxed(obj* x_0) { _start: { uint16 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__4(x_1); return x_2; } } obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__5___boxed(obj* x_0) { _start: { uint16 x_1; obj* x_2; x_1 = lean::unbox(x_0); x_2 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__5(x_1); return x_2; } } obj* l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__6___boxed(obj* x_0) { _start: { usize x_1; obj* x_2; x_1 = lean::unbox_size_t(x_0); x_2 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__6(x_1); return x_2; } } obj* l_lean_ir_instr_to__format(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_instr_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_instr_has__to__format() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_ir_instr_to__format), 1, 0); return x_0; } } obj* l_lean_to__fmt___at_lean_ir_instr_has__to__string___spec__1(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_instr_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_instr_has__to__string() { _start: { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_has__repr___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_to__fmt___at_lean_ir_instr_has__to__string___spec__1), 1, 0); x_2 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); return x_2; } } obj* _init_l_lean_ir_phi_to__format___main___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string(" := phi "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_phi_to__format___main(obj* x_0) { _start: { obj* x_1; uint8 x_3; obj* x_4; obj* x_7; uint8 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_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get_scalar(x_0, sizeof(void*)*2); x_4 = lean::cnstr_get(x_0, 1); lean::inc(x_4); lean::dec(x_0); x_7 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_1); x_8 = 0; x_9 = l_lean_ir_instr_to__format___main___closed__1; lean::inc(x_9); x_11 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_11, 0, x_7); lean::cnstr_set(x_11, 1, x_9); lean::cnstr_set_scalar(x_11, sizeof(void*)*2, x_8); x_12 = x_11; x_13 = l_lean_ir_type_to__format___main(x_3); x_14 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_14, 0, x_12); lean::cnstr_set(x_14, 1, x_13); lean::cnstr_set_scalar(x_14, sizeof(void*)*2, x_8); x_15 = x_14; x_16 = l_lean_ir_phi_to__format___main___closed__1; lean::inc(x_16); x_18 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_18, 0, x_15); lean::cnstr_set(x_18, 1, x_16); lean::cnstr_set_scalar(x_18, sizeof(void*)*2, x_8); x_19 = x_18; x_20 = l_lean_format_flatten___main___closed__1; lean::inc(x_20); x_22 = l_lean_format_join__sep___main___at_lean_ir_instr_to__format___main___spec__7(x_4, x_20); x_23 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_23, 0, x_19); lean::cnstr_set(x_23, 1, x_22); lean::cnstr_set_scalar(x_23, sizeof(void*)*2, x_8); x_24 = x_23; return x_24; } } obj* l_lean_ir_phi_to__format(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_phi_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_phi_has__to__format() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_ir_phi_to__format), 1, 0); return x_0; } } obj* l_lean_to__fmt___at_lean_ir_phi_has__to__string___spec__1(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_phi_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_phi_has__to__string() { _start: { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_has__repr___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_to__fmt___at_lean_ir_phi_has__to__string___spec__1), 1, 0); x_2 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); return x_2; } } obj* l_lean_to__fmt___at_lean_ir_terminator_to__format___main___spec__4(obj* x_0) { _start: { obj* x_1; obj* x_2; x_1 = l_lean_ir_id_to__string___main(x_0); x_2 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_2, 0, x_1); return x_2; } } obj* l_lean_format_join__sep___main___at_lean_ir_terminator_to__format___main___spec__3(obj* x_0, obj* x_1) { _start: { if (lean::obj_tag(x_0) == 0) { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::box(0); return x_4; } else { obj* x_5; obj* x_7; x_5 = lean::cnstr_get(x_0, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_0, 1); lean::inc(x_7); lean::dec(x_0); if (lean::obj_tag(x_7) == 0) { obj* x_12; lean::dec(x_7); lean::dec(x_1); x_12 = l_lean_to__fmt___at_lean_ir_terminator_to__format___main___spec__4(x_5); return x_12; } else { obj* x_13; uint8 x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; x_13 = l_lean_to__fmt___at_lean_ir_terminator_to__format___main___spec__4(x_5); x_14 = 0; lean::inc(x_1); x_16 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_16, 0, x_13); lean::cnstr_set(x_16, 1, x_1); lean::cnstr_set_scalar(x_16, sizeof(void*)*2, x_14); x_17 = x_16; x_18 = l_lean_format_join__sep___main___at_lean_ir_terminator_to__format___main___spec__3(x_7, x_1); x_19 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_19, 0, x_17); lean::cnstr_set(x_19, 1, x_18); lean::cnstr_set_scalar(x_19, sizeof(void*)*2, x_14); x_20 = x_19; return x_20; } } } } obj* l_lean_list_to__format___main___at_lean_ir_terminator_to__format___main___spec__2(obj* x_0) { _start: { if (lean::obj_tag(x_0) == 0) { obj* x_2; lean::dec(x_0); x_2 = l_lean_list_to__format___main___rarg___closed__1; lean::inc(x_2); return x_2; } else { obj* x_4; obj* x_6; uint8 x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_19; x_4 = l_lean_list_to__format___main___rarg___closed__2; lean::inc(x_4); x_6 = l_lean_format_join__sep___main___at_lean_ir_terminator_to__format___main___spec__3(x_0, x_4); x_7 = 0; x_8 = l_lean_format_sbracket___closed__1; lean::inc(x_8); x_10 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_10, 0, x_8); lean::cnstr_set(x_10, 1, x_6); lean::cnstr_set_scalar(x_10, sizeof(void*)*2, x_7); x_11 = x_10; x_12 = l_lean_format_sbracket___closed__2; lean::inc(x_12); x_14 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_14, 0, x_11); lean::cnstr_set(x_14, 1, x_12); lean::cnstr_set_scalar(x_14, sizeof(void*)*2, x_7); x_15 = x_14; x_16 = l_lean_format_sbracket___closed__3; lean::inc(x_16); x_18 = lean::alloc_cnstr(3, 2, 0); lean::cnstr_set(x_18, 0, x_16); lean::cnstr_set(x_18, 1, x_15); x_19 = l_lean_format_group___main(x_18); return x_19; } } } obj* l_lean_to__fmt___at_lean_ir_terminator_to__format___main___spec__1(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_list_to__format___main___at_lean_ir_terminator_to__format___main___spec__2(x_0); return x_1; } } obj* _init_l_lean_ir_terminator_to__format___main___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("ret "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_terminator_to__format___main___closed__2() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("case "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_terminator_to__format___main___closed__3() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("jmp "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_terminator_to__format___main(obj* x_0) { _start: { switch (lean::obj_tag(x_0)) { case 0: { obj* x_1; obj* x_4; uint8 x_5; obj* x_6; obj* x_8; obj* x_9; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); lean::dec(x_0); x_4 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_1); x_5 = 0; x_6 = l_lean_ir_terminator_to__format___main___closed__1; lean::inc(x_6); x_8 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_8, 0, x_6); lean::cnstr_set(x_8, 1, x_4); lean::cnstr_set_scalar(x_8, sizeof(void*)*2, x_5); x_9 = x_8; return x_9; } case 1: { obj* x_10; obj* x_12; obj* x_15; uint8 x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; x_10 = lean::cnstr_get(x_0, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_0, 1); lean::inc(x_12); lean::dec(x_0); x_15 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_10); x_16 = 0; x_17 = l_lean_ir_terminator_to__format___main___closed__2; lean::inc(x_17); x_19 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_19, 0, x_17); lean::cnstr_set(x_19, 1, x_15); lean::cnstr_set_scalar(x_19, sizeof(void*)*2, x_16); x_20 = x_19; x_21 = l_lean_format_flatten___main___closed__1; lean::inc(x_21); x_23 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_23, 0, x_20); lean::cnstr_set(x_23, 1, x_21); lean::cnstr_set_scalar(x_23, sizeof(void*)*2, x_16); x_24 = x_23; x_25 = l_lean_list_to__format___main___at_lean_ir_terminator_to__format___main___spec__2(x_12); x_26 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_26, 0, x_24); lean::cnstr_set(x_26, 1, x_25); lean::cnstr_set_scalar(x_26, sizeof(void*)*2, x_16); x_27 = x_26; return x_27; } default: { obj* x_28; obj* x_31; uint8 x_32; obj* x_33; obj* x_35; obj* x_36; x_28 = lean::cnstr_get(x_0, 0); lean::inc(x_28); lean::dec(x_0); x_31 = l_lean_to__fmt___at_lean_ir_terminator_to__format___main___spec__4(x_28); x_32 = 0; x_33 = l_lean_ir_terminator_to__format___main___closed__3; lean::inc(x_33); x_35 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_35, 0, x_33); lean::cnstr_set(x_35, 1, x_31); lean::cnstr_set_scalar(x_35, sizeof(void*)*2, x_32); x_36 = x_35; return x_36; } } } } obj* l_lean_ir_terminator_to__format(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_terminator_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_terminator_has__to__format() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_ir_terminator_to__format), 1, 0); return x_0; } } obj* l_lean_to__fmt___at_lean_ir_terminator_has__to__string___spec__1(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_terminator_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_terminator_has__to__string() { _start: { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_has__repr___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_to__fmt___at_lean_ir_terminator_has__to__string___spec__1), 1, 0); x_2 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); return x_2; } } obj* l_lean_format_join__suffix___main___at_lean_ir_block_to__format___main___spec__1(obj* x_0, obj* x_1) { _start: { if (lean::obj_tag(x_0) == 0) { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::box(0); return x_4; } else { obj* x_5; obj* x_7; obj* x_10; uint8 x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; x_5 = lean::cnstr_get(x_0, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_0, 1); lean::inc(x_7); lean::dec(x_0); x_10 = l_lean_ir_phi_to__format___main(x_5); x_11 = 0; lean::inc(x_1); x_13 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_13, 0, x_10); lean::cnstr_set(x_13, 1, x_1); lean::cnstr_set_scalar(x_13, sizeof(void*)*2, x_11); x_14 = x_13; x_15 = l_lean_format_join__suffix___main___at_lean_ir_block_to__format___main___spec__1(x_7, x_1); x_16 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_16, 0, x_14); lean::cnstr_set(x_16, 1, x_15); lean::cnstr_set_scalar(x_16, sizeof(void*)*2, x_11); x_17 = x_16; return x_17; } } } obj* l_lean_format_join__suffix___main___at_lean_ir_block_to__format___main___spec__2(obj* x_0, obj* x_1) { _start: { if (lean::obj_tag(x_0) == 0) { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::box(0); return x_4; } else { obj* x_5; obj* x_7; obj* x_10; uint8 x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; x_5 = lean::cnstr_get(x_0, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_0, 1); lean::inc(x_7); lean::dec(x_0); x_10 = l_lean_ir_instr_to__format___main(x_5); x_11 = 0; lean::inc(x_1); x_13 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_13, 0, x_10); lean::cnstr_set(x_13, 1, x_1); lean::cnstr_set_scalar(x_13, sizeof(void*)*2, x_11); x_14 = x_13; x_15 = l_lean_format_join__suffix___main___at_lean_ir_block_to__format___main___spec__2(x_7, x_1); x_16 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_16, 0, x_14); lean::cnstr_set(x_16, 1, x_15); lean::cnstr_set_scalar(x_16, sizeof(void*)*2, x_11); x_17 = x_16; return x_17; } } } obj* _init_l_lean_ir_block_to__format___main___closed__1() { _start: { obj* x_0; obj* x_1; uint8 x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::mk_string(";"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); x_2 = 0; x_3 = lean::box(1); x_4 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_4, 0, x_1); lean::cnstr_set(x_4, 1, x_3); lean::cnstr_set_scalar(x_4, sizeof(void*)*2, x_2); x_5 = x_4; return x_5; } } obj* _init_l_lean_ir_block_to__format___main___closed__2() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string(";"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_block_to__format___main(obj* x_0) { _start: { obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; uint8 x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; 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); x_7 = lean::cnstr_get(x_0, 3); lean::inc(x_7); lean::dec(x_0); x_10 = l_lean_to__fmt___at_lean_ir_terminator_to__format___main___spec__4(x_1); x_11 = 0; x_12 = l_lean_ir_sizet__entry_to__format___main___closed__1; lean::inc(x_12); x_14 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_14, 0, x_10); lean::cnstr_set(x_14, 1, x_12); lean::cnstr_set_scalar(x_14, sizeof(void*)*2, x_11); x_15 = x_14; x_16 = l_lean_ir_block_to__format___main___closed__1; lean::inc(x_16); x_18 = l_lean_format_join__suffix___main___at_lean_ir_block_to__format___main___spec__1(x_3, x_16); x_19 = lean::box(1); x_20 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_20, 0, x_19); lean::cnstr_set(x_20, 1, x_18); lean::cnstr_set_scalar(x_20, sizeof(void*)*2, x_11); x_21 = x_20; lean::inc(x_16); x_23 = l_lean_format_join__suffix___main___at_lean_ir_block_to__format___main___spec__2(x_5, x_16); x_24 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_24, 0, x_21); lean::cnstr_set(x_24, 1, x_23); lean::cnstr_set_scalar(x_24, sizeof(void*)*2, x_11); x_25 = x_24; x_26 = l_lean_ir_terminator_to__format___main(x_7); x_27 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_27, 0, x_25); lean::cnstr_set(x_27, 1, x_26); lean::cnstr_set_scalar(x_27, sizeof(void*)*2, x_11); x_28 = x_27; x_29 = l_lean_ir_block_to__format___main___closed__2; lean::inc(x_29); x_31 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_31, 0, x_28); lean::cnstr_set(x_31, 1, x_29); lean::cnstr_set_scalar(x_31, sizeof(void*)*2, x_11); x_32 = x_31; x_33 = lean::mk_nat_obj(2u); x_34 = lean::alloc_cnstr(3, 2, 0); lean::cnstr_set(x_34, 0, x_33); lean::cnstr_set(x_34, 1, x_32); x_35 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_35, 0, x_15); lean::cnstr_set(x_35, 1, x_34); lean::cnstr_set_scalar(x_35, sizeof(void*)*2, x_11); x_36 = x_35; return x_36; } } obj* l_lean_ir_block_to__format(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_block_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_block_has__to__format() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_ir_block_to__format), 1, 0); return x_0; } } obj* l_lean_to__fmt___at_lean_ir_block_has__to__string___spec__1(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_block_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_block_has__to__string() { _start: { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_has__repr___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_to__fmt___at_lean_ir_block_has__to__string___spec__1), 1, 0); x_2 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); return x_2; } } obj* l_lean_ir_arg_to__format___main(obj* x_0) { _start: { obj* x_1; uint8 x_3; obj* x_5; uint8 x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get_scalar(x_0, sizeof(void*)*1); lean::dec(x_0); x_5 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__1(x_1); x_6 = 0; x_7 = l_lean_format_paren___closed__1; lean::inc(x_7); x_9 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_9, 0, x_7); lean::cnstr_set(x_9, 1, x_5); lean::cnstr_set_scalar(x_9, sizeof(void*)*2, x_6); x_10 = x_9; x_11 = l_lean_ir_instr_to__format___main___closed__1; lean::inc(x_11); x_13 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_13, 0, x_10); lean::cnstr_set(x_13, 1, x_11); lean::cnstr_set_scalar(x_13, sizeof(void*)*2, x_6); x_14 = x_13; x_15 = l_lean_ir_type_to__format___main(x_3); x_16 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_16, 0, x_14); lean::cnstr_set(x_16, 1, x_15); lean::cnstr_set_scalar(x_16, sizeof(void*)*2, x_6); x_17 = x_16; x_18 = l_lean_format_paren___closed__2; lean::inc(x_18); x_20 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_20, 0, x_17); lean::cnstr_set(x_20, 1, x_18); lean::cnstr_set_scalar(x_20, sizeof(void*)*2, x_6); x_21 = x_20; return x_21; } } obj* l_lean_ir_arg_to__format(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_arg_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_arg_has__to__format() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_ir_arg_to__format), 1, 0); return x_0; } } obj* l_lean_to__fmt___at_lean_ir_arg_has__to__string___spec__1(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_arg_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_arg_has__to__string() { _start: { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_has__repr___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_to__fmt___at_lean_ir_arg_has__to__string___spec__1), 1, 0); x_2 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); return x_2; } } obj* l_lean_ir_result_to__format___main(obj* x_0) { _start: { uint8 x_1; obj* x_3; x_1 = lean::unbox(x_0); lean::dec(x_0); x_3 = l_lean_ir_type_to__format___main(x_1); return x_3; } } obj* l_lean_ir_result_to__format(obj* x_0) { _start: { uint8 x_1; obj* x_3; x_1 = lean::unbox(x_0); lean::dec(x_0); x_3 = l_lean_ir_type_to__format___main(x_1); return x_3; } } obj* _init_l_lean_ir_result_has__to__format() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_ir_result_to__format), 1, 0); return x_0; } } obj* l_lean_to__fmt___at_lean_ir_result_has__to__string___spec__1(obj* x_0) { _start: { uint8 x_1; obj* x_3; x_1 = lean::unbox(x_0); lean::dec(x_0); x_3 = l_lean_ir_type_to__format___main(x_1); return x_3; } } obj* _init_l_lean_ir_result_has__to__string() { _start: { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_has__repr___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_to__fmt___at_lean_ir_result_has__to__string___spec__1), 1, 0); x_2 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); return x_2; } } obj* l_lean_format_join__sep___main___at_lean_ir_header_to__format___spec__1(obj* x_0, obj* x_1) { _start: { if (lean::obj_tag(x_0) == 0) { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::box(0); return x_4; } else { obj* x_5; obj* x_7; x_5 = lean::cnstr_get(x_0, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_0, 1); lean::inc(x_7); lean::dec(x_0); if (lean::obj_tag(x_7) == 0) { obj* x_12; lean::dec(x_7); lean::dec(x_1); x_12 = l_lean_ir_arg_to__format___main(x_5); return x_12; } else { obj* x_13; uint8 x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; x_13 = l_lean_ir_arg_to__format___main(x_5); x_14 = 0; lean::inc(x_1); x_16 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_16, 0, x_13); lean::cnstr_set(x_16, 1, x_1); lean::cnstr_set_scalar(x_16, sizeof(void*)*2, x_14); x_17 = x_16; x_18 = l_lean_format_join__sep___main___at_lean_ir_header_to__format___spec__1(x_7, x_1); x_19 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_19, 0, x_17); lean::cnstr_set(x_19, 1, x_18); lean::cnstr_set_scalar(x_19, sizeof(void*)*2, x_14); x_20 = x_19; return x_20; } } } } obj* l_lean_ir_header_to__format(obj* x_0) { _start: { obj* x_1; obj* x_3; uint8 x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; uint8 x_22; obj* x_24; obj* x_25; obj* x_26; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__2(x_1); x_4 = 0; x_5 = l_lean_format_flatten___main___closed__1; lean::inc(x_5); x_7 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_7, 0, x_3); lean::cnstr_set(x_7, 1, x_5); lean::cnstr_set_scalar(x_7, sizeof(void*)*2, x_4); x_8 = x_7; x_9 = lean::cnstr_get(x_0, 1); lean::inc(x_9); lean::inc(x_5); x_12 = l_lean_format_join__sep___main___at_lean_ir_header_to__format___spec__1(x_9, x_5); x_13 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_13, 0, x_8); lean::cnstr_set(x_13, 1, x_12); lean::cnstr_set_scalar(x_13, sizeof(void*)*2, x_4); x_14 = x_13; x_15 = l_lean_ir_instr_to__format___main___closed__1; lean::inc(x_15); x_17 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_17, 0, x_14); lean::cnstr_set(x_17, 1, x_15); lean::cnstr_set_scalar(x_17, sizeof(void*)*2, x_4); x_18 = x_17; x_19 = lean::cnstr_get(x_0, 2); lean::inc(x_19); lean::dec(x_0); x_22 = lean::unbox(x_19); lean::dec(x_19); x_24 = l_lean_ir_type_to__format___main(x_22); x_25 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_25, 0, x_18); lean::cnstr_set(x_25, 1, x_24); lean::cnstr_set_scalar(x_25, sizeof(void*)*2, x_4); x_26 = x_25; return x_26; } } obj* _init_l_lean_ir_header_has__to__format() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_ir_header_to__format), 1, 0); return x_0; } } obj* l_lean_to__fmt___at_lean_ir_header_has__to__string___spec__1(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_header_to__format(x_0); return x_1; } } obj* _init_l_lean_ir_header_has__to__string() { _start: { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_has__repr___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_to__fmt___at_lean_ir_header_has__to__string___spec__1), 1, 0); x_2 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); return x_2; } } obj* l_lean_format_join__sep___main___at_lean_ir_decl_to__format___main___spec__1(obj* x_0, obj* x_1) { _start: { if (lean::obj_tag(x_0) == 0) { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::box(0); return x_4; } else { obj* x_5; obj* x_7; x_5 = lean::cnstr_get(x_0, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_0, 1); lean::inc(x_7); lean::dec(x_0); if (lean::obj_tag(x_7) == 0) { obj* x_12; lean::dec(x_7); lean::dec(x_1); x_12 = l_lean_ir_block_to__format___main(x_5); return x_12; } else { obj* x_13; uint8 x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; x_13 = l_lean_ir_block_to__format___main(x_5); x_14 = 0; lean::inc(x_1); x_16 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_16, 0, x_13); lean::cnstr_set(x_16, 1, x_1); lean::cnstr_set_scalar(x_16, sizeof(void*)*2, x_14); x_17 = x_16; x_18 = l_lean_format_join__sep___main___at_lean_ir_decl_to__format___main___spec__1(x_7, x_1); x_19 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_19, 0, x_17); lean::cnstr_set(x_19, 1, x_18); lean::cnstr_set_scalar(x_19, sizeof(void*)*2, x_14); x_20 = x_19; return x_20; } } } } obj* _init_l_lean_ir_decl_to__format___main___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("external "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_decl_to__format___main___closed__2() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("def "); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_decl_to__format___main(obj* x_0) { _start: { if (lean::obj_tag(x_0) == 0) { obj* x_1; obj* x_4; uint8 x_5; obj* x_6; obj* x_8; obj* x_9; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); lean::dec(x_0); x_4 = l_lean_ir_header_to__format(x_1); x_5 = 0; x_6 = l_lean_ir_decl_to__format___main___closed__1; lean::inc(x_6); x_8 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_8, 0, x_6); lean::cnstr_set(x_8, 1, x_4); lean::cnstr_set_scalar(x_8, sizeof(void*)*2, x_5); x_9 = x_8; return x_9; } else { obj* x_10; obj* x_12; obj* x_15; uint8 x_16; obj* x_17; obj* x_19; obj* x_20; 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_33; obj* x_34; x_10 = lean::cnstr_get(x_0, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_0, 1); lean::inc(x_12); lean::dec(x_0); x_15 = l_lean_ir_header_to__format(x_10); x_16 = 0; x_17 = l_lean_ir_decl_to__format___main___closed__2; lean::inc(x_17); x_19 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_19, 0, x_17); lean::cnstr_set(x_19, 1, x_15); lean::cnstr_set_scalar(x_19, sizeof(void*)*2, x_16); x_20 = x_19; x_21 = l_lean_ir_instr_to__format___main___closed__2; lean::inc(x_21); x_23 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_23, 0, x_20); lean::cnstr_set(x_23, 1, x_21); lean::cnstr_set_scalar(x_23, sizeof(void*)*2, x_16); x_24 = x_23; x_25 = lean::box(1); lean::inc(x_25); x_27 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_27, 0, x_24); lean::cnstr_set(x_27, 1, x_25); lean::cnstr_set_scalar(x_27, sizeof(void*)*2, x_16); x_28 = x_27; lean::inc(x_25); x_30 = l_lean_format_join__sep___main___at_lean_ir_decl_to__format___main___spec__1(x_12, x_25); x_31 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_31, 0, x_28); lean::cnstr_set(x_31, 1, x_30); lean::cnstr_set_scalar(x_31, sizeof(void*)*2, x_16); x_32 = x_31; x_33 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_33, 0, x_32); lean::cnstr_set(x_33, 1, x_25); lean::cnstr_set_scalar(x_33, sizeof(void*)*2, x_16); x_34 = x_33; return x_34; } } } obj* l_lean_ir_decl_to__format(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_decl_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_decl_has__to__format() { _start: { obj* x_0; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_ir_decl_to__format), 1, 0); return x_0; } } obj* l_lean_to__fmt___at_lean_ir_decl_has__to__string___spec__1(obj* x_0) { _start: { obj* x_1; x_1 = l_lean_ir_decl_to__format___main(x_0); return x_1; } } obj* _init_l_lean_ir_decl_has__to__string() { _start: { obj* x_0; obj* x_1; obj* x_2; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_has__repr___lambda__1), 1, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_to__fmt___at_lean_ir_decl_has__to__string___spec__1), 1, 0); x_2 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); lean::closure_set(x_2, 0, x_0); lean::closure_set(x_2, 1, x_1); return x_2; } } obj* l_lean_ir_phi_decorate__error___rarg(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_3; obj* x_5; obj* x_6; x_3 = lean::cnstr_get(x_0, 1); lean::inc(x_3); x_5 = lean::alloc_closure(reinterpret_cast(l_lean_ir_phi_decorate__error___rarg___lambda__1), 3, 2); lean::closure_set(x_5, 0, x_0); lean::closure_set(x_5, 1, x_1); x_6 = lean::apply_3(x_3, lean::box(0), x_2, x_5); return x_6; } } obj* _init_l_lean_ir_phi_decorate__error___rarg___lambda__1___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("at phi '"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* _init_l_lean_ir_phi_decorate__error___rarg___lambda__1___closed__2() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("'"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_phi_decorate__error___rarg___lambda__1(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_3; obj* x_6; uint8 x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; x_3 = lean::cnstr_get(x_0, 0); lean::inc(x_3); lean::dec(x_0); x_6 = l_lean_ir_phi_to__format___main(x_1); x_7 = 0; x_8 = l_lean_ir_phi_decorate__error___rarg___lambda__1___closed__1; lean::inc(x_8); x_10 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_10, 0, x_8); lean::cnstr_set(x_10, 1, x_6); lean::cnstr_set_scalar(x_10, sizeof(void*)*2, x_7); x_11 = x_10; x_12 = l_lean_ir_phi_decorate__error___rarg___lambda__1___closed__2; lean::inc(x_12); x_14 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_14, 0, x_11); lean::cnstr_set(x_14, 1, x_12); lean::cnstr_set_scalar(x_14, sizeof(void*)*2, x_7); x_15 = x_14; x_16 = lean::box(1); x_17 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_17, 0, x_15); lean::cnstr_set(x_17, 1, x_16); lean::cnstr_set_scalar(x_17, sizeof(void*)*2, x_7); x_18 = x_17; x_19 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_19, 0, x_18); lean::cnstr_set(x_19, 1, x_2); lean::cnstr_set_scalar(x_19, sizeof(void*)*2, x_7); x_20 = x_19; x_21 = lean::apply_2(x_3, lean::box(0), x_20); return x_21; } } obj* l_lean_ir_phi_decorate__error(obj* x_0, obj* x_1) { _start: { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::alloc_closure(reinterpret_cast(l_lean_ir_phi_decorate__error___rarg), 3, 0); return x_4; } } obj* l_lean_ir_instr_decorate__error___rarg(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_3; obj* x_5; obj* x_6; x_3 = lean::cnstr_get(x_0, 1); lean::inc(x_3); x_5 = lean::alloc_closure(reinterpret_cast(l_lean_ir_instr_decorate__error___rarg___lambda__1), 3, 2); lean::closure_set(x_5, 0, x_0); lean::closure_set(x_5, 1, x_1); x_6 = lean::apply_3(x_3, lean::box(0), x_2, x_5); return x_6; } } obj* _init_l_lean_ir_instr_decorate__error___rarg___lambda__1___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("at instruction '"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_instr_decorate__error___rarg___lambda__1(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_3; obj* x_6; uint8 x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; x_3 = lean::cnstr_get(x_0, 0); lean::inc(x_3); lean::dec(x_0); x_6 = l_lean_ir_instr_to__format___main(x_1); x_7 = 0; x_8 = l_lean_ir_instr_decorate__error___rarg___lambda__1___closed__1; lean::inc(x_8); x_10 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_10, 0, x_8); lean::cnstr_set(x_10, 1, x_6); lean::cnstr_set_scalar(x_10, sizeof(void*)*2, x_7); x_11 = x_10; x_12 = l_lean_ir_phi_decorate__error___rarg___lambda__1___closed__2; lean::inc(x_12); x_14 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_14, 0, x_11); lean::cnstr_set(x_14, 1, x_12); lean::cnstr_set_scalar(x_14, sizeof(void*)*2, x_7); x_15 = x_14; x_16 = lean::box(1); x_17 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_17, 0, x_15); lean::cnstr_set(x_17, 1, x_16); lean::cnstr_set_scalar(x_17, sizeof(void*)*2, x_7); x_18 = x_17; x_19 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_19, 0, x_18); lean::cnstr_set(x_19, 1, x_2); lean::cnstr_set_scalar(x_19, sizeof(void*)*2, x_7); x_20 = x_19; x_21 = lean::apply_2(x_3, lean::box(0), x_20); return x_21; } } obj* l_lean_ir_instr_decorate__error(obj* x_0, obj* x_1) { _start: { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::alloc_closure(reinterpret_cast(l_lean_ir_instr_decorate__error___rarg), 3, 0); return x_4; } } obj* l_lean_ir_terminator_decorate__error___rarg(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_3; obj* x_5; obj* x_6; x_3 = lean::cnstr_get(x_0, 1); lean::inc(x_3); x_5 = lean::alloc_closure(reinterpret_cast(l_lean_ir_terminator_decorate__error___rarg___lambda__1), 3, 2); lean::closure_set(x_5, 0, x_0); lean::closure_set(x_5, 1, x_1); x_6 = lean::apply_3(x_3, lean::box(0), x_2, x_5); return x_6; } } obj* _init_l_lean_ir_terminator_decorate__error___rarg___lambda__1___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("at terminator '"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_terminator_decorate__error___rarg___lambda__1(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_3; obj* x_6; uint8 x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; x_3 = lean::cnstr_get(x_0, 0); lean::inc(x_3); lean::dec(x_0); x_6 = l_lean_ir_terminator_to__format___main(x_1); x_7 = 0; x_8 = l_lean_ir_terminator_decorate__error___rarg___lambda__1___closed__1; lean::inc(x_8); x_10 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_10, 0, x_8); lean::cnstr_set(x_10, 1, x_6); lean::cnstr_set_scalar(x_10, sizeof(void*)*2, x_7); x_11 = x_10; x_12 = l_lean_ir_phi_decorate__error___rarg___lambda__1___closed__2; lean::inc(x_12); x_14 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_14, 0, x_11); lean::cnstr_set(x_14, 1, x_12); lean::cnstr_set_scalar(x_14, sizeof(void*)*2, x_7); x_15 = x_14; x_16 = lean::box(1); x_17 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_17, 0, x_15); lean::cnstr_set(x_17, 1, x_16); lean::cnstr_set_scalar(x_17, sizeof(void*)*2, x_7); x_18 = x_17; x_19 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_19, 0, x_18); lean::cnstr_set(x_19, 1, x_2); lean::cnstr_set_scalar(x_19, sizeof(void*)*2, x_7); x_20 = x_19; x_21 = lean::apply_2(x_3, lean::box(0), x_20); return x_21; } } obj* l_lean_ir_terminator_decorate__error(obj* x_0, obj* x_1) { _start: { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::alloc_closure(reinterpret_cast(l_lean_ir_terminator_decorate__error___rarg), 3, 0); return x_4; } } obj* l_lean_ir_block_decorate__error___rarg(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_3; obj* x_5; obj* x_6; x_3 = lean::cnstr_get(x_0, 1); lean::inc(x_3); x_5 = lean::alloc_closure(reinterpret_cast(l_lean_ir_block_decorate__error___rarg___lambda__1), 3, 2); lean::closure_set(x_5, 0, x_0); lean::closure_set(x_5, 1, x_1); x_6 = lean::apply_3(x_3, lean::box(0), x_2, x_5); return x_6; } } obj* _init_l_lean_ir_block_decorate__error___rarg___lambda__1___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("at block '"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_block_decorate__error___rarg___lambda__1(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_3; obj* x_6; obj* x_9; uint8 x_10; obj* x_11; 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_22; obj* x_23; obj* x_24; x_3 = lean::cnstr_get(x_0, 0); lean::inc(x_3); lean::dec(x_0); x_6 = lean::cnstr_get(x_1, 0); lean::inc(x_6); lean::dec(x_1); x_9 = l_lean_to__fmt___at_lean_ir_terminator_to__format___main___spec__4(x_6); x_10 = 0; x_11 = l_lean_ir_block_decorate__error___rarg___lambda__1___closed__1; lean::inc(x_11); x_13 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_13, 0, x_11); lean::cnstr_set(x_13, 1, x_9); lean::cnstr_set_scalar(x_13, sizeof(void*)*2, x_10); x_14 = x_13; x_15 = l_lean_ir_phi_decorate__error___rarg___lambda__1___closed__2; lean::inc(x_15); x_17 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_17, 0, x_14); lean::cnstr_set(x_17, 1, x_15); lean::cnstr_set_scalar(x_17, sizeof(void*)*2, x_10); x_18 = x_17; x_19 = lean::box(1); x_20 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_20, 0, x_18); lean::cnstr_set(x_20, 1, x_19); lean::cnstr_set_scalar(x_20, sizeof(void*)*2, x_10); x_21 = x_20; x_22 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_22, 0, x_21); lean::cnstr_set(x_22, 1, x_2); lean::cnstr_set_scalar(x_22, sizeof(void*)*2, x_10); x_23 = x_22; x_24 = lean::apply_2(x_3, lean::box(0), x_23); return x_24; } } obj* l_lean_ir_block_decorate__error(obj* x_0, obj* x_1) { _start: { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::alloc_closure(reinterpret_cast(l_lean_ir_block_decorate__error___rarg), 3, 0); return x_4; } } obj* l_lean_ir_header_decorate__error___rarg(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_3; obj* x_5; obj* x_6; x_3 = lean::cnstr_get(x_0, 1); lean::inc(x_3); x_5 = lean::alloc_closure(reinterpret_cast(l_lean_ir_header_decorate__error___rarg___lambda__1), 3, 2); lean::closure_set(x_5, 0, x_0); lean::closure_set(x_5, 1, x_1); x_6 = lean::apply_3(x_3, lean::box(0), x_2, x_5); return x_6; } } obj* _init_l_lean_ir_header_decorate__error___rarg___lambda__1___closed__1() { _start: { obj* x_0; obj* x_1; x_0 = lean::mk_string("error at declaration '"); x_1 = lean::alloc_cnstr(2, 1, 0); lean::cnstr_set(x_1, 0, x_0); return x_1; } } obj* l_lean_ir_header_decorate__error___rarg___lambda__1(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_3; obj* x_6; obj* x_9; uint8 x_10; obj* x_11; 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_22; obj* x_23; obj* x_24; x_3 = lean::cnstr_get(x_0, 0); lean::inc(x_3); lean::dec(x_0); x_6 = lean::cnstr_get(x_1, 0); lean::inc(x_6); lean::dec(x_1); x_9 = l_lean_to__fmt___at_lean_ir_instr_to__format___main___spec__2(x_6); x_10 = 0; x_11 = l_lean_ir_header_decorate__error___rarg___lambda__1___closed__1; lean::inc(x_11); x_13 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_13, 0, x_11); lean::cnstr_set(x_13, 1, x_9); lean::cnstr_set_scalar(x_13, sizeof(void*)*2, x_10); x_14 = x_13; x_15 = l_lean_ir_phi_decorate__error___rarg___lambda__1___closed__2; lean::inc(x_15); x_17 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_17, 0, x_14); lean::cnstr_set(x_17, 1, x_15); lean::cnstr_set_scalar(x_17, sizeof(void*)*2, x_10); x_18 = x_17; x_19 = lean::box(1); x_20 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_20, 0, x_18); lean::cnstr_set(x_20, 1, x_19); lean::cnstr_set_scalar(x_20, sizeof(void*)*2, x_10); x_21 = x_20; x_22 = lean::alloc_cnstr(4, 2, 1); lean::cnstr_set(x_22, 0, x_21); lean::cnstr_set(x_22, 1, x_2); lean::cnstr_set_scalar(x_22, sizeof(void*)*2, x_10); x_23 = x_22; x_24 = lean::apply_2(x_3, lean::box(0), x_23); return x_24; } } obj* l_lean_ir_header_decorate__error(obj* x_0, obj* x_1) { _start: { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::alloc_closure(reinterpret_cast(l_lean_ir_header_decorate__error___rarg), 3, 0); return x_4; } } obj* l_lean_ir_decl_decorate__error___rarg(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_3; obj* x_4; obj* x_6; obj* x_7; x_3 = l_lean_ir_decl_header___main(x_1); x_4 = lean::cnstr_get(x_0, 1); lean::inc(x_4); x_6 = lean::alloc_closure(reinterpret_cast(l_lean_ir_header_decorate__error___rarg___lambda__1), 3, 2); lean::closure_set(x_6, 0, x_0); lean::closure_set(x_6, 1, x_3); x_7 = lean::apply_3(x_4, lean::box(0), x_2, x_6); return x_7; } } obj* l_lean_ir_decl_decorate__error(obj* x_0, obj* x_1) { _start: { obj* x_4; lean::dec(x_1); lean::dec(x_0); x_4 = lean::alloc_closure(reinterpret_cast(l_lean_ir_decl_decorate__error___rarg), 3, 0); return x_4; } } void initialize_init_lean_format(); void initialize_init_lean_parser_identifier(); void initialize_init_lean_ir_reserved(); void initialize_init_lean_ir_ir(); static bool _G_initialized = false; void initialize_init_lean_ir_format() { if (_G_initialized) return; _G_initialized = true; initialize_init_lean_format(); initialize_init_lean_parser_identifier(); initialize_init_lean_ir_reserved(); initialize_init_lean_ir_ir(); l_lean_ir_escape__string___closed__1 = _init_l_lean_ir_escape__string___closed__1(); l_lean_ir_escape__string___closed__2 = _init_l_lean_ir_escape__string___closed__2(); l_lean_ir_id_to__string___main___closed__1 = _init_l_lean_ir_id_to__string___main___closed__1(); l_lean_ir_tag_has__to__format = _init_l_lean_ir_tag_has__to__format(); l_lean_ir_tag_has__to__string = _init_l_lean_ir_tag_has__to__string(); l_lean_ir_type_to__format___main___closed__1 = _init_l_lean_ir_type_to__format___main___closed__1(); l_lean_ir_type_to__format___main___closed__2 = _init_l_lean_ir_type_to__format___main___closed__2(); l_lean_ir_type_to__format___main___closed__3 = _init_l_lean_ir_type_to__format___main___closed__3(); l_lean_ir_type_to__format___main___closed__4 = _init_l_lean_ir_type_to__format___main___closed__4(); l_lean_ir_type_to__format___main___closed__5 = _init_l_lean_ir_type_to__format___main___closed__5(); l_lean_ir_type_to__format___main___closed__6 = _init_l_lean_ir_type_to__format___main___closed__6(); l_lean_ir_type_to__format___main___closed__7 = _init_l_lean_ir_type_to__format___main___closed__7(); l_lean_ir_type_to__format___main___closed__8 = _init_l_lean_ir_type_to__format___main___closed__8(); l_lean_ir_type_to__format___main___closed__9 = _init_l_lean_ir_type_to__format___main___closed__9(); l_lean_ir_type_to__format___main___closed__10 = _init_l_lean_ir_type_to__format___main___closed__10(); l_lean_ir_type_to__format___main___closed__11 = _init_l_lean_ir_type_to__format___main___closed__11(); l_lean_ir_type_to__format___main___closed__12 = _init_l_lean_ir_type_to__format___main___closed__12(); l_lean_ir_type_has__to__format = _init_l_lean_ir_type_has__to__format(); l_lean_ir_type_has__to__string = _init_l_lean_ir_type_has__to__string(); l_lean_ir_assign__unop_to__format___main___closed__1 = _init_l_lean_ir_assign__unop_to__format___main___closed__1(); l_lean_ir_assign__unop_to__format___main___closed__2 = _init_l_lean_ir_assign__unop_to__format___main___closed__2(); l_lean_ir_assign__unop_to__format___main___closed__3 = _init_l_lean_ir_assign__unop_to__format___main___closed__3(); l_lean_ir_assign__unop_to__format___main___closed__4 = _init_l_lean_ir_assign__unop_to__format___main___closed__4(); l_lean_ir_assign__unop_to__format___main___closed__5 = _init_l_lean_ir_assign__unop_to__format___main___closed__5(); l_lean_ir_assign__unop_to__format___main___closed__6 = _init_l_lean_ir_assign__unop_to__format___main___closed__6(); l_lean_ir_assign__unop_to__format___main___closed__7 = _init_l_lean_ir_assign__unop_to__format___main___closed__7(); l_lean_ir_assign__unop_to__format___main___closed__8 = _init_l_lean_ir_assign__unop_to__format___main___closed__8(); l_lean_ir_assign__unop_to__format___main___closed__9 = _init_l_lean_ir_assign__unop_to__format___main___closed__9(); l_lean_ir_assign__unop_to__format___main___closed__10 = _init_l_lean_ir_assign__unop_to__format___main___closed__10(); l_lean_ir_assign__unop_to__format___main___closed__11 = _init_l_lean_ir_assign__unop_to__format___main___closed__11(); l_lean_ir_assign__unop_to__format___main___closed__12 = _init_l_lean_ir_assign__unop_to__format___main___closed__12(); l_lean_ir_assign__unop_to__format___main___closed__13 = _init_l_lean_ir_assign__unop_to__format___main___closed__13(); l_lean_ir_assign__unop_to__format___main___closed__14 = _init_l_lean_ir_assign__unop_to__format___main___closed__14(); l_lean_ir_assign__unop_to__format___main___closed__15 = _init_l_lean_ir_assign__unop_to__format___main___closed__15(); l_lean_ir_assign__unop_to__format___main___closed__16 = _init_l_lean_ir_assign__unop_to__format___main___closed__16(); l_lean_ir_assign__unop_to__format___main___closed__17 = _init_l_lean_ir_assign__unop_to__format___main___closed__17(); l_lean_ir_assign__unop_to__format___main___closed__18 = _init_l_lean_ir_assign__unop_to__format___main___closed__18(); l_lean_ir_assign__unop_has__to__format = _init_l_lean_ir_assign__unop_has__to__format(); l_lean_ir_assign__unop_has__to__string = _init_l_lean_ir_assign__unop_has__to__string(); l_lean_ir_assign__binop_to__format___main___closed__1 = _init_l_lean_ir_assign__binop_to__format___main___closed__1(); l_lean_ir_assign__binop_to__format___main___closed__2 = _init_l_lean_ir_assign__binop_to__format___main___closed__2(); l_lean_ir_assign__binop_to__format___main___closed__3 = _init_l_lean_ir_assign__binop_to__format___main___closed__3(); l_lean_ir_assign__binop_to__format___main___closed__4 = _init_l_lean_ir_assign__binop_to__format___main___closed__4(); l_lean_ir_assign__binop_to__format___main___closed__5 = _init_l_lean_ir_assign__binop_to__format___main___closed__5(); l_lean_ir_assign__binop_to__format___main___closed__6 = _init_l_lean_ir_assign__binop_to__format___main___closed__6(); l_lean_ir_assign__binop_to__format___main___closed__7 = _init_l_lean_ir_assign__binop_to__format___main___closed__7(); l_lean_ir_assign__binop_to__format___main___closed__8 = _init_l_lean_ir_assign__binop_to__format___main___closed__8(); l_lean_ir_assign__binop_to__format___main___closed__9 = _init_l_lean_ir_assign__binop_to__format___main___closed__9(); l_lean_ir_assign__binop_to__format___main___closed__10 = _init_l_lean_ir_assign__binop_to__format___main___closed__10(); l_lean_ir_assign__binop_to__format___main___closed__11 = _init_l_lean_ir_assign__binop_to__format___main___closed__11(); l_lean_ir_assign__binop_to__format___main___closed__12 = _init_l_lean_ir_assign__binop_to__format___main___closed__12(); l_lean_ir_assign__binop_to__format___main___closed__13 = _init_l_lean_ir_assign__binop_to__format___main___closed__13(); l_lean_ir_assign__binop_to__format___main___closed__14 = _init_l_lean_ir_assign__binop_to__format___main___closed__14(); l_lean_ir_assign__binop_to__format___main___closed__15 = _init_l_lean_ir_assign__binop_to__format___main___closed__15(); l_lean_ir_assign__binop_to__format___main___closed__16 = _init_l_lean_ir_assign__binop_to__format___main___closed__16(); l_lean_ir_assign__binop_to__format___main___closed__17 = _init_l_lean_ir_assign__binop_to__format___main___closed__17(); l_lean_ir_assign__binop_to__format___main___closed__18 = _init_l_lean_ir_assign__binop_to__format___main___closed__18(); l_lean_ir_assign__binop_to__format___main___closed__19 = _init_l_lean_ir_assign__binop_to__format___main___closed__19(); l_lean_ir_assign__binop_to__format___main___closed__20 = _init_l_lean_ir_assign__binop_to__format___main___closed__20(); l_lean_ir_assign__binop_to__format___main___closed__21 = _init_l_lean_ir_assign__binop_to__format___main___closed__21(); l_lean_ir_assign__binop_to__format___main___closed__22 = _init_l_lean_ir_assign__binop_to__format___main___closed__22(); l_lean_ir_assign__binop_to__format___main___closed__23 = _init_l_lean_ir_assign__binop_to__format___main___closed__23(); l_lean_ir_assign__binop_to__format___main___closed__24 = _init_l_lean_ir_assign__binop_to__format___main___closed__24(); l_lean_ir_assign__binop_to__format___main___closed__25 = _init_l_lean_ir_assign__binop_to__format___main___closed__25(); l_lean_ir_assign__binop_to__format___main___closed__26 = _init_l_lean_ir_assign__binop_to__format___main___closed__26(); l_lean_ir_assign__binop_to__format___main___closed__27 = _init_l_lean_ir_assign__binop_to__format___main___closed__27(); l_lean_ir_assign__binop_has__to__format = _init_l_lean_ir_assign__binop_has__to__format(); l_lean_ir_assign__binop_has__to__string = _init_l_lean_ir_assign__binop_has__to__string(); l_lean_ir_unop_to__format___main___closed__1 = _init_l_lean_ir_unop_to__format___main___closed__1(); l_lean_ir_unop_to__format___main___closed__2 = _init_l_lean_ir_unop_to__format___main___closed__2(); l_lean_ir_unop_to__format___main___closed__3 = _init_l_lean_ir_unop_to__format___main___closed__3(); l_lean_ir_unop_to__format___main___closed__4 = _init_l_lean_ir_unop_to__format___main___closed__4(); l_lean_ir_unop_to__format___main___closed__5 = _init_l_lean_ir_unop_to__format___main___closed__5(); l_lean_ir_unop_to__format___main___closed__6 = _init_l_lean_ir_unop_to__format___main___closed__6(); l_lean_ir_unop_to__format___main___closed__7 = _init_l_lean_ir_unop_to__format___main___closed__7(); l_lean_ir_unop_to__format___main___closed__8 = _init_l_lean_ir_unop_to__format___main___closed__8(); l_lean_ir_unop_to__format___main___closed__9 = _init_l_lean_ir_unop_to__format___main___closed__9(); l_lean_ir_unop_has__to__format = _init_l_lean_ir_unop_has__to__format(); l_lean_ir_unop_has__to__string = _init_l_lean_ir_unop_has__to__string(); l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1___closed__1 = _init_l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1___closed__1(); l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1___closed__2 = _init_l_lean_to__fmt___at_lean_ir_literal_to__format___main___spec__1___closed__2(); l_lean_ir_literal_has__to__format = _init_l_lean_ir_literal_has__to__format(); l_lean_ir_literal_has__to__string = _init_l_lean_ir_literal_has__to__string(); l_lean_ir_sizet__entry_to__format___main___closed__1 = _init_l_lean_ir_sizet__entry_to__format___main___closed__1(); l_lean_ir_instr_to__format___main___closed__1 = _init_l_lean_ir_instr_to__format___main___closed__1(); l_lean_ir_instr_to__format___main___closed__2 = _init_l_lean_ir_instr_to__format___main___closed__2(); l_lean_ir_instr_to__format___main___closed__3 = _init_l_lean_ir_instr_to__format___main___closed__3(); l_lean_ir_instr_to__format___main___closed__4 = _init_l_lean_ir_instr_to__format___main___closed__4(); l_lean_ir_instr_to__format___main___closed__5 = _init_l_lean_ir_instr_to__format___main___closed__5(); l_lean_ir_instr_to__format___main___closed__6 = _init_l_lean_ir_instr_to__format___main___closed__6(); l_lean_ir_instr_to__format___main___closed__7 = _init_l_lean_ir_instr_to__format___main___closed__7(); l_lean_ir_instr_to__format___main___closed__8 = _init_l_lean_ir_instr_to__format___main___closed__8(); l_lean_ir_instr_to__format___main___closed__9 = _init_l_lean_ir_instr_to__format___main___closed__9(); l_lean_ir_instr_to__format___main___closed__10 = _init_l_lean_ir_instr_to__format___main___closed__10(); l_lean_ir_instr_to__format___main___closed__11 = _init_l_lean_ir_instr_to__format___main___closed__11(); l_lean_ir_instr_to__format___main___closed__12 = _init_l_lean_ir_instr_to__format___main___closed__12(); l_lean_ir_instr_to__format___main___closed__13 = _init_l_lean_ir_instr_to__format___main___closed__13(); l_lean_ir_instr_has__to__format = _init_l_lean_ir_instr_has__to__format(); l_lean_ir_instr_has__to__string = _init_l_lean_ir_instr_has__to__string(); l_lean_ir_phi_to__format___main___closed__1 = _init_l_lean_ir_phi_to__format___main___closed__1(); l_lean_ir_phi_has__to__format = _init_l_lean_ir_phi_has__to__format(); l_lean_ir_phi_has__to__string = _init_l_lean_ir_phi_has__to__string(); l_lean_ir_terminator_to__format___main___closed__1 = _init_l_lean_ir_terminator_to__format___main___closed__1(); l_lean_ir_terminator_to__format___main___closed__2 = _init_l_lean_ir_terminator_to__format___main___closed__2(); l_lean_ir_terminator_to__format___main___closed__3 = _init_l_lean_ir_terminator_to__format___main___closed__3(); l_lean_ir_terminator_has__to__format = _init_l_lean_ir_terminator_has__to__format(); l_lean_ir_terminator_has__to__string = _init_l_lean_ir_terminator_has__to__string(); l_lean_ir_block_to__format___main___closed__1 = _init_l_lean_ir_block_to__format___main___closed__1(); l_lean_ir_block_to__format___main___closed__2 = _init_l_lean_ir_block_to__format___main___closed__2(); l_lean_ir_block_has__to__format = _init_l_lean_ir_block_has__to__format(); l_lean_ir_block_has__to__string = _init_l_lean_ir_block_has__to__string(); l_lean_ir_arg_has__to__format = _init_l_lean_ir_arg_has__to__format(); l_lean_ir_arg_has__to__string = _init_l_lean_ir_arg_has__to__string(); l_lean_ir_result_has__to__format = _init_l_lean_ir_result_has__to__format(); l_lean_ir_result_has__to__string = _init_l_lean_ir_result_has__to__string(); l_lean_ir_header_has__to__format = _init_l_lean_ir_header_has__to__format(); l_lean_ir_header_has__to__string = _init_l_lean_ir_header_has__to__string(); l_lean_ir_decl_to__format___main___closed__1 = _init_l_lean_ir_decl_to__format___main___closed__1(); l_lean_ir_decl_to__format___main___closed__2 = _init_l_lean_ir_decl_to__format___main___closed__2(); l_lean_ir_decl_has__to__format = _init_l_lean_ir_decl_has__to__format(); l_lean_ir_decl_has__to__string = _init_l_lean_ir_decl_has__to__string(); l_lean_ir_phi_decorate__error___rarg___lambda__1___closed__1 = _init_l_lean_ir_phi_decorate__error___rarg___lambda__1___closed__1(); l_lean_ir_phi_decorate__error___rarg___lambda__1___closed__2 = _init_l_lean_ir_phi_decorate__error___rarg___lambda__1___closed__2(); l_lean_ir_instr_decorate__error___rarg___lambda__1___closed__1 = _init_l_lean_ir_instr_decorate__error___rarg___lambda__1___closed__1(); l_lean_ir_terminator_decorate__error___rarg___lambda__1___closed__1 = _init_l_lean_ir_terminator_decorate__error___rarg___lambda__1___closed__1(); l_lean_ir_block_decorate__error___rarg___lambda__1___closed__1 = _init_l_lean_ir_block_decorate__error___rarg___lambda__1___closed__1(); l_lean_ir_header_decorate__error___rarg___lambda__1___closed__1 = _init_l_lean_ir_header_decorate__error___rarg___lambda__1___closed__1(); }