From f4143c030ffefb4e50707c9f9008a59b1eb83936 Mon Sep 17 00:00:00 2001 From: Leonardo de Moura Date: Sun, 17 Feb 2019 06:53:05 -0800 Subject: [PATCH] chore(boot): update --- src/boot/init/data/list/basic.cpp | 11 +- src/boot/init/lean/compiler/const_folding.cpp | 408 +- src/boot/init/lean/compiler/util.cpp | 45 +- src/boot/init/lean/elaborator.cpp | 8897 ++++---- src/boot/init/lean/expander.cpp | 3702 ++-- src/boot/init/lean/expr.cpp | 26 +- src/boot/init/lean/frontend.cpp | 33 +- src/boot/init/lean/ir/format.cpp | 112 +- src/boot/init/lean/ir/lirc.cpp | 1017 +- src/boot/init/lean/ir/parser.cpp | 1612 +- src/boot/init/lean/name.cpp | 50 +- src/boot/init/lean/name_mangling.cpp | 1001 +- src/boot/init/lean/parser/basic.cpp | 36 +- src/boot/init/lean/parser/combinators.cpp | 238 +- src/boot/init/lean/parser/command.cpp | 2727 ++- src/boot/init/lean/parser/declaration.cpp | 10147 +++++---- src/boot/init/lean/parser/identifier.cpp | 221 +- src/boot/init/lean/parser/level.cpp | 1798 +- src/boot/init/lean/parser/module.cpp | 607 +- src/boot/init/lean/parser/notation.cpp | 6004 +++-- src/boot/init/lean/parser/parsec.cpp | 946 +- src/boot/init/lean/parser/pratt.cpp | 105 +- src/boot/init/lean/parser/rec.cpp | 7 +- src/boot/init/lean/parser/string_literal.cpp | 248 +- src/boot/init/lean/parser/term.cpp | 18452 ++++++++-------- src/boot/init/lean/parser/token.cpp | 8900 ++++---- src/boot/init/lean/parser/trie.cpp | 11 +- src/boot/init/lean/trace.cpp | 105 +- 28 files changed, 33048 insertions(+), 34418 deletions(-) diff --git a/src/boot/init/data/list/basic.cpp b/src/boot/init/data/list/basic.cpp index 6aba1dd8d7..c612cdcd79 100644 --- a/src/boot/init/data/list/basic.cpp +++ b/src/boot/init/data/list/basic.cpp @@ -2964,13 +2964,12 @@ return x_4; obj* _init_l_list_unzip___main___rarg___closed__1() { _start: { -obj* x_0; obj* x_2; +obj* x_0; obj* x_1; x_0 = lean::box(0); -lean::inc(x_0); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_0); -lean::cnstr_set(x_2, 1, x_0); -return x_2; +x_1 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1, 0, x_0); +lean::cnstr_set(x_1, 1, x_0); +return x_1; } } obj* l_list_unzip___main___rarg(obj* x_0) { diff --git a/src/boot/init/lean/compiler/const_folding.cpp b/src/boot/init/lean/compiler/const_folding.cpp index aff696427b..4c92b545ee 100644 --- a/src/boot/init/lean/compiler/const_folding.cpp +++ b/src/boot/init/lean/compiler/const_folding.cpp @@ -226,7 +226,7 @@ return x_7; obj* _init_l_lean_compiler_num__scalar__types() { _start: { -obj* x_0; obj* x_2; obj* x_3; obj* x_6; obj* x_7; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_17; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_27; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_37; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_47; obj* x_48; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; +obj* x_0; obj* x_2; obj* x_3; obj* x_6; obj* x_7; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_17; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_27; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_37; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; x_0 = lean::mk_nat_obj(8u); lean::inc(x_0); x_2 = l_lean_compiler_mk__uint__type__name(x_0); @@ -287,35 +287,34 @@ lean::cnstr_set(x_41, 2, x_37); lean::cnstr_set(x_41, 3, x_40); x_42 = lean::box(0); x_43 = lean::mk_string("usize"); -lean::inc(x_42); -x_45 = lean_name_mk_string(x_42, x_43); -lean::inc(x_45); -x_47 = lean_name_mk_string(x_45, x_3); -x_48 = l_system_platform_nbits; -lean::inc(x_48); -x_50 = l_nat_pow___main(x_7, x_48); -lean::inc(x_48); -x_52 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_52, 0, x_48); -lean::cnstr_set(x_52, 1, x_45); -lean::cnstr_set(x_52, 2, x_47); -lean::cnstr_set(x_52, 3, x_50); +x_44 = lean_name_mk_string(x_42, x_43); +lean::inc(x_44); +x_46 = lean_name_mk_string(x_44, x_3); +x_47 = l_system_platform_nbits; +lean::inc(x_47); +x_49 = l_nat_pow___main(x_7, x_47); +lean::inc(x_47); +x_51 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_51, 0, x_47); +lean::cnstr_set(x_51, 1, x_44); +lean::cnstr_set(x_51, 2, x_46); +lean::cnstr_set(x_51, 3, x_49); +x_52 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_52, 0, x_51); +lean::cnstr_set(x_52, 1, x_42); x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_42); +lean::cnstr_set(x_53, 0, x_41); +lean::cnstr_set(x_53, 1, x_52); x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_41); +lean::cnstr_set(x_54, 0, x_31); lean::cnstr_set(x_54, 1, x_53); x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_31); +lean::cnstr_set(x_55, 0, x_21); lean::cnstr_set(x_55, 1, x_54); x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_21); +lean::cnstr_set(x_56, 0, x_11); lean::cnstr_set(x_56, 1, x_55); -x_57 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_57, 0, x_11); -lean::cnstr_set(x_57, 1, x_56); -return x_57; +return x_56; } } obj* l_list_foldr___main___at_lean_compiler_is__of__nat___spec__1(obj* x_0, obj* x_1) { @@ -938,59 +937,54 @@ return x_4; obj* _init_l_lean_compiler_pre__uint__bin__fold__fns() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; 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_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; x_0 = lean::box(0); x_1 = lean::mk_string("add"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__uint__add___boxed), 3, 0); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -x_6 = lean::mk_string("mul"); -lean::inc(x_0); -x_8 = lean_name_mk_string(x_0, x_6); -x_9 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__uint__mul___boxed), 3, 0); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::mk_string("div"); -lean::inc(x_0); -x_13 = lean_name_mk_string(x_0, x_11); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__uint__div___boxed), 3, 0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::mk_string("mod"); -lean::inc(x_0); -x_18 = lean_name_mk_string(x_0, x_16); -x_19 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__uint__mod___boxed), 3, 0); +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__uint__add___boxed), 3, 0); +x_4 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_4, 0, x_2); +lean::cnstr_set(x_4, 1, x_3); +x_5 = lean::mk_string("mul"); +x_6 = lean_name_mk_string(x_0, x_5); +x_7 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__uint__mul___boxed), 3, 0); +x_8 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_8, 0, x_6); +lean::cnstr_set(x_8, 1, x_7); +x_9 = lean::mk_string("div"); +x_10 = lean_name_mk_string(x_0, x_9); +x_11 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__uint__div___boxed), 3, 0); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_10); +lean::cnstr_set(x_12, 1, x_11); +x_13 = lean::mk_string("mod"); +x_14 = lean_name_mk_string(x_0, x_13); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__uint__mod___boxed), 3, 0); +x_16 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_16, 0, x_14); +lean::cnstr_set(x_16, 1, x_15); +x_17 = lean::mk_string("sub"); +x_18 = lean_name_mk_string(x_0, x_17); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__uint__sub___boxed), 3, 0); x_20 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_20, 0, x_18); lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::mk_string("sub"); -lean::inc(x_0); -x_23 = lean_name_mk_string(x_0, x_21); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__uint__sub___boxed), 3, 0); -x_25 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_25, 0, x_23); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_20); +lean::cnstr_set(x_21, 1, x_0); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_16); +lean::cnstr_set(x_22, 1, x_21); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_12); +lean::cnstr_set(x_23, 1, x_22); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_8); +lean::cnstr_set(x_24, 1, x_23); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_4); lean::cnstr_set(x_25, 1, x_24); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_0); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_20); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_15); -lean::cnstr_set(x_28, 1, x_27); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_10); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_5); -lean::cnstr_set(x_30, 1, x_29); -return x_30; +return x_25; } } obj* l_list_map___main___at_lean_compiler_uint__bin__fold__fns___spec__1(obj* x_0, obj* x_1) { @@ -1289,24 +1283,21 @@ return x_2; obj* _init_l_lean_compiler_mk__nat__eq___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; x_0 = lean::box(0); x_1 = lean::mk_string("eq"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = l_lean_level_one; -lean::inc(x_0); -lean::inc(x_4); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_0); -x_8 = lean_expr_mk_const(x_3, x_7); -x_9 = lean::mk_string("nat"); -lean::inc(x_0); -x_11 = lean_name_mk_string(x_0, x_9); -x_12 = lean_expr_mk_const(x_11, x_0); -x_13 = lean_expr_mk_app(x_8, x_12); -return x_13; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = l_lean_level_one; +lean::inc(x_3); +x_5 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_5, 0, x_3); +lean::cnstr_set(x_5, 1, x_0); +x_6 = lean_expr_mk_const(x_2, x_5); +x_7 = lean::mk_string("nat"); +x_8 = lean_name_mk_string(x_0, x_7); +x_9 = lean_expr_mk_const(x_8, x_0); +x_10 = lean_expr_mk_app(x_6, x_9); +return x_10; } } obj* l_lean_compiler_mk__nat__eq(obj* x_0, obj* x_1) { @@ -1322,30 +1313,25 @@ return x_4; obj* _init_l_lean_compiler_mk__nat__lt___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_6; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_16; obj* x_17; obj* x_18; obj* x_19; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; x_0 = lean::box(0); x_1 = lean::mk_string("has_lt"); lean::inc(x_1); -lean::inc(x_0); -x_4 = lean_name_mk_string(x_0, x_1); -x_5 = lean::mk_string("lt"); -x_6 = lean_name_mk_string(x_4, x_5); -lean::inc(x_0); -lean::inc(x_0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_0); -lean::cnstr_set(x_9, 1, x_0); -x_10 = lean_expr_mk_const(x_6, x_9); -x_11 = lean::mk_string("nat"); -lean::inc(x_0); -x_13 = lean_name_mk_string(x_0, x_11); -lean::inc(x_0); -lean::inc(x_13); -x_16 = lean_expr_mk_const(x_13, x_0); -x_17 = lean_name_mk_string(x_13, x_1); -x_18 = lean_expr_mk_const(x_17, x_0); -x_19 = l_lean_mk__bin__app(x_10, x_16, x_18); -return x_19; +x_3 = lean_name_mk_string(x_0, x_1); +x_4 = lean::mk_string("lt"); +x_5 = lean_name_mk_string(x_3, x_4); +x_6 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_6, 0, x_0); +lean::cnstr_set(x_6, 1, x_0); +x_7 = lean_expr_mk_const(x_5, x_6); +x_8 = lean::mk_string("nat"); +x_9 = lean_name_mk_string(x_0, x_8); +lean::inc(x_9); +x_11 = lean_expr_mk_const(x_9, x_0); +x_12 = lean_name_mk_string(x_9, x_1); +x_13 = lean_expr_mk_const(x_12, x_0); +x_14 = l_lean_mk__bin__app(x_7, x_11, x_13); +return x_14; } } obj* l_lean_compiler_mk__nat__lt(obj* x_0, obj* x_1) { @@ -1361,30 +1347,25 @@ return x_4; obj* _init_l_lean_compiler_mk__nat__le___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; x_0 = lean::box(0); x_1 = lean::mk_string("has_lt"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("le"); -x_5 = lean_name_mk_string(x_3, x_4); -lean::inc(x_0); -lean::inc(x_0); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_0); -lean::cnstr_set(x_8, 1, x_0); -x_9 = lean_expr_mk_const(x_5, x_8); -x_10 = lean::mk_string("nat"); -lean::inc(x_0); -x_12 = lean_name_mk_string(x_0, x_10); -lean::inc(x_0); -lean::inc(x_12); -x_15 = lean_expr_mk_const(x_12, x_0); -x_16 = lean::mk_string("has_le"); -x_17 = lean_name_mk_string(x_12, x_16); -x_18 = lean_expr_mk_const(x_17, x_0); -x_19 = l_lean_mk__bin__app(x_9, x_15, x_18); -return x_19; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("le"); +x_4 = lean_name_mk_string(x_2, x_3); +x_5 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_0); +x_6 = lean_expr_mk_const(x_4, x_5); +x_7 = lean::mk_string("nat"); +x_8 = lean_name_mk_string(x_0, x_7); +lean::inc(x_8); +x_10 = lean_expr_mk_const(x_8, x_0); +x_11 = lean::mk_string("has_le"); +x_12 = lean_name_mk_string(x_8, x_11); +x_13 = lean_expr_mk_const(x_12, x_0); +x_14 = l_lean_mk__bin__app(x_6, x_10, x_13); +return x_14; } } obj* l_lean_compiler_mk__nat__le(obj* x_0, obj* x_1) { @@ -1760,81 +1741,80 @@ return x_4; obj* _init_l_lean_compiler_nat__fold__fns() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; 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; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; x_0 = lean::box(0); x_1 = lean::mk_string("nat"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("add"); -lean::inc(x_3); -x_6 = lean_name_mk_string(x_3, x_4); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__add___boxed), 1, 0); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_7); -x_9 = lean::mk_string("mul"); -lean::inc(x_3); -x_11 = lean_name_mk_string(x_3, x_9); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__mul___boxed), 1, 0); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::mk_string("div"); -lean::inc(x_3); -x_16 = lean_name_mk_string(x_3, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__div___boxed), 1, 0); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::mk_string("mod"); -lean::inc(x_3); -x_21 = lean_name_mk_string(x_3, x_19); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__mod___boxed), 1, 0); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::mk_string("dec_eq"); -lean::inc(x_3); -x_26 = lean_name_mk_string(x_3, x_24); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__dec__eq___boxed), 3, 0); -x_28 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_27); -x_29 = lean::mk_string("dec_lt"); -lean::inc(x_3); -x_31 = lean_name_mk_string(x_3, x_29); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__dec__lt___boxed), 3, 0); -x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_31); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::mk_string("dec_le"); -x_35 = lean_name_mk_string(x_3, x_34); -x_36 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__dec__le___boxed), 3, 0); -x_37 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set(x_37, 1, x_36); +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("add"); +lean::inc(x_2); +x_5 = lean_name_mk_string(x_2, x_3); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__add___boxed), 1, 0); +x_7 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_7, 0, x_5); +lean::cnstr_set(x_7, 1, x_6); +x_8 = lean::mk_string("mul"); +lean::inc(x_2); +x_10 = lean_name_mk_string(x_2, x_8); +x_11 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__mul___boxed), 1, 0); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_10); +lean::cnstr_set(x_12, 1, x_11); +x_13 = lean::mk_string("div"); +lean::inc(x_2); +x_15 = lean_name_mk_string(x_2, x_13); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__div___boxed), 1, 0); +x_17 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_17, 0, x_15); +lean::cnstr_set(x_17, 1, x_16); +x_18 = lean::mk_string("mod"); +lean::inc(x_2); +x_20 = lean_name_mk_string(x_2, x_18); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__mod___boxed), 1, 0); +x_22 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 1, x_21); +x_23 = lean::mk_string("dec_eq"); +lean::inc(x_2); +x_25 = lean_name_mk_string(x_2, x_23); +x_26 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__dec__eq___boxed), 3, 0); +x_27 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_27, 0, x_25); +lean::cnstr_set(x_27, 1, x_26); +x_28 = lean::mk_string("dec_lt"); +lean::inc(x_2); +x_30 = lean_name_mk_string(x_2, x_28); +x_31 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__dec__lt___boxed), 3, 0); +x_32 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_32, 0, x_30); +lean::cnstr_set(x_32, 1, x_31); +x_33 = lean::mk_string("dec_le"); +x_34 = lean_name_mk_string(x_2, x_33); +x_35 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__dec__le___boxed), 3, 0); +x_36 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_36, 0, x_34); +lean::cnstr_set(x_36, 1, x_35); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_36); +lean::cnstr_set(x_37, 1, x_0); x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_0); +lean::cnstr_set(x_38, 0, x_32); +lean::cnstr_set(x_38, 1, x_37); x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_33); +lean::cnstr_set(x_39, 0, x_27); lean::cnstr_set(x_39, 1, x_38); x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_28); +lean::cnstr_set(x_40, 0, x_22); lean::cnstr_set(x_40, 1, x_39); x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_23); +lean::cnstr_set(x_41, 0, x_17); lean::cnstr_set(x_41, 1, x_40); x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_18); +lean::cnstr_set(x_42, 0, x_12); lean::cnstr_set(x_42, 1, x_41); x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_13); +lean::cnstr_set(x_43, 0, x_7); lean::cnstr_set(x_43, 1, x_42); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_8); -lean::cnstr_set(x_44, 1, x_43); -return x_44; +return x_43; } } obj* _init_l_lean_compiler_bin__fold__fns() { @@ -2037,33 +2017,31 @@ return x_3; obj* _init_l_lean_compiler_un__fold__fns() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; x_0 = lean::box(0); x_1 = lean::mk_string("nat"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("succ"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__succ___boxed), 1, 0); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = lean::mk_string("char"); -lean::inc(x_0); -x_10 = lean_name_mk_string(x_0, x_8); -x_11 = lean::mk_string("of_nat"); -x_12 = lean_name_mk_string(x_10, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__char__of__nat___boxed), 2, 0); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_12); +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("succ"); +x_4 = lean_name_mk_string(x_2, x_3); +x_5 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__nat__succ___boxed), 1, 0); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_4); +lean::cnstr_set(x_6, 1, x_5); +x_7 = lean::mk_string("char"); +x_8 = lean_name_mk_string(x_0, x_7); +x_9 = lean::mk_string("of_nat"); +x_10 = lean_name_mk_string(x_8, x_9); +x_11 = lean::alloc_closure(reinterpret_cast(l_lean_compiler_fold__char__of__nat___boxed), 2, 0); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_10); +lean::cnstr_set(x_12, 1, x_11); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_0); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_6); lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_0); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_7); -lean::cnstr_set(x_16, 1, x_15); -return x_16; +return x_14; } } obj* l___private_init_lean_compiler_const__folding_1__alist__find___main___rarg(obj* x_0, obj* x_1) { diff --git a/src/boot/init/lean/compiler/util.cpp b/src/boot/init/lean/compiler/util.cpp index 7b0fa08150..b450b98eaf 100644 --- a/src/boot/init/lean/compiler/util.cpp +++ b/src/boot/init/lean/compiler/util.cpp @@ -26,61 +26,56 @@ obj* l_lean_compiler_unreachable__expr; obj* _init_l_lean_compiler_neutral__expr() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; x_0 = lean::box(0); x_1 = lean::mk_string("_neutral"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean_expr_mk_const(x_3, x_0); -return x_4; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean_expr_mk_const(x_2, x_0); +return x_3; } } obj* _init_l_lean_compiler_unreachable__expr() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; x_0 = lean::box(0); x_1 = lean::mk_string("_unreachable"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean_expr_mk_const(x_3, x_0); -return x_4; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean_expr_mk_const(x_2, x_0); +return x_3; } } obj* _init_l_lean_compiler_object__type() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; x_0 = lean::box(0); x_1 = lean::mk_string("_obj"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean_expr_mk_const(x_3, x_0); -return x_4; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean_expr_mk_const(x_2, x_0); +return x_3; } } obj* _init_l_lean_compiler_void__type() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; x_0 = lean::box(0); x_1 = lean::mk_string("_void"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean_expr_mk_const(x_3, x_0); -return x_4; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean_expr_mk_const(x_2, x_0); +return x_3; } } obj* _init_l_lean_compiler_mk__lc__proof___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; x_0 = lean::box(0); x_1 = lean::mk_string("lc_proof"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean_expr_mk_const(x_3, x_0); -return x_4; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean_expr_mk_const(x_2, x_0); +return x_3; } } obj* l_lean_compiler_mk__lc__proof(obj* x_0) { diff --git a/src/boot/init/lean/elaborator.cpp b/src/boot/init/lean/elaborator.cpp index 67c4897661..751b30c5b2 100644 --- a/src/boot/init/lean/elaborator.cpp +++ b/src/boot/init/lean/elaborator.cpp @@ -723,15 +723,14 @@ return x_3; obj* _init_l_lean_elaborator_ordered__rbmap_empty___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; +obj* x_0; obj* x_1; obj* x_2; x_0 = lean::box(0); x_1 = lean::mk_nat_obj(0u); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_0); -lean::cnstr_set(x_3, 1, x_0); -lean::cnstr_set(x_3, 2, x_1); -return x_3; +x_2 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_2, 0, x_0); +lean::cnstr_set(x_2, 1, x_0); +lean::cnstr_set(x_2, 2, x_1); +return x_2; } } obj* l_lean_elaborator_ordered__rbmap_empty(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -3351,13 +3350,12 @@ return x_6; obj* _init_l_lean_elaborator_dummy() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; x_0 = lean::box(0); x_1 = lean::mk_string("Prop"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean_expr_mk_const(x_3, x_0); -return x_4; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean_expr_mk_const(x_2, x_0); +return x_3; } } obj* _init_l_list_map___main___at_lean_elaborator_mk__eqns___spec__1___closed__1() { @@ -7948,16 +7946,14 @@ return x_0; obj* _init_l_lean_elaborator_to__pexpr___main___closed__47() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::box(0); x_1 = lean::mk_string("annotation"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("preresolved"); -lean::inc(x_0); -x_6 = lean_name_mk_string(x_0, x_4); -x_7 = l_lean_kvmap_set__name(x_0, x_3, x_6); -return x_7; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("preresolved"); +x_4 = lean_name_mk_string(x_0, x_3); +x_5 = l_lean_kvmap_set__name(x_0, x_2, x_4); +return x_5; } } obj* l_lean_elaborator_to__pexpr___main(obj* x_0, obj* x_1, obj* x_2) { @@ -8604,7 +8600,7 @@ goto lbl_244; } lbl_244: { -obj* x_304; obj* x_306; obj* x_309; obj* x_310; obj* x_312; obj* x_313; obj* x_316; obj* x_317; uint8 x_318; obj* x_320; obj* x_321; obj* x_324; obj* x_326; obj* x_327; obj* x_329; obj* x_330; obj* x_331; obj* x_333; obj* x_334; obj* x_335; obj* x_336; obj* x_337; +obj* x_304; obj* x_306; obj* x_309; obj* x_310; obj* x_312; obj* x_313; obj* x_315; obj* x_316; uint8 x_317; obj* x_319; obj* x_320; obj* x_323; obj* x_325; obj* x_326; 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_304 = lean::cnstr_get(x_243, 0); lean::inc(x_304); x_306 = lean::cnstr_get(x_243, 1); @@ -8616,74 +8612,73 @@ lean::inc(x_238); x_312 = l_list_length__aux___main___rarg(x_238, x_310); x_313 = l_lean_elaborator_to__pexpr___main___closed__25; lean::inc(x_313); -lean::inc(x_309); -x_316 = l_lean_kvmap_set__nat(x_309, x_313, x_312); -x_317 = l_lean_elaborator_to__pexpr___main___closed__26; -x_318 = 0; -lean::inc(x_317); -x_320 = l_lean_kvmap_set__bool(x_316, x_317, x_318); -x_321 = lean::cnstr_get(x_206, 1); -lean::inc(x_321); +x_315 = l_lean_kvmap_set__nat(x_309, x_313, x_312); +x_316 = l_lean_elaborator_to__pexpr___main___closed__26; +x_317 = 0; +lean::inc(x_316); +x_319 = l_lean_kvmap_set__bool(x_315, x_316, x_317); +x_320 = lean::cnstr_get(x_206, 1); +lean::inc(x_320); lean::dec(x_206); -x_324 = l_lean_elaborator_to__pexpr___main___closed__27; -lean::inc(x_324); -x_326 = l_option_map___rarg(x_324, x_321); -x_327 = l_lean_elaborator_to__pexpr___main___closed__28; -lean::inc(x_327); -x_329 = l_option_map___rarg(x_327, x_326); -x_330 = l_option_get__or__else___main___rarg(x_329, x_309); -x_331 = l_lean_elaborator_to__pexpr___main___closed__29; -lean::inc(x_331); -x_333 = l_lean_kvmap_set__name(x_320, x_331, x_330); -x_334 = l_list_append___rarg(x_238, x_304); -x_335 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__9(x_334); -x_336 = lean_expr_mk_mdata(x_333, x_335); +x_323 = l_lean_elaborator_to__pexpr___main___closed__27; +lean::inc(x_323); +x_325 = l_option_map___rarg(x_323, x_320); +x_326 = l_lean_elaborator_to__pexpr___main___closed__28; +lean::inc(x_326); +x_328 = l_option_map___rarg(x_326, x_325); +x_329 = l_option_get__or__else___main___rarg(x_328, x_309); +x_330 = l_lean_elaborator_to__pexpr___main___closed__29; +lean::inc(x_330); +x_332 = l_lean_kvmap_set__name(x_319, x_330, x_329); +x_333 = l_list_append___rarg(x_238, x_304); +x_334 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__9(x_333); +x_335 = lean_expr_mk_mdata(x_332, x_334); if (lean::is_scalar(x_214)) { - x_337 = lean::alloc_cnstr(0, 2, 0); + x_336 = lean::alloc_cnstr(0, 2, 0); } else { - x_337 = x_214; + x_336 = x_214; } -lean::cnstr_set(x_337, 0, x_336); -lean::cnstr_set(x_337, 1, x_306); -x_14 = x_337; +lean::cnstr_set(x_336, 0, x_335); +lean::cnstr_set(x_336, 1, x_306); +x_14 = x_336; goto lbl_15; } } } else { -obj* x_338; obj* x_340; obj* x_342; obj* x_343; -x_338 = lean::cnstr_get(x_218, 0); -lean::inc(x_338); -x_340 = lean::cnstr_get(x_218, 1); -lean::inc(x_340); +obj* x_337; obj* x_339; obj* x_341; obj* x_342; +x_337 = lean::cnstr_get(x_218, 0); +lean::inc(x_337); +x_339 = lean::cnstr_get(x_218, 1); +lean::inc(x_339); if (lean::is_shared(x_218)) { lean::dec(x_218); - x_342 = lean::box(0); + x_341 = lean::box(0); } else { lean::cnstr_release(x_218, 0); lean::cnstr_release(x_218, 1); - x_342 = x_218; + x_341 = x_218; } -x_343 = lean::cnstr_get(x_338, 0); -lean::inc(x_343); -lean::dec(x_338); -if (lean::obj_tag(x_343) == 0) +x_342 = lean::cnstr_get(x_337, 0); +lean::inc(x_342); +lean::dec(x_337); +if (lean::obj_tag(x_342) == 0) { -obj* x_347; obj* x_348; obj* x_350; obj* x_351; obj* x_354; -lean::dec(x_340); -x_347 = l_lean_parser_term_struct__inst__item_has__view; -x_348 = lean::cnstr_get(x_347, 1); -lean::inc(x_348); -x_350 = lean::apply_1(x_348, x_343); -x_351 = l_lean_elaborator_to__pexpr___main___closed__30; +obj* x_346; obj* x_347; obj* x_349; obj* x_350; obj* x_353; +lean::dec(x_339); +x_346 = l_lean_parser_term_struct__inst__item_has__view; +x_347 = lean::cnstr_get(x_346, 1); +lean::inc(x_347); +x_349 = lean::apply_1(x_347, x_342); +x_350 = l_lean_elaborator_to__pexpr___main___closed__30; lean::inc(x_1); -lean::inc(x_351); -x_354 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_350, x_351, x_1, x_2); -if (lean::obj_tag(x_354) == 0) +lean::inc(x_350); +x_353 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_349, x_350, x_1, x_2); +if (lean::obj_tag(x_353) == 0) { -obj* x_364; obj* x_366; obj* x_367; -lean::dec(x_342); +obj* x_363; obj* x_365; obj* x_366; +lean::dec(x_341); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); @@ -8692,247 +8687,246 @@ lean::dec(x_210); lean::dec(x_220); lean::dec(x_216); lean::dec(x_214); -x_364 = lean::cnstr_get(x_354, 0); -lean::inc(x_364); -if (lean::is_shared(x_354)) { - lean::dec(x_354); - x_366 = lean::box(0); +x_363 = lean::cnstr_get(x_353, 0); +lean::inc(x_363); +if (lean::is_shared(x_353)) { + lean::dec(x_353); + x_365 = lean::box(0); } else { - lean::cnstr_release(x_354, 0); - x_366 = x_354; + lean::cnstr_release(x_353, 0); + x_365 = x_353; } -if (lean::is_scalar(x_366)) { - x_367 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_365)) { + x_366 = lean::alloc_cnstr(0, 1, 0); } else { - x_367 = x_366; + x_366 = x_365; } -lean::cnstr_set(x_367, 0, x_364); -return x_367; +lean::cnstr_set(x_366, 0, x_363); +return x_366; } else { -obj* x_368; obj* x_370; obj* x_371; obj* x_373; obj* x_378; -x_368 = lean::cnstr_get(x_354, 0); -lean::inc(x_368); -if (lean::is_shared(x_354)) { - lean::dec(x_354); - x_370 = lean::box(0); +obj* x_367; obj* x_369; obj* x_370; obj* x_372; obj* x_377; +x_367 = lean::cnstr_get(x_353, 0); +lean::inc(x_367); +if (lean::is_shared(x_353)) { + lean::dec(x_353); + x_369 = lean::box(0); } else { - lean::cnstr_release(x_354, 0); - x_370 = x_354; + lean::cnstr_release(x_353, 0); + x_369 = x_353; } -x_371 = lean::cnstr_get(x_368, 0); -lean::inc(x_371); -x_373 = lean::cnstr_get(x_368, 1); -lean::inc(x_373); -lean::dec(x_368); +x_370 = lean::cnstr_get(x_367, 0); +lean::inc(x_370); +x_372 = lean::cnstr_get(x_367, 1); +lean::inc(x_372); +lean::dec(x_367); lean::inc(x_1); lean::inc(x_0); -x_378 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__11(x_0, x_210, x_1, x_373); -if (lean::obj_tag(x_378) == 0) +x_377 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__11(x_0, x_210, x_1, x_372); +if (lean::obj_tag(x_377) == 0) { -obj* x_388; obj* x_391; -lean::dec(x_342); +obj* x_387; obj* x_390; +lean::dec(x_341); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_371); +lean::dec(x_370); lean::dec(x_206); lean::dec(x_220); lean::dec(x_216); lean::dec(x_214); -x_388 = lean::cnstr_get(x_378, 0); -lean::inc(x_388); -lean::dec(x_378); -if (lean::is_scalar(x_370)) { - x_391 = lean::alloc_cnstr(0, 1, 0); +x_387 = lean::cnstr_get(x_377, 0); +lean::inc(x_387); +lean::dec(x_377); +if (lean::is_scalar(x_369)) { + x_390 = lean::alloc_cnstr(0, 1, 0); } else { - x_391 = x_370; - lean::cnstr_set_tag(x_370, 0); + x_390 = x_369; + lean::cnstr_set_tag(x_369, 0); } -lean::cnstr_set(x_391, 0, x_388); -return x_391; +lean::cnstr_set(x_390, 0, x_387); +return x_390; } else { -obj* x_392; obj* x_395; obj* x_397; obj* x_400; obj* x_404; -x_392 = lean::cnstr_get(x_378, 0); -lean::inc(x_392); -lean::dec(x_378); -x_395 = lean::cnstr_get(x_392, 0); -lean::inc(x_395); -x_397 = lean::cnstr_get(x_392, 1); -lean::inc(x_397); -lean::dec(x_392); +obj* x_391; obj* x_394; obj* x_396; obj* x_399; obj* x_403; +x_391 = lean::cnstr_get(x_377, 0); +lean::inc(x_391); +lean::dec(x_377); +x_394 = lean::cnstr_get(x_391, 0); +lean::inc(x_394); +x_396 = lean::cnstr_get(x_391, 1); +lean::inc(x_396); +lean::dec(x_391); lean::inc(x_1); lean::inc(x_0); -x_404 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__13(x_0, x_216, x_1, x_397); -if (lean::obj_tag(x_404) == 0) +x_403 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__13(x_0, x_216, x_1, x_396); +if (lean::obj_tag(x_403) == 0) { -obj* x_414; obj* x_417; -lean::dec(x_342); -lean::dec(x_395); +obj* x_413; obj* x_416; +lean::dec(x_341); +lean::dec(x_394); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_371); +lean::dec(x_370); lean::dec(x_206); lean::dec(x_220); lean::dec(x_214); -x_414 = lean::cnstr_get(x_404, 0); -lean::inc(x_414); -lean::dec(x_404); -if (lean::is_scalar(x_370)) { - x_417 = lean::alloc_cnstr(0, 1, 0); +x_413 = lean::cnstr_get(x_403, 0); +lean::inc(x_413); +lean::dec(x_403); +if (lean::is_scalar(x_369)) { + x_416 = lean::alloc_cnstr(0, 1, 0); } else { - x_417 = x_370; - lean::cnstr_set_tag(x_370, 0); + x_416 = x_369; + lean::cnstr_set_tag(x_369, 0); } -lean::cnstr_set(x_417, 0, x_414); -return x_417; +lean::cnstr_set(x_416, 0, x_413); +return x_416; } else { -obj* x_418; obj* x_421; obj* x_423; obj* x_426; -x_418 = lean::cnstr_get(x_404, 0); -lean::inc(x_418); -lean::dec(x_404); -x_421 = lean::cnstr_get(x_418, 0); -lean::inc(x_421); -x_423 = lean::cnstr_get(x_418, 1); -lean::inc(x_423); -lean::dec(x_418); -x_426 = lean::cnstr_get(x_206, 2); -lean::inc(x_426); -if (lean::obj_tag(x_426) == 0) +obj* x_417; obj* x_420; obj* x_422; obj* x_425; +x_417 = lean::cnstr_get(x_403, 0); +lean::inc(x_417); +lean::dec(x_403); +x_420 = lean::cnstr_get(x_417, 0); +lean::inc(x_420); +x_422 = lean::cnstr_get(x_417, 1); +lean::inc(x_422); +lean::dec(x_417); +x_425 = lean::cnstr_get(x_206, 2); +lean::inc(x_425); +if (lean::obj_tag(x_425) == 0) { -obj* x_430; -lean::dec(x_342); -lean::dec(x_370); +obj* x_429; +lean::dec(x_341); +lean::dec(x_369); if (lean::is_scalar(x_220)) { - x_430 = lean::alloc_cnstr(0, 2, 0); + x_429 = lean::alloc_cnstr(0, 2, 0); } else { - x_430 = x_220; + x_429 = x_220; } -lean::cnstr_set(x_430, 0, x_421); -lean::cnstr_set(x_430, 1, x_423); -x_400 = x_430; -goto lbl_401; +lean::cnstr_set(x_429, 0, x_420); +lean::cnstr_set(x_429, 1, x_422); +x_399 = x_429; +goto lbl_400; } else { -obj* x_431; obj* x_434; obj* x_438; -x_431 = lean::cnstr_get(x_426, 0); -lean::inc(x_431); -lean::dec(x_426); -x_434 = lean::cnstr_get(x_431, 0); -lean::inc(x_434); -lean::dec(x_431); +obj* x_430; obj* x_433; obj* x_437; +x_430 = lean::cnstr_get(x_425, 0); +lean::inc(x_430); +lean::dec(x_425); +x_433 = lean::cnstr_get(x_430, 0); +lean::inc(x_433); +lean::dec(x_430); lean::inc(x_1); -x_438 = l_lean_elaborator_to__pexpr___main(x_434, x_1, x_423); -if (lean::obj_tag(x_438) == 0) +x_437 = l_lean_elaborator_to__pexpr___main(x_433, x_1, x_422); +if (lean::obj_tag(x_437) == 0) { -obj* x_449; obj* x_452; -lean::dec(x_342); -lean::dec(x_395); +obj* x_448; obj* x_451; +lean::dec(x_341); +lean::dec(x_394); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_371); +lean::dec(x_370); lean::dec(x_206); -lean::dec(x_421); +lean::dec(x_420); lean::dec(x_220); lean::dec(x_214); -x_449 = lean::cnstr_get(x_438, 0); -lean::inc(x_449); -lean::dec(x_438); -if (lean::is_scalar(x_370)) { - x_452 = lean::alloc_cnstr(0, 1, 0); +x_448 = lean::cnstr_get(x_437, 0); +lean::inc(x_448); +lean::dec(x_437); +if (lean::is_scalar(x_369)) { + x_451 = lean::alloc_cnstr(0, 1, 0); } else { - x_452 = x_370; - lean::cnstr_set_tag(x_370, 0); + x_451 = x_369; + lean::cnstr_set_tag(x_369, 0); } -lean::cnstr_set(x_452, 0, x_449); -return x_452; +lean::cnstr_set(x_451, 0, x_448); +return x_451; } else { -obj* x_454; obj* x_457; obj* x_459; obj* x_462; obj* x_463; obj* x_464; obj* x_465; -lean::dec(x_370); -x_454 = lean::cnstr_get(x_438, 0); -lean::inc(x_454); -lean::dec(x_438); -x_457 = lean::cnstr_get(x_454, 0); -lean::inc(x_457); -x_459 = lean::cnstr_get(x_454, 1); -lean::inc(x_459); -lean::dec(x_454); -x_462 = lean::box(0); -if (lean::is_scalar(x_342)) { - x_463 = lean::alloc_cnstr(1, 2, 0); +obj* x_453; obj* x_456; obj* x_458; obj* x_461; obj* x_462; obj* x_463; obj* x_464; +lean::dec(x_369); +x_453 = lean::cnstr_get(x_437, 0); +lean::inc(x_453); +lean::dec(x_437); +x_456 = lean::cnstr_get(x_453, 0); +lean::inc(x_456); +x_458 = lean::cnstr_get(x_453, 1); +lean::inc(x_458); +lean::dec(x_453); +x_461 = lean::box(0); +if (lean::is_scalar(x_341)) { + x_462 = lean::alloc_cnstr(1, 2, 0); } else { - x_463 = x_342; + x_462 = x_341; } -lean::cnstr_set(x_463, 0, x_457); -lean::cnstr_set(x_463, 1, x_462); -x_464 = l_list_append___rarg(x_421, x_463); +lean::cnstr_set(x_462, 0, x_456); +lean::cnstr_set(x_462, 1, x_461); +x_463 = l_list_append___rarg(x_420, x_462); if (lean::is_scalar(x_220)) { - x_465 = lean::alloc_cnstr(0, 2, 0); + x_464 = lean::alloc_cnstr(0, 2, 0); } else { - x_465 = x_220; + x_464 = x_220; } -lean::cnstr_set(x_465, 0, x_464); -lean::cnstr_set(x_465, 1, x_459); -x_400 = x_465; -goto lbl_401; +lean::cnstr_set(x_464, 0, x_463); +lean::cnstr_set(x_464, 1, x_458); +x_399 = x_464; +goto lbl_400; } } } -lbl_401: +lbl_400: { -obj* x_466; obj* x_468; obj* x_471; obj* x_472; obj* x_474; obj* x_475; obj* x_478; obj* x_479; uint8 x_480; obj* x_483; obj* x_484; obj* x_487; obj* x_489; obj* x_490; obj* x_492; obj* x_493; obj* x_494; obj* x_496; obj* x_497; obj* x_498; obj* x_499; obj* x_500; -x_466 = lean::cnstr_get(x_400, 0); -lean::inc(x_466); -x_468 = lean::cnstr_get(x_400, 1); -lean::inc(x_468); -lean::dec(x_400); -x_471 = lean::box(0); -x_472 = lean::mk_nat_obj(0u); -lean::inc(x_395); -x_474 = l_list_length__aux___main___rarg(x_395, x_472); -x_475 = l_lean_elaborator_to__pexpr___main___closed__25; -lean::inc(x_475); -lean::inc(x_471); -x_478 = l_lean_kvmap_set__nat(x_471, x_475, x_474); -x_479 = l_lean_elaborator_to__pexpr___main___closed__26; -x_480 = lean::unbox(x_371); -lean::dec(x_371); -lean::inc(x_479); -x_483 = l_lean_kvmap_set__bool(x_478, x_479, x_480); -x_484 = lean::cnstr_get(x_206, 1); -lean::inc(x_484); +obj* x_465; obj* x_467; obj* x_470; obj* x_471; obj* x_473; obj* x_474; obj* x_476; obj* x_477; uint8 x_478; obj* x_481; obj* x_482; obj* x_485; obj* x_487; obj* x_488; obj* x_490; obj* x_491; obj* x_492; obj* x_494; obj* x_495; obj* x_496; obj* x_497; obj* x_498; +x_465 = lean::cnstr_get(x_399, 0); +lean::inc(x_465); +x_467 = lean::cnstr_get(x_399, 1); +lean::inc(x_467); +lean::dec(x_399); +x_470 = lean::box(0); +x_471 = lean::mk_nat_obj(0u); +lean::inc(x_394); +x_473 = l_list_length__aux___main___rarg(x_394, x_471); +x_474 = l_lean_elaborator_to__pexpr___main___closed__25; +lean::inc(x_474); +x_476 = l_lean_kvmap_set__nat(x_470, x_474, x_473); +x_477 = l_lean_elaborator_to__pexpr___main___closed__26; +x_478 = lean::unbox(x_370); +lean::dec(x_370); +lean::inc(x_477); +x_481 = l_lean_kvmap_set__bool(x_476, x_477, x_478); +x_482 = lean::cnstr_get(x_206, 1); +lean::inc(x_482); lean::dec(x_206); -x_487 = l_lean_elaborator_to__pexpr___main___closed__27; -lean::inc(x_487); -x_489 = l_option_map___rarg(x_487, x_484); -x_490 = l_lean_elaborator_to__pexpr___main___closed__28; -lean::inc(x_490); -x_492 = l_option_map___rarg(x_490, x_489); -x_493 = l_option_get__or__else___main___rarg(x_492, x_471); -x_494 = l_lean_elaborator_to__pexpr___main___closed__29; -lean::inc(x_494); -x_496 = l_lean_kvmap_set__name(x_483, x_494, x_493); -x_497 = l_list_append___rarg(x_395, x_466); -x_498 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__12(x_497); -x_499 = lean_expr_mk_mdata(x_496, x_498); +x_485 = l_lean_elaborator_to__pexpr___main___closed__27; +lean::inc(x_485); +x_487 = l_option_map___rarg(x_485, x_482); +x_488 = l_lean_elaborator_to__pexpr___main___closed__28; +lean::inc(x_488); +x_490 = l_option_map___rarg(x_488, x_487); +x_491 = l_option_get__or__else___main___rarg(x_490, x_470); +x_492 = l_lean_elaborator_to__pexpr___main___closed__29; +lean::inc(x_492); +x_494 = l_lean_kvmap_set__name(x_481, x_492, x_491); +x_495 = l_list_append___rarg(x_394, x_465); +x_496 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__12(x_495); +x_497 = lean_expr_mk_mdata(x_494, x_496); if (lean::is_scalar(x_214)) { - x_500 = lean::alloc_cnstr(0, 2, 0); + x_498 = lean::alloc_cnstr(0, 2, 0); } else { - x_500 = x_214; + x_498 = x_214; } -lean::cnstr_set(x_500, 0, x_499); -lean::cnstr_set(x_500, 1, x_468); -x_14 = x_500; +lean::cnstr_set(x_498, 0, x_497); +lean::cnstr_set(x_498, 1, x_467); +x_14 = x_498; goto lbl_15; } } @@ -8940,17 +8934,17 @@ goto lbl_15; } else { -if (lean::obj_tag(x_340) == 0) +if (lean::obj_tag(x_339) == 0) { -obj* x_504; -lean::dec(x_343); +obj* x_502; +lean::dec(x_342); lean::inc(x_1); lean::inc(x_0); -x_504 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__14(x_0, x_210, x_1, x_2); -if (lean::obj_tag(x_504) == 0) +x_502 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__14(x_0, x_210, x_1, x_2); +if (lean::obj_tag(x_502) == 0) { -obj* x_513; obj* x_515; obj* x_516; -lean::dec(x_342); +obj* x_511; obj* x_513; obj* x_514; +lean::dec(x_341); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); @@ -8958,226 +8952,225 @@ lean::dec(x_206); lean::dec(x_220); lean::dec(x_216); lean::dec(x_214); -x_513 = lean::cnstr_get(x_504, 0); -lean::inc(x_513); -if (lean::is_shared(x_504)) { - lean::dec(x_504); - x_515 = lean::box(0); +x_511 = lean::cnstr_get(x_502, 0); +lean::inc(x_511); +if (lean::is_shared(x_502)) { + lean::dec(x_502); + x_513 = lean::box(0); } else { - lean::cnstr_release(x_504, 0); - x_515 = x_504; + lean::cnstr_release(x_502, 0); + x_513 = x_502; } -if (lean::is_scalar(x_515)) { - x_516 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_513)) { + x_514 = lean::alloc_cnstr(0, 1, 0); } else { - x_516 = x_515; + x_514 = x_513; } -lean::cnstr_set(x_516, 0, x_513); -return x_516; +lean::cnstr_set(x_514, 0, x_511); +return x_514; } else { -obj* x_517; obj* x_519; obj* x_520; obj* x_522; obj* x_525; obj* x_529; -x_517 = lean::cnstr_get(x_504, 0); -lean::inc(x_517); -if (lean::is_shared(x_504)) { - lean::dec(x_504); - x_519 = lean::box(0); +obj* x_515; obj* x_517; obj* x_518; obj* x_520; obj* x_523; obj* x_527; +x_515 = lean::cnstr_get(x_502, 0); +lean::inc(x_515); +if (lean::is_shared(x_502)) { + lean::dec(x_502); + x_517 = lean::box(0); } else { - lean::cnstr_release(x_504, 0); - x_519 = x_504; + lean::cnstr_release(x_502, 0); + x_517 = x_502; } -x_520 = lean::cnstr_get(x_517, 0); +x_518 = lean::cnstr_get(x_515, 0); +lean::inc(x_518); +x_520 = lean::cnstr_get(x_515, 1); lean::inc(x_520); -x_522 = lean::cnstr_get(x_517, 1); -lean::inc(x_522); -lean::dec(x_517); +lean::dec(x_515); lean::inc(x_1); lean::inc(x_0); -x_529 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__16(x_0, x_216, x_1, x_522); -if (lean::obj_tag(x_529) == 0) +x_527 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__16(x_0, x_216, x_1, x_520); +if (lean::obj_tag(x_527) == 0) { -obj* x_538; obj* x_541; -lean::dec(x_342); +obj* x_536; obj* x_539; +lean::dec(x_341); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); lean::dec(x_206); -lean::dec(x_520); lean::dec(x_220); lean::dec(x_214); -x_538 = lean::cnstr_get(x_529, 0); -lean::inc(x_538); -lean::dec(x_529); -if (lean::is_scalar(x_519)) { - x_541 = lean::alloc_cnstr(0, 1, 0); +lean::dec(x_518); +x_536 = lean::cnstr_get(x_527, 0); +lean::inc(x_536); +lean::dec(x_527); +if (lean::is_scalar(x_517)) { + x_539 = lean::alloc_cnstr(0, 1, 0); } else { - x_541 = x_519; - lean::cnstr_set_tag(x_519, 0); + x_539 = x_517; + lean::cnstr_set_tag(x_517, 0); } -lean::cnstr_set(x_541, 0, x_538); -return x_541; +lean::cnstr_set(x_539, 0, x_536); +return x_539; } else { -obj* x_542; obj* x_545; obj* x_547; obj* x_550; -x_542 = lean::cnstr_get(x_529, 0); -lean::inc(x_542); -lean::dec(x_529); -x_545 = lean::cnstr_get(x_542, 0); +obj* x_540; obj* x_543; obj* x_545; obj* x_548; +x_540 = lean::cnstr_get(x_527, 0); +lean::inc(x_540); +lean::dec(x_527); +x_543 = lean::cnstr_get(x_540, 0); +lean::inc(x_543); +x_545 = lean::cnstr_get(x_540, 1); lean::inc(x_545); -x_547 = lean::cnstr_get(x_542, 1); -lean::inc(x_547); -lean::dec(x_542); -x_550 = lean::cnstr_get(x_206, 2); -lean::inc(x_550); -if (lean::obj_tag(x_550) == 0) +lean::dec(x_540); +x_548 = lean::cnstr_get(x_206, 2); +lean::inc(x_548); +if (lean::obj_tag(x_548) == 0) { -obj* x_554; -lean::dec(x_342); -lean::dec(x_519); +obj* x_552; +lean::dec(x_341); +lean::dec(x_517); if (lean::is_scalar(x_220)) { - x_554 = lean::alloc_cnstr(0, 2, 0); + x_552 = lean::alloc_cnstr(0, 2, 0); } else { - x_554 = x_220; + x_552 = x_220; } -lean::cnstr_set(x_554, 0, x_545); -lean::cnstr_set(x_554, 1, x_547); -x_525 = x_554; -goto lbl_526; +lean::cnstr_set(x_552, 0, x_543); +lean::cnstr_set(x_552, 1, x_545); +x_523 = x_552; +goto lbl_524; } else { -obj* x_555; obj* x_558; obj* x_562; -x_555 = lean::cnstr_get(x_550, 0); -lean::inc(x_555); -lean::dec(x_550); -x_558 = lean::cnstr_get(x_555, 0); -lean::inc(x_558); -lean::dec(x_555); +obj* x_553; obj* x_556; obj* x_560; +x_553 = lean::cnstr_get(x_548, 0); +lean::inc(x_553); +lean::dec(x_548); +x_556 = lean::cnstr_get(x_553, 0); +lean::inc(x_556); +lean::dec(x_553); lean::inc(x_1); -x_562 = l_lean_elaborator_to__pexpr___main(x_558, x_1, x_547); -if (lean::obj_tag(x_562) == 0) +x_560 = l_lean_elaborator_to__pexpr___main(x_556, x_1, x_545); +if (lean::obj_tag(x_560) == 0) { -obj* x_572; obj* x_575; -lean::dec(x_545); -lean::dec(x_342); +obj* x_570; obj* x_573; +lean::dec(x_341); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); lean::dec(x_206); -lean::dec(x_520); +lean::dec(x_543); lean::dec(x_220); lean::dec(x_214); -x_572 = lean::cnstr_get(x_562, 0); -lean::inc(x_572); -lean::dec(x_562); -if (lean::is_scalar(x_519)) { - x_575 = lean::alloc_cnstr(0, 1, 0); +lean::dec(x_518); +x_570 = lean::cnstr_get(x_560, 0); +lean::inc(x_570); +lean::dec(x_560); +if (lean::is_scalar(x_517)) { + x_573 = lean::alloc_cnstr(0, 1, 0); } else { - x_575 = x_519; - lean::cnstr_set_tag(x_519, 0); + x_573 = x_517; + lean::cnstr_set_tag(x_517, 0); } -lean::cnstr_set(x_575, 0, x_572); -return x_575; +lean::cnstr_set(x_573, 0, x_570); +return x_573; } else { -obj* x_577; obj* x_580; obj* x_582; obj* x_585; obj* x_586; obj* x_587; obj* x_588; -lean::dec(x_519); -x_577 = lean::cnstr_get(x_562, 0); -lean::inc(x_577); -lean::dec(x_562); -x_580 = lean::cnstr_get(x_577, 0); +obj* x_575; obj* x_578; obj* x_580; obj* x_583; obj* x_584; obj* x_585; obj* x_586; +lean::dec(x_517); +x_575 = lean::cnstr_get(x_560, 0); +lean::inc(x_575); +lean::dec(x_560); +x_578 = lean::cnstr_get(x_575, 0); +lean::inc(x_578); +x_580 = lean::cnstr_get(x_575, 1); lean::inc(x_580); -x_582 = lean::cnstr_get(x_577, 1); -lean::inc(x_582); -lean::dec(x_577); -x_585 = lean::box(0); -if (lean::is_scalar(x_342)) { - x_586 = lean::alloc_cnstr(1, 2, 0); +lean::dec(x_575); +x_583 = lean::box(0); +if (lean::is_scalar(x_341)) { + x_584 = lean::alloc_cnstr(1, 2, 0); } else { - x_586 = x_342; + x_584 = x_341; } -lean::cnstr_set(x_586, 0, x_580); -lean::cnstr_set(x_586, 1, x_585); -x_587 = l_list_append___rarg(x_545, x_586); +lean::cnstr_set(x_584, 0, x_578); +lean::cnstr_set(x_584, 1, x_583); +x_585 = l_list_append___rarg(x_543, x_584); if (lean::is_scalar(x_220)) { - x_588 = lean::alloc_cnstr(0, 2, 0); + x_586 = lean::alloc_cnstr(0, 2, 0); } else { - x_588 = x_220; + x_586 = x_220; } -lean::cnstr_set(x_588, 0, x_587); -lean::cnstr_set(x_588, 1, x_582); -x_525 = x_588; -goto lbl_526; +lean::cnstr_set(x_586, 0, x_585); +lean::cnstr_set(x_586, 1, x_580); +x_523 = x_586; +goto lbl_524; } } } -lbl_526: +lbl_524: { -obj* x_589; obj* x_591; obj* x_594; obj* x_595; obj* x_597; obj* x_598; obj* x_601; obj* x_602; uint8 x_603; obj* x_605; obj* x_606; obj* x_609; obj* x_611; obj* x_612; obj* x_614; obj* x_615; obj* x_616; obj* x_618; obj* x_619; obj* x_620; obj* x_621; obj* x_622; -x_589 = lean::cnstr_get(x_525, 0); +obj* x_587; obj* x_589; obj* x_592; obj* x_593; obj* x_595; obj* x_596; obj* x_598; obj* x_599; uint8 x_600; obj* x_602; obj* x_603; obj* x_606; obj* x_608; obj* x_609; obj* x_611; obj* x_612; obj* x_613; obj* x_615; obj* x_616; obj* x_617; obj* x_618; obj* x_619; +x_587 = lean::cnstr_get(x_523, 0); +lean::inc(x_587); +x_589 = lean::cnstr_get(x_523, 1); lean::inc(x_589); -x_591 = lean::cnstr_get(x_525, 1); -lean::inc(x_591); -lean::dec(x_525); -x_594 = lean::box(0); -x_595 = lean::mk_nat_obj(0u); -lean::inc(x_520); -x_597 = l_list_length__aux___main___rarg(x_520, x_595); -x_598 = l_lean_elaborator_to__pexpr___main___closed__25; -lean::inc(x_598); -lean::inc(x_594); -x_601 = l_lean_kvmap_set__nat(x_594, x_598, x_597); -x_602 = l_lean_elaborator_to__pexpr___main___closed__26; -x_603 = 1; -lean::inc(x_602); -x_605 = l_lean_kvmap_set__bool(x_601, x_602, x_603); -x_606 = lean::cnstr_get(x_206, 1); -lean::inc(x_606); +lean::dec(x_523); +x_592 = lean::box(0); +x_593 = lean::mk_nat_obj(0u); +lean::inc(x_518); +x_595 = l_list_length__aux___main___rarg(x_518, x_593); +x_596 = l_lean_elaborator_to__pexpr___main___closed__25; +lean::inc(x_596); +x_598 = l_lean_kvmap_set__nat(x_592, x_596, x_595); +x_599 = l_lean_elaborator_to__pexpr___main___closed__26; +x_600 = 1; +lean::inc(x_599); +x_602 = l_lean_kvmap_set__bool(x_598, x_599, x_600); +x_603 = lean::cnstr_get(x_206, 1); +lean::inc(x_603); lean::dec(x_206); -x_609 = l_lean_elaborator_to__pexpr___main___closed__27; +x_606 = l_lean_elaborator_to__pexpr___main___closed__27; +lean::inc(x_606); +x_608 = l_option_map___rarg(x_606, x_603); +x_609 = l_lean_elaborator_to__pexpr___main___closed__28; lean::inc(x_609); -x_611 = l_option_map___rarg(x_609, x_606); -x_612 = l_lean_elaborator_to__pexpr___main___closed__28; -lean::inc(x_612); -x_614 = l_option_map___rarg(x_612, x_611); -x_615 = l_option_get__or__else___main___rarg(x_614, x_594); -x_616 = l_lean_elaborator_to__pexpr___main___closed__29; -lean::inc(x_616); -x_618 = l_lean_kvmap_set__name(x_605, x_616, x_615); -x_619 = l_list_append___rarg(x_520, x_589); -x_620 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__15(x_619); -x_621 = lean_expr_mk_mdata(x_618, x_620); +x_611 = l_option_map___rarg(x_609, x_608); +x_612 = l_option_get__or__else___main___rarg(x_611, x_592); +x_613 = l_lean_elaborator_to__pexpr___main___closed__29; +lean::inc(x_613); +x_615 = l_lean_kvmap_set__name(x_602, x_613, x_612); +x_616 = l_list_append___rarg(x_518, x_587); +x_617 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__15(x_616); +x_618 = lean_expr_mk_mdata(x_615, x_617); if (lean::is_scalar(x_214)) { - x_622 = lean::alloc_cnstr(0, 2, 0); + x_619 = lean::alloc_cnstr(0, 2, 0); } else { - x_622 = x_214; + x_619 = x_214; } -lean::cnstr_set(x_622, 0, x_621); -lean::cnstr_set(x_622, 1, x_591); -x_14 = x_622; +lean::cnstr_set(x_619, 0, x_618); +lean::cnstr_set(x_619, 1, x_589); +x_14 = x_619; goto lbl_15; } } } else { -obj* x_624; obj* x_625; obj* x_627; obj* x_628; obj* x_631; -lean::dec(x_340); -x_624 = l_lean_parser_term_struct__inst__item_has__view; -x_625 = lean::cnstr_get(x_624, 1); -lean::inc(x_625); -x_627 = lean::apply_1(x_625, x_343); -x_628 = l_lean_elaborator_to__pexpr___main___closed__30; +obj* x_621; obj* x_622; obj* x_624; obj* x_625; obj* x_628; +lean::dec(x_339); +x_621 = l_lean_parser_term_struct__inst__item_has__view; +x_622 = lean::cnstr_get(x_621, 1); +lean::inc(x_622); +x_624 = lean::apply_1(x_622, x_342); +x_625 = l_lean_elaborator_to__pexpr___main___closed__30; lean::inc(x_1); -lean::inc(x_628); -x_631 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_627, x_628, x_1, x_2); -if (lean::obj_tag(x_631) == 0) +lean::inc(x_625); +x_628 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_624, x_625, x_1, x_2); +if (lean::obj_tag(x_628) == 0) { -obj* x_641; obj* x_643; obj* x_644; -lean::dec(x_342); +obj* x_638; obj* x_640; obj* x_641; +lean::dec(x_341); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); @@ -9186,247 +9179,246 @@ lean::dec(x_210); lean::dec(x_220); lean::dec(x_216); lean::dec(x_214); -x_641 = lean::cnstr_get(x_631, 0); -lean::inc(x_641); -if (lean::is_shared(x_631)) { - lean::dec(x_631); - x_643 = lean::box(0); +x_638 = lean::cnstr_get(x_628, 0); +lean::inc(x_638); +if (lean::is_shared(x_628)) { + lean::dec(x_628); + x_640 = lean::box(0); } else { - lean::cnstr_release(x_631, 0); - x_643 = x_631; + lean::cnstr_release(x_628, 0); + x_640 = x_628; } -if (lean::is_scalar(x_643)) { - x_644 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_640)) { + x_641 = lean::alloc_cnstr(0, 1, 0); } else { - x_644 = x_643; + x_641 = x_640; } -lean::cnstr_set(x_644, 0, x_641); -return x_644; +lean::cnstr_set(x_641, 0, x_638); +return x_641; } else { -obj* x_645; obj* x_647; obj* x_648; obj* x_650; obj* x_655; -x_645 = lean::cnstr_get(x_631, 0); -lean::inc(x_645); -if (lean::is_shared(x_631)) { - lean::dec(x_631); - x_647 = lean::box(0); +obj* x_642; obj* x_644; obj* x_645; obj* x_647; obj* x_652; +x_642 = lean::cnstr_get(x_628, 0); +lean::inc(x_642); +if (lean::is_shared(x_628)) { + lean::dec(x_628); + x_644 = lean::box(0); } else { - lean::cnstr_release(x_631, 0); - x_647 = x_631; + lean::cnstr_release(x_628, 0); + x_644 = x_628; } -x_648 = lean::cnstr_get(x_645, 0); -lean::inc(x_648); -x_650 = lean::cnstr_get(x_645, 1); -lean::inc(x_650); -lean::dec(x_645); +x_645 = lean::cnstr_get(x_642, 0); +lean::inc(x_645); +x_647 = lean::cnstr_get(x_642, 1); +lean::inc(x_647); +lean::dec(x_642); lean::inc(x_1); lean::inc(x_0); -x_655 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__17(x_0, x_210, x_1, x_650); -if (lean::obj_tag(x_655) == 0) +x_652 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__17(x_0, x_210, x_1, x_647); +if (lean::obj_tag(x_652) == 0) { -obj* x_665; obj* x_668; -lean::dec(x_342); +obj* x_662; obj* x_665; +lean::dec(x_341); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_648); +lean::dec(x_645); lean::dec(x_206); lean::dec(x_220); lean::dec(x_216); lean::dec(x_214); -x_665 = lean::cnstr_get(x_655, 0); -lean::inc(x_665); -lean::dec(x_655); -if (lean::is_scalar(x_647)) { - x_668 = lean::alloc_cnstr(0, 1, 0); +x_662 = lean::cnstr_get(x_652, 0); +lean::inc(x_662); +lean::dec(x_652); +if (lean::is_scalar(x_644)) { + x_665 = lean::alloc_cnstr(0, 1, 0); } else { - x_668 = x_647; - lean::cnstr_set_tag(x_647, 0); + x_665 = x_644; + lean::cnstr_set_tag(x_644, 0); } -lean::cnstr_set(x_668, 0, x_665); -return x_668; +lean::cnstr_set(x_665, 0, x_662); +return x_665; } else { -obj* x_669; obj* x_672; obj* x_674; obj* x_677; obj* x_681; -x_669 = lean::cnstr_get(x_655, 0); +obj* x_666; obj* x_669; obj* x_671; obj* x_674; obj* x_678; +x_666 = lean::cnstr_get(x_652, 0); +lean::inc(x_666); +lean::dec(x_652); +x_669 = lean::cnstr_get(x_666, 0); lean::inc(x_669); -lean::dec(x_655); -x_672 = lean::cnstr_get(x_669, 0); -lean::inc(x_672); -x_674 = lean::cnstr_get(x_669, 1); -lean::inc(x_674); -lean::dec(x_669); +x_671 = lean::cnstr_get(x_666, 1); +lean::inc(x_671); +lean::dec(x_666); lean::inc(x_1); lean::inc(x_0); -x_681 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__19(x_0, x_216, x_1, x_674); -if (lean::obj_tag(x_681) == 0) +x_678 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__19(x_0, x_216, x_1, x_671); +if (lean::obj_tag(x_678) == 0) { -obj* x_691; obj* x_694; -lean::dec(x_342); -lean::dec(x_672); +obj* x_688; obj* x_691; +lean::dec(x_341); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_648); +lean::dec(x_645); +lean::dec(x_669); lean::dec(x_206); lean::dec(x_220); lean::dec(x_214); -x_691 = lean::cnstr_get(x_681, 0); -lean::inc(x_691); -lean::dec(x_681); -if (lean::is_scalar(x_647)) { - x_694 = lean::alloc_cnstr(0, 1, 0); +x_688 = lean::cnstr_get(x_678, 0); +lean::inc(x_688); +lean::dec(x_678); +if (lean::is_scalar(x_644)) { + x_691 = lean::alloc_cnstr(0, 1, 0); } else { - x_694 = x_647; - lean::cnstr_set_tag(x_647, 0); + x_691 = x_644; + lean::cnstr_set_tag(x_644, 0); } -lean::cnstr_set(x_694, 0, x_691); -return x_694; +lean::cnstr_set(x_691, 0, x_688); +return x_691; } else { -obj* x_695; obj* x_698; obj* x_700; obj* x_703; -x_695 = lean::cnstr_get(x_681, 0); +obj* x_692; obj* x_695; obj* x_697; obj* x_700; +x_692 = lean::cnstr_get(x_678, 0); +lean::inc(x_692); +lean::dec(x_678); +x_695 = lean::cnstr_get(x_692, 0); lean::inc(x_695); -lean::dec(x_681); -x_698 = lean::cnstr_get(x_695, 0); -lean::inc(x_698); -x_700 = lean::cnstr_get(x_695, 1); +x_697 = lean::cnstr_get(x_692, 1); +lean::inc(x_697); +lean::dec(x_692); +x_700 = lean::cnstr_get(x_206, 2); lean::inc(x_700); -lean::dec(x_695); -x_703 = lean::cnstr_get(x_206, 2); -lean::inc(x_703); -if (lean::obj_tag(x_703) == 0) +if (lean::obj_tag(x_700) == 0) { -obj* x_707; -lean::dec(x_342); -lean::dec(x_647); +obj* x_704; +lean::dec(x_341); +lean::dec(x_644); if (lean::is_scalar(x_220)) { - x_707 = lean::alloc_cnstr(0, 2, 0); + x_704 = lean::alloc_cnstr(0, 2, 0); } else { - x_707 = x_220; + x_704 = x_220; } -lean::cnstr_set(x_707, 0, x_698); -lean::cnstr_set(x_707, 1, x_700); -x_677 = x_707; -goto lbl_678; +lean::cnstr_set(x_704, 0, x_695); +lean::cnstr_set(x_704, 1, x_697); +x_674 = x_704; +goto lbl_675; } else { -obj* x_708; obj* x_711; obj* x_715; -x_708 = lean::cnstr_get(x_703, 0); +obj* x_705; obj* x_708; obj* x_712; +x_705 = lean::cnstr_get(x_700, 0); +lean::inc(x_705); +lean::dec(x_700); +x_708 = lean::cnstr_get(x_705, 0); lean::inc(x_708); -lean::dec(x_703); -x_711 = lean::cnstr_get(x_708, 0); -lean::inc(x_711); -lean::dec(x_708); +lean::dec(x_705); lean::inc(x_1); -x_715 = l_lean_elaborator_to__pexpr___main(x_711, x_1, x_700); -if (lean::obj_tag(x_715) == 0) +x_712 = l_lean_elaborator_to__pexpr___main(x_708, x_1, x_697); +if (lean::obj_tag(x_712) == 0) { -obj* x_726; obj* x_729; -lean::dec(x_342); -lean::dec(x_672); -lean::dec(x_698); +obj* x_723; obj* x_726; +lean::dec(x_341); lean::dec(x_7); +lean::dec(x_695); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_648); +lean::dec(x_645); +lean::dec(x_669); lean::dec(x_206); lean::dec(x_220); lean::dec(x_214); -x_726 = lean::cnstr_get(x_715, 0); -lean::inc(x_726); -lean::dec(x_715); -if (lean::is_scalar(x_647)) { - x_729 = lean::alloc_cnstr(0, 1, 0); +x_723 = lean::cnstr_get(x_712, 0); +lean::inc(x_723); +lean::dec(x_712); +if (lean::is_scalar(x_644)) { + x_726 = lean::alloc_cnstr(0, 1, 0); } else { - x_729 = x_647; - lean::cnstr_set_tag(x_647, 0); + x_726 = x_644; + lean::cnstr_set_tag(x_644, 0); } -lean::cnstr_set(x_729, 0, x_726); -return x_729; +lean::cnstr_set(x_726, 0, x_723); +return x_726; } else { -obj* x_731; obj* x_734; obj* x_736; obj* x_739; obj* x_740; obj* x_741; obj* x_742; -lean::dec(x_647); -x_731 = lean::cnstr_get(x_715, 0); +obj* x_728; obj* x_731; obj* x_733; obj* x_736; obj* x_737; obj* x_738; obj* x_739; +lean::dec(x_644); +x_728 = lean::cnstr_get(x_712, 0); +lean::inc(x_728); +lean::dec(x_712); +x_731 = lean::cnstr_get(x_728, 0); lean::inc(x_731); -lean::dec(x_715); -x_734 = lean::cnstr_get(x_731, 0); -lean::inc(x_734); -x_736 = lean::cnstr_get(x_731, 1); -lean::inc(x_736); -lean::dec(x_731); -x_739 = lean::box(0); -if (lean::is_scalar(x_342)) { - x_740 = lean::alloc_cnstr(1, 2, 0); +x_733 = lean::cnstr_get(x_728, 1); +lean::inc(x_733); +lean::dec(x_728); +x_736 = lean::box(0); +if (lean::is_scalar(x_341)) { + x_737 = lean::alloc_cnstr(1, 2, 0); } else { - x_740 = x_342; + x_737 = x_341; } -lean::cnstr_set(x_740, 0, x_734); -lean::cnstr_set(x_740, 1, x_739); -x_741 = l_list_append___rarg(x_698, x_740); +lean::cnstr_set(x_737, 0, x_731); +lean::cnstr_set(x_737, 1, x_736); +x_738 = l_list_append___rarg(x_695, x_737); if (lean::is_scalar(x_220)) { - x_742 = lean::alloc_cnstr(0, 2, 0); + x_739 = lean::alloc_cnstr(0, 2, 0); } else { - x_742 = x_220; + x_739 = x_220; } -lean::cnstr_set(x_742, 0, x_741); -lean::cnstr_set(x_742, 1, x_736); -x_677 = x_742; -goto lbl_678; +lean::cnstr_set(x_739, 0, x_738); +lean::cnstr_set(x_739, 1, x_733); +x_674 = x_739; +goto lbl_675; } } } -lbl_678: +lbl_675: { -obj* x_743; obj* x_745; obj* x_748; obj* x_749; obj* x_751; obj* x_752; obj* x_755; obj* x_756; uint8 x_757; obj* x_760; obj* x_761; obj* x_764; obj* x_766; obj* x_767; obj* x_769; obj* x_770; obj* x_771; obj* x_773; obj* x_774; obj* x_775; obj* x_776; obj* x_777; -x_743 = lean::cnstr_get(x_677, 0); -lean::inc(x_743); -x_745 = lean::cnstr_get(x_677, 1); -lean::inc(x_745); -lean::dec(x_677); -x_748 = lean::box(0); -x_749 = lean::mk_nat_obj(0u); -lean::inc(x_672); -x_751 = l_list_length__aux___main___rarg(x_672, x_749); -x_752 = l_lean_elaborator_to__pexpr___main___closed__25; +obj* x_740; obj* x_742; obj* x_745; obj* x_746; obj* x_748; obj* x_749; obj* x_751; obj* x_752; uint8 x_753; obj* x_756; obj* x_757; obj* x_760; obj* x_762; obj* x_763; obj* x_765; obj* x_766; obj* x_767; obj* x_769; obj* x_770; obj* x_771; obj* x_772; obj* x_773; +x_740 = lean::cnstr_get(x_674, 0); +lean::inc(x_740); +x_742 = lean::cnstr_get(x_674, 1); +lean::inc(x_742); +lean::dec(x_674); +x_745 = lean::box(0); +x_746 = lean::mk_nat_obj(0u); +lean::inc(x_669); +x_748 = l_list_length__aux___main___rarg(x_669, x_746); +x_749 = l_lean_elaborator_to__pexpr___main___closed__25; +lean::inc(x_749); +x_751 = l_lean_kvmap_set__nat(x_745, x_749, x_748); +x_752 = l_lean_elaborator_to__pexpr___main___closed__26; +x_753 = lean::unbox(x_645); +lean::dec(x_645); lean::inc(x_752); -lean::inc(x_748); -x_755 = l_lean_kvmap_set__nat(x_748, x_752, x_751); -x_756 = l_lean_elaborator_to__pexpr___main___closed__26; -x_757 = lean::unbox(x_648); -lean::dec(x_648); -lean::inc(x_756); -x_760 = l_lean_kvmap_set__bool(x_755, x_756, x_757); -x_761 = lean::cnstr_get(x_206, 1); -lean::inc(x_761); +x_756 = l_lean_kvmap_set__bool(x_751, x_752, x_753); +x_757 = lean::cnstr_get(x_206, 1); +lean::inc(x_757); lean::dec(x_206); -x_764 = l_lean_elaborator_to__pexpr___main___closed__27; -lean::inc(x_764); -x_766 = l_option_map___rarg(x_764, x_761); -x_767 = l_lean_elaborator_to__pexpr___main___closed__28; +x_760 = l_lean_elaborator_to__pexpr___main___closed__27; +lean::inc(x_760); +x_762 = l_option_map___rarg(x_760, x_757); +x_763 = l_lean_elaborator_to__pexpr___main___closed__28; +lean::inc(x_763); +x_765 = l_option_map___rarg(x_763, x_762); +x_766 = l_option_get__or__else___main___rarg(x_765, x_745); +x_767 = l_lean_elaborator_to__pexpr___main___closed__29; lean::inc(x_767); -x_769 = l_option_map___rarg(x_767, x_766); -x_770 = l_option_get__or__else___main___rarg(x_769, x_748); -x_771 = l_lean_elaborator_to__pexpr___main___closed__29; -lean::inc(x_771); -x_773 = l_lean_kvmap_set__name(x_760, x_771, x_770); -x_774 = l_list_append___rarg(x_672, x_743); -x_775 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__18(x_774); -x_776 = lean_expr_mk_mdata(x_773, x_775); +x_769 = l_lean_kvmap_set__name(x_756, x_767, x_766); +x_770 = l_list_append___rarg(x_669, x_740); +x_771 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__18(x_770); +x_772 = lean_expr_mk_mdata(x_769, x_771); if (lean::is_scalar(x_214)) { - x_777 = lean::alloc_cnstr(0, 2, 0); + x_773 = lean::alloc_cnstr(0, 2, 0); } else { - x_777 = x_214; + x_773 = x_214; } -lean::cnstr_set(x_777, 0, x_776); -lean::cnstr_set(x_777, 1, x_745); -x_14 = x_777; +lean::cnstr_set(x_773, 0, x_772); +lean::cnstr_set(x_773, 1, x_742); +x_14 = x_773; goto lbl_15; } } @@ -9438,499 +9430,499 @@ goto lbl_15; } else { -obj* x_780; +obj* x_776; lean::inc(x_1); lean::inc(x_9); -x_780 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__20(x_9, x_1, x_2); -if (lean::obj_tag(x_780) == 0) +x_776 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__20(x_9, x_1, x_2); +if (lean::obj_tag(x_776) == 0) { -obj* x_785; obj* x_787; obj* x_788; +obj* x_781; obj* x_783; obj* x_784; lean::dec(x_9); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_785 = lean::cnstr_get(x_780, 0); -lean::inc(x_785); -if (lean::is_shared(x_780)) { - lean::dec(x_780); - x_787 = lean::box(0); +x_781 = lean::cnstr_get(x_776, 0); +lean::inc(x_781); +if (lean::is_shared(x_776)) { + lean::dec(x_776); + x_783 = lean::box(0); } else { - lean::cnstr_release(x_780, 0); - x_787 = x_780; + lean::cnstr_release(x_776, 0); + x_783 = x_776; } -if (lean::is_scalar(x_787)) { - x_788 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_783)) { + x_784 = lean::alloc_cnstr(0, 1, 0); } else { - x_788 = x_787; + x_784 = x_783; } -lean::cnstr_set(x_788, 0, x_785); -return x_788; +lean::cnstr_set(x_784, 0, x_781); +return x_784; } else { -obj* x_789; obj* x_792; obj* x_794; obj* x_796; obj* x_797; obj* x_798; -x_789 = lean::cnstr_get(x_780, 0); -lean::inc(x_789); -lean::dec(x_780); -x_792 = lean::cnstr_get(x_789, 0); -lean::inc(x_792); -x_794 = lean::cnstr_get(x_789, 1); -lean::inc(x_794); -if (lean::is_shared(x_789)) { - lean::dec(x_789); - x_796 = lean::box(0); +obj* x_785; obj* x_788; obj* x_790; obj* x_792; obj* x_793; obj* x_794; +x_785 = lean::cnstr_get(x_776, 0); +lean::inc(x_785); +lean::dec(x_776); +x_788 = lean::cnstr_get(x_785, 0); +lean::inc(x_788); +x_790 = lean::cnstr_get(x_785, 1); +lean::inc(x_790); +if (lean::is_shared(x_785)) { + lean::dec(x_785); + x_792 = lean::box(0); } else { - lean::cnstr_release(x_789, 0); - lean::cnstr_release(x_789, 1); - x_796 = x_789; + lean::cnstr_release(x_785, 0); + lean::cnstr_release(x_785, 1); + x_792 = x_785; } -x_797 = l_list_reverse___rarg(x_792); -if (lean::is_scalar(x_796)) { - x_798 = lean::alloc_cnstr(0, 2, 0); +x_793 = l_list_reverse___rarg(x_788); +if (lean::is_scalar(x_792)) { + x_794 = lean::alloc_cnstr(0, 2, 0); } else { - x_798 = x_796; + x_794 = x_792; } -lean::cnstr_set(x_798, 0, x_797); -lean::cnstr_set(x_798, 1, x_794); -x_16 = x_798; +lean::cnstr_set(x_794, 0, x_793); +lean::cnstr_set(x_794, 1, x_790); +x_16 = x_794; goto lbl_17; } } } else { -obj* x_801; obj* x_802; obj* x_805; obj* x_806; obj* x_807; obj* x_809; obj* x_810; obj* x_811; +obj* x_797; obj* x_798; obj* x_801; obj* x_802; obj* x_803; obj* x_805; obj* x_806; obj* x_807; lean::dec(x_9); lean::dec(x_7); -x_801 = l_lean_parser_string__lit_has__view; -x_802 = lean::cnstr_get(x_801, 0); -lean::inc(x_802); +x_797 = l_lean_parser_string__lit_has__view; +x_798 = lean::cnstr_get(x_797, 0); +lean::inc(x_798); lean::inc(x_0); -x_805 = lean::apply_1(x_802, x_0); -x_806 = l_lean_parser_string__lit_view_value(x_805); -x_807 = l_lean_elaborator_to__pexpr___main___closed__31; -lean::inc(x_807); -x_809 = l_option_get__or__else___main___rarg(x_806, x_807); -x_810 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_810, 0, x_809); -x_811 = lean_expr_mk_lit(x_810); +x_801 = lean::apply_1(x_798, x_0); +x_802 = l_lean_parser_string__lit_view_value(x_801); +x_803 = l_lean_elaborator_to__pexpr___main___closed__31; +lean::inc(x_803); +x_805 = l_option_get__or__else___main___rarg(x_802, x_803); +x_806 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_806, 0, x_805); +x_807 = lean_expr_mk_lit(x_806); if (x_21 == 0) { -obj* x_812; -x_812 = l_lean_parser_syntax_get__pos(x_0); -if (lean::obj_tag(x_812) == 0) +obj* x_808; +x_808 = l_lean_parser_syntax_get__pos(x_0); +if (lean::obj_tag(x_808) == 0) { -obj* x_814; obj* x_815; +obj* x_810; obj* x_811; lean::dec(x_1); -x_814 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_814, 0, x_811); -lean::cnstr_set(x_814, 1, x_2); -x_815 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_815, 0, x_814); -return x_815; +x_810 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_810, 0, x_807); +lean::cnstr_set(x_810, 1, x_2); +x_811 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_811, 0, x_810); +return x_811; } else { -obj* x_816; obj* x_819; obj* x_822; obj* x_825; obj* x_826; obj* x_827; obj* x_829; obj* x_831; obj* x_832; obj* x_835; obj* x_837; obj* x_838; obj* x_839; obj* x_840; -x_816 = lean::cnstr_get(x_812, 0); -lean::inc(x_816); -lean::dec(x_812); -x_819 = lean::cnstr_get(x_1, 0); -lean::inc(x_819); +obj* x_812; obj* x_815; obj* x_818; obj* x_821; obj* x_822; obj* x_823; obj* x_825; obj* x_827; obj* x_828; obj* x_831; obj* x_833; obj* x_834; obj* x_835; obj* x_836; +x_812 = lean::cnstr_get(x_808, 0); +lean::inc(x_812); +lean::dec(x_808); +x_815 = lean::cnstr_get(x_1, 0); +lean::inc(x_815); lean::dec(x_1); -x_822 = lean::cnstr_get(x_819, 2); -lean::inc(x_822); -lean::dec(x_819); -x_825 = l_lean_file__map_to__position(x_822, x_816); -x_826 = lean::box(0); -x_827 = lean::cnstr_get(x_825, 1); -lean::inc(x_827); -x_829 = l_lean_elaborator_to__pexpr___main___closed__3; -lean::inc(x_829); -x_831 = l_lean_kvmap_set__nat(x_826, x_829, x_827); -x_832 = lean::cnstr_get(x_825, 0); -lean::inc(x_832); -lean::dec(x_825); -x_835 = l_lean_elaborator_to__pexpr___main___closed__4; -lean::inc(x_835); -x_837 = l_lean_kvmap_set__nat(x_831, x_835, x_832); -x_838 = lean_expr_mk_mdata(x_837, x_811); +x_818 = lean::cnstr_get(x_815, 2); +lean::inc(x_818); +lean::dec(x_815); +x_821 = l_lean_file__map_to__position(x_818, x_812); +x_822 = lean::box(0); +x_823 = lean::cnstr_get(x_821, 1); +lean::inc(x_823); +x_825 = l_lean_elaborator_to__pexpr___main___closed__3; +lean::inc(x_825); +x_827 = l_lean_kvmap_set__nat(x_822, x_825, x_823); +x_828 = lean::cnstr_get(x_821, 0); +lean::inc(x_828); +lean::dec(x_821); +x_831 = l_lean_elaborator_to__pexpr___main___closed__4; +lean::inc(x_831); +x_833 = l_lean_kvmap_set__nat(x_827, x_831, x_828); +x_834 = lean_expr_mk_mdata(x_833, x_807); +x_835 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_835, 0, x_834); +lean::cnstr_set(x_835, 1, x_2); +x_836 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_836, 0, x_835); +return x_836; +} +} +else +{ +obj* x_839; obj* x_840; +lean::dec(x_1); +lean::dec(x_0); x_839 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_839, 0, x_838); +lean::cnstr_set(x_839, 0, x_807); lean::cnstr_set(x_839, 1, x_2); x_840 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_840, 0, x_839); return x_840; } } -else -{ -obj* x_843; obj* x_844; -lean::dec(x_1); -lean::dec(x_0); -x_843 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_843, 0, x_811); -lean::cnstr_set(x_843, 1, x_2); -x_844 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_844, 0, x_843); -return x_844; -} -} } else { -obj* x_847; obj* x_848; obj* x_851; obj* x_852; obj* x_853; obj* x_854; +obj* x_843; obj* x_844; obj* x_847; obj* x_848; obj* x_849; obj* x_850; lean::dec(x_9); lean::dec(x_7); -x_847 = l_lean_parser_number_has__view; -x_848 = lean::cnstr_get(x_847, 0); -lean::inc(x_848); +x_843 = l_lean_parser_number_has__view; +x_844 = lean::cnstr_get(x_843, 0); +lean::inc(x_844); lean::inc(x_0); -x_851 = lean::apply_1(x_848, x_0); -x_852 = l_lean_parser_number_view_to__nat___main(x_851); -x_853 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_853, 0, x_852); -x_854 = lean_expr_mk_lit(x_853); +x_847 = lean::apply_1(x_844, x_0); +x_848 = l_lean_parser_number_view_to__nat___main(x_847); +x_849 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_849, 0, x_848); +x_850 = lean_expr_mk_lit(x_849); if (x_21 == 0) { -obj* x_855; -x_855 = l_lean_parser_syntax_get__pos(x_0); -if (lean::obj_tag(x_855) == 0) +obj* x_851; +x_851 = l_lean_parser_syntax_get__pos(x_0); +if (lean::obj_tag(x_851) == 0) { -obj* x_857; obj* x_858; +obj* x_853; obj* x_854; lean::dec(x_1); -x_857 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_857, 0, x_854); -lean::cnstr_set(x_857, 1, x_2); -x_858 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_858, 0, x_857); -return x_858; +x_853 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_853, 0, x_850); +lean::cnstr_set(x_853, 1, x_2); +x_854 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_854, 0, x_853); +return x_854; } else { -obj* x_859; obj* x_862; obj* x_865; obj* x_868; obj* x_869; obj* x_870; obj* x_872; obj* x_874; obj* x_875; obj* x_878; obj* x_880; obj* x_881; obj* x_882; obj* x_883; -x_859 = lean::cnstr_get(x_855, 0); -lean::inc(x_859); -lean::dec(x_855); -x_862 = lean::cnstr_get(x_1, 0); -lean::inc(x_862); +obj* x_855; obj* x_858; obj* x_861; obj* x_864; obj* x_865; obj* x_866; obj* x_868; obj* x_870; obj* x_871; obj* x_874; obj* x_876; obj* x_877; obj* x_878; obj* x_879; +x_855 = lean::cnstr_get(x_851, 0); +lean::inc(x_855); +lean::dec(x_851); +x_858 = lean::cnstr_get(x_1, 0); +lean::inc(x_858); lean::dec(x_1); -x_865 = lean::cnstr_get(x_862, 2); -lean::inc(x_865); -lean::dec(x_862); -x_868 = l_lean_file__map_to__position(x_865, x_859); -x_869 = lean::box(0); -x_870 = lean::cnstr_get(x_868, 1); -lean::inc(x_870); -x_872 = l_lean_elaborator_to__pexpr___main___closed__3; -lean::inc(x_872); -x_874 = l_lean_kvmap_set__nat(x_869, x_872, x_870); -x_875 = lean::cnstr_get(x_868, 0); -lean::inc(x_875); -lean::dec(x_868); -x_878 = l_lean_elaborator_to__pexpr___main___closed__4; -lean::inc(x_878); -x_880 = l_lean_kvmap_set__nat(x_874, x_878, x_875); -x_881 = lean_expr_mk_mdata(x_880, x_854); +x_861 = lean::cnstr_get(x_858, 2); +lean::inc(x_861); +lean::dec(x_858); +x_864 = l_lean_file__map_to__position(x_861, x_855); +x_865 = lean::box(0); +x_866 = lean::cnstr_get(x_864, 1); +lean::inc(x_866); +x_868 = l_lean_elaborator_to__pexpr___main___closed__3; +lean::inc(x_868); +x_870 = l_lean_kvmap_set__nat(x_865, x_868, x_866); +x_871 = lean::cnstr_get(x_864, 0); +lean::inc(x_871); +lean::dec(x_864); +x_874 = l_lean_elaborator_to__pexpr___main___closed__4; +lean::inc(x_874); +x_876 = l_lean_kvmap_set__nat(x_870, x_874, x_871); +x_877 = lean_expr_mk_mdata(x_876, x_850); +x_878 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_878, 0, x_877); +lean::cnstr_set(x_878, 1, x_2); +x_879 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_879, 0, x_878); +return x_879; +} +} +else +{ +obj* x_882; obj* x_883; +lean::dec(x_1); +lean::dec(x_0); x_882 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_882, 0, x_881); +lean::cnstr_set(x_882, 0, x_850); lean::cnstr_set(x_882, 1, x_2); x_883 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_883, 0, x_882); return x_883; } } -else -{ -obj* x_886; obj* x_887; -lean::dec(x_1); -lean::dec(x_0); -x_886 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_886, 0, x_854); -lean::cnstr_set(x_886, 1, x_2); -x_887 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_887, 0, x_886); -return x_887; -} -} } else { -obj* x_889; obj* x_890; obj* x_893; obj* x_894; obj* x_898; +obj* x_885; obj* x_886; obj* x_889; obj* x_890; obj* x_894; lean::dec(x_9); -x_889 = l_lean_parser_term_borrowed_has__view; -x_890 = lean::cnstr_get(x_889, 0); +x_885 = l_lean_parser_term_borrowed_has__view; +x_886 = lean::cnstr_get(x_885, 0); +lean::inc(x_886); +lean::inc(x_0); +x_889 = lean::apply_1(x_886, x_0); +x_890 = lean::cnstr_get(x_889, 1); lean::inc(x_890); -lean::inc(x_0); -x_893 = lean::apply_1(x_890, x_0); -x_894 = lean::cnstr_get(x_893, 1); -lean::inc(x_894); -lean::dec(x_893); +lean::dec(x_889); lean::inc(x_1); -x_898 = l_lean_elaborator_to__pexpr___main(x_894, x_1, x_2); -if (lean::obj_tag(x_898) == 0) +x_894 = l_lean_elaborator_to__pexpr___main(x_890, x_1, x_2); +if (lean::obj_tag(x_894) == 0) { -obj* x_902; obj* x_904; obj* x_905; +obj* x_898; obj* x_900; obj* x_901; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_902 = lean::cnstr_get(x_898, 0); +x_898 = lean::cnstr_get(x_894, 0); +lean::inc(x_898); +if (lean::is_shared(x_894)) { + lean::dec(x_894); + x_900 = lean::box(0); +} else { + lean::cnstr_release(x_894, 0); + x_900 = x_894; +} +if (lean::is_scalar(x_900)) { + x_901 = lean::alloc_cnstr(0, 1, 0); +} else { + x_901 = x_900; +} +lean::cnstr_set(x_901, 0, x_898); +return x_901; +} +else +{ +obj* x_902; obj* x_905; obj* x_907; obj* x_909; obj* x_910; obj* x_912; obj* x_913; +x_902 = lean::cnstr_get(x_894, 0); lean::inc(x_902); -if (lean::is_shared(x_898)) { - lean::dec(x_898); - x_904 = lean::box(0); +lean::dec(x_894); +x_905 = lean::cnstr_get(x_902, 0); +lean::inc(x_905); +x_907 = lean::cnstr_get(x_902, 1); +lean::inc(x_907); +if (lean::is_shared(x_902)) { + lean::dec(x_902); + x_909 = lean::box(0); } else { - lean::cnstr_release(x_898, 0); - x_904 = x_898; + lean::cnstr_release(x_902, 0); + lean::cnstr_release(x_902, 1); + x_909 = x_902; } -if (lean::is_scalar(x_904)) { - x_905 = lean::alloc_cnstr(0, 1, 0); +x_910 = l_lean_elaborator_to__pexpr___main___closed__32; +lean::inc(x_910); +x_912 = l_lean_elaborator_expr_mk__annotation(x_910, x_905); +if (lean::is_scalar(x_909)) { + x_913 = lean::alloc_cnstr(0, 2, 0); } else { - x_905 = x_904; + x_913 = x_909; } -lean::cnstr_set(x_905, 0, x_902); -return x_905; -} -else -{ -obj* x_906; obj* x_909; obj* x_911; obj* x_913; obj* x_914; obj* x_916; obj* x_917; -x_906 = lean::cnstr_get(x_898, 0); -lean::inc(x_906); -lean::dec(x_898); -x_909 = lean::cnstr_get(x_906, 0); -lean::inc(x_909); -x_911 = lean::cnstr_get(x_906, 1); -lean::inc(x_911); -if (lean::is_shared(x_906)) { - lean::dec(x_906); - x_913 = lean::box(0); -} else { - lean::cnstr_release(x_906, 0); - lean::cnstr_release(x_906, 1); - x_913 = x_906; -} -x_914 = l_lean_elaborator_to__pexpr___main___closed__32; -lean::inc(x_914); -x_916 = l_lean_elaborator_expr_mk__annotation(x_914, x_909); -if (lean::is_scalar(x_913)) { - x_917 = lean::alloc_cnstr(0, 2, 0); -} else { - x_917 = x_913; -} -lean::cnstr_set(x_917, 0, x_916); -lean::cnstr_set(x_917, 1, x_911); -x_14 = x_917; +lean::cnstr_set(x_913, 0, x_912); +lean::cnstr_set(x_913, 1, x_907); +x_14 = x_913; goto lbl_15; } } } else { -obj* x_919; obj* x_920; obj* x_923; obj* x_924; obj* x_928; +obj* x_915; obj* x_916; obj* x_919; obj* x_920; obj* x_924; lean::dec(x_9); -x_919 = l_lean_parser_term_inaccessible_has__view; -x_920 = lean::cnstr_get(x_919, 0); -lean::inc(x_920); +x_915 = l_lean_parser_term_inaccessible_has__view; +x_916 = lean::cnstr_get(x_915, 0); +lean::inc(x_916); lean::inc(x_0); -x_923 = lean::apply_1(x_920, x_0); -x_924 = lean::cnstr_get(x_923, 1); -lean::inc(x_924); -lean::dec(x_923); +x_919 = lean::apply_1(x_916, x_0); +x_920 = lean::cnstr_get(x_919, 1); +lean::inc(x_920); +lean::dec(x_919); lean::inc(x_1); -x_928 = l_lean_elaborator_to__pexpr___main(x_924, x_1, x_2); -if (lean::obj_tag(x_928) == 0) +x_924 = l_lean_elaborator_to__pexpr___main(x_920, x_1, x_2); +if (lean::obj_tag(x_924) == 0) { -obj* x_932; obj* x_934; obj* x_935; +obj* x_928; obj* x_930; obj* x_931; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_932 = lean::cnstr_get(x_928, 0); -lean::inc(x_932); -if (lean::is_shared(x_928)) { - lean::dec(x_928); - x_934 = lean::box(0); +x_928 = lean::cnstr_get(x_924, 0); +lean::inc(x_928); +if (lean::is_shared(x_924)) { + lean::dec(x_924); + x_930 = lean::box(0); } else { - lean::cnstr_release(x_928, 0); - x_934 = x_928; + lean::cnstr_release(x_924, 0); + x_930 = x_924; } -if (lean::is_scalar(x_934)) { - x_935 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_930)) { + x_931 = lean::alloc_cnstr(0, 1, 0); } else { - x_935 = x_934; + x_931 = x_930; } -lean::cnstr_set(x_935, 0, x_932); -return x_935; +lean::cnstr_set(x_931, 0, x_928); +return x_931; } else { -obj* x_936; obj* x_939; obj* x_941; obj* x_943; obj* x_944; obj* x_946; obj* x_947; -x_936 = lean::cnstr_get(x_928, 0); -lean::inc(x_936); -lean::dec(x_928); -x_939 = lean::cnstr_get(x_936, 0); -lean::inc(x_939); -x_941 = lean::cnstr_get(x_936, 1); -lean::inc(x_941); -if (lean::is_shared(x_936)) { - lean::dec(x_936); - x_943 = lean::box(0); +obj* x_932; obj* x_935; obj* x_937; obj* x_939; obj* x_940; obj* x_942; obj* x_943; +x_932 = lean::cnstr_get(x_924, 0); +lean::inc(x_932); +lean::dec(x_924); +x_935 = lean::cnstr_get(x_932, 0); +lean::inc(x_935); +x_937 = lean::cnstr_get(x_932, 1); +lean::inc(x_937); +if (lean::is_shared(x_932)) { + lean::dec(x_932); + x_939 = lean::box(0); } else { - lean::cnstr_release(x_936, 0); - lean::cnstr_release(x_936, 1); - x_943 = x_936; + lean::cnstr_release(x_932, 0); + lean::cnstr_release(x_932, 1); + x_939 = x_932; } -x_944 = l_lean_elaborator_to__pexpr___main___closed__33; -lean::inc(x_944); -x_946 = l_lean_elaborator_expr_mk__annotation(x_944, x_939); -if (lean::is_scalar(x_943)) { - x_947 = lean::alloc_cnstr(0, 2, 0); +x_940 = l_lean_elaborator_to__pexpr___main___closed__33; +lean::inc(x_940); +x_942 = l_lean_elaborator_expr_mk__annotation(x_940, x_935); +if (lean::is_scalar(x_939)) { + x_943 = lean::alloc_cnstr(0, 2, 0); } else { - x_947 = x_943; + x_943 = x_939; } -lean::cnstr_set(x_947, 0, x_946); -lean::cnstr_set(x_947, 1, x_941); -x_14 = x_947; +lean::cnstr_set(x_943, 0, x_942); +lean::cnstr_set(x_943, 1, x_937); +x_14 = x_943; goto lbl_15; } } } else { -obj* x_949; obj* x_950; obj* x_953; obj* x_954; obj* x_956; obj* x_957; obj* x_959; obj* x_962; +obj* x_945; obj* x_946; obj* x_949; obj* x_950; obj* x_952; obj* x_953; obj* x_955; obj* x_958; lean::dec(x_9); -x_949 = l_lean_parser_term_explicit_has__view; +x_945 = l_lean_parser_term_explicit_has__view; +x_946 = lean::cnstr_get(x_945, 0); +lean::inc(x_946); +lean::inc(x_0); +x_949 = lean::apply_1(x_946, x_0); x_950 = lean::cnstr_get(x_949, 0); lean::inc(x_950); -lean::inc(x_0); -x_953 = lean::apply_1(x_950, x_0); -x_954 = lean::cnstr_get(x_953, 0); -lean::inc(x_954); -x_956 = l_lean_parser_ident__univs_has__view; -x_957 = lean::cnstr_get(x_956, 1); -lean::inc(x_957); -x_959 = lean::cnstr_get(x_953, 1); -lean::inc(x_959); -lean::dec(x_953); -x_962 = lean::apply_1(x_957, x_959); -if (lean::obj_tag(x_954) == 0) +x_952 = l_lean_parser_ident__univs_has__view; +x_953 = lean::cnstr_get(x_952, 1); +lean::inc(x_953); +x_955 = lean::cnstr_get(x_949, 1); +lean::inc(x_955); +lean::dec(x_949); +x_958 = lean::apply_1(x_953, x_955); +if (lean::obj_tag(x_950) == 0) { -obj* x_965; -lean::dec(x_954); +obj* x_961; +lean::dec(x_950); lean::inc(x_1); -x_965 = l_lean_elaborator_to__pexpr___main(x_962, x_1, x_2); -if (lean::obj_tag(x_965) == 0) +x_961 = l_lean_elaborator_to__pexpr___main(x_958, x_1, x_2); +if (lean::obj_tag(x_961) == 0) { -obj* x_969; obj* x_971; obj* x_972; +obj* x_965; obj* x_967; obj* x_968; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_969 = lean::cnstr_get(x_965, 0); +x_965 = lean::cnstr_get(x_961, 0); +lean::inc(x_965); +if (lean::is_shared(x_961)) { + lean::dec(x_961); + x_967 = lean::box(0); +} else { + lean::cnstr_release(x_961, 0); + x_967 = x_961; +} +if (lean::is_scalar(x_967)) { + x_968 = lean::alloc_cnstr(0, 1, 0); +} else { + x_968 = x_967; +} +lean::cnstr_set(x_968, 0, x_965); +return x_968; +} +else +{ +obj* x_969; obj* x_972; obj* x_974; obj* x_976; obj* x_977; obj* x_979; obj* x_980; +x_969 = lean::cnstr_get(x_961, 0); lean::inc(x_969); -if (lean::is_shared(x_965)) { - lean::dec(x_965); - x_971 = lean::box(0); +lean::dec(x_961); +x_972 = lean::cnstr_get(x_969, 0); +lean::inc(x_972); +x_974 = lean::cnstr_get(x_969, 1); +lean::inc(x_974); +if (lean::is_shared(x_969)) { + lean::dec(x_969); + x_976 = lean::box(0); } else { - lean::cnstr_release(x_965, 0); - x_971 = x_965; + lean::cnstr_release(x_969, 0); + lean::cnstr_release(x_969, 1); + x_976 = x_969; } -if (lean::is_scalar(x_971)) { - x_972 = lean::alloc_cnstr(0, 1, 0); +x_977 = l_list_map___main___at_lean_elaborator_mk__eqns___spec__1___closed__1; +lean::inc(x_977); +x_979 = l_lean_elaborator_expr_mk__annotation(x_977, x_972); +if (lean::is_scalar(x_976)) { + x_980 = lean::alloc_cnstr(0, 2, 0); } else { - x_972 = x_971; + x_980 = x_976; } -lean::cnstr_set(x_972, 0, x_969); -return x_972; -} -else -{ -obj* x_973; obj* x_976; obj* x_978; obj* x_980; obj* x_981; obj* x_983; obj* x_984; -x_973 = lean::cnstr_get(x_965, 0); -lean::inc(x_973); -lean::dec(x_965); -x_976 = lean::cnstr_get(x_973, 0); -lean::inc(x_976); -x_978 = lean::cnstr_get(x_973, 1); -lean::inc(x_978); -if (lean::is_shared(x_973)) { - lean::dec(x_973); - x_980 = lean::box(0); -} else { - lean::cnstr_release(x_973, 0); - lean::cnstr_release(x_973, 1); - x_980 = x_973; -} -x_981 = l_list_map___main___at_lean_elaborator_mk__eqns___spec__1___closed__1; -lean::inc(x_981); -x_983 = l_lean_elaborator_expr_mk__annotation(x_981, x_976); -if (lean::is_scalar(x_980)) { - x_984 = lean::alloc_cnstr(0, 2, 0); -} else { - x_984 = x_980; -} -lean::cnstr_set(x_984, 0, x_983); -lean::cnstr_set(x_984, 1, x_978); -x_14 = x_984; +lean::cnstr_set(x_980, 0, x_979); +lean::cnstr_set(x_980, 1, x_974); +x_14 = x_980; goto lbl_15; } } else { -obj* x_987; -lean::dec(x_954); +obj* x_983; +lean::dec(x_950); lean::inc(x_1); -x_987 = l_lean_elaborator_to__pexpr___main(x_962, x_1, x_2); -if (lean::obj_tag(x_987) == 0) +x_983 = l_lean_elaborator_to__pexpr___main(x_958, x_1, x_2); +if (lean::obj_tag(x_983) == 0) { -obj* x_991; obj* x_993; obj* x_994; +obj* x_987; obj* x_989; obj* x_990; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_991 = lean::cnstr_get(x_987, 0); +x_987 = lean::cnstr_get(x_983, 0); +lean::inc(x_987); +if (lean::is_shared(x_983)) { + lean::dec(x_983); + x_989 = lean::box(0); +} else { + lean::cnstr_release(x_983, 0); + x_989 = x_983; +} +if (lean::is_scalar(x_989)) { + x_990 = lean::alloc_cnstr(0, 1, 0); +} else { + x_990 = x_989; +} +lean::cnstr_set(x_990, 0, x_987); +return x_990; +} +else +{ +obj* x_991; obj* x_994; obj* x_996; obj* x_998; obj* x_999; obj* x_1001; obj* x_1002; +x_991 = lean::cnstr_get(x_983, 0); lean::inc(x_991); -if (lean::is_shared(x_987)) { - lean::dec(x_987); - x_993 = lean::box(0); +lean::dec(x_983); +x_994 = lean::cnstr_get(x_991, 0); +lean::inc(x_994); +x_996 = lean::cnstr_get(x_991, 1); +lean::inc(x_996); +if (lean::is_shared(x_991)) { + lean::dec(x_991); + x_998 = lean::box(0); } else { - lean::cnstr_release(x_987, 0); - x_993 = x_987; + lean::cnstr_release(x_991, 0); + lean::cnstr_release(x_991, 1); + x_998 = x_991; } -if (lean::is_scalar(x_993)) { - x_994 = lean::alloc_cnstr(0, 1, 0); +x_999 = l_lean_elaborator_to__pexpr___main___closed__34; +lean::inc(x_999); +x_1001 = l_lean_elaborator_expr_mk__annotation(x_999, x_994); +if (lean::is_scalar(x_998)) { + x_1002 = lean::alloc_cnstr(0, 2, 0); } else { - x_994 = x_993; + x_1002 = x_998; } -lean::cnstr_set(x_994, 0, x_991); -return x_994; -} -else -{ -obj* x_995; obj* x_998; obj* x_1000; obj* x_1002; obj* x_1003; obj* x_1005; obj* x_1006; -x_995 = lean::cnstr_get(x_987, 0); -lean::inc(x_995); -lean::dec(x_987); -x_998 = lean::cnstr_get(x_995, 0); -lean::inc(x_998); -x_1000 = lean::cnstr_get(x_995, 1); -lean::inc(x_1000); -if (lean::is_shared(x_995)) { - lean::dec(x_995); - x_1002 = lean::box(0); -} else { - lean::cnstr_release(x_995, 0); - lean::cnstr_release(x_995, 1); - x_1002 = x_995; -} -x_1003 = l_lean_elaborator_to__pexpr___main___closed__34; -lean::inc(x_1003); -x_1005 = l_lean_elaborator_expr_mk__annotation(x_1003, x_998); -if (lean::is_scalar(x_1002)) { - x_1006 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1006 = x_1002; -} -lean::cnstr_set(x_1006, 0, x_1005); -lean::cnstr_set(x_1006, 1, x_1000); -x_14 = x_1006; +lean::cnstr_set(x_1002, 0, x_1001); +lean::cnstr_set(x_1002, 1, x_996); +x_14 = x_1002; goto lbl_15; } } @@ -9938,155 +9930,155 @@ goto lbl_15; } else { -obj* x_1008; obj* x_1009; obj* x_1012; obj* x_1013; obj* x_1015; +obj* x_1004; obj* x_1005; obj* x_1008; obj* x_1009; obj* x_1011; lean::dec(x_9); -x_1008 = l_lean_parser_term_projection_has__view; -x_1009 = lean::cnstr_get(x_1008, 0); +x_1004 = l_lean_parser_term_projection_has__view; +x_1005 = lean::cnstr_get(x_1004, 0); +lean::inc(x_1005); +lean::inc(x_0); +x_1008 = lean::apply_1(x_1005, x_0); +x_1009 = lean::cnstr_get(x_1008, 2); lean::inc(x_1009); -lean::inc(x_0); -x_1012 = lean::apply_1(x_1009, x_0); -x_1013 = lean::cnstr_get(x_1012, 2); -lean::inc(x_1013); -x_1015 = lean::cnstr_get(x_1012, 0); -lean::inc(x_1015); -lean::dec(x_1012); -if (lean::obj_tag(x_1013) == 0) +x_1011 = lean::cnstr_get(x_1008, 0); +lean::inc(x_1011); +lean::dec(x_1008); +if (lean::obj_tag(x_1009) == 0) { -obj* x_1018; obj* x_1022; -x_1018 = lean::cnstr_get(x_1013, 0); -lean::inc(x_1018); -lean::dec(x_1013); +obj* x_1014; obj* x_1018; +x_1014 = lean::cnstr_get(x_1009, 0); +lean::inc(x_1014); +lean::dec(x_1009); lean::inc(x_1); -x_1022 = l_lean_elaborator_to__pexpr___main(x_1015, x_1, x_2); -if (lean::obj_tag(x_1022) == 0) +x_1018 = l_lean_elaborator_to__pexpr___main(x_1011, x_1, x_2); +if (lean::obj_tag(x_1018) == 0) { -obj* x_1027; obj* x_1029; obj* x_1030; +obj* x_1023; obj* x_1025; obj* x_1026; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_1018); -x_1027 = lean::cnstr_get(x_1022, 0); +lean::dec(x_1014); +x_1023 = lean::cnstr_get(x_1018, 0); +lean::inc(x_1023); +if (lean::is_shared(x_1018)) { + lean::dec(x_1018); + x_1025 = lean::box(0); +} else { + lean::cnstr_release(x_1018, 0); + x_1025 = x_1018; +} +if (lean::is_scalar(x_1025)) { + x_1026 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1026 = x_1025; +} +lean::cnstr_set(x_1026, 0, x_1023); +return x_1026; +} +else +{ +obj* x_1027; obj* x_1030; obj* x_1032; obj* x_1034; obj* x_1035; obj* x_1038; obj* x_1039; obj* x_1040; obj* x_1042; obj* x_1043; obj* x_1044; +x_1027 = lean::cnstr_get(x_1018, 0); lean::inc(x_1027); -if (lean::is_shared(x_1022)) { - lean::dec(x_1022); - x_1029 = lean::box(0); -} else { - lean::cnstr_release(x_1022, 0); - x_1029 = x_1022; -} -if (lean::is_scalar(x_1029)) { - x_1030 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1030 = x_1029; -} -lean::cnstr_set(x_1030, 0, x_1027); -return x_1030; -} -else -{ -obj* x_1031; obj* x_1034; obj* x_1036; obj* x_1038; obj* x_1039; obj* x_1042; obj* x_1043; obj* x_1044; obj* x_1046; obj* x_1047; obj* x_1048; -x_1031 = lean::cnstr_get(x_1022, 0); -lean::inc(x_1031); -lean::dec(x_1022); -x_1034 = lean::cnstr_get(x_1031, 0); -lean::inc(x_1034); -x_1036 = lean::cnstr_get(x_1031, 1); -lean::inc(x_1036); -if (lean::is_shared(x_1031)) { - lean::dec(x_1031); - x_1038 = lean::box(0); -} else { - lean::cnstr_release(x_1031, 0); - lean::cnstr_release(x_1031, 1); - x_1038 = x_1031; -} -x_1039 = lean::cnstr_get(x_1018, 2); -lean::inc(x_1039); lean::dec(x_1018); -x_1042 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_1042, 0, x_1039); -x_1043 = lean::box(0); -x_1044 = l_lean_elaborator_to__pexpr___main___closed__35; -lean::inc(x_1044); -x_1046 = l_lean_kvmap_insert__core___main(x_1043, x_1044, x_1042); -x_1047 = lean_expr_mk_mdata(x_1046, x_1034); -if (lean::is_scalar(x_1038)) { - x_1048 = lean::alloc_cnstr(0, 2, 0); +x_1030 = lean::cnstr_get(x_1027, 0); +lean::inc(x_1030); +x_1032 = lean::cnstr_get(x_1027, 1); +lean::inc(x_1032); +if (lean::is_shared(x_1027)) { + lean::dec(x_1027); + x_1034 = lean::box(0); } else { - x_1048 = x_1038; + lean::cnstr_release(x_1027, 0); + lean::cnstr_release(x_1027, 1); + x_1034 = x_1027; } -lean::cnstr_set(x_1048, 0, x_1047); -lean::cnstr_set(x_1048, 1, x_1036); -x_14 = x_1048; +x_1035 = lean::cnstr_get(x_1014, 2); +lean::inc(x_1035); +lean::dec(x_1014); +x_1038 = lean::alloc_cnstr(3, 1, 0); +lean::cnstr_set(x_1038, 0, x_1035); +x_1039 = lean::box(0); +x_1040 = l_lean_elaborator_to__pexpr___main___closed__35; +lean::inc(x_1040); +x_1042 = l_lean_kvmap_insert__core___main(x_1039, x_1040, x_1038); +x_1043 = lean_expr_mk_mdata(x_1042, x_1030); +if (lean::is_scalar(x_1034)) { + x_1044 = lean::alloc_cnstr(0, 2, 0); +} else { + x_1044 = x_1034; +} +lean::cnstr_set(x_1044, 0, x_1043); +lean::cnstr_set(x_1044, 1, x_1032); +x_14 = x_1044; goto lbl_15; } } else { -obj* x_1049; obj* x_1053; -x_1049 = lean::cnstr_get(x_1013, 0); -lean::inc(x_1049); -lean::dec(x_1013); +obj* x_1045; obj* x_1049; +x_1045 = lean::cnstr_get(x_1009, 0); +lean::inc(x_1045); +lean::dec(x_1009); lean::inc(x_1); -x_1053 = l_lean_elaborator_to__pexpr___main(x_1015, x_1, x_2); -if (lean::obj_tag(x_1053) == 0) +x_1049 = l_lean_elaborator_to__pexpr___main(x_1011, x_1, x_2); +if (lean::obj_tag(x_1049) == 0) { -obj* x_1058; obj* x_1060; obj* x_1061; +obj* x_1054; obj* x_1056; obj* x_1057; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_1049); -x_1058 = lean::cnstr_get(x_1053, 0); +lean::dec(x_1045); +x_1054 = lean::cnstr_get(x_1049, 0); +lean::inc(x_1054); +if (lean::is_shared(x_1049)) { + lean::dec(x_1049); + x_1056 = lean::box(0); +} else { + lean::cnstr_release(x_1049, 0); + x_1056 = x_1049; +} +if (lean::is_scalar(x_1056)) { + x_1057 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1057 = x_1056; +} +lean::cnstr_set(x_1057, 0, x_1054); +return x_1057; +} +else +{ +obj* x_1058; obj* x_1061; obj* x_1063; obj* x_1065; obj* x_1066; obj* x_1067; obj* x_1068; obj* x_1069; obj* x_1071; obj* x_1072; obj* x_1073; +x_1058 = lean::cnstr_get(x_1049, 0); lean::inc(x_1058); -if (lean::is_shared(x_1053)) { - lean::dec(x_1053); - x_1060 = lean::box(0); +lean::dec(x_1049); +x_1061 = lean::cnstr_get(x_1058, 0); +lean::inc(x_1061); +x_1063 = lean::cnstr_get(x_1058, 1); +lean::inc(x_1063); +if (lean::is_shared(x_1058)) { + lean::dec(x_1058); + x_1065 = lean::box(0); } else { - lean::cnstr_release(x_1053, 0); - x_1060 = x_1053; + lean::cnstr_release(x_1058, 0); + lean::cnstr_release(x_1058, 1); + x_1065 = x_1058; } -if (lean::is_scalar(x_1060)) { - x_1061 = lean::alloc_cnstr(0, 1, 0); +x_1066 = l_lean_parser_number_view_to__nat___main(x_1045); +x_1067 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_1067, 0, x_1066); +x_1068 = lean::box(0); +x_1069 = l_lean_elaborator_to__pexpr___main___closed__35; +lean::inc(x_1069); +x_1071 = l_lean_kvmap_insert__core___main(x_1068, x_1069, x_1067); +x_1072 = lean_expr_mk_mdata(x_1071, x_1061); +if (lean::is_scalar(x_1065)) { + x_1073 = lean::alloc_cnstr(0, 2, 0); } else { - x_1061 = x_1060; + x_1073 = x_1065; } -lean::cnstr_set(x_1061, 0, x_1058); -return x_1061; -} -else -{ -obj* x_1062; obj* x_1065; obj* x_1067; obj* x_1069; obj* x_1070; obj* x_1071; obj* x_1072; obj* x_1073; obj* x_1075; obj* x_1076; obj* x_1077; -x_1062 = lean::cnstr_get(x_1053, 0); -lean::inc(x_1062); -lean::dec(x_1053); -x_1065 = lean::cnstr_get(x_1062, 0); -lean::inc(x_1065); -x_1067 = lean::cnstr_get(x_1062, 1); -lean::inc(x_1067); -if (lean::is_shared(x_1062)) { - lean::dec(x_1062); - x_1069 = lean::box(0); -} else { - lean::cnstr_release(x_1062, 0); - lean::cnstr_release(x_1062, 1); - x_1069 = x_1062; -} -x_1070 = l_lean_parser_number_view_to__nat___main(x_1049); -x_1071 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1071, 0, x_1070); -x_1072 = lean::box(0); -x_1073 = l_lean_elaborator_to__pexpr___main___closed__35; -lean::inc(x_1073); -x_1075 = l_lean_kvmap_insert__core___main(x_1072, x_1073, x_1071); -x_1076 = lean_expr_mk_mdata(x_1075, x_1065); -if (lean::is_scalar(x_1069)) { - x_1077 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1077 = x_1069; -} -lean::cnstr_set(x_1077, 0, x_1076); -lean::cnstr_set(x_1077, 1, x_1067); -x_14 = x_1077; +lean::cnstr_set(x_1073, 0, x_1072); +lean::cnstr_set(x_1073, 1, x_1063); +x_14 = x_1073; goto lbl_15; } } @@ -10094,219 +10086,219 @@ goto lbl_15; } else { -obj* x_1079; obj* x_1080; obj* x_1083; obj* x_1084; +obj* x_1075; obj* x_1076; obj* x_1079; obj* x_1080; lean::dec(x_9); -x_1079 = l_lean_parser_term_let_has__view; -x_1080 = lean::cnstr_get(x_1079, 0); +x_1075 = l_lean_parser_term_let_has__view; +x_1076 = lean::cnstr_get(x_1075, 0); +lean::inc(x_1076); +lean::inc(x_0); +x_1079 = lean::apply_1(x_1076, x_0); +x_1080 = lean::cnstr_get(x_1079, 1); lean::inc(x_1080); -lean::inc(x_0); -x_1083 = lean::apply_1(x_1080, x_0); -x_1084 = lean::cnstr_get(x_1083, 1); -lean::inc(x_1084); -if (lean::obj_tag(x_1084) == 0) +if (lean::obj_tag(x_1080) == 0) { -obj* x_1086; obj* x_1089; obj* x_1091; obj* x_1093; -x_1086 = lean::cnstr_get(x_1084, 0); -lean::inc(x_1086); -lean::dec(x_1084); -x_1089 = lean::cnstr_get(x_1086, 0); +obj* x_1082; obj* x_1085; obj* x_1087; obj* x_1089; +x_1082 = lean::cnstr_get(x_1080, 0); +lean::inc(x_1082); +lean::dec(x_1080); +x_1085 = lean::cnstr_get(x_1082, 0); +lean::inc(x_1085); +x_1087 = lean::cnstr_get(x_1082, 1); +lean::inc(x_1087); +x_1089 = lean::cnstr_get(x_1082, 2); lean::inc(x_1089); -x_1091 = lean::cnstr_get(x_1086, 1); -lean::inc(x_1091); -x_1093 = lean::cnstr_get(x_1086, 2); -lean::inc(x_1093); -lean::dec(x_1086); -if (lean::obj_tag(x_1091) == 0) +lean::dec(x_1082); +if (lean::obj_tag(x_1087) == 0) { -if (lean::obj_tag(x_1093) == 0) +if (lean::obj_tag(x_1089) == 0) { -obj* x_1098; obj* x_1102; -lean::dec(x_1089); -lean::dec(x_1083); -x_1098 = l_lean_elaborator_to__pexpr___main___closed__36; +obj* x_1094; obj* x_1098; +lean::dec(x_1079); +lean::dec(x_1085); +x_1094 = l_lean_elaborator_to__pexpr___main___closed__36; lean::inc(x_1); -lean::inc(x_1098); +lean::inc(x_1094); lean::inc(x_0); -x_1102 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_1098, x_1, x_2); -if (lean::obj_tag(x_1102) == 0) +x_1098 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_1094, x_1, x_2); +if (lean::obj_tag(x_1098) == 0) { -obj* x_1106; obj* x_1108; obj* x_1109; +obj* x_1102; obj* x_1104; obj* x_1105; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_1106 = lean::cnstr_get(x_1102, 0); -lean::inc(x_1106); -if (lean::is_shared(x_1102)) { - lean::dec(x_1102); - x_1108 = lean::box(0); +x_1102 = lean::cnstr_get(x_1098, 0); +lean::inc(x_1102); +if (lean::is_shared(x_1098)) { + lean::dec(x_1098); + x_1104 = lean::box(0); } else { - lean::cnstr_release(x_1102, 0); - x_1108 = x_1102; + lean::cnstr_release(x_1098, 0); + x_1104 = x_1098; } -if (lean::is_scalar(x_1108)) { - x_1109 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_1104)) { + x_1105 = lean::alloc_cnstr(0, 1, 0); } else { - x_1109 = x_1108; + x_1105 = x_1104; } -lean::cnstr_set(x_1109, 0, x_1106); -return x_1109; +lean::cnstr_set(x_1105, 0, x_1102); +return x_1105; } else { -obj* x_1110; -x_1110 = lean::cnstr_get(x_1102, 0); -lean::inc(x_1110); -lean::dec(x_1102); -x_14 = x_1110; +obj* x_1106; +x_1106 = lean::cnstr_get(x_1098, 0); +lean::inc(x_1106); +lean::dec(x_1098); +x_14 = x_1106; goto lbl_15; } } else { -obj* x_1113; obj* x_1116; obj* x_1120; -x_1113 = lean::cnstr_get(x_1093, 0); -lean::inc(x_1113); -lean::dec(x_1093); -x_1116 = lean::cnstr_get(x_1113, 1); -lean::inc(x_1116); -lean::dec(x_1113); +obj* x_1109; obj* x_1112; obj* x_1116; +x_1109 = lean::cnstr_get(x_1089, 0); +lean::inc(x_1109); +lean::dec(x_1089); +x_1112 = lean::cnstr_get(x_1109, 1); +lean::inc(x_1112); +lean::dec(x_1109); lean::inc(x_1); -x_1120 = l_lean_elaborator_to__pexpr___main(x_1116, x_1, x_2); -if (lean::obj_tag(x_1120) == 0) +x_1116 = l_lean_elaborator_to__pexpr___main(x_1112, x_1, x_2); +if (lean::obj_tag(x_1116) == 0) { -obj* x_1126; obj* x_1128; obj* x_1129; +obj* x_1122; obj* x_1124; obj* x_1125; +lean::dec(x_1079); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_1089); -lean::dec(x_1083); -x_1126 = lean::cnstr_get(x_1120, 0); +lean::dec(x_1085); +x_1122 = lean::cnstr_get(x_1116, 0); +lean::inc(x_1122); +if (lean::is_shared(x_1116)) { + lean::dec(x_1116); + x_1124 = lean::box(0); +} else { + lean::cnstr_release(x_1116, 0); + x_1124 = x_1116; +} +if (lean::is_scalar(x_1124)) { + x_1125 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1125 = x_1124; +} +lean::cnstr_set(x_1125, 0, x_1122); +return x_1125; +} +else +{ +obj* x_1126; obj* x_1128; obj* x_1129; obj* x_1131; obj* x_1133; obj* x_1134; obj* x_1137; +x_1126 = lean::cnstr_get(x_1116, 0); lean::inc(x_1126); -if (lean::is_shared(x_1120)) { - lean::dec(x_1120); +if (lean::is_shared(x_1116)) { + lean::dec(x_1116); x_1128 = lean::box(0); } else { - lean::cnstr_release(x_1120, 0); - x_1128 = x_1120; + lean::cnstr_release(x_1116, 0); + x_1128 = x_1116; } +x_1129 = lean::cnstr_get(x_1126, 0); +lean::inc(x_1129); +x_1131 = lean::cnstr_get(x_1126, 1); +lean::inc(x_1131); +if (lean::is_shared(x_1126)) { + lean::dec(x_1126); + x_1133 = lean::box(0); +} else { + lean::cnstr_release(x_1126, 0); + lean::cnstr_release(x_1126, 1); + x_1133 = x_1126; +} +x_1134 = lean::cnstr_get(x_1079, 3); +lean::inc(x_1134); +lean::inc(x_1); +x_1137 = l_lean_elaborator_to__pexpr___main(x_1134, x_1, x_1131); +if (lean::obj_tag(x_1137) == 0) +{ +obj* x_1145; obj* x_1148; +lean::dec(x_1133); +lean::dec(x_1129); +lean::dec(x_1079); +lean::dec(x_7); +lean::dec(x_1); +lean::dec(x_0); +lean::dec(x_1085); +x_1145 = lean::cnstr_get(x_1137, 0); +lean::inc(x_1145); +lean::dec(x_1137); if (lean::is_scalar(x_1128)) { - x_1129 = lean::alloc_cnstr(0, 1, 0); + x_1148 = lean::alloc_cnstr(0, 1, 0); } else { - x_1129 = x_1128; + x_1148 = x_1128; + lean::cnstr_set_tag(x_1128, 0); } -lean::cnstr_set(x_1129, 0, x_1126); -return x_1129; +lean::cnstr_set(x_1148, 0, x_1145); +return x_1148; } else { -obj* x_1130; obj* x_1132; obj* x_1133; obj* x_1135; obj* x_1137; obj* x_1138; obj* x_1141; -x_1130 = lean::cnstr_get(x_1120, 0); -lean::inc(x_1130); -if (lean::is_shared(x_1120)) { - lean::dec(x_1120); - x_1132 = lean::box(0); -} else { - lean::cnstr_release(x_1120, 0); - x_1132 = x_1120; -} -x_1133 = lean::cnstr_get(x_1130, 0); -lean::inc(x_1133); -x_1135 = lean::cnstr_get(x_1130, 1); -lean::inc(x_1135); -if (lean::is_shared(x_1130)) { - lean::dec(x_1130); - x_1137 = lean::box(0); -} else { - lean::cnstr_release(x_1130, 0); - lean::cnstr_release(x_1130, 1); - x_1137 = x_1130; -} -x_1138 = lean::cnstr_get(x_1083, 3); -lean::inc(x_1138); -lean::inc(x_1); -x_1141 = l_lean_elaborator_to__pexpr___main(x_1138, x_1, x_1135); -if (lean::obj_tag(x_1141) == 0) -{ -obj* x_1149; obj* x_1152; -lean::dec(x_1133); -lean::dec(x_7); -lean::dec(x_1); -lean::dec(x_0); -lean::dec(x_1137); -lean::dec(x_1089); -lean::dec(x_1083); -x_1149 = lean::cnstr_get(x_1141, 0); +obj* x_1149; obj* x_1152; obj* x_1154; obj* x_1157; obj* x_1161; +x_1149 = lean::cnstr_get(x_1137, 0); lean::inc(x_1149); -lean::dec(x_1141); -if (lean::is_scalar(x_1132)) { - x_1152 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1152 = x_1132; - lean::cnstr_set_tag(x_1132, 0); -} -lean::cnstr_set(x_1152, 0, x_1149); -return x_1152; -} -else -{ -obj* x_1153; obj* x_1156; obj* x_1158; obj* x_1161; obj* x_1165; -x_1153 = lean::cnstr_get(x_1141, 0); -lean::inc(x_1153); -lean::dec(x_1141); -x_1156 = lean::cnstr_get(x_1153, 0); -lean::inc(x_1156); -x_1158 = lean::cnstr_get(x_1153, 1); -lean::inc(x_1158); -lean::dec(x_1153); -x_1161 = lean::cnstr_get(x_1083, 5); -lean::inc(x_1161); -lean::dec(x_1083); -lean::inc(x_1); -x_1165 = l_lean_elaborator_to__pexpr___main(x_1161, x_1, x_1158); -if (lean::obj_tag(x_1165) == 0) -{ -obj* x_1173; obj* x_1176; -lean::dec(x_1133); -lean::dec(x_1156); -lean::dec(x_7); -lean::dec(x_1); -lean::dec(x_0); lean::dec(x_1137); -lean::dec(x_1089); -x_1173 = lean::cnstr_get(x_1165, 0); -lean::inc(x_1173); -lean::dec(x_1165); -if (lean::is_scalar(x_1132)) { - x_1176 = lean::alloc_cnstr(0, 1, 0); +x_1152 = lean::cnstr_get(x_1149, 0); +lean::inc(x_1152); +x_1154 = lean::cnstr_get(x_1149, 1); +lean::inc(x_1154); +lean::dec(x_1149); +x_1157 = lean::cnstr_get(x_1079, 5); +lean::inc(x_1157); +lean::dec(x_1079); +lean::inc(x_1); +x_1161 = l_lean_elaborator_to__pexpr___main(x_1157, x_1, x_1154); +if (lean::obj_tag(x_1161) == 0) +{ +obj* x_1169; obj* x_1172; +lean::dec(x_1133); +lean::dec(x_1129); +lean::dec(x_1152); +lean::dec(x_7); +lean::dec(x_1); +lean::dec(x_0); +lean::dec(x_1085); +x_1169 = lean::cnstr_get(x_1161, 0); +lean::inc(x_1169); +lean::dec(x_1161); +if (lean::is_scalar(x_1128)) { + x_1172 = lean::alloc_cnstr(0, 1, 0); } else { - x_1176 = x_1132; - lean::cnstr_set_tag(x_1132, 0); + x_1172 = x_1128; + lean::cnstr_set_tag(x_1128, 0); } -lean::cnstr_set(x_1176, 0, x_1173); -return x_1176; +lean::cnstr_set(x_1172, 0, x_1169); +return x_1172; } else { -obj* x_1178; obj* x_1181; obj* x_1183; obj* x_1186; obj* x_1187; obj* x_1188; -lean::dec(x_1132); -x_1178 = lean::cnstr_get(x_1165, 0); -lean::inc(x_1178); -lean::dec(x_1165); -x_1181 = lean::cnstr_get(x_1178, 0); -lean::inc(x_1181); -x_1183 = lean::cnstr_get(x_1178, 1); -lean::inc(x_1183); -lean::dec(x_1178); -x_1186 = l_lean_elaborator_mangle__ident(x_1089); -x_1187 = lean_expr_mk_let(x_1186, x_1133, x_1156, x_1181); -if (lean::is_scalar(x_1137)) { - x_1188 = lean::alloc_cnstr(0, 2, 0); +obj* x_1174; obj* x_1177; obj* x_1179; obj* x_1182; obj* x_1183; obj* x_1184; +lean::dec(x_1128); +x_1174 = lean::cnstr_get(x_1161, 0); +lean::inc(x_1174); +lean::dec(x_1161); +x_1177 = lean::cnstr_get(x_1174, 0); +lean::inc(x_1177); +x_1179 = lean::cnstr_get(x_1174, 1); +lean::inc(x_1179); +lean::dec(x_1174); +x_1182 = l_lean_elaborator_mangle__ident(x_1085); +x_1183 = lean_expr_mk_let(x_1182, x_1129, x_1152, x_1177); +if (lean::is_scalar(x_1133)) { + x_1184 = lean::alloc_cnstr(0, 2, 0); } else { - x_1188 = x_1137; + x_1184 = x_1133; } -lean::cnstr_set(x_1188, 0, x_1187); -lean::cnstr_set(x_1188, 1, x_1183); -x_14 = x_1188; +lean::cnstr_set(x_1184, 0, x_1183); +lean::cnstr_set(x_1184, 1, x_1179); +x_14 = x_1184; goto lbl_15; } } @@ -10315,90 +10307,90 @@ goto lbl_15; } else { -obj* x_1193; obj* x_1197; -lean::dec(x_1093); +obj* x_1189; obj* x_1193; +lean::dec(x_1079); lean::dec(x_1089); -lean::dec(x_1091); -lean::dec(x_1083); -x_1193 = l_lean_elaborator_to__pexpr___main___closed__36; +lean::dec(x_1085); +lean::dec(x_1087); +x_1189 = l_lean_elaborator_to__pexpr___main___closed__36; lean::inc(x_1); -lean::inc(x_1193); +lean::inc(x_1189); lean::inc(x_0); -x_1197 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_1193, x_1, x_2); -if (lean::obj_tag(x_1197) == 0) +x_1193 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_1189, x_1, x_2); +if (lean::obj_tag(x_1193) == 0) { -obj* x_1201; obj* x_1203; obj* x_1204; +obj* x_1197; obj* x_1199; obj* x_1200; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_1201 = lean::cnstr_get(x_1197, 0); +x_1197 = lean::cnstr_get(x_1193, 0); +lean::inc(x_1197); +if (lean::is_shared(x_1193)) { + lean::dec(x_1193); + x_1199 = lean::box(0); +} else { + lean::cnstr_release(x_1193, 0); + x_1199 = x_1193; +} +if (lean::is_scalar(x_1199)) { + x_1200 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1200 = x_1199; +} +lean::cnstr_set(x_1200, 0, x_1197); +return x_1200; +} +else +{ +obj* x_1201; +x_1201 = lean::cnstr_get(x_1193, 0); lean::inc(x_1201); -if (lean::is_shared(x_1197)) { - lean::dec(x_1197); - x_1203 = lean::box(0); -} else { - lean::cnstr_release(x_1197, 0); - x_1203 = x_1197; -} -if (lean::is_scalar(x_1203)) { - x_1204 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1204 = x_1203; -} -lean::cnstr_set(x_1204, 0, x_1201); -return x_1204; -} -else -{ -obj* x_1205; -x_1205 = lean::cnstr_get(x_1197, 0); -lean::inc(x_1205); -lean::dec(x_1197); -x_14 = x_1205; +lean::dec(x_1193); +x_14 = x_1201; goto lbl_15; } } } else { -obj* x_1210; obj* x_1214; -lean::dec(x_1083); -lean::dec(x_1084); -x_1210 = l_lean_elaborator_to__pexpr___main___closed__36; +obj* x_1206; obj* x_1210; +lean::dec(x_1079); +lean::dec(x_1080); +x_1206 = l_lean_elaborator_to__pexpr___main___closed__36; lean::inc(x_1); -lean::inc(x_1210); +lean::inc(x_1206); lean::inc(x_0); -x_1214 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_1210, x_1, x_2); -if (lean::obj_tag(x_1214) == 0) +x_1210 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_1206, x_1, x_2); +if (lean::obj_tag(x_1210) == 0) { -obj* x_1218; obj* x_1220; obj* x_1221; +obj* x_1214; obj* x_1216; obj* x_1217; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_1218 = lean::cnstr_get(x_1214, 0); +x_1214 = lean::cnstr_get(x_1210, 0); +lean::inc(x_1214); +if (lean::is_shared(x_1210)) { + lean::dec(x_1210); + x_1216 = lean::box(0); +} else { + lean::cnstr_release(x_1210, 0); + x_1216 = x_1210; +} +if (lean::is_scalar(x_1216)) { + x_1217 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1217 = x_1216; +} +lean::cnstr_set(x_1217, 0, x_1214); +return x_1217; +} +else +{ +obj* x_1218; +x_1218 = lean::cnstr_get(x_1210, 0); lean::inc(x_1218); -if (lean::is_shared(x_1214)) { - lean::dec(x_1214); - x_1220 = lean::box(0); -} else { - lean::cnstr_release(x_1214, 0); - x_1220 = x_1214; -} -if (lean::is_scalar(x_1220)) { - x_1221 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1221 = x_1220; -} -lean::cnstr_set(x_1221, 0, x_1218); -return x_1221; -} -else -{ -obj* x_1222; -x_1222 = lean::cnstr_get(x_1214, 0); -lean::inc(x_1222); -lean::dec(x_1214); -x_14 = x_1222; +lean::dec(x_1210); +x_14 = x_1218; goto lbl_15; } } @@ -10406,123 +10398,123 @@ goto lbl_15; } else { -obj* x_1226; obj* x_1227; obj* x_1230; obj* x_1231; obj* x_1234; +obj* x_1222; obj* x_1223; obj* x_1226; obj* x_1227; obj* x_1230; lean::dec(x_9); -x_1226 = l_lean_parser_term_show_has__view; -x_1227 = lean::cnstr_get(x_1226, 0); -lean::inc(x_1227); +x_1222 = l_lean_parser_term_show_has__view; +x_1223 = lean::cnstr_get(x_1222, 0); +lean::inc(x_1223); lean::inc(x_0); -x_1230 = lean::apply_1(x_1227, x_0); -x_1231 = lean::cnstr_get(x_1230, 1); -lean::inc(x_1231); +x_1226 = lean::apply_1(x_1223, x_0); +x_1227 = lean::cnstr_get(x_1226, 1); +lean::inc(x_1227); lean::inc(x_1); -x_1234 = l_lean_elaborator_to__pexpr___main(x_1231, x_1, x_2); -if (lean::obj_tag(x_1234) == 0) +x_1230 = l_lean_elaborator_to__pexpr___main(x_1227, x_1, x_2); +if (lean::obj_tag(x_1230) == 0) { -obj* x_1239; obj* x_1241; obj* x_1242; +obj* x_1235; obj* x_1237; obj* x_1238; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_1230); -x_1239 = lean::cnstr_get(x_1234, 0); +lean::dec(x_1226); +x_1235 = lean::cnstr_get(x_1230, 0); +lean::inc(x_1235); +if (lean::is_shared(x_1230)) { + lean::dec(x_1230); + x_1237 = lean::box(0); +} else { + lean::cnstr_release(x_1230, 0); + x_1237 = x_1230; +} +if (lean::is_scalar(x_1237)) { + x_1238 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1238 = x_1237; +} +lean::cnstr_set(x_1238, 0, x_1235); +return x_1238; +} +else +{ +obj* x_1239; obj* x_1241; obj* x_1242; obj* x_1244; obj* x_1246; obj* x_1247; obj* x_1250; obj* x_1254; +x_1239 = lean::cnstr_get(x_1230, 0); lean::inc(x_1239); -if (lean::is_shared(x_1234)) { - lean::dec(x_1234); +if (lean::is_shared(x_1230)) { + lean::dec(x_1230); x_1241 = lean::box(0); } else { - lean::cnstr_release(x_1234, 0); - x_1241 = x_1234; + lean::cnstr_release(x_1230, 0); + x_1241 = x_1230; } -if (lean::is_scalar(x_1241)) { - x_1242 = lean::alloc_cnstr(0, 1, 0); +x_1242 = lean::cnstr_get(x_1239, 0); +lean::inc(x_1242); +x_1244 = lean::cnstr_get(x_1239, 1); +lean::inc(x_1244); +if (lean::is_shared(x_1239)) { + lean::dec(x_1239); + x_1246 = lean::box(0); } else { - x_1242 = x_1241; + lean::cnstr_release(x_1239, 0); + lean::cnstr_release(x_1239, 1); + x_1246 = x_1239; } -lean::cnstr_set(x_1242, 0, x_1239); -return x_1242; -} -else -{ -obj* x_1243; obj* x_1245; obj* x_1246; obj* x_1248; obj* x_1250; obj* x_1251; obj* x_1254; obj* x_1258; -x_1243 = lean::cnstr_get(x_1234, 0); -lean::inc(x_1243); -if (lean::is_shared(x_1234)) { - lean::dec(x_1234); - x_1245 = lean::box(0); -} else { - lean::cnstr_release(x_1234, 0); - x_1245 = x_1234; -} -x_1246 = lean::cnstr_get(x_1243, 0); -lean::inc(x_1246); -x_1248 = lean::cnstr_get(x_1243, 1); -lean::inc(x_1248); -if (lean::is_shared(x_1243)) { - lean::dec(x_1243); - x_1250 = lean::box(0); -} else { - lean::cnstr_release(x_1243, 0); - lean::cnstr_release(x_1243, 1); - x_1250 = x_1243; -} -x_1251 = lean::cnstr_get(x_1230, 3); -lean::inc(x_1251); -lean::dec(x_1230); -x_1254 = lean::cnstr_get(x_1251, 1); -lean::inc(x_1254); -lean::dec(x_1251); +x_1247 = lean::cnstr_get(x_1226, 3); +lean::inc(x_1247); +lean::dec(x_1226); +x_1250 = lean::cnstr_get(x_1247, 1); +lean::inc(x_1250); +lean::dec(x_1247); lean::inc(x_1); -x_1258 = l_lean_elaborator_to__pexpr___main(x_1254, x_1, x_1248); -if (lean::obj_tag(x_1258) == 0) +x_1254 = l_lean_elaborator_to__pexpr___main(x_1250, x_1, x_1244); +if (lean::obj_tag(x_1254) == 0) { -obj* x_1264; obj* x_1267; +obj* x_1260; obj* x_1263; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); +lean::dec(x_1242); lean::dec(x_1246); -lean::dec(x_1250); -x_1264 = lean::cnstr_get(x_1258, 0); -lean::inc(x_1264); -lean::dec(x_1258); -if (lean::is_scalar(x_1245)) { - x_1267 = lean::alloc_cnstr(0, 1, 0); +x_1260 = lean::cnstr_get(x_1254, 0); +lean::inc(x_1260); +lean::dec(x_1254); +if (lean::is_scalar(x_1241)) { + x_1263 = lean::alloc_cnstr(0, 1, 0); } else { - x_1267 = x_1245; - lean::cnstr_set_tag(x_1245, 0); + x_1263 = x_1241; + lean::cnstr_set_tag(x_1241, 0); } -lean::cnstr_set(x_1267, 0, x_1264); -return x_1267; +lean::cnstr_set(x_1263, 0, x_1260); +return x_1263; } else { -obj* x_1269; obj* x_1272; obj* x_1274; obj* x_1277; uint8 x_1278; obj* x_1279; obj* x_1282; obj* x_1283; obj* x_1284; obj* x_1286; obj* x_1287; -lean::dec(x_1245); -x_1269 = lean::cnstr_get(x_1258, 0); -lean::inc(x_1269); -lean::dec(x_1258); -x_1272 = lean::cnstr_get(x_1269, 0); -lean::inc(x_1272); -x_1274 = lean::cnstr_get(x_1269, 1); -lean::inc(x_1274); -lean::dec(x_1269); -x_1277 = l_lean_elaborator_to__pexpr___main___closed__37; -x_1278 = 0; -x_1279 = l_lean_elaborator_to__pexpr___main___closed__38; -lean::inc(x_1279); -lean::inc(x_1277); -x_1282 = lean_expr_mk_lambda(x_1277, x_1278, x_1246, x_1279); -x_1283 = lean_expr_mk_app(x_1282, x_1272); -x_1284 = l_lean_elaborator_to__pexpr___main___closed__39; -lean::inc(x_1284); -x_1286 = l_lean_elaborator_expr_mk__annotation(x_1284, x_1283); -if (lean::is_scalar(x_1250)) { - x_1287 = lean::alloc_cnstr(0, 2, 0); +obj* x_1265; obj* x_1268; obj* x_1270; obj* x_1273; uint8 x_1274; obj* x_1275; obj* x_1278; obj* x_1279; obj* x_1280; obj* x_1282; obj* x_1283; +lean::dec(x_1241); +x_1265 = lean::cnstr_get(x_1254, 0); +lean::inc(x_1265); +lean::dec(x_1254); +x_1268 = lean::cnstr_get(x_1265, 0); +lean::inc(x_1268); +x_1270 = lean::cnstr_get(x_1265, 1); +lean::inc(x_1270); +lean::dec(x_1265); +x_1273 = l_lean_elaborator_to__pexpr___main___closed__37; +x_1274 = 0; +x_1275 = l_lean_elaborator_to__pexpr___main___closed__38; +lean::inc(x_1275); +lean::inc(x_1273); +x_1278 = lean_expr_mk_lambda(x_1273, x_1274, x_1242, x_1275); +x_1279 = lean_expr_mk_app(x_1278, x_1268); +x_1280 = l_lean_elaborator_to__pexpr___main___closed__39; +lean::inc(x_1280); +x_1282 = l_lean_elaborator_expr_mk__annotation(x_1280, x_1279); +if (lean::is_scalar(x_1246)) { + x_1283 = lean::alloc_cnstr(0, 2, 0); } else { - x_1287 = x_1250; + x_1283 = x_1246; } -lean::cnstr_set(x_1287, 0, x_1286); -lean::cnstr_set(x_1287, 1, x_1274); -x_14 = x_1287; +lean::cnstr_set(x_1283, 0, x_1282); +lean::cnstr_set(x_1283, 1, x_1270); +x_14 = x_1283; goto lbl_15; } } @@ -10530,268 +10522,268 @@ goto lbl_15; } else { -obj* x_1289; obj* x_1290; obj* x_1293; obj* x_1294; obj* x_1296; obj* x_1299; +obj* x_1285; obj* x_1286; obj* x_1289; obj* x_1290; obj* x_1292; obj* x_1295; lean::dec(x_9); -x_1289 = l_lean_parser_term_have_has__view; -x_1290 = lean::cnstr_get(x_1289, 0); -lean::inc(x_1290); +x_1285 = l_lean_parser_term_have_has__view; +x_1286 = lean::cnstr_get(x_1285, 0); +lean::inc(x_1286); lean::inc(x_0); -x_1293 = lean::apply_1(x_1290, x_0); -x_1296 = lean::cnstr_get(x_1293, 2); -lean::inc(x_1296); +x_1289 = lean::apply_1(x_1286, x_0); +x_1292 = lean::cnstr_get(x_1289, 2); +lean::inc(x_1292); lean::inc(x_1); -x_1299 = l_lean_elaborator_to__pexpr___main(x_1296, x_1, x_2); -if (lean::obj_tag(x_1299) == 0) +x_1295 = l_lean_elaborator_to__pexpr___main(x_1292, x_1, x_2); +if (lean::obj_tag(x_1295) == 0) { -obj* x_1304; obj* x_1306; obj* x_1307; -lean::dec(x_1293); +obj* x_1300; obj* x_1302; obj* x_1303; +lean::dec(x_1289); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_1304 = lean::cnstr_get(x_1299, 0); +x_1300 = lean::cnstr_get(x_1295, 0); +lean::inc(x_1300); +if (lean::is_shared(x_1295)) { + lean::dec(x_1295); + x_1302 = lean::box(0); +} else { + lean::cnstr_release(x_1295, 0); + x_1302 = x_1295; +} +if (lean::is_scalar(x_1302)) { + x_1303 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1303 = x_1302; +} +lean::cnstr_set(x_1303, 0, x_1300); +return x_1303; +} +else +{ +obj* x_1304; obj* x_1306; obj* x_1307; obj* x_1309; obj* x_1311; obj* x_1312; obj* x_1315; +x_1304 = lean::cnstr_get(x_1295, 0); lean::inc(x_1304); -if (lean::is_shared(x_1299)) { - lean::dec(x_1299); +if (lean::is_shared(x_1295)) { + lean::dec(x_1295); x_1306 = lean::box(0); } else { - lean::cnstr_release(x_1299, 0); - x_1306 = x_1299; + lean::cnstr_release(x_1295, 0); + x_1306 = x_1295; } -if (lean::is_scalar(x_1306)) { - x_1307 = lean::alloc_cnstr(0, 1, 0); +x_1307 = lean::cnstr_get(x_1304, 0); +lean::inc(x_1307); +x_1309 = lean::cnstr_get(x_1304, 1); +lean::inc(x_1309); +if (lean::is_shared(x_1304)) { + lean::dec(x_1304); + x_1311 = lean::box(0); } else { - x_1307 = x_1306; + lean::cnstr_release(x_1304, 0); + lean::cnstr_release(x_1304, 1); + x_1311 = x_1304; } -lean::cnstr_set(x_1307, 0, x_1304); -return x_1307; -} -else -{ -obj* x_1308; obj* x_1310; obj* x_1311; obj* x_1313; obj* x_1315; obj* x_1316; obj* x_1319; -x_1308 = lean::cnstr_get(x_1299, 0); -lean::inc(x_1308); -if (lean::is_shared(x_1299)) { - lean::dec(x_1299); - x_1310 = lean::box(0); -} else { - lean::cnstr_release(x_1299, 0); - x_1310 = x_1299; -} -x_1311 = lean::cnstr_get(x_1308, 0); -lean::inc(x_1311); -x_1313 = lean::cnstr_get(x_1308, 1); -lean::inc(x_1313); -if (lean::is_shared(x_1308)) { - lean::dec(x_1308); - x_1315 = lean::box(0); -} else { - lean::cnstr_release(x_1308, 0); - lean::cnstr_release(x_1308, 1); - x_1315 = x_1308; -} -x_1316 = lean::cnstr_get(x_1293, 5); -lean::inc(x_1316); +x_1312 = lean::cnstr_get(x_1289, 5); +lean::inc(x_1312); lean::inc(x_1); -x_1319 = l_lean_elaborator_to__pexpr___main(x_1316, x_1, x_1313); -if (lean::obj_tag(x_1319) == 0) +x_1315 = l_lean_elaborator_to__pexpr___main(x_1312, x_1, x_1309); +if (lean::obj_tag(x_1315) == 0) { -obj* x_1326; obj* x_1329; -lean::dec(x_1293); +obj* x_1322; obj* x_1325; +lean::dec(x_1289); +lean::dec(x_7); +lean::dec(x_1); +lean::dec(x_0); +lean::dec(x_1307); lean::dec(x_1311); +x_1322 = lean::cnstr_get(x_1315, 0); +lean::inc(x_1322); lean::dec(x_1315); -lean::dec(x_7); -lean::dec(x_1); -lean::dec(x_0); -x_1326 = lean::cnstr_get(x_1319, 0); -lean::inc(x_1326); -lean::dec(x_1319); -if (lean::is_scalar(x_1310)) { - x_1329 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_1306)) { + x_1325 = lean::alloc_cnstr(0, 1, 0); } else { - x_1329 = x_1310; - lean::cnstr_set_tag(x_1310, 0); + x_1325 = x_1306; + lean::cnstr_set_tag(x_1306, 0); } -lean::cnstr_set(x_1329, 0, x_1326); -return x_1329; +lean::cnstr_set(x_1325, 0, x_1322); +return x_1325; } else { -obj* x_1331; obj* x_1334; obj* x_1336; obj* x_1339; obj* x_1341; obj* x_1343; obj* x_1344; obj* x_1346; obj* x_1347; obj* x_1349; uint8 x_1350; obj* x_1351; obj* x_1352; -lean::dec(x_1310); -x_1331 = lean::cnstr_get(x_1319, 0); -lean::inc(x_1331); -lean::dec(x_1319); -x_1334 = lean::cnstr_get(x_1331, 0); -lean::inc(x_1334); -x_1336 = lean::cnstr_get(x_1331, 1); -lean::inc(x_1336); -lean::dec(x_1331); -x_1339 = lean::cnstr_get(x_1293, 1); -lean::inc(x_1339); -x_1341 = l_lean_elaborator_to__pexpr___main___closed__41; -lean::inc(x_1341); -x_1343 = l_option_map___rarg(x_1341, x_1339); -x_1344 = l_lean_elaborator_to__pexpr___main___closed__28; -lean::inc(x_1344); -x_1346 = l_option_map___rarg(x_1344, x_1343); -x_1347 = l_lean_elaborator_to__pexpr___main___closed__37; -lean::inc(x_1347); -x_1349 = l_option_get__or__else___main___rarg(x_1346, x_1347); -x_1350 = 0; -x_1351 = lean_expr_mk_lambda(x_1349, x_1350, x_1311, x_1334); -if (lean::is_scalar(x_1315)) { - x_1352 = lean::alloc_cnstr(0, 2, 0); +obj* x_1327; obj* x_1330; obj* x_1332; obj* x_1335; obj* x_1337; obj* x_1339; obj* x_1340; obj* x_1342; obj* x_1343; obj* x_1345; uint8 x_1346; obj* x_1347; obj* x_1348; +lean::dec(x_1306); +x_1327 = lean::cnstr_get(x_1315, 0); +lean::inc(x_1327); +lean::dec(x_1315); +x_1330 = lean::cnstr_get(x_1327, 0); +lean::inc(x_1330); +x_1332 = lean::cnstr_get(x_1327, 1); +lean::inc(x_1332); +lean::dec(x_1327); +x_1335 = lean::cnstr_get(x_1289, 1); +lean::inc(x_1335); +x_1337 = l_lean_elaborator_to__pexpr___main___closed__41; +lean::inc(x_1337); +x_1339 = l_option_map___rarg(x_1337, x_1335); +x_1340 = l_lean_elaborator_to__pexpr___main___closed__28; +lean::inc(x_1340); +x_1342 = l_option_map___rarg(x_1340, x_1339); +x_1343 = l_lean_elaborator_to__pexpr___main___closed__37; +lean::inc(x_1343); +x_1345 = l_option_get__or__else___main___rarg(x_1342, x_1343); +x_1346 = 0; +x_1347 = lean_expr_mk_lambda(x_1345, x_1346, x_1307, x_1330); +if (lean::is_scalar(x_1311)) { + x_1348 = lean::alloc_cnstr(0, 2, 0); } else { - x_1352 = x_1315; + x_1348 = x_1311; } -lean::cnstr_set(x_1352, 0, x_1351); -lean::cnstr_set(x_1352, 1, x_1336); -x_1294 = x_1352; -goto lbl_1295; +lean::cnstr_set(x_1348, 0, x_1347); +lean::cnstr_set(x_1348, 1, x_1332); +x_1290 = x_1348; +goto lbl_1291; } } -lbl_1295: +lbl_1291: { -obj* x_1353; obj* x_1355; obj* x_1357; obj* x_1358; -x_1353 = lean::cnstr_get(x_1294, 0); -lean::inc(x_1353); -x_1355 = lean::cnstr_get(x_1294, 1); -lean::inc(x_1355); -if (lean::is_shared(x_1294)) { - lean::dec(x_1294); - x_1357 = lean::box(0); +obj* x_1349; obj* x_1351; obj* x_1353; obj* x_1354; +x_1349 = lean::cnstr_get(x_1290, 0); +lean::inc(x_1349); +x_1351 = lean::cnstr_get(x_1290, 1); +lean::inc(x_1351); +if (lean::is_shared(x_1290)) { + lean::dec(x_1290); + x_1353 = lean::box(0); } else { - lean::cnstr_release(x_1294, 0); - lean::cnstr_release(x_1294, 1); - x_1357 = x_1294; + lean::cnstr_release(x_1290, 0); + lean::cnstr_release(x_1290, 1); + x_1353 = x_1290; } -x_1358 = lean::cnstr_get(x_1293, 3); -lean::inc(x_1358); -lean::dec(x_1293); -if (lean::obj_tag(x_1358) == 0) +x_1354 = lean::cnstr_get(x_1289, 3); +lean::inc(x_1354); +lean::dec(x_1289); +if (lean::obj_tag(x_1354) == 0) { -obj* x_1361; obj* x_1364; obj* x_1368; -x_1361 = lean::cnstr_get(x_1358, 0); -lean::inc(x_1361); -lean::dec(x_1358); -x_1364 = lean::cnstr_get(x_1361, 1); -lean::inc(x_1364); -lean::dec(x_1361); -lean::inc(x_1); -x_1368 = l_lean_elaborator_to__pexpr___main(x_1364, x_1, x_1355); -if (lean::obj_tag(x_1368) == 0) -{ -obj* x_1374; obj* x_1376; obj* x_1377; -lean::dec(x_7); +obj* x_1357; obj* x_1360; obj* x_1364; +x_1357 = lean::cnstr_get(x_1354, 0); +lean::inc(x_1357); +lean::dec(x_1354); +x_1360 = lean::cnstr_get(x_1357, 1); +lean::inc(x_1360); lean::dec(x_1357); +lean::inc(x_1); +x_1364 = l_lean_elaborator_to__pexpr___main(x_1360, x_1, x_1351); +if (lean::obj_tag(x_1364) == 0) +{ +obj* x_1370; obj* x_1372; obj* x_1373; +lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); +lean::dec(x_1349); lean::dec(x_1353); -x_1374 = lean::cnstr_get(x_1368, 0); +x_1370 = lean::cnstr_get(x_1364, 0); +lean::inc(x_1370); +if (lean::is_shared(x_1364)) { + lean::dec(x_1364); + x_1372 = lean::box(0); +} else { + lean::cnstr_release(x_1364, 0); + x_1372 = x_1364; +} +if (lean::is_scalar(x_1372)) { + x_1373 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1373 = x_1372; +} +lean::cnstr_set(x_1373, 0, x_1370); +return x_1373; +} +else +{ +obj* x_1374; obj* x_1377; obj* x_1379; obj* x_1382; obj* x_1384; obj* x_1385; obj* x_1386; +x_1374 = lean::cnstr_get(x_1364, 0); lean::inc(x_1374); -if (lean::is_shared(x_1368)) { - lean::dec(x_1368); - x_1376 = lean::box(0); +lean::dec(x_1364); +x_1377 = lean::cnstr_get(x_1374, 0); +lean::inc(x_1377); +x_1379 = lean::cnstr_get(x_1374, 1); +lean::inc(x_1379); +lean::dec(x_1374); +x_1382 = l_lean_elaborator_to__pexpr___main___closed__40; +lean::inc(x_1382); +x_1384 = l_lean_elaborator_expr_mk__annotation(x_1382, x_1349); +x_1385 = lean_expr_mk_app(x_1384, x_1377); +if (lean::is_scalar(x_1353)) { + x_1386 = lean::alloc_cnstr(0, 2, 0); } else { - lean::cnstr_release(x_1368, 0); - x_1376 = x_1368; + x_1386 = x_1353; } -if (lean::is_scalar(x_1376)) { - x_1377 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1377 = x_1376; -} -lean::cnstr_set(x_1377, 0, x_1374); -return x_1377; -} -else -{ -obj* x_1378; obj* x_1381; obj* x_1383; obj* x_1386; obj* x_1388; obj* x_1389; obj* x_1390; -x_1378 = lean::cnstr_get(x_1368, 0); -lean::inc(x_1378); -lean::dec(x_1368); -x_1381 = lean::cnstr_get(x_1378, 0); -lean::inc(x_1381); -x_1383 = lean::cnstr_get(x_1378, 1); -lean::inc(x_1383); -lean::dec(x_1378); -x_1386 = l_lean_elaborator_to__pexpr___main___closed__40; -lean::inc(x_1386); -x_1388 = l_lean_elaborator_expr_mk__annotation(x_1386, x_1353); -x_1389 = lean_expr_mk_app(x_1388, x_1381); -if (lean::is_scalar(x_1357)) { - x_1390 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1390 = x_1357; -} -lean::cnstr_set(x_1390, 0, x_1389); -lean::cnstr_set(x_1390, 1, x_1383); -x_14 = x_1390; +lean::cnstr_set(x_1386, 0, x_1385); +lean::cnstr_set(x_1386, 1, x_1379); +x_14 = x_1386; goto lbl_15; } } else { -obj* x_1391; obj* x_1394; obj* x_1397; obj* x_1401; -x_1391 = lean::cnstr_get(x_1358, 0); -lean::inc(x_1391); -lean::dec(x_1358); -x_1394 = lean::cnstr_get(x_1391, 1); -lean::inc(x_1394); -lean::dec(x_1391); -x_1397 = lean::cnstr_get(x_1394, 1); -lean::inc(x_1397); -lean::dec(x_1394); +obj* x_1387; obj* x_1390; obj* x_1393; obj* x_1397; +x_1387 = lean::cnstr_get(x_1354, 0); +lean::inc(x_1387); +lean::dec(x_1354); +x_1390 = lean::cnstr_get(x_1387, 1); +lean::inc(x_1390); +lean::dec(x_1387); +x_1393 = lean::cnstr_get(x_1390, 1); +lean::inc(x_1393); +lean::dec(x_1390); lean::inc(x_1); -x_1401 = l_lean_elaborator_to__pexpr___main(x_1397, x_1, x_1355); -if (lean::obj_tag(x_1401) == 0) +x_1397 = l_lean_elaborator_to__pexpr___main(x_1393, x_1, x_1351); +if (lean::obj_tag(x_1397) == 0) { -obj* x_1407; obj* x_1409; obj* x_1410; +obj* x_1403; obj* x_1405; obj* x_1406; lean::dec(x_7); -lean::dec(x_1357); lean::dec(x_1); lean::dec(x_0); +lean::dec(x_1349); lean::dec(x_1353); -x_1407 = lean::cnstr_get(x_1401, 0); +x_1403 = lean::cnstr_get(x_1397, 0); +lean::inc(x_1403); +if (lean::is_shared(x_1397)) { + lean::dec(x_1397); + x_1405 = lean::box(0); +} else { + lean::cnstr_release(x_1397, 0); + x_1405 = x_1397; +} +if (lean::is_scalar(x_1405)) { + x_1406 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1406 = x_1405; +} +lean::cnstr_set(x_1406, 0, x_1403); +return x_1406; +} +else +{ +obj* x_1407; obj* x_1410; obj* x_1412; obj* x_1415; obj* x_1417; obj* x_1418; obj* x_1419; +x_1407 = lean::cnstr_get(x_1397, 0); lean::inc(x_1407); -if (lean::is_shared(x_1401)) { - lean::dec(x_1401); - x_1409 = lean::box(0); +lean::dec(x_1397); +x_1410 = lean::cnstr_get(x_1407, 0); +lean::inc(x_1410); +x_1412 = lean::cnstr_get(x_1407, 1); +lean::inc(x_1412); +lean::dec(x_1407); +x_1415 = l_lean_elaborator_to__pexpr___main___closed__40; +lean::inc(x_1415); +x_1417 = l_lean_elaborator_expr_mk__annotation(x_1415, x_1349); +x_1418 = lean_expr_mk_app(x_1417, x_1410); +if (lean::is_scalar(x_1353)) { + x_1419 = lean::alloc_cnstr(0, 2, 0); } else { - lean::cnstr_release(x_1401, 0); - x_1409 = x_1401; + x_1419 = x_1353; } -if (lean::is_scalar(x_1409)) { - x_1410 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1410 = x_1409; -} -lean::cnstr_set(x_1410, 0, x_1407); -return x_1410; -} -else -{ -obj* x_1411; obj* x_1414; obj* x_1416; obj* x_1419; obj* x_1421; obj* x_1422; obj* x_1423; -x_1411 = lean::cnstr_get(x_1401, 0); -lean::inc(x_1411); -lean::dec(x_1401); -x_1414 = lean::cnstr_get(x_1411, 0); -lean::inc(x_1414); -x_1416 = lean::cnstr_get(x_1411, 1); -lean::inc(x_1416); -lean::dec(x_1411); -x_1419 = l_lean_elaborator_to__pexpr___main___closed__40; -lean::inc(x_1419); -x_1421 = l_lean_elaborator_expr_mk__annotation(x_1419, x_1353); -x_1422 = lean_expr_mk_app(x_1421, x_1414); -if (lean::is_scalar(x_1357)) { - x_1423 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1423 = x_1357; -} -lean::cnstr_set(x_1423, 0, x_1422); -lean::cnstr_set(x_1423, 1, x_1416); -x_14 = x_1423; +lean::cnstr_set(x_1419, 0, x_1418); +lean::cnstr_set(x_1419, 1, x_1412); +x_14 = x_1419; goto lbl_15; } } @@ -10804,284 +10796,284 @@ lean::dec(x_9); lean::dec(x_7); if (x_21 == 0) { -obj* x_1426; -x_1426 = l_lean_parser_syntax_get__pos(x_0); -if (lean::obj_tag(x_1426) == 0) +obj* x_1422; +x_1422 = l_lean_parser_syntax_get__pos(x_0); +if (lean::obj_tag(x_1422) == 0) { -obj* x_1428; obj* x_1430; obj* x_1431; +obj* x_1424; obj* x_1426; obj* x_1427; lean::dec(x_1); -x_1428 = l_lean_elaborator_to__pexpr___main___closed__42; +x_1424 = l_lean_elaborator_to__pexpr___main___closed__42; +lean::inc(x_1424); +x_1426 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1426, 0, x_1424); +lean::cnstr_set(x_1426, 1, x_2); +x_1427 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_1427, 0, x_1426); +return x_1427; +} +else +{ +obj* x_1428; obj* x_1431; obj* x_1434; obj* x_1437; obj* x_1438; obj* x_1439; obj* x_1441; obj* x_1443; obj* x_1444; obj* x_1447; obj* x_1449; obj* x_1450; obj* x_1452; obj* x_1453; obj* x_1454; +x_1428 = lean::cnstr_get(x_1422, 0); lean::inc(x_1428); -x_1430 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1430, 0, x_1428); -lean::cnstr_set(x_1430, 1, x_2); -x_1431 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1431, 0, x_1430); -return x_1431; -} -else -{ -obj* x_1432; obj* x_1435; obj* x_1438; obj* x_1441; obj* x_1442; obj* x_1443; obj* x_1445; obj* x_1447; obj* x_1448; obj* x_1451; obj* x_1453; obj* x_1454; obj* x_1456; obj* x_1457; obj* x_1458; -x_1432 = lean::cnstr_get(x_1426, 0); -lean::inc(x_1432); -lean::dec(x_1426); -x_1435 = lean::cnstr_get(x_1, 0); -lean::inc(x_1435); +lean::dec(x_1422); +x_1431 = lean::cnstr_get(x_1, 0); +lean::inc(x_1431); lean::dec(x_1); -x_1438 = lean::cnstr_get(x_1435, 2); -lean::inc(x_1438); -lean::dec(x_1435); -x_1441 = l_lean_file__map_to__position(x_1438, x_1432); -x_1442 = lean::box(0); -x_1443 = lean::cnstr_get(x_1441, 1); -lean::inc(x_1443); -x_1445 = l_lean_elaborator_to__pexpr___main___closed__3; -lean::inc(x_1445); -x_1447 = l_lean_kvmap_set__nat(x_1442, x_1445, x_1443); -x_1448 = lean::cnstr_get(x_1441, 0); -lean::inc(x_1448); -lean::dec(x_1441); -x_1451 = l_lean_elaborator_to__pexpr___main___closed__4; -lean::inc(x_1451); -x_1453 = l_lean_kvmap_set__nat(x_1447, x_1451, x_1448); -x_1454 = l_lean_elaborator_to__pexpr___main___closed__42; -lean::inc(x_1454); -x_1456 = lean_expr_mk_mdata(x_1453, x_1454); -x_1457 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1457, 0, x_1456); -lean::cnstr_set(x_1457, 1, x_2); -x_1458 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1458, 0, x_1457); -return x_1458; +x_1434 = lean::cnstr_get(x_1431, 2); +lean::inc(x_1434); +lean::dec(x_1431); +x_1437 = l_lean_file__map_to__position(x_1434, x_1428); +x_1438 = lean::box(0); +x_1439 = lean::cnstr_get(x_1437, 1); +lean::inc(x_1439); +x_1441 = l_lean_elaborator_to__pexpr___main___closed__3; +lean::inc(x_1441); +x_1443 = l_lean_kvmap_set__nat(x_1438, x_1441, x_1439); +x_1444 = lean::cnstr_get(x_1437, 0); +lean::inc(x_1444); +lean::dec(x_1437); +x_1447 = l_lean_elaborator_to__pexpr___main___closed__4; +lean::inc(x_1447); +x_1449 = l_lean_kvmap_set__nat(x_1443, x_1447, x_1444); +x_1450 = l_lean_elaborator_to__pexpr___main___closed__42; +lean::inc(x_1450); +x_1452 = lean_expr_mk_mdata(x_1449, x_1450); +x_1453 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1453, 0, x_1452); +lean::cnstr_set(x_1453, 1, x_2); +x_1454 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_1454, 0, x_1453); +return x_1454; } } else { -obj* x_1461; obj* x_1463; obj* x_1464; +obj* x_1457; obj* x_1459; obj* x_1460; lean::dec(x_1); lean::dec(x_0); -x_1461 = l_lean_elaborator_to__pexpr___main___closed__42; -lean::inc(x_1461); -x_1463 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1463, 0, x_1461); -lean::cnstr_set(x_1463, 1, x_2); -x_1464 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1464, 0, x_1463); -return x_1464; +x_1457 = l_lean_elaborator_to__pexpr___main___closed__42; +lean::inc(x_1457); +x_1459 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1459, 0, x_1457); +lean::cnstr_set(x_1459, 1, x_2); +x_1460 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_1460, 0, x_1459); +return x_1460; } } } else { -obj* x_1466; obj* x_1467; obj* x_1470; obj* x_1471; obj* x_1474; obj* x_1475; obj* x_1477; obj* x_1479; +obj* x_1462; obj* x_1463; obj* x_1466; obj* x_1467; obj* x_1470; obj* x_1471; obj* x_1473; obj* x_1475; lean::dec(x_9); -x_1466 = l_lean_parser_term_anonymous__constructor_has__view; -x_1467 = lean::cnstr_get(x_1466, 0); +x_1462 = l_lean_parser_term_anonymous__constructor_has__view; +x_1463 = lean::cnstr_get(x_1462, 0); +lean::inc(x_1463); +lean::inc(x_0); +x_1466 = lean::apply_1(x_1463, x_0); +x_1467 = lean::cnstr_get(x_1466, 1); lean::inc(x_1467); -lean::inc(x_0); -x_1470 = lean::apply_1(x_1467, x_0); -x_1471 = lean::cnstr_get(x_1470, 1); +lean::dec(x_1466); +x_1470 = l_list_map___main___at_lean_elaborator_to__pexpr___main___spec__21(x_1467); +x_1471 = l_lean_expander_get__opt__type___main___closed__1; lean::inc(x_1471); -lean::dec(x_1470); -x_1474 = l_list_map___main___at_lean_elaborator_to__pexpr___main___spec__21(x_1471); -x_1475 = l_lean_expander_get__opt__type___main___closed__1; -lean::inc(x_1475); -x_1477 = l_list_foldl___main___at_lean_parser_term_mk__app___spec__1(x_1475, x_1474); +x_1473 = l_list_foldl___main___at_lean_parser_term_mk__app___spec__1(x_1471, x_1470); lean::inc(x_1); -x_1479 = l_lean_elaborator_to__pexpr___main(x_1477, x_1, x_2); -if (lean::obj_tag(x_1479) == 0) +x_1475 = l_lean_elaborator_to__pexpr___main(x_1473, x_1, x_2); +if (lean::obj_tag(x_1475) == 0) { -obj* x_1483; obj* x_1485; obj* x_1486; +obj* x_1479; obj* x_1481; obj* x_1482; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_1483 = lean::cnstr_get(x_1479, 0); +x_1479 = lean::cnstr_get(x_1475, 0); +lean::inc(x_1479); +if (lean::is_shared(x_1475)) { + lean::dec(x_1475); + x_1481 = lean::box(0); +} else { + lean::cnstr_release(x_1475, 0); + x_1481 = x_1475; +} +if (lean::is_scalar(x_1481)) { + x_1482 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1482 = x_1481; +} +lean::cnstr_set(x_1482, 0, x_1479); +return x_1482; +} +else +{ +obj* x_1483; obj* x_1486; obj* x_1488; obj* x_1490; obj* x_1491; obj* x_1493; obj* x_1494; +x_1483 = lean::cnstr_get(x_1475, 0); lean::inc(x_1483); -if (lean::is_shared(x_1479)) { - lean::dec(x_1479); - x_1485 = lean::box(0); +lean::dec(x_1475); +x_1486 = lean::cnstr_get(x_1483, 0); +lean::inc(x_1486); +x_1488 = lean::cnstr_get(x_1483, 1); +lean::inc(x_1488); +if (lean::is_shared(x_1483)) { + lean::dec(x_1483); + x_1490 = lean::box(0); } else { - lean::cnstr_release(x_1479, 0); - x_1485 = x_1479; + lean::cnstr_release(x_1483, 0); + lean::cnstr_release(x_1483, 1); + x_1490 = x_1483; } -if (lean::is_scalar(x_1485)) { - x_1486 = lean::alloc_cnstr(0, 1, 0); +x_1491 = l_lean_elaborator_to__pexpr___main___closed__43; +lean::inc(x_1491); +x_1493 = l_lean_elaborator_expr_mk__annotation(x_1491, x_1486); +if (lean::is_scalar(x_1490)) { + x_1494 = lean::alloc_cnstr(0, 2, 0); } else { - x_1486 = x_1485; + x_1494 = x_1490; } -lean::cnstr_set(x_1486, 0, x_1483); -return x_1486; -} -else -{ -obj* x_1487; obj* x_1490; obj* x_1492; obj* x_1494; obj* x_1495; obj* x_1497; obj* x_1498; -x_1487 = lean::cnstr_get(x_1479, 0); -lean::inc(x_1487); -lean::dec(x_1479); -x_1490 = lean::cnstr_get(x_1487, 0); -lean::inc(x_1490); -x_1492 = lean::cnstr_get(x_1487, 1); -lean::inc(x_1492); -if (lean::is_shared(x_1487)) { - lean::dec(x_1487); - x_1494 = lean::box(0); -} else { - lean::cnstr_release(x_1487, 0); - lean::cnstr_release(x_1487, 1); - x_1494 = x_1487; -} -x_1495 = l_lean_elaborator_to__pexpr___main___closed__43; -lean::inc(x_1495); -x_1497 = l_lean_elaborator_expr_mk__annotation(x_1495, x_1490); -if (lean::is_scalar(x_1494)) { - x_1498 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1498 = x_1494; -} -lean::cnstr_set(x_1498, 0, x_1497); -lean::cnstr_set(x_1498, 1, x_1492); -x_14 = x_1498; +lean::cnstr_set(x_1494, 0, x_1493); +lean::cnstr_set(x_1494, 1, x_1488); +x_14 = x_1494; goto lbl_15; } } } else { -obj* x_1500; obj* x_1501; obj* x_1504; obj* x_1505; obj* x_1506; obj* x_1508; obj* x_1510; +obj* x_1496; obj* x_1497; obj* x_1500; obj* x_1501; obj* x_1502; obj* x_1504; obj* x_1506; lean::dec(x_9); -x_1500 = l_lean_parser_term_sort__app_has__view; -x_1501 = lean::cnstr_get(x_1500, 0); -lean::inc(x_1501); +x_1496 = l_lean_parser_term_sort__app_has__view; +x_1497 = lean::cnstr_get(x_1496, 0); +lean::inc(x_1497); lean::inc(x_0); -x_1504 = lean::apply_1(x_1501, x_0); -x_1505 = l_lean_parser_term_sort_has__view; -x_1506 = lean::cnstr_get(x_1505, 0); -lean::inc(x_1506); -x_1508 = lean::cnstr_get(x_1504, 0); +x_1500 = lean::apply_1(x_1497, x_0); +x_1501 = l_lean_parser_term_sort_has__view; +x_1502 = lean::cnstr_get(x_1501, 0); +lean::inc(x_1502); +x_1504 = lean::cnstr_get(x_1500, 0); +lean::inc(x_1504); +x_1506 = lean::apply_1(x_1502, x_1504); +if (lean::obj_tag(x_1506) == 0) +{ +obj* x_1508; obj* x_1512; +lean::dec(x_1506); +x_1508 = lean::cnstr_get(x_1500, 1); lean::inc(x_1508); -x_1510 = lean::apply_1(x_1506, x_1508); -if (lean::obj_tag(x_1510) == 0) -{ -obj* x_1512; obj* x_1516; -lean::dec(x_1510); -x_1512 = lean::cnstr_get(x_1504, 1); -lean::inc(x_1512); -lean::dec(x_1504); +lean::dec(x_1500); lean::inc(x_1); -x_1516 = l_lean_elaborator_to__level___main(x_1512, x_1, x_2); -if (lean::obj_tag(x_1516) == 0) +x_1512 = l_lean_elaborator_to__level___main(x_1508, x_1, x_2); +if (lean::obj_tag(x_1512) == 0) { -obj* x_1520; obj* x_1522; obj* x_1523; +obj* x_1516; obj* x_1518; obj* x_1519; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_1520 = lean::cnstr_get(x_1516, 0); +x_1516 = lean::cnstr_get(x_1512, 0); +lean::inc(x_1516); +if (lean::is_shared(x_1512)) { + lean::dec(x_1512); + x_1518 = lean::box(0); +} else { + lean::cnstr_release(x_1512, 0); + x_1518 = x_1512; +} +if (lean::is_scalar(x_1518)) { + x_1519 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1519 = x_1518; +} +lean::cnstr_set(x_1519, 0, x_1516); +return x_1519; +} +else +{ +obj* x_1520; obj* x_1523; obj* x_1525; obj* x_1527; obj* x_1528; obj* x_1529; +x_1520 = lean::cnstr_get(x_1512, 0); lean::inc(x_1520); -if (lean::is_shared(x_1516)) { - lean::dec(x_1516); - x_1522 = lean::box(0); +lean::dec(x_1512); +x_1523 = lean::cnstr_get(x_1520, 0); +lean::inc(x_1523); +x_1525 = lean::cnstr_get(x_1520, 1); +lean::inc(x_1525); +if (lean::is_shared(x_1520)) { + lean::dec(x_1520); + x_1527 = lean::box(0); } else { - lean::cnstr_release(x_1516, 0); - x_1522 = x_1516; + lean::cnstr_release(x_1520, 0); + lean::cnstr_release(x_1520, 1); + x_1527 = x_1520; } -if (lean::is_scalar(x_1522)) { - x_1523 = lean::alloc_cnstr(0, 1, 0); +x_1528 = lean_expr_mk_sort(x_1523); +if (lean::is_scalar(x_1527)) { + x_1529 = lean::alloc_cnstr(0, 2, 0); } else { - x_1523 = x_1522; + x_1529 = x_1527; } -lean::cnstr_set(x_1523, 0, x_1520); -return x_1523; -} -else -{ -obj* x_1524; obj* x_1527; obj* x_1529; obj* x_1531; obj* x_1532; obj* x_1533; -x_1524 = lean::cnstr_get(x_1516, 0); -lean::inc(x_1524); -lean::dec(x_1516); -x_1527 = lean::cnstr_get(x_1524, 0); -lean::inc(x_1527); -x_1529 = lean::cnstr_get(x_1524, 1); -lean::inc(x_1529); -if (lean::is_shared(x_1524)) { - lean::dec(x_1524); - x_1531 = lean::box(0); -} else { - lean::cnstr_release(x_1524, 0); - lean::cnstr_release(x_1524, 1); - x_1531 = x_1524; -} -x_1532 = lean_expr_mk_sort(x_1527); -if (lean::is_scalar(x_1531)) { - x_1533 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1533 = x_1531; -} -lean::cnstr_set(x_1533, 0, x_1532); -lean::cnstr_set(x_1533, 1, x_1529); -x_14 = x_1533; +lean::cnstr_set(x_1529, 0, x_1528); +lean::cnstr_set(x_1529, 1, x_1525); +x_14 = x_1529; goto lbl_15; } } else { -obj* x_1535; obj* x_1539; -lean::dec(x_1510); -x_1535 = lean::cnstr_get(x_1504, 1); -lean::inc(x_1535); -lean::dec(x_1504); +obj* x_1531; obj* x_1535; +lean::dec(x_1506); +x_1531 = lean::cnstr_get(x_1500, 1); +lean::inc(x_1531); +lean::dec(x_1500); lean::inc(x_1); -x_1539 = l_lean_elaborator_to__level___main(x_1535, x_1, x_2); -if (lean::obj_tag(x_1539) == 0) +x_1535 = l_lean_elaborator_to__level___main(x_1531, x_1, x_2); +if (lean::obj_tag(x_1535) == 0) { -obj* x_1543; obj* x_1545; obj* x_1546; +obj* x_1539; obj* x_1541; obj* x_1542; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_1543 = lean::cnstr_get(x_1539, 0); +x_1539 = lean::cnstr_get(x_1535, 0); +lean::inc(x_1539); +if (lean::is_shared(x_1535)) { + lean::dec(x_1535); + x_1541 = lean::box(0); +} else { + lean::cnstr_release(x_1535, 0); + x_1541 = x_1535; +} +if (lean::is_scalar(x_1541)) { + x_1542 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1542 = x_1541; +} +lean::cnstr_set(x_1542, 0, x_1539); +return x_1542; +} +else +{ +obj* x_1543; obj* x_1546; obj* x_1548; obj* x_1550; obj* x_1551; obj* x_1552; obj* x_1553; +x_1543 = lean::cnstr_get(x_1535, 0); lean::inc(x_1543); -if (lean::is_shared(x_1539)) { - lean::dec(x_1539); - x_1545 = lean::box(0); +lean::dec(x_1535); +x_1546 = lean::cnstr_get(x_1543, 0); +lean::inc(x_1546); +x_1548 = lean::cnstr_get(x_1543, 1); +lean::inc(x_1548); +if (lean::is_shared(x_1543)) { + lean::dec(x_1543); + x_1550 = lean::box(0); } else { - lean::cnstr_release(x_1539, 0); - x_1545 = x_1539; + lean::cnstr_release(x_1543, 0); + lean::cnstr_release(x_1543, 1); + x_1550 = x_1543; } -if (lean::is_scalar(x_1545)) { - x_1546 = lean::alloc_cnstr(0, 1, 0); +x_1551 = level_mk_succ(x_1546); +x_1552 = lean_expr_mk_sort(x_1551); +if (lean::is_scalar(x_1550)) { + x_1553 = lean::alloc_cnstr(0, 2, 0); } else { - x_1546 = x_1545; + x_1553 = x_1550; } -lean::cnstr_set(x_1546, 0, x_1543); -return x_1546; -} -else -{ -obj* x_1547; obj* x_1550; obj* x_1552; obj* x_1554; obj* x_1555; obj* x_1556; obj* x_1557; -x_1547 = lean::cnstr_get(x_1539, 0); -lean::inc(x_1547); -lean::dec(x_1539); -x_1550 = lean::cnstr_get(x_1547, 0); -lean::inc(x_1550); -x_1552 = lean::cnstr_get(x_1547, 1); -lean::inc(x_1552); -if (lean::is_shared(x_1547)) { - lean::dec(x_1547); - x_1554 = lean::box(0); -} else { - lean::cnstr_release(x_1547, 0); - lean::cnstr_release(x_1547, 1); - x_1554 = x_1547; -} -x_1555 = level_mk_succ(x_1550); -x_1556 = lean_expr_mk_sort(x_1555); -if (lean::is_scalar(x_1554)) { - x_1557 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1557 = x_1554; -} -lean::cnstr_set(x_1557, 0, x_1556); -lean::cnstr_set(x_1557, 1, x_1552); -x_14 = x_1557; +lean::cnstr_set(x_1553, 0, x_1552); +lean::cnstr_set(x_1553, 1, x_1548); +x_14 = x_1553; goto lbl_15; } } @@ -11089,333 +11081,333 @@ goto lbl_15; } else { -obj* x_1560; obj* x_1561; obj* x_1564; +obj* x_1556; obj* x_1557; obj* x_1560; lean::dec(x_9); lean::dec(x_7); -x_1560 = l_lean_parser_term_sort_has__view; -x_1561 = lean::cnstr_get(x_1560, 0); -lean::inc(x_1561); +x_1556 = l_lean_parser_term_sort_has__view; +x_1557 = lean::cnstr_get(x_1556, 0); +lean::inc(x_1557); lean::inc(x_0); -x_1564 = lean::apply_1(x_1561, x_0); -if (lean::obj_tag(x_1564) == 0) +x_1560 = lean::apply_1(x_1557, x_0); +if (lean::obj_tag(x_1560) == 0) { -lean::dec(x_1564); +lean::dec(x_1560); if (x_21 == 0) { -obj* x_1566; -x_1566 = l_lean_parser_syntax_get__pos(x_0); -if (lean::obj_tag(x_1566) == 0) +obj* x_1562; +x_1562 = l_lean_parser_syntax_get__pos(x_0); +if (lean::obj_tag(x_1562) == 0) { -obj* x_1568; obj* x_1570; obj* x_1571; +obj* x_1564; obj* x_1566; obj* x_1567; lean::dec(x_1); -x_1568 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__9___closed__1; +x_1564 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__9___closed__1; +lean::inc(x_1564); +x_1566 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1566, 0, x_1564); +lean::cnstr_set(x_1566, 1, x_2); +x_1567 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_1567, 0, x_1566); +return x_1567; +} +else +{ +obj* x_1568; obj* x_1571; obj* x_1574; obj* x_1577; obj* x_1578; obj* x_1579; obj* x_1581; obj* x_1583; obj* x_1584; obj* x_1587; obj* x_1589; obj* x_1590; obj* x_1592; obj* x_1593; obj* x_1594; +x_1568 = lean::cnstr_get(x_1562, 0); lean::inc(x_1568); -x_1570 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1570, 0, x_1568); -lean::cnstr_set(x_1570, 1, x_2); -x_1571 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1571, 0, x_1570); -return x_1571; -} -else -{ -obj* x_1572; obj* x_1575; obj* x_1578; obj* x_1581; obj* x_1582; obj* x_1583; obj* x_1585; obj* x_1587; obj* x_1588; obj* x_1591; obj* x_1593; obj* x_1594; obj* x_1596; obj* x_1597; obj* x_1598; -x_1572 = lean::cnstr_get(x_1566, 0); -lean::inc(x_1572); -lean::dec(x_1566); -x_1575 = lean::cnstr_get(x_1, 0); -lean::inc(x_1575); +lean::dec(x_1562); +x_1571 = lean::cnstr_get(x_1, 0); +lean::inc(x_1571); lean::dec(x_1); -x_1578 = lean::cnstr_get(x_1575, 2); -lean::inc(x_1578); -lean::dec(x_1575); -x_1581 = l_lean_file__map_to__position(x_1578, x_1572); -x_1582 = lean::box(0); -x_1583 = lean::cnstr_get(x_1581, 1); -lean::inc(x_1583); -x_1585 = l_lean_elaborator_to__pexpr___main___closed__3; -lean::inc(x_1585); -x_1587 = l_lean_kvmap_set__nat(x_1582, x_1585, x_1583); -x_1588 = lean::cnstr_get(x_1581, 0); -lean::inc(x_1588); -lean::dec(x_1581); -x_1591 = l_lean_elaborator_to__pexpr___main___closed__4; -lean::inc(x_1591); -x_1593 = l_lean_kvmap_set__nat(x_1587, x_1591, x_1588); -x_1594 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__9___closed__1; -lean::inc(x_1594); -x_1596 = lean_expr_mk_mdata(x_1593, x_1594); -x_1597 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1597, 0, x_1596); -lean::cnstr_set(x_1597, 1, x_2); -x_1598 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1598, 0, x_1597); -return x_1598; +x_1574 = lean::cnstr_get(x_1571, 2); +lean::inc(x_1574); +lean::dec(x_1571); +x_1577 = l_lean_file__map_to__position(x_1574, x_1568); +x_1578 = lean::box(0); +x_1579 = lean::cnstr_get(x_1577, 1); +lean::inc(x_1579); +x_1581 = l_lean_elaborator_to__pexpr___main___closed__3; +lean::inc(x_1581); +x_1583 = l_lean_kvmap_set__nat(x_1578, x_1581, x_1579); +x_1584 = lean::cnstr_get(x_1577, 0); +lean::inc(x_1584); +lean::dec(x_1577); +x_1587 = l_lean_elaborator_to__pexpr___main___closed__4; +lean::inc(x_1587); +x_1589 = l_lean_kvmap_set__nat(x_1583, x_1587, x_1584); +x_1590 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__9___closed__1; +lean::inc(x_1590); +x_1592 = lean_expr_mk_mdata(x_1589, x_1590); +x_1593 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1593, 0, x_1592); +lean::cnstr_set(x_1593, 1, x_2); +x_1594 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_1594, 0, x_1593); +return x_1594; } } else { -obj* x_1601; obj* x_1603; obj* x_1604; +obj* x_1597; obj* x_1599; obj* x_1600; lean::dec(x_1); lean::dec(x_0); -x_1601 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__9___closed__1; -lean::inc(x_1601); -x_1603 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1603, 0, x_1601); -lean::cnstr_set(x_1603, 1, x_2); -x_1604 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1604, 0, x_1603); -return x_1604; +x_1597 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__9___closed__1; +lean::inc(x_1597); +x_1599 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1599, 0, x_1597); +lean::cnstr_set(x_1599, 1, x_2); +x_1600 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_1600, 0, x_1599); +return x_1600; } } else { -lean::dec(x_1564); +lean::dec(x_1560); if (x_21 == 0) { -obj* x_1606; -x_1606 = l_lean_parser_syntax_get__pos(x_0); -if (lean::obj_tag(x_1606) == 0) +obj* x_1602; +x_1602 = l_lean_parser_syntax_get__pos(x_0); +if (lean::obj_tag(x_1602) == 0) { -obj* x_1608; obj* x_1610; obj* x_1611; +obj* x_1604; obj* x_1606; obj* x_1607; lean::dec(x_1); -x_1608 = l_lean_elaborator_to__pexpr___main___closed__44; +x_1604 = l_lean_elaborator_to__pexpr___main___closed__44; +lean::inc(x_1604); +x_1606 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1606, 0, x_1604); +lean::cnstr_set(x_1606, 1, x_2); +x_1607 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_1607, 0, x_1606); +return x_1607; +} +else +{ +obj* x_1608; obj* x_1611; obj* x_1614; obj* x_1617; obj* x_1618; obj* x_1619; obj* x_1621; obj* x_1623; obj* x_1624; obj* x_1627; obj* x_1629; obj* x_1630; obj* x_1632; obj* x_1633; obj* x_1634; +x_1608 = lean::cnstr_get(x_1602, 0); lean::inc(x_1608); -x_1610 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1610, 0, x_1608); -lean::cnstr_set(x_1610, 1, x_2); -x_1611 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1611, 0, x_1610); -return x_1611; -} -else -{ -obj* x_1612; obj* x_1615; obj* x_1618; obj* x_1621; obj* x_1622; obj* x_1623; obj* x_1625; obj* x_1627; obj* x_1628; obj* x_1631; obj* x_1633; obj* x_1634; obj* x_1636; obj* x_1637; obj* x_1638; -x_1612 = lean::cnstr_get(x_1606, 0); -lean::inc(x_1612); -lean::dec(x_1606); -x_1615 = lean::cnstr_get(x_1, 0); -lean::inc(x_1615); +lean::dec(x_1602); +x_1611 = lean::cnstr_get(x_1, 0); +lean::inc(x_1611); lean::dec(x_1); -x_1618 = lean::cnstr_get(x_1615, 2); -lean::inc(x_1618); -lean::dec(x_1615); -x_1621 = l_lean_file__map_to__position(x_1618, x_1612); -x_1622 = lean::box(0); -x_1623 = lean::cnstr_get(x_1621, 1); -lean::inc(x_1623); -x_1625 = l_lean_elaborator_to__pexpr___main___closed__3; -lean::inc(x_1625); -x_1627 = l_lean_kvmap_set__nat(x_1622, x_1625, x_1623); -x_1628 = lean::cnstr_get(x_1621, 0); -lean::inc(x_1628); -lean::dec(x_1621); -x_1631 = l_lean_elaborator_to__pexpr___main___closed__4; -lean::inc(x_1631); -x_1633 = l_lean_kvmap_set__nat(x_1627, x_1631, x_1628); -x_1634 = l_lean_elaborator_to__pexpr___main___closed__44; -lean::inc(x_1634); -x_1636 = lean_expr_mk_mdata(x_1633, x_1634); -x_1637 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1637, 0, x_1636); -lean::cnstr_set(x_1637, 1, x_2); -x_1638 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1638, 0, x_1637); -return x_1638; +x_1614 = lean::cnstr_get(x_1611, 2); +lean::inc(x_1614); +lean::dec(x_1611); +x_1617 = l_lean_file__map_to__position(x_1614, x_1608); +x_1618 = lean::box(0); +x_1619 = lean::cnstr_get(x_1617, 1); +lean::inc(x_1619); +x_1621 = l_lean_elaborator_to__pexpr___main___closed__3; +lean::inc(x_1621); +x_1623 = l_lean_kvmap_set__nat(x_1618, x_1621, x_1619); +x_1624 = lean::cnstr_get(x_1617, 0); +lean::inc(x_1624); +lean::dec(x_1617); +x_1627 = l_lean_elaborator_to__pexpr___main___closed__4; +lean::inc(x_1627); +x_1629 = l_lean_kvmap_set__nat(x_1623, x_1627, x_1624); +x_1630 = l_lean_elaborator_to__pexpr___main___closed__44; +lean::inc(x_1630); +x_1632 = lean_expr_mk_mdata(x_1629, x_1630); +x_1633 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1633, 0, x_1632); +lean::cnstr_set(x_1633, 1, x_2); +x_1634 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_1634, 0, x_1633); +return x_1634; } } else { -obj* x_1641; obj* x_1643; obj* x_1644; +obj* x_1637; obj* x_1639; obj* x_1640; lean::dec(x_1); lean::dec(x_0); -x_1641 = l_lean_elaborator_to__pexpr___main___closed__44; -lean::inc(x_1641); -x_1643 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1643, 0, x_1641); -lean::cnstr_set(x_1643, 1, x_2); -x_1644 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1644, 0, x_1643); -return x_1644; +x_1637 = l_lean_elaborator_to__pexpr___main___closed__44; +lean::inc(x_1637); +x_1639 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1639, 0, x_1637); +lean::cnstr_set(x_1639, 1, x_2); +x_1640 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_1640, 0, x_1639); +return x_1640; } } } } else { -obj* x_1646; obj* x_1647; obj* x_1650; obj* x_1651; +obj* x_1642; obj* x_1643; obj* x_1646; obj* x_1647; lean::dec(x_9); -x_1646 = l_lean_parser_term_pi_has__view; -x_1647 = lean::cnstr_get(x_1646, 0); +x_1642 = l_lean_parser_term_pi_has__view; +x_1643 = lean::cnstr_get(x_1642, 0); +lean::inc(x_1643); +lean::inc(x_0); +x_1646 = lean::apply_1(x_1643, x_0); +x_1647 = lean::cnstr_get(x_1646, 1); lean::inc(x_1647); -lean::inc(x_0); -x_1650 = lean::apply_1(x_1647, x_0); -x_1651 = lean::cnstr_get(x_1650, 1); -lean::inc(x_1651); -if (lean::obj_tag(x_1651) == 0) +if (lean::obj_tag(x_1647) == 0) { -obj* x_1655; obj* x_1659; -lean::dec(x_1650); -lean::dec(x_1651); -x_1655 = l_lean_elaborator_to__pexpr___main___closed__45; +obj* x_1651; obj* x_1655; +lean::dec(x_1647); +lean::dec(x_1646); +x_1651 = l_lean_elaborator_to__pexpr___main___closed__45; lean::inc(x_1); -lean::inc(x_1655); +lean::inc(x_1651); lean::inc(x_0); -x_1659 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_1655, x_1, x_2); -if (lean::obj_tag(x_1659) == 0) +x_1655 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_1651, x_1, x_2); +if (lean::obj_tag(x_1655) == 0) { -obj* x_1663; obj* x_1665; obj* x_1666; +obj* x_1659; obj* x_1661; obj* x_1662; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_1663 = lean::cnstr_get(x_1659, 0); -lean::inc(x_1663); -if (lean::is_shared(x_1659)) { - lean::dec(x_1659); - x_1665 = lean::box(0); +x_1659 = lean::cnstr_get(x_1655, 0); +lean::inc(x_1659); +if (lean::is_shared(x_1655)) { + lean::dec(x_1655); + x_1661 = lean::box(0); } else { - lean::cnstr_release(x_1659, 0); - x_1665 = x_1659; + lean::cnstr_release(x_1655, 0); + x_1661 = x_1655; } -if (lean::is_scalar(x_1665)) { - x_1666 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_1661)) { + x_1662 = lean::alloc_cnstr(0, 1, 0); } else { - x_1666 = x_1665; + x_1662 = x_1661; } -lean::cnstr_set(x_1666, 0, x_1663); -return x_1666; +lean::cnstr_set(x_1662, 0, x_1659); +return x_1662; } else { -obj* x_1667; -x_1667 = lean::cnstr_get(x_1659, 0); -lean::inc(x_1667); -lean::dec(x_1659); -x_14 = x_1667; +obj* x_1663; +x_1663 = lean::cnstr_get(x_1655, 0); +lean::inc(x_1663); +lean::dec(x_1655); +x_14 = x_1663; goto lbl_15; } } else { -obj* x_1670; obj* x_1673; obj* x_1674; obj* x_1676; obj* x_1678; obj* x_1679; obj* x_1681; obj* x_1685; -x_1670 = lean::cnstr_get(x_1651, 0); +obj* x_1666; obj* x_1669; obj* x_1670; obj* x_1672; obj* x_1674; obj* x_1675; obj* x_1677; obj* x_1681; +x_1666 = lean::cnstr_get(x_1647, 0); +lean::inc(x_1666); +lean::dec(x_1647); +x_1669 = l_lean_parser_term_simple__binder_view_to__binder__info___main(x_1666); +x_1670 = lean::cnstr_get(x_1669, 0); lean::inc(x_1670); -lean::dec(x_1651); -x_1673 = l_lean_parser_term_simple__binder_view_to__binder__info___main(x_1670); -x_1674 = lean::cnstr_get(x_1673, 0); -lean::inc(x_1674); -x_1676 = lean::cnstr_get(x_1673, 1); -lean::inc(x_1676); -if (lean::is_shared(x_1673)) { - lean::dec(x_1673); - x_1678 = lean::box(0); +x_1672 = lean::cnstr_get(x_1669, 1); +lean::inc(x_1672); +if (lean::is_shared(x_1669)) { + lean::dec(x_1669); + x_1674 = lean::box(0); } else { - lean::cnstr_release(x_1673, 0); - lean::cnstr_release(x_1673, 1); - x_1678 = x_1673; + lean::cnstr_release(x_1669, 0); + lean::cnstr_release(x_1669, 1); + x_1674 = x_1669; } -x_1679 = lean::cnstr_get(x_1676, 0); -lean::inc(x_1679); -x_1681 = lean::cnstr_get(x_1676, 1); -lean::inc(x_1681); -lean::dec(x_1676); +x_1675 = lean::cnstr_get(x_1672, 0); +lean::inc(x_1675); +x_1677 = lean::cnstr_get(x_1672, 1); +lean::inc(x_1677); +lean::dec(x_1672); lean::inc(x_1); -x_1685 = l_lean_elaborator_to__pexpr___main(x_1681, x_1, x_2); -if (lean::obj_tag(x_1685) == 0) +x_1681 = l_lean_elaborator_to__pexpr___main(x_1677, x_1, x_2); +if (lean::obj_tag(x_1681) == 0) { -obj* x_1693; obj* x_1695; obj* x_1696; +obj* x_1689; obj* x_1691; obj* x_1692; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_1650); -lean::dec(x_1678); +lean::dec(x_1675); lean::dec(x_1674); -lean::dec(x_1679); -x_1693 = lean::cnstr_get(x_1685, 0); +lean::dec(x_1670); +lean::dec(x_1646); +x_1689 = lean::cnstr_get(x_1681, 0); +lean::inc(x_1689); +if (lean::is_shared(x_1681)) { + lean::dec(x_1681); + x_1691 = lean::box(0); +} else { + lean::cnstr_release(x_1681, 0); + x_1691 = x_1681; +} +if (lean::is_scalar(x_1691)) { + x_1692 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1692 = x_1691; +} +lean::cnstr_set(x_1692, 0, x_1689); +return x_1692; +} +else +{ +obj* x_1693; obj* x_1695; obj* x_1696; obj* x_1698; obj* x_1701; obj* x_1705; +x_1693 = lean::cnstr_get(x_1681, 0); lean::inc(x_1693); -if (lean::is_shared(x_1685)) { - lean::dec(x_1685); +if (lean::is_shared(x_1681)) { + lean::dec(x_1681); x_1695 = lean::box(0); } else { - lean::cnstr_release(x_1685, 0); - x_1695 = x_1685; + lean::cnstr_release(x_1681, 0); + x_1695 = x_1681; } +x_1696 = lean::cnstr_get(x_1693, 0); +lean::inc(x_1696); +x_1698 = lean::cnstr_get(x_1693, 1); +lean::inc(x_1698); +lean::dec(x_1693); +x_1701 = lean::cnstr_get(x_1646, 3); +lean::inc(x_1701); +lean::dec(x_1646); +lean::inc(x_1); +x_1705 = l_lean_elaborator_to__pexpr___main(x_1701, x_1, x_1698); +if (lean::obj_tag(x_1705) == 0) +{ +obj* x_1713; obj* x_1716; +lean::dec(x_7); +lean::dec(x_1); +lean::dec(x_0); +lean::dec(x_1675); +lean::dec(x_1674); +lean::dec(x_1670); +lean::dec(x_1696); +x_1713 = lean::cnstr_get(x_1705, 0); +lean::inc(x_1713); +lean::dec(x_1705); if (lean::is_scalar(x_1695)) { - x_1696 = lean::alloc_cnstr(0, 1, 0); + x_1716 = lean::alloc_cnstr(0, 1, 0); } else { - x_1696 = x_1695; + x_1716 = x_1695; + lean::cnstr_set_tag(x_1695, 0); } -lean::cnstr_set(x_1696, 0, x_1693); -return x_1696; +lean::cnstr_set(x_1716, 0, x_1713); +return x_1716; } else { -obj* x_1697; obj* x_1699; obj* x_1700; obj* x_1702; obj* x_1705; obj* x_1709; -x_1697 = lean::cnstr_get(x_1685, 0); -lean::inc(x_1697); -if (lean::is_shared(x_1685)) { - lean::dec(x_1685); - x_1699 = lean::box(0); +obj* x_1718; obj* x_1721; obj* x_1723; obj* x_1726; uint8 x_1727; obj* x_1729; obj* x_1730; +lean::dec(x_1695); +x_1718 = lean::cnstr_get(x_1705, 0); +lean::inc(x_1718); +lean::dec(x_1705); +x_1721 = lean::cnstr_get(x_1718, 0); +lean::inc(x_1721); +x_1723 = lean::cnstr_get(x_1718, 1); +lean::inc(x_1723); +lean::dec(x_1718); +x_1726 = l_lean_elaborator_mangle__ident(x_1675); +x_1727 = lean::unbox(x_1670); +lean::dec(x_1670); +x_1729 = lean_expr_mk_pi(x_1726, x_1727, x_1696, x_1721); +if (lean::is_scalar(x_1674)) { + x_1730 = lean::alloc_cnstr(0, 2, 0); } else { - lean::cnstr_release(x_1685, 0); - x_1699 = x_1685; + x_1730 = x_1674; } -x_1700 = lean::cnstr_get(x_1697, 0); -lean::inc(x_1700); -x_1702 = lean::cnstr_get(x_1697, 1); -lean::inc(x_1702); -lean::dec(x_1697); -x_1705 = lean::cnstr_get(x_1650, 3); -lean::inc(x_1705); -lean::dec(x_1650); -lean::inc(x_1); -x_1709 = l_lean_elaborator_to__pexpr___main(x_1705, x_1, x_1702); -if (lean::obj_tag(x_1709) == 0) -{ -obj* x_1717; obj* x_1720; -lean::dec(x_7); -lean::dec(x_1); -lean::dec(x_0); -lean::dec(x_1678); -lean::dec(x_1674); -lean::dec(x_1679); -lean::dec(x_1700); -x_1717 = lean::cnstr_get(x_1709, 0); -lean::inc(x_1717); -lean::dec(x_1709); -if (lean::is_scalar(x_1699)) { - x_1720 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1720 = x_1699; - lean::cnstr_set_tag(x_1699, 0); -} -lean::cnstr_set(x_1720, 0, x_1717); -return x_1720; -} -else -{ -obj* x_1722; obj* x_1725; obj* x_1727; obj* x_1730; uint8 x_1731; obj* x_1733; obj* x_1734; -lean::dec(x_1699); -x_1722 = lean::cnstr_get(x_1709, 0); -lean::inc(x_1722); -lean::dec(x_1709); -x_1725 = lean::cnstr_get(x_1722, 0); -lean::inc(x_1725); -x_1727 = lean::cnstr_get(x_1722, 1); -lean::inc(x_1727); -lean::dec(x_1722); -x_1730 = l_lean_elaborator_mangle__ident(x_1679); -x_1731 = lean::unbox(x_1674); -lean::dec(x_1674); -x_1733 = lean_expr_mk_pi(x_1730, x_1731, x_1700, x_1725); -if (lean::is_scalar(x_1678)) { - x_1734 = lean::alloc_cnstr(0, 2, 0); -} else { - x_1734 = x_1678; -} -lean::cnstr_set(x_1734, 0, x_1733); -lean::cnstr_set(x_1734, 1, x_1727); -x_14 = x_1734; +lean::cnstr_set(x_1730, 0, x_1729); +lean::cnstr_set(x_1730, 1, x_1723); +x_14 = x_1730; goto lbl_15; } } @@ -11424,179 +11416,179 @@ goto lbl_15; } else { -obj* x_1736; obj* x_1737; obj* x_1740; obj* x_1741; +obj* x_1732; obj* x_1733; obj* x_1736; obj* x_1737; lean::dec(x_9); -x_1736 = l_lean_parser_term_lambda_has__view; -x_1737 = lean::cnstr_get(x_1736, 0); +x_1732 = l_lean_parser_term_lambda_has__view; +x_1733 = lean::cnstr_get(x_1732, 0); +lean::inc(x_1733); +lean::inc(x_0); +x_1736 = lean::apply_1(x_1733, x_0); +x_1737 = lean::cnstr_get(x_1736, 1); lean::inc(x_1737); -lean::inc(x_0); -x_1740 = lean::apply_1(x_1737, x_0); -x_1741 = lean::cnstr_get(x_1740, 1); -lean::inc(x_1741); -if (lean::obj_tag(x_1741) == 0) +if (lean::obj_tag(x_1737) == 0) { -obj* x_1745; obj* x_1749; -lean::dec(x_1741); -lean::dec(x_1740); -x_1745 = l_lean_elaborator_to__pexpr___main___closed__46; +obj* x_1741; obj* x_1745; +lean::dec(x_1736); +lean::dec(x_1737); +x_1741 = l_lean_elaborator_to__pexpr___main___closed__46; lean::inc(x_1); -lean::inc(x_1745); +lean::inc(x_1741); lean::inc(x_0); -x_1749 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_1745, x_1, x_2); -if (lean::obj_tag(x_1749) == 0) +x_1745 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_1741, x_1, x_2); +if (lean::obj_tag(x_1745) == 0) { -obj* x_1753; obj* x_1755; obj* x_1756; +obj* x_1749; obj* x_1751; obj* x_1752; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_1753 = lean::cnstr_get(x_1749, 0); -lean::inc(x_1753); -if (lean::is_shared(x_1749)) { - lean::dec(x_1749); - x_1755 = lean::box(0); +x_1749 = lean::cnstr_get(x_1745, 0); +lean::inc(x_1749); +if (lean::is_shared(x_1745)) { + lean::dec(x_1745); + x_1751 = lean::box(0); } else { - lean::cnstr_release(x_1749, 0); - x_1755 = x_1749; + lean::cnstr_release(x_1745, 0); + x_1751 = x_1745; } -if (lean::is_scalar(x_1755)) { - x_1756 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_1751)) { + x_1752 = lean::alloc_cnstr(0, 1, 0); } else { - x_1756 = x_1755; + x_1752 = x_1751; } -lean::cnstr_set(x_1756, 0, x_1753); -return x_1756; +lean::cnstr_set(x_1752, 0, x_1749); +return x_1752; } else { -obj* x_1757; -x_1757 = lean::cnstr_get(x_1749, 0); -lean::inc(x_1757); -lean::dec(x_1749); -x_14 = x_1757; +obj* x_1753; +x_1753 = lean::cnstr_get(x_1745, 0); +lean::inc(x_1753); +lean::dec(x_1745); +x_14 = x_1753; goto lbl_15; } } else { -obj* x_1760; obj* x_1763; obj* x_1764; obj* x_1766; obj* x_1768; obj* x_1769; obj* x_1771; obj* x_1775; -x_1760 = lean::cnstr_get(x_1741, 0); +obj* x_1756; obj* x_1759; obj* x_1760; obj* x_1762; obj* x_1764; obj* x_1765; obj* x_1767; obj* x_1771; +x_1756 = lean::cnstr_get(x_1737, 0); +lean::inc(x_1756); +lean::dec(x_1737); +x_1759 = l_lean_parser_term_simple__binder_view_to__binder__info___main(x_1756); +x_1760 = lean::cnstr_get(x_1759, 0); lean::inc(x_1760); -lean::dec(x_1741); -x_1763 = l_lean_parser_term_simple__binder_view_to__binder__info___main(x_1760); -x_1764 = lean::cnstr_get(x_1763, 0); -lean::inc(x_1764); -x_1766 = lean::cnstr_get(x_1763, 1); -lean::inc(x_1766); -if (lean::is_shared(x_1763)) { - lean::dec(x_1763); - x_1768 = lean::box(0); +x_1762 = lean::cnstr_get(x_1759, 1); +lean::inc(x_1762); +if (lean::is_shared(x_1759)) { + lean::dec(x_1759); + x_1764 = lean::box(0); } else { - lean::cnstr_release(x_1763, 0); - lean::cnstr_release(x_1763, 1); - x_1768 = x_1763; + lean::cnstr_release(x_1759, 0); + lean::cnstr_release(x_1759, 1); + x_1764 = x_1759; } -x_1769 = lean::cnstr_get(x_1766, 0); -lean::inc(x_1769); -x_1771 = lean::cnstr_get(x_1766, 1); -lean::inc(x_1771); -lean::dec(x_1766); +x_1765 = lean::cnstr_get(x_1762, 0); +lean::inc(x_1765); +x_1767 = lean::cnstr_get(x_1762, 1); +lean::inc(x_1767); +lean::dec(x_1762); lean::inc(x_1); -x_1775 = l_lean_elaborator_to__pexpr___main(x_1771, x_1, x_2); -if (lean::obj_tag(x_1775) == 0) +x_1771 = l_lean_elaborator_to__pexpr___main(x_1767, x_1, x_2); +if (lean::obj_tag(x_1771) == 0) { -obj* x_1783; obj* x_1785; obj* x_1786; -lean::dec(x_1769); -lean::dec(x_1768); +obj* x_1779; obj* x_1781; obj* x_1782; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); +lean::dec(x_1760); +lean::dec(x_1765); lean::dec(x_1764); -lean::dec(x_1740); -x_1783 = lean::cnstr_get(x_1775, 0); +lean::dec(x_1736); +x_1779 = lean::cnstr_get(x_1771, 0); +lean::inc(x_1779); +if (lean::is_shared(x_1771)) { + lean::dec(x_1771); + x_1781 = lean::box(0); +} else { + lean::cnstr_release(x_1771, 0); + x_1781 = x_1771; +} +if (lean::is_scalar(x_1781)) { + x_1782 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1782 = x_1781; +} +lean::cnstr_set(x_1782, 0, x_1779); +return x_1782; +} +else +{ +obj* x_1783; obj* x_1785; obj* x_1786; obj* x_1788; obj* x_1791; obj* x_1795; +x_1783 = lean::cnstr_get(x_1771, 0); lean::inc(x_1783); -if (lean::is_shared(x_1775)) { - lean::dec(x_1775); +if (lean::is_shared(x_1771)) { + lean::dec(x_1771); x_1785 = lean::box(0); } else { - lean::cnstr_release(x_1775, 0); - x_1785 = x_1775; + lean::cnstr_release(x_1771, 0); + x_1785 = x_1771; } -if (lean::is_scalar(x_1785)) { - x_1786 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1786 = x_1785; -} -lean::cnstr_set(x_1786, 0, x_1783); -return x_1786; -} -else -{ -obj* x_1787; obj* x_1789; obj* x_1790; obj* x_1792; obj* x_1795; obj* x_1799; -x_1787 = lean::cnstr_get(x_1775, 0); -lean::inc(x_1787); -if (lean::is_shared(x_1775)) { - lean::dec(x_1775); - x_1789 = lean::box(0); -} else { - lean::cnstr_release(x_1775, 0); - x_1789 = x_1775; -} -x_1790 = lean::cnstr_get(x_1787, 0); -lean::inc(x_1790); -x_1792 = lean::cnstr_get(x_1787, 1); -lean::inc(x_1792); -lean::dec(x_1787); -x_1795 = lean::cnstr_get(x_1740, 3); -lean::inc(x_1795); -lean::dec(x_1740); +x_1786 = lean::cnstr_get(x_1783, 0); +lean::inc(x_1786); +x_1788 = lean::cnstr_get(x_1783, 1); +lean::inc(x_1788); +lean::dec(x_1783); +x_1791 = lean::cnstr_get(x_1736, 3); +lean::inc(x_1791); +lean::dec(x_1736); lean::inc(x_1); -x_1799 = l_lean_elaborator_to__pexpr___main(x_1795, x_1, x_1792); -if (lean::obj_tag(x_1799) == 0) +x_1795 = l_lean_elaborator_to__pexpr___main(x_1791, x_1, x_1788); +if (lean::obj_tag(x_1795) == 0) { -obj* x_1807; obj* x_1810; -lean::dec(x_1769); -lean::dec(x_1768); +obj* x_1803; obj* x_1806; +lean::dec(x_1786); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); +lean::dec(x_1760); +lean::dec(x_1765); lean::dec(x_1764); -lean::dec(x_1790); -x_1807 = lean::cnstr_get(x_1799, 0); -lean::inc(x_1807); -lean::dec(x_1799); -if (lean::is_scalar(x_1789)) { - x_1810 = lean::alloc_cnstr(0, 1, 0); +x_1803 = lean::cnstr_get(x_1795, 0); +lean::inc(x_1803); +lean::dec(x_1795); +if (lean::is_scalar(x_1785)) { + x_1806 = lean::alloc_cnstr(0, 1, 0); } else { - x_1810 = x_1789; - lean::cnstr_set_tag(x_1789, 0); + x_1806 = x_1785; + lean::cnstr_set_tag(x_1785, 0); } -lean::cnstr_set(x_1810, 0, x_1807); -return x_1810; +lean::cnstr_set(x_1806, 0, x_1803); +return x_1806; } else { -obj* x_1812; obj* x_1815; obj* x_1817; obj* x_1820; uint8 x_1821; obj* x_1823; obj* x_1824; -lean::dec(x_1789); -x_1812 = lean::cnstr_get(x_1799, 0); -lean::inc(x_1812); -lean::dec(x_1799); -x_1815 = lean::cnstr_get(x_1812, 0); -lean::inc(x_1815); -x_1817 = lean::cnstr_get(x_1812, 1); -lean::inc(x_1817); -lean::dec(x_1812); -x_1820 = l_lean_elaborator_mangle__ident(x_1769); -x_1821 = lean::unbox(x_1764); -lean::dec(x_1764); -x_1823 = lean_expr_mk_lambda(x_1820, x_1821, x_1790, x_1815); -if (lean::is_scalar(x_1768)) { - x_1824 = lean::alloc_cnstr(0, 2, 0); +obj* x_1808; obj* x_1811; obj* x_1813; obj* x_1816; uint8 x_1817; obj* x_1819; obj* x_1820; +lean::dec(x_1785); +x_1808 = lean::cnstr_get(x_1795, 0); +lean::inc(x_1808); +lean::dec(x_1795); +x_1811 = lean::cnstr_get(x_1808, 0); +lean::inc(x_1811); +x_1813 = lean::cnstr_get(x_1808, 1); +lean::inc(x_1813); +lean::dec(x_1808); +x_1816 = l_lean_elaborator_mangle__ident(x_1765); +x_1817 = lean::unbox(x_1760); +lean::dec(x_1760); +x_1819 = lean_expr_mk_lambda(x_1816, x_1817, x_1786, x_1811); +if (lean::is_scalar(x_1764)) { + x_1820 = lean::alloc_cnstr(0, 2, 0); } else { - x_1824 = x_1768; + x_1820 = x_1764; } -lean::cnstr_set(x_1824, 0, x_1823); -lean::cnstr_set(x_1824, 1, x_1817); -x_14 = x_1824; +lean::cnstr_set(x_1820, 0, x_1819); +lean::cnstr_set(x_1820, 1, x_1813); +x_14 = x_1820; goto lbl_15; } } @@ -11605,111 +11597,111 @@ goto lbl_15; } else { -obj* x_1826; obj* x_1827; obj* x_1830; obj* x_1831; obj* x_1834; +obj* x_1822; obj* x_1823; obj* x_1826; obj* x_1827; obj* x_1830; lean::dec(x_9); -x_1826 = l_lean_parser_term_app_has__view; +x_1822 = l_lean_parser_term_app_has__view; +x_1823 = lean::cnstr_get(x_1822, 0); +lean::inc(x_1823); +lean::inc(x_0); +x_1826 = lean::apply_1(x_1823, x_0); x_1827 = lean::cnstr_get(x_1826, 0); lean::inc(x_1827); -lean::inc(x_0); -x_1830 = lean::apply_1(x_1827, x_0); -x_1831 = lean::cnstr_get(x_1830, 0); -lean::inc(x_1831); lean::inc(x_1); -x_1834 = l_lean_elaborator_to__pexpr___main(x_1831, x_1, x_2); -if (lean::obj_tag(x_1834) == 0) +x_1830 = l_lean_elaborator_to__pexpr___main(x_1827, x_1, x_2); +if (lean::obj_tag(x_1830) == 0) { -obj* x_1839; obj* x_1841; obj* x_1842; +obj* x_1835; obj* x_1837; obj* x_1838; +lean::dec(x_1826); lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_1830); -x_1839 = lean::cnstr_get(x_1834, 0); +x_1835 = lean::cnstr_get(x_1830, 0); +lean::inc(x_1835); +if (lean::is_shared(x_1830)) { + lean::dec(x_1830); + x_1837 = lean::box(0); +} else { + lean::cnstr_release(x_1830, 0); + x_1837 = x_1830; +} +if (lean::is_scalar(x_1837)) { + x_1838 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1838 = x_1837; +} +lean::cnstr_set(x_1838, 0, x_1835); +return x_1838; +} +else +{ +obj* x_1839; obj* x_1841; obj* x_1842; obj* x_1844; obj* x_1846; obj* x_1847; obj* x_1851; +x_1839 = lean::cnstr_get(x_1830, 0); lean::inc(x_1839); -if (lean::is_shared(x_1834)) { - lean::dec(x_1834); +if (lean::is_shared(x_1830)) { + lean::dec(x_1830); x_1841 = lean::box(0); } else { - lean::cnstr_release(x_1834, 0); - x_1841 = x_1834; + lean::cnstr_release(x_1830, 0); + x_1841 = x_1830; } -if (lean::is_scalar(x_1841)) { - x_1842 = lean::alloc_cnstr(0, 1, 0); +x_1842 = lean::cnstr_get(x_1839, 0); +lean::inc(x_1842); +x_1844 = lean::cnstr_get(x_1839, 1); +lean::inc(x_1844); +if (lean::is_shared(x_1839)) { + lean::dec(x_1839); + x_1846 = lean::box(0); } else { - x_1842 = x_1841; + lean::cnstr_release(x_1839, 0); + lean::cnstr_release(x_1839, 1); + x_1846 = x_1839; } -lean::cnstr_set(x_1842, 0, x_1839); -return x_1842; -} -else -{ -obj* x_1843; obj* x_1845; obj* x_1846; obj* x_1848; obj* x_1850; obj* x_1851; obj* x_1855; -x_1843 = lean::cnstr_get(x_1834, 0); -lean::inc(x_1843); -if (lean::is_shared(x_1834)) { - lean::dec(x_1834); - x_1845 = lean::box(0); -} else { - lean::cnstr_release(x_1834, 0); - x_1845 = x_1834; -} -x_1846 = lean::cnstr_get(x_1843, 0); -lean::inc(x_1846); -x_1848 = lean::cnstr_get(x_1843, 1); -lean::inc(x_1848); -if (lean::is_shared(x_1843)) { - lean::dec(x_1843); - x_1850 = lean::box(0); -} else { - lean::cnstr_release(x_1843, 0); - lean::cnstr_release(x_1843, 1); - x_1850 = x_1843; -} -x_1851 = lean::cnstr_get(x_1830, 1); -lean::inc(x_1851); -lean::dec(x_1830); +x_1847 = lean::cnstr_get(x_1826, 1); +lean::inc(x_1847); +lean::dec(x_1826); lean::inc(x_1); -x_1855 = l_lean_elaborator_to__pexpr___main(x_1851, x_1, x_1848); -if (lean::obj_tag(x_1855) == 0) +x_1851 = l_lean_elaborator_to__pexpr___main(x_1847, x_1, x_1844); +if (lean::obj_tag(x_1851) == 0) { -obj* x_1861; obj* x_1864; -lean::dec(x_1850); -lean::dec(x_1846); +obj* x_1857; obj* x_1860; lean::dec(x_7); +lean::dec(x_1846); lean::dec(x_1); lean::dec(x_0); -x_1861 = lean::cnstr_get(x_1855, 0); -lean::inc(x_1861); -lean::dec(x_1855); -if (lean::is_scalar(x_1845)) { - x_1864 = lean::alloc_cnstr(0, 1, 0); +lean::dec(x_1842); +x_1857 = lean::cnstr_get(x_1851, 0); +lean::inc(x_1857); +lean::dec(x_1851); +if (lean::is_scalar(x_1841)) { + x_1860 = lean::alloc_cnstr(0, 1, 0); } else { - x_1864 = x_1845; - lean::cnstr_set_tag(x_1845, 0); + x_1860 = x_1841; + lean::cnstr_set_tag(x_1841, 0); } -lean::cnstr_set(x_1864, 0, x_1861); -return x_1864; +lean::cnstr_set(x_1860, 0, x_1857); +return x_1860; } else { -obj* x_1866; obj* x_1869; obj* x_1871; obj* x_1874; obj* x_1875; -lean::dec(x_1845); -x_1866 = lean::cnstr_get(x_1855, 0); -lean::inc(x_1866); -lean::dec(x_1855); -x_1869 = lean::cnstr_get(x_1866, 0); -lean::inc(x_1869); -x_1871 = lean::cnstr_get(x_1866, 1); -lean::inc(x_1871); -lean::dec(x_1866); -x_1874 = lean_expr_mk_app(x_1846, x_1869); -if (lean::is_scalar(x_1850)) { - x_1875 = lean::alloc_cnstr(0, 2, 0); +obj* x_1862; obj* x_1865; obj* x_1867; obj* x_1870; obj* x_1871; +lean::dec(x_1841); +x_1862 = lean::cnstr_get(x_1851, 0); +lean::inc(x_1862); +lean::dec(x_1851); +x_1865 = lean::cnstr_get(x_1862, 0); +lean::inc(x_1865); +x_1867 = lean::cnstr_get(x_1862, 1); +lean::inc(x_1867); +lean::dec(x_1862); +x_1870 = lean_expr_mk_app(x_1842, x_1865); +if (lean::is_scalar(x_1846)) { + x_1871 = lean::alloc_cnstr(0, 2, 0); } else { - x_1875 = x_1850; + x_1871 = x_1846; } -lean::cnstr_set(x_1875, 0, x_1874); -lean::cnstr_set(x_1875, 1, x_1871); -x_14 = x_1875; +lean::cnstr_set(x_1871, 0, x_1870); +lean::cnstr_set(x_1871, 1, x_1867); +x_14 = x_1871; goto lbl_15; } } @@ -11717,174 +11709,171 @@ goto lbl_15; } else { -obj* x_1877; obj* x_1878; obj* x_1881; obj* x_1882; obj* x_1884; +obj* x_1873; obj* x_1874; obj* x_1877; obj* x_1878; obj* x_1880; lean::dec(x_9); -x_1877 = l_lean_parser_ident__univs_has__view; +x_1873 = l_lean_parser_ident__univs_has__view; +x_1874 = lean::cnstr_get(x_1873, 0); +lean::inc(x_1874); +lean::inc(x_0); +x_1877 = lean::apply_1(x_1874, x_0); x_1878 = lean::cnstr_get(x_1877, 0); lean::inc(x_1878); -lean::inc(x_0); -x_1881 = lean::apply_1(x_1878, x_0); -x_1882 = lean::cnstr_get(x_1881, 0); -lean::inc(x_1882); -x_1884 = lean::cnstr_get(x_1881, 1); -lean::inc(x_1884); -lean::dec(x_1881); -if (lean::obj_tag(x_1884) == 0) +x_1880 = lean::cnstr_get(x_1877, 1); +lean::inc(x_1880); +lean::dec(x_1877); +if (lean::obj_tag(x_1880) == 0) { -obj* x_1888; obj* x_1889; obj* x_1891; obj* x_1892; obj* x_1895; obj* x_1896; obj* x_1897; obj* x_1899; obj* x_1900; obj* x_1901; uint8 x_1902; -lean::inc(x_1882); -x_1888 = l_lean_elaborator_mangle__ident(x_1882); -x_1889 = lean::box(0); -lean::inc(x_1889); -x_1891 = lean_expr_mk_const(x_1888, x_1889); -x_1892 = lean::cnstr_get(x_1882, 3); +obj* x_1884; obj* x_1885; obj* x_1886; obj* x_1887; obj* x_1890; obj* x_1891; obj* x_1892; obj* x_1894; obj* x_1895; obj* x_1896; uint8 x_1897; +lean::inc(x_1878); +x_1884 = l_lean_elaborator_mangle__ident(x_1878); +x_1885 = lean::box(0); +x_1886 = lean_expr_mk_const(x_1884, x_1885); +x_1887 = lean::cnstr_get(x_1878, 3); +lean::inc(x_1887); +lean::dec(x_1878); +x_1890 = lean::mk_nat_obj(0u); +x_1891 = l_list_enum__from___main___rarg(x_1890, x_1887); +x_1892 = l_lean_elaborator_to__pexpr___main___closed__47; lean::inc(x_1892); -lean::dec(x_1882); -x_1895 = lean::mk_nat_obj(0u); -x_1896 = l_list_enum__from___main___rarg(x_1895, x_1892); -x_1897 = l_lean_elaborator_to__pexpr___main___closed__47; -lean::inc(x_1897); -x_1899 = l_list_foldl___main___at_lean_elaborator_to__pexpr___main___spec__22(x_1897, x_1896); -x_1900 = lean_expr_mk_mdata(x_1899, x_1891); -x_1901 = l_lean_elaborator_to__pexpr___main___closed__2; -x_1902 = lean_name_dec_eq(x_7, x_1901); +x_1894 = l_list_foldl___main___at_lean_elaborator_to__pexpr___main___spec__22(x_1892, x_1891); +x_1895 = lean_expr_mk_mdata(x_1894, x_1886); +x_1896 = l_lean_elaborator_to__pexpr___main___closed__2; +x_1897 = lean_name_dec_eq(x_7, x_1896); lean::dec(x_7); -if (x_1902 == 0) +if (x_1897 == 0) { -obj* x_1904; -x_1904 = l_lean_parser_syntax_get__pos(x_0); -if (lean::obj_tag(x_1904) == 0) +obj* x_1899; +x_1899 = l_lean_parser_syntax_get__pos(x_0); +if (lean::obj_tag(x_1899) == 0) { -obj* x_1907; obj* x_1908; +obj* x_1901; obj* x_1902; lean::dec(x_1); -lean::dec(x_1889); -x_1907 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1907, 0, x_1900); -lean::cnstr_set(x_1907, 1, x_2); -x_1908 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1908, 0, x_1907); -return x_1908; +x_1901 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1901, 0, x_1895); +lean::cnstr_set(x_1901, 1, x_2); +x_1902 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_1902, 0, x_1901); +return x_1902; } else { -obj* x_1909; obj* x_1912; obj* x_1915; obj* x_1918; obj* x_1919; obj* x_1921; obj* x_1923; obj* x_1924; obj* x_1927; obj* x_1929; obj* x_1930; obj* x_1931; obj* x_1932; -x_1909 = lean::cnstr_get(x_1904, 0); +obj* x_1903; obj* x_1906; obj* x_1909; obj* x_1912; obj* x_1913; obj* x_1915; obj* x_1917; obj* x_1918; obj* x_1921; obj* x_1923; obj* x_1924; obj* x_1925; obj* x_1926; +x_1903 = lean::cnstr_get(x_1899, 0); +lean::inc(x_1903); +lean::dec(x_1899); +x_1906 = lean::cnstr_get(x_1, 0); +lean::inc(x_1906); +lean::dec(x_1); +x_1909 = lean::cnstr_get(x_1906, 2); lean::inc(x_1909); -lean::dec(x_1904); -x_1912 = lean::cnstr_get(x_1, 0); -lean::inc(x_1912); -lean::dec(x_1); -x_1915 = lean::cnstr_get(x_1912, 2); +lean::dec(x_1906); +x_1912 = l_lean_file__map_to__position(x_1909, x_1903); +x_1913 = lean::cnstr_get(x_1912, 1); +lean::inc(x_1913); +x_1915 = l_lean_elaborator_to__pexpr___main___closed__3; lean::inc(x_1915); +x_1917 = l_lean_kvmap_set__nat(x_1885, x_1915, x_1913); +x_1918 = lean::cnstr_get(x_1912, 0); +lean::inc(x_1918); lean::dec(x_1912); -x_1918 = l_lean_file__map_to__position(x_1915, x_1909); -x_1919 = lean::cnstr_get(x_1918, 1); -lean::inc(x_1919); -x_1921 = l_lean_elaborator_to__pexpr___main___closed__3; +x_1921 = l_lean_elaborator_to__pexpr___main___closed__4; lean::inc(x_1921); -x_1923 = l_lean_kvmap_set__nat(x_1889, x_1921, x_1919); -x_1924 = lean::cnstr_get(x_1918, 0); -lean::inc(x_1924); -lean::dec(x_1918); -x_1927 = l_lean_elaborator_to__pexpr___main___closed__4; -lean::inc(x_1927); -x_1929 = l_lean_kvmap_set__nat(x_1923, x_1927, x_1924); -x_1930 = lean_expr_mk_mdata(x_1929, x_1900); -x_1931 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1931, 0, x_1930); -lean::cnstr_set(x_1931, 1, x_2); -x_1932 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1932, 0, x_1931); -return x_1932; +x_1923 = l_lean_kvmap_set__nat(x_1917, x_1921, x_1918); +x_1924 = lean_expr_mk_mdata(x_1923, x_1895); +x_1925 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1925, 0, x_1924); +lean::cnstr_set(x_1925, 1, x_2); +x_1926 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_1926, 0, x_1925); +return x_1926; } } else { -obj* x_1936; obj* x_1937; +obj* x_1929; obj* x_1930; lean::dec(x_1); lean::dec(x_0); -lean::dec(x_1889); -x_1936 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_1936, 0, x_1900); -lean::cnstr_set(x_1936, 1, x_2); -x_1937 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_1937, 0, x_1936); -return x_1937; +x_1929 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1929, 0, x_1895); +lean::cnstr_set(x_1929, 1, x_2); +x_1930 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_1930, 0, x_1929); +return x_1930; } } else { -obj* x_1938; obj* x_1941; obj* x_1945; -x_1938 = lean::cnstr_get(x_1884, 0); -lean::inc(x_1938); -lean::dec(x_1884); -x_1941 = lean::cnstr_get(x_1938, 1); -lean::inc(x_1941); -lean::dec(x_1938); +obj* x_1931; obj* x_1934; obj* x_1938; +x_1931 = lean::cnstr_get(x_1880, 0); +lean::inc(x_1931); +lean::dec(x_1880); +x_1934 = lean::cnstr_get(x_1931, 1); +lean::inc(x_1934); +lean::dec(x_1931); lean::inc(x_1); -x_1945 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__23(x_1941, x_1, x_2); -if (lean::obj_tag(x_1945) == 0) +x_1938 = l_list_mmap___main___at_lean_elaborator_to__pexpr___main___spec__23(x_1934, x_1, x_2); +if (lean::obj_tag(x_1938) == 0) { -obj* x_1950; obj* x_1952; obj* x_1953; +obj* x_1943; obj* x_1945; obj* x_1946; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_1882); -x_1950 = lean::cnstr_get(x_1945, 0); -lean::inc(x_1950); -if (lean::is_shared(x_1945)) { - lean::dec(x_1945); - x_1952 = lean::box(0); +lean::dec(x_1878); +x_1943 = lean::cnstr_get(x_1938, 0); +lean::inc(x_1943); +if (lean::is_shared(x_1938)) { + lean::dec(x_1938); + x_1945 = lean::box(0); } else { - lean::cnstr_release(x_1945, 0); - x_1952 = x_1945; + lean::cnstr_release(x_1938, 0); + x_1945 = x_1938; } -if (lean::is_scalar(x_1952)) { - x_1953 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_1945)) { + x_1946 = lean::alloc_cnstr(0, 1, 0); } else { - x_1953 = x_1952; + x_1946 = x_1945; } -lean::cnstr_set(x_1953, 0, x_1950); -return x_1953; +lean::cnstr_set(x_1946, 0, x_1943); +return x_1946; } else { -obj* x_1954; obj* x_1957; obj* x_1959; obj* x_1961; obj* x_1963; obj* x_1964; obj* x_1965; obj* x_1968; obj* x_1969; obj* x_1970; obj* x_1972; obj* x_1973; obj* x_1974; -x_1954 = lean::cnstr_get(x_1945, 0); -lean::inc(x_1954); -lean::dec(x_1945); -x_1957 = lean::cnstr_get(x_1954, 0); -lean::inc(x_1957); -x_1959 = lean::cnstr_get(x_1954, 1); -lean::inc(x_1959); -if (lean::is_shared(x_1954)) { - lean::dec(x_1954); - x_1961 = lean::box(0); +obj* x_1947; obj* x_1950; obj* x_1952; obj* x_1954; obj* x_1956; obj* x_1957; obj* x_1958; obj* x_1961; obj* x_1962; obj* x_1963; obj* x_1965; obj* x_1966; obj* x_1967; +x_1947 = lean::cnstr_get(x_1938, 0); +lean::inc(x_1947); +lean::dec(x_1938); +x_1950 = lean::cnstr_get(x_1947, 0); +lean::inc(x_1950); +x_1952 = lean::cnstr_get(x_1947, 1); +lean::inc(x_1952); +if (lean::is_shared(x_1947)) { + lean::dec(x_1947); + x_1954 = lean::box(0); } else { - lean::cnstr_release(x_1954, 0); - lean::cnstr_release(x_1954, 1); - x_1961 = x_1954; + lean::cnstr_release(x_1947, 0); + lean::cnstr_release(x_1947, 1); + x_1954 = x_1947; } -lean::inc(x_1882); -x_1963 = l_lean_elaborator_mangle__ident(x_1882); -x_1964 = lean_expr_mk_const(x_1963, x_1957); -x_1965 = lean::cnstr_get(x_1882, 3); -lean::inc(x_1965); -lean::dec(x_1882); -x_1968 = lean::mk_nat_obj(0u); -x_1969 = l_list_enum__from___main___rarg(x_1968, x_1965); -x_1970 = l_lean_elaborator_to__pexpr___main___closed__47; -lean::inc(x_1970); -x_1972 = l_list_foldl___main___at_lean_elaborator_to__pexpr___main___spec__24(x_1970, x_1969); -x_1973 = lean_expr_mk_mdata(x_1972, x_1964); -if (lean::is_scalar(x_1961)) { - x_1974 = lean::alloc_cnstr(0, 2, 0); +lean::inc(x_1878); +x_1956 = l_lean_elaborator_mangle__ident(x_1878); +x_1957 = lean_expr_mk_const(x_1956, x_1950); +x_1958 = lean::cnstr_get(x_1878, 3); +lean::inc(x_1958); +lean::dec(x_1878); +x_1961 = lean::mk_nat_obj(0u); +x_1962 = l_list_enum__from___main___rarg(x_1961, x_1958); +x_1963 = l_lean_elaborator_to__pexpr___main___closed__47; +lean::inc(x_1963); +x_1965 = l_list_foldl___main___at_lean_elaborator_to__pexpr___main___spec__24(x_1963, x_1962); +x_1966 = lean_expr_mk_mdata(x_1965, x_1957); +if (lean::is_scalar(x_1954)) { + x_1967 = lean::alloc_cnstr(0, 2, 0); } else { - x_1974 = x_1961; + x_1967 = x_1954; } -lean::cnstr_set(x_1974, 0, x_1973); -lean::cnstr_set(x_1974, 1, x_1959); -x_14 = x_1974; +lean::cnstr_set(x_1967, 0, x_1966); +lean::cnstr_set(x_1967, 1, x_1952); +x_14 = x_1967; goto lbl_15; } } @@ -11893,342 +11882,342 @@ lbl_13: { if (lean::obj_tag(x_12) == 0) { -obj* x_1978; obj* x_1980; obj* x_1981; +obj* x_1971; obj* x_1973; obj* x_1974; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_1978 = lean::cnstr_get(x_12, 0); +x_1971 = lean::cnstr_get(x_12, 0); +lean::inc(x_1971); +if (lean::is_shared(x_12)) { + lean::dec(x_12); + x_1973 = lean::box(0); +} else { + lean::cnstr_release(x_12, 0); + x_1973 = x_12; +} +if (lean::is_scalar(x_1973)) { + x_1974 = lean::alloc_cnstr(0, 1, 0); +} else { + x_1974 = x_1973; +} +lean::cnstr_set(x_1974, 0, x_1971); +return x_1974; +} +else +{ +obj* x_1975; obj* x_1977; obj* x_1978; obj* x_1980; obj* x_1982; obj* x_1983; uint8 x_1984; +x_1975 = lean::cnstr_get(x_12, 0); +lean::inc(x_1975); +if (lean::is_shared(x_12)) { + lean::dec(x_12); + x_1977 = lean::box(0); +} else { + lean::cnstr_release(x_12, 0); + x_1977 = x_12; +} +x_1978 = lean::cnstr_get(x_1975, 0); lean::inc(x_1978); -if (lean::is_shared(x_12)) { - lean::dec(x_12); - x_1980 = lean::box(0); +x_1980 = lean::cnstr_get(x_1975, 1); +lean::inc(x_1980); +if (lean::is_shared(x_1975)) { + lean::dec(x_1975); + x_1982 = lean::box(0); } else { - lean::cnstr_release(x_12, 0); - x_1980 = x_12; + lean::cnstr_release(x_1975, 0); + lean::cnstr_release(x_1975, 1); + x_1982 = x_1975; } -if (lean::is_scalar(x_1980)) { - x_1981 = lean::alloc_cnstr(0, 1, 0); -} else { - x_1981 = x_1980; -} -lean::cnstr_set(x_1981, 0, x_1978); -return x_1981; -} -else -{ -obj* x_1982; obj* x_1984; obj* x_1985; obj* x_1987; obj* x_1989; obj* x_1990; uint8 x_1991; -x_1982 = lean::cnstr_get(x_12, 0); -lean::inc(x_1982); -if (lean::is_shared(x_12)) { - lean::dec(x_12); - x_1984 = lean::box(0); -} else { - lean::cnstr_release(x_12, 0); - x_1984 = x_12; -} -x_1985 = lean::cnstr_get(x_1982, 0); -lean::inc(x_1985); -x_1987 = lean::cnstr_get(x_1982, 1); -lean::inc(x_1987); -if (lean::is_shared(x_1982)) { - lean::dec(x_1982); - x_1989 = lean::box(0); -} else { - lean::cnstr_release(x_1982, 0); - lean::cnstr_release(x_1982, 1); - x_1989 = x_1982; -} -x_1990 = l_lean_elaborator_to__pexpr___main___closed__2; -x_1991 = lean_name_dec_eq(x_7, x_1990); +x_1983 = l_lean_elaborator_to__pexpr___main___closed__2; +x_1984 = lean_name_dec_eq(x_7, x_1983); lean::dec(x_7); -if (x_1991 == 0) +if (x_1984 == 0) { -obj* x_1993; -x_1993 = l_lean_parser_syntax_get__pos(x_0); -if (lean::obj_tag(x_1993) == 0) +obj* x_1986; +x_1986 = l_lean_parser_syntax_get__pos(x_0); +if (lean::obj_tag(x_1986) == 0) { -obj* x_1995; obj* x_1996; +obj* x_1988; obj* x_1989; lean::dec(x_1); -if (lean::is_scalar(x_1989)) { - x_1995 = lean::alloc_cnstr(0, 2, 0); +if (lean::is_scalar(x_1982)) { + x_1988 = lean::alloc_cnstr(0, 2, 0); } else { - x_1995 = x_1989; + x_1988 = x_1982; } -lean::cnstr_set(x_1995, 0, x_1985); -lean::cnstr_set(x_1995, 1, x_1987); -if (lean::is_scalar(x_1984)) { - x_1996 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_1988, 0, x_1978); +lean::cnstr_set(x_1988, 1, x_1980); +if (lean::is_scalar(x_1977)) { + x_1989 = lean::alloc_cnstr(1, 1, 0); } else { - x_1996 = x_1984; + x_1989 = x_1977; } -lean::cnstr_set(x_1996, 0, x_1995); -return x_1996; +lean::cnstr_set(x_1989, 0, x_1988); +return x_1989; } else { -obj* x_1997; obj* x_2000; obj* x_2003; obj* x_2006; obj* x_2007; obj* x_2008; obj* x_2010; obj* x_2012; obj* x_2013; obj* x_2016; obj* x_2018; obj* x_2019; obj* x_2020; obj* x_2021; -x_1997 = lean::cnstr_get(x_1993, 0); -lean::inc(x_1997); +obj* x_1990; obj* x_1993; obj* x_1996; obj* x_1999; obj* x_2000; obj* x_2001; obj* x_2003; obj* x_2005; obj* x_2006; obj* x_2009; obj* x_2011; obj* x_2012; obj* x_2013; obj* x_2014; +x_1990 = lean::cnstr_get(x_1986, 0); +lean::inc(x_1990); +lean::dec(x_1986); +x_1993 = lean::cnstr_get(x_1, 0); +lean::inc(x_1993); +lean::dec(x_1); +x_1996 = lean::cnstr_get(x_1993, 2); +lean::inc(x_1996); lean::dec(x_1993); -x_2000 = lean::cnstr_get(x_1, 0); -lean::inc(x_2000); -lean::dec(x_1); -x_2003 = lean::cnstr_get(x_2000, 2); +x_1999 = l_lean_file__map_to__position(x_1996, x_1990); +x_2000 = lean::box(0); +x_2001 = lean::cnstr_get(x_1999, 1); +lean::inc(x_2001); +x_2003 = l_lean_elaborator_to__pexpr___main___closed__3; lean::inc(x_2003); -lean::dec(x_2000); -x_2006 = l_lean_file__map_to__position(x_2003, x_1997); -x_2007 = lean::box(0); -x_2008 = lean::cnstr_get(x_2006, 1); -lean::inc(x_2008); -x_2010 = l_lean_elaborator_to__pexpr___main___closed__3; -lean::inc(x_2010); -x_2012 = l_lean_kvmap_set__nat(x_2007, x_2010, x_2008); -x_2013 = lean::cnstr_get(x_2006, 0); -lean::inc(x_2013); -lean::dec(x_2006); -x_2016 = l_lean_elaborator_to__pexpr___main___closed__4; -lean::inc(x_2016); -x_2018 = l_lean_kvmap_set__nat(x_2012, x_2016, x_2013); -x_2019 = lean_expr_mk_mdata(x_2018, x_1985); -if (lean::is_scalar(x_1989)) { - x_2020 = lean::alloc_cnstr(0, 2, 0); +x_2005 = l_lean_kvmap_set__nat(x_2000, x_2003, x_2001); +x_2006 = lean::cnstr_get(x_1999, 0); +lean::inc(x_2006); +lean::dec(x_1999); +x_2009 = l_lean_elaborator_to__pexpr___main___closed__4; +lean::inc(x_2009); +x_2011 = l_lean_kvmap_set__nat(x_2005, x_2009, x_2006); +x_2012 = lean_expr_mk_mdata(x_2011, x_1978); +if (lean::is_scalar(x_1982)) { + x_2013 = lean::alloc_cnstr(0, 2, 0); } else { - x_2020 = x_1989; + x_2013 = x_1982; } -lean::cnstr_set(x_2020, 0, x_2019); -lean::cnstr_set(x_2020, 1, x_1987); -if (lean::is_scalar(x_1984)) { - x_2021 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_2013, 0, x_2012); +lean::cnstr_set(x_2013, 1, x_1980); +if (lean::is_scalar(x_1977)) { + x_2014 = lean::alloc_cnstr(1, 1, 0); } else { - x_2021 = x_1984; + x_2014 = x_1977; } -lean::cnstr_set(x_2021, 0, x_2020); -return x_2021; +lean::cnstr_set(x_2014, 0, x_2013); +return x_2014; } } else { -obj* x_2024; obj* x_2025; +obj* x_2017; obj* x_2018; lean::dec(x_1); lean::dec(x_0); -if (lean::is_scalar(x_1989)) { - x_2024 = lean::alloc_cnstr(0, 2, 0); +if (lean::is_scalar(x_1982)) { + x_2017 = lean::alloc_cnstr(0, 2, 0); } else { - x_2024 = x_1989; + x_2017 = x_1982; } -lean::cnstr_set(x_2024, 0, x_1985); -lean::cnstr_set(x_2024, 1, x_1987); -if (lean::is_scalar(x_1984)) { - x_2025 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_2017, 0, x_1978); +lean::cnstr_set(x_2017, 1, x_1980); +if (lean::is_scalar(x_1977)) { + x_2018 = lean::alloc_cnstr(1, 1, 0); } else { - x_2025 = x_1984; + x_2018 = x_1977; } -lean::cnstr_set(x_2025, 0, x_2024); -return x_2025; +lean::cnstr_set(x_2018, 0, x_2017); +return x_2018; } } } lbl_15: { -obj* x_2026; obj* x_2028; obj* x_2030; obj* x_2031; uint8 x_2032; -x_2026 = lean::cnstr_get(x_14, 0); -lean::inc(x_2026); -x_2028 = lean::cnstr_get(x_14, 1); -lean::inc(x_2028); +obj* x_2019; obj* x_2021; obj* x_2023; obj* x_2024; uint8 x_2025; +x_2019 = lean::cnstr_get(x_14, 0); +lean::inc(x_2019); +x_2021 = lean::cnstr_get(x_14, 1); +lean::inc(x_2021); if (lean::is_shared(x_14)) { lean::dec(x_14); - x_2030 = lean::box(0); + x_2023 = lean::box(0); } else { lean::cnstr_release(x_14, 0); lean::cnstr_release(x_14, 1); - x_2030 = x_14; + x_2023 = x_14; } -x_2031 = l_lean_elaborator_to__pexpr___main___closed__2; -x_2032 = lean_name_dec_eq(x_7, x_2031); +x_2024 = l_lean_elaborator_to__pexpr___main___closed__2; +x_2025 = lean_name_dec_eq(x_7, x_2024); lean::dec(x_7); -if (x_2032 == 0) +if (x_2025 == 0) { -obj* x_2034; -x_2034 = l_lean_parser_syntax_get__pos(x_0); -if (lean::obj_tag(x_2034) == 0) +obj* x_2027; +x_2027 = l_lean_parser_syntax_get__pos(x_0); +if (lean::obj_tag(x_2027) == 0) { -obj* x_2036; obj* x_2037; +obj* x_2029; obj* x_2030; lean::dec(x_1); -if (lean::is_scalar(x_2030)) { - x_2036 = lean::alloc_cnstr(0, 2, 0); +if (lean::is_scalar(x_2023)) { + x_2029 = lean::alloc_cnstr(0, 2, 0); } else { - x_2036 = x_2030; + x_2029 = x_2023; } -lean::cnstr_set(x_2036, 0, x_2026); -lean::cnstr_set(x_2036, 1, x_2028); -x_2037 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2037, 0, x_2036); -return x_2037; +lean::cnstr_set(x_2029, 0, x_2019); +lean::cnstr_set(x_2029, 1, x_2021); +x_2030 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_2030, 0, x_2029); +return x_2030; } else { -obj* x_2038; obj* x_2041; obj* x_2044; obj* x_2047; obj* x_2048; obj* x_2049; obj* x_2051; obj* x_2053; obj* x_2054; obj* x_2057; obj* x_2059; obj* x_2060; obj* x_2061; obj* x_2062; -x_2038 = lean::cnstr_get(x_2034, 0); -lean::inc(x_2038); +obj* x_2031; obj* x_2034; obj* x_2037; obj* x_2040; obj* x_2041; obj* x_2042; obj* x_2044; obj* x_2046; obj* x_2047; obj* x_2050; obj* x_2052; obj* x_2053; obj* x_2054; obj* x_2055; +x_2031 = lean::cnstr_get(x_2027, 0); +lean::inc(x_2031); +lean::dec(x_2027); +x_2034 = lean::cnstr_get(x_1, 0); +lean::inc(x_2034); +lean::dec(x_1); +x_2037 = lean::cnstr_get(x_2034, 2); +lean::inc(x_2037); lean::dec(x_2034); -x_2041 = lean::cnstr_get(x_1, 0); -lean::inc(x_2041); -lean::dec(x_1); -x_2044 = lean::cnstr_get(x_2041, 2); +x_2040 = l_lean_file__map_to__position(x_2037, x_2031); +x_2041 = lean::box(0); +x_2042 = lean::cnstr_get(x_2040, 1); +lean::inc(x_2042); +x_2044 = l_lean_elaborator_to__pexpr___main___closed__3; lean::inc(x_2044); -lean::dec(x_2041); -x_2047 = l_lean_file__map_to__position(x_2044, x_2038); -x_2048 = lean::box(0); -x_2049 = lean::cnstr_get(x_2047, 1); -lean::inc(x_2049); -x_2051 = l_lean_elaborator_to__pexpr___main___closed__3; -lean::inc(x_2051); -x_2053 = l_lean_kvmap_set__nat(x_2048, x_2051, x_2049); -x_2054 = lean::cnstr_get(x_2047, 0); -lean::inc(x_2054); -lean::dec(x_2047); -x_2057 = l_lean_elaborator_to__pexpr___main___closed__4; -lean::inc(x_2057); -x_2059 = l_lean_kvmap_set__nat(x_2053, x_2057, x_2054); -x_2060 = lean_expr_mk_mdata(x_2059, x_2026); -if (lean::is_scalar(x_2030)) { - x_2061 = lean::alloc_cnstr(0, 2, 0); +x_2046 = l_lean_kvmap_set__nat(x_2041, x_2044, x_2042); +x_2047 = lean::cnstr_get(x_2040, 0); +lean::inc(x_2047); +lean::dec(x_2040); +x_2050 = l_lean_elaborator_to__pexpr___main___closed__4; +lean::inc(x_2050); +x_2052 = l_lean_kvmap_set__nat(x_2046, x_2050, x_2047); +x_2053 = lean_expr_mk_mdata(x_2052, x_2019); +if (lean::is_scalar(x_2023)) { + x_2054 = lean::alloc_cnstr(0, 2, 0); } else { - x_2061 = x_2030; + x_2054 = x_2023; } -lean::cnstr_set(x_2061, 0, x_2060); -lean::cnstr_set(x_2061, 1, x_2028); -x_2062 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2062, 0, x_2061); -return x_2062; +lean::cnstr_set(x_2054, 0, x_2053); +lean::cnstr_set(x_2054, 1, x_2021); +x_2055 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_2055, 0, x_2054); +return x_2055; } } else { -obj* x_2065; obj* x_2066; +obj* x_2058; obj* x_2059; lean::dec(x_1); lean::dec(x_0); -if (lean::is_scalar(x_2030)) { - x_2065 = lean::alloc_cnstr(0, 2, 0); +if (lean::is_scalar(x_2023)) { + x_2058 = lean::alloc_cnstr(0, 2, 0); } else { - x_2065 = x_2030; + x_2058 = x_2023; } -lean::cnstr_set(x_2065, 0, x_2026); -lean::cnstr_set(x_2065, 1, x_2028); -x_2066 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_2066, 0, x_2065); -return x_2066; +lean::cnstr_set(x_2058, 0, x_2019); +lean::cnstr_set(x_2058, 1, x_2021); +x_2059 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_2059, 0, x_2058); +return x_2059; } } lbl_17: { -obj* x_2067; obj* x_2069; obj* x_2071; -x_2067 = lean::cnstr_get(x_16, 0); -lean::inc(x_2067); -x_2069 = lean::cnstr_get(x_16, 1); -lean::inc(x_2069); +obj* x_2060; obj* x_2062; obj* x_2064; +x_2060 = lean::cnstr_get(x_16, 0); +lean::inc(x_2060); +x_2062 = lean::cnstr_get(x_16, 1); +lean::inc(x_2062); if (lean::is_shared(x_16)) { lean::dec(x_16); - x_2071 = lean::box(0); + x_2064 = lean::box(0); } else { lean::cnstr_release(x_16, 0); lean::cnstr_release(x_16, 1); - x_2071 = x_16; + x_2064 = x_16; } -if (lean::obj_tag(x_2067) == 0) +if (lean::obj_tag(x_2060) == 0) { -obj* x_2074; obj* x_2078; +obj* x_2067; obj* x_2071; lean::dec(x_9); -lean::dec(x_2071); -x_2074 = l_lean_elaborator_to__pexpr___main___closed__5; +lean::dec(x_2064); +x_2067 = l_lean_elaborator_to__pexpr___main___closed__5; lean::inc(x_1); -lean::inc(x_2074); +lean::inc(x_2067); lean::inc(x_0); -x_2078 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_2074, x_1, x_2069); -if (lean::obj_tag(x_2078) == 0) +x_2071 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_2067, x_1, x_2062); +if (lean::obj_tag(x_2071) == 0) { -obj* x_2082; obj* x_2084; obj* x_2085; +obj* x_2075; obj* x_2077; obj* x_2078; lean::dec(x_7); lean::dec(x_1); lean::dec(x_0); -x_2082 = lean::cnstr_get(x_2078, 0); -lean::inc(x_2082); -if (lean::is_shared(x_2078)) { - lean::dec(x_2078); - x_2084 = lean::box(0); +x_2075 = lean::cnstr_get(x_2071, 0); +lean::inc(x_2075); +if (lean::is_shared(x_2071)) { + lean::dec(x_2071); + x_2077 = lean::box(0); } else { - lean::cnstr_release(x_2078, 0); - x_2084 = x_2078; + lean::cnstr_release(x_2071, 0); + x_2077 = x_2071; } -if (lean::is_scalar(x_2084)) { - x_2085 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_2077)) { + x_2078 = lean::alloc_cnstr(0, 1, 0); } else { - x_2085 = x_2084; + x_2078 = x_2077; } -lean::cnstr_set(x_2085, 0, x_2082); -return x_2085; +lean::cnstr_set(x_2078, 0, x_2075); +return x_2078; } else { -obj* x_2086; -x_2086 = lean::cnstr_get(x_2078, 0); -lean::inc(x_2086); -lean::dec(x_2078); -x_14 = x_2086; +obj* x_2079; +x_2079 = lean::cnstr_get(x_2071, 0); +lean::inc(x_2079); +lean::dec(x_2071); +x_14 = x_2079; goto lbl_15; } } else { -obj* x_2089; obj* x_2091; obj* x_2094; obj* x_2095; obj* x_2096; obj* x_2097; obj* x_2099; obj* x_2100; obj* x_2101; obj* x_2102; obj* x_2103; -x_2089 = lean::cnstr_get(x_2067, 0); -lean::inc(x_2089); -x_2091 = lean::cnstr_get(x_2067, 1); -lean::inc(x_2091); -lean::dec(x_2067); -x_2094 = lean::box(0); -x_2095 = lean::mk_nat_obj(0u); -x_2096 = l_list_length__aux___main___rarg(x_9, x_2095); -x_2097 = l_lean_elaborator_to__pexpr___main___closed__6; -lean::inc(x_2097); -x_2099 = l_lean_kvmap_set__nat(x_2094, x_2097, x_2096); -x_2100 = l_list_reverse___rarg(x_2091); -x_2101 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__1(x_2089, x_2100); -x_2102 = lean_expr_mk_mdata(x_2099, x_2101); -if (lean::is_scalar(x_2071)) { - x_2103 = lean::alloc_cnstr(0, 2, 0); +obj* x_2082; obj* x_2084; obj* x_2087; obj* x_2088; obj* x_2089; obj* x_2090; obj* x_2092; obj* x_2093; obj* x_2094; obj* x_2095; obj* x_2096; +x_2082 = lean::cnstr_get(x_2060, 0); +lean::inc(x_2082); +x_2084 = lean::cnstr_get(x_2060, 1); +lean::inc(x_2084); +lean::dec(x_2060); +x_2087 = lean::box(0); +x_2088 = lean::mk_nat_obj(0u); +x_2089 = l_list_length__aux___main___rarg(x_9, x_2088); +x_2090 = l_lean_elaborator_to__pexpr___main___closed__6; +lean::inc(x_2090); +x_2092 = l_lean_kvmap_set__nat(x_2087, x_2090, x_2089); +x_2093 = l_list_reverse___rarg(x_2084); +x_2094 = l_list_foldr___main___at_lean_elaborator_to__pexpr___main___spec__1(x_2082, x_2093); +x_2095 = lean_expr_mk_mdata(x_2092, x_2094); +if (lean::is_scalar(x_2064)) { + x_2096 = lean::alloc_cnstr(0, 2, 0); } else { - x_2103 = x_2071; + x_2096 = x_2064; } -lean::cnstr_set(x_2103, 0, x_2102); -lean::cnstr_set(x_2103, 1, x_2069); -x_14 = x_2103; +lean::cnstr_set(x_2096, 0, x_2095); +lean::cnstr_set(x_2096, 1, x_2062); +x_14 = x_2096; goto lbl_15; } } } default: { -obj* x_2104; -x_2104 = lean::box(0); -x_3 = x_2104; +obj* x_2097; +x_2097 = lean::box(0); +x_3 = x_2097; goto lbl_4; } } lbl_4: { -obj* x_2107; obj* x_2108; obj* x_2109; obj* x_2110; obj* x_2112; obj* x_2114; +obj* x_2100; obj* x_2101; obj* x_2102; obj* x_2103; obj* x_2105; obj* x_2107; lean::dec(x_3); lean::inc(x_0); -x_2107 = l_lean_parser_syntax_to__format___main(x_0); -x_2108 = lean::mk_nat_obj(80u); -x_2109 = l_lean_format_pretty(x_2107, x_2108); -x_2110 = l_lean_elaborator_to__pexpr___main___closed__1; -lean::inc(x_2110); -x_2112 = lean::string_append(x_2110, x_2109); -lean::dec(x_2109); -x_2114 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_2112, x_1, x_2); -return x_2114; +x_2100 = l_lean_parser_syntax_to__format___main(x_0); +x_2101 = lean::mk_nat_obj(80u); +x_2102 = l_lean_format_pretty(x_2100, x_2101); +x_2103 = l_lean_elaborator_to__pexpr___main___closed__1; +lean::inc(x_2103); +x_2105 = lean::string_append(x_2103, x_2102); +lean::dec(x_2102); +x_2107 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_2105, x_1, x_2); +return x_2107; } } } @@ -12550,15 +12539,14 @@ return x_21; obj* _init_l_lean_elaborator_ordered__rbmap_empty___at_lean_elaborator_old__elab__command___spec__6() { _start: { -obj* x_0; obj* x_1; obj* x_3; +obj* x_0; obj* x_1; obj* x_2; x_0 = lean::box(0); x_1 = lean::mk_nat_obj(0u); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_0); -lean::cnstr_set(x_3, 1, x_0); -lean::cnstr_set(x_3, 2, x_1); -return x_3; +x_2 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_2, 0, x_0); +lean::cnstr_set(x_2, 1, x_0); +lean::cnstr_set(x_2, 2, x_1); +return x_2; } } obj* l_list_foldl___main___at_lean_elaborator_old__elab__command___spec__7(obj* x_0, obj* x_1) { @@ -12873,15 +12861,14 @@ return x_21; obj* _init_l_lean_elaborator_ordered__rbmap_empty___at_lean_elaborator_old__elab__command___spec__13() { _start: { -obj* x_0; obj* x_1; obj* x_3; +obj* x_0; obj* x_1; obj* x_2; x_0 = lean::box(0); x_1 = lean::mk_nat_obj(0u); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_0); -lean::cnstr_set(x_3, 1, x_0); -lean::cnstr_set(x_3, 2, x_1); -return x_3; +x_2 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_2, 0, x_0); +lean::cnstr_set(x_2, 1, x_0); +lean::cnstr_set(x_2, 2, x_1); +return x_2; } } obj* l_list_foldl___main___at_lean_elaborator_old__elab__command___spec__14(obj* x_0, obj* x_1) { @@ -13894,27 +13881,25 @@ return x_2; obj* _init_l_lean_elaborator_decl__modifiers__to__pexpr___closed__3() { _start: { -obj* x_0; obj* x_1; obj* x_3; uint8 x_4; obj* x_5; +obj* x_0; obj* x_1; obj* x_2; uint8 x_3; obj* x_4; x_0 = lean::box(0); x_1 = lean::mk_string("private"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = 1; -x_5 = l_lean_kvmap_set__bool(x_0, x_3, x_4); -return x_5; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = 1; +x_4 = l_lean_kvmap_set__bool(x_0, x_2, x_3); +return x_4; } } obj* _init_l_lean_elaborator_decl__modifiers__to__pexpr___closed__4() { _start: { -obj* x_0; obj* x_1; obj* x_3; uint8 x_4; obj* x_5; +obj* x_0; obj* x_1; obj* x_2; uint8 x_3; obj* x_4; x_0 = lean::box(0); x_1 = lean::mk_string("protected"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = 1; -x_5 = l_lean_kvmap_set__bool(x_0, x_3, x_4); -return x_5; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = 1; +x_4 = l_lean_kvmap_set__bool(x_0, x_2, x_3); +return x_4; } } obj* _init_l_lean_elaborator_decl__modifiers__to__pexpr___closed__5() { @@ -14042,7 +14027,7 @@ goto lbl_18; } else { -obj* x_43; obj* x_46; obj* x_49; obj* x_52; +obj* x_43; obj* x_46; obj* x_49; obj* x_51; x_43 = lean::cnstr_get(x_31, 0); lean::inc(x_43); lean::dec(x_31); @@ -14051,39 +14036,38 @@ lean::inc(x_46); lean::dec(x_43); x_49 = l_lean_elaborator_decl__modifiers__to__pexpr___closed__5; lean::inc(x_49); -lean::inc(x_3); -x_52 = l_lean_kvmap_set__string(x_3, x_49, x_46); +x_51 = l_lean_kvmap_set__string(x_3, x_49, x_46); if (lean::obj_tag(x_6) == 0) { -x_17 = x_52; +x_17 = x_51; goto lbl_18; } else { -obj* x_53; -x_53 = lean::cnstr_get(x_6, 0); -lean::inc(x_53); +obj* x_52; +x_52 = lean::cnstr_get(x_6, 0); +lean::inc(x_52); lean::dec(x_6); -if (lean::obj_tag(x_53) == 0) +if (lean::obj_tag(x_52) == 0) { -obj* x_57; uint8 x_58; obj* x_60; -lean::dec(x_53); -x_57 = l_lean_elaborator_decl__modifiers__to__pexpr___closed__6; -x_58 = 1; -lean::inc(x_57); -x_60 = l_lean_kvmap_set__bool(x_52, x_57, x_58); -x_17 = x_60; +obj* x_56; uint8 x_57; obj* x_59; +lean::dec(x_52); +x_56 = l_lean_elaborator_decl__modifiers__to__pexpr___closed__6; +x_57 = 1; +lean::inc(x_56); +x_59 = l_lean_kvmap_set__bool(x_51, x_56, x_57); +x_17 = x_59; goto lbl_18; } else { -obj* x_62; uint8 x_63; obj* x_65; -lean::dec(x_53); -x_62 = l_lean_elaborator_decl__modifiers__to__pexpr___closed__7; -x_63 = 1; -lean::inc(x_62); -x_65 = l_lean_kvmap_set__bool(x_52, x_62, x_63); -x_17 = x_65; +obj* x_61; uint8 x_62; obj* x_64; +lean::dec(x_52); +x_61 = l_lean_elaborator_decl__modifiers__to__pexpr___closed__7; +x_62 = 1; +lean::inc(x_61); +x_64 = l_lean_kvmap_set__bool(x_51, x_61, x_62); +x_17 = x_64; goto lbl_18; } } @@ -14091,150 +14075,149 @@ goto lbl_18; } lbl_18: { -obj* x_66; obj* x_68; obj* x_69; obj* x_71; -x_66 = l_lean_elaborator_decl__modifiers__to__pexpr___closed__1; -lean::inc(x_66); -x_68 = l_lean_kvmap_set__bool(x_17, x_66, x_10); -x_69 = l_lean_elaborator_decl__modifiers__to__pexpr___closed__2; -lean::inc(x_69); -x_71 = l_lean_kvmap_set__bool(x_68, x_69, x_13); +obj* x_65; obj* x_67; obj* x_68; obj* x_70; +x_65 = l_lean_elaborator_decl__modifiers__to__pexpr___closed__1; +lean::inc(x_65); +x_67 = l_lean_kvmap_set__bool(x_17, x_65, x_10); +x_68 = l_lean_elaborator_decl__modifiers__to__pexpr___closed__2; +lean::inc(x_68); +x_70 = l_lean_kvmap_set__bool(x_67, x_68, x_13); if (lean::obj_tag(x_14) == 0) { -obj* x_72; -x_72 = l_lean_elaborator_attrs__to__pexpr(x_3, x_1, x_2); -if (lean::obj_tag(x_72) == 0) +obj* x_71; +x_71 = l_lean_elaborator_attrs__to__pexpr(x_3, x_1, x_2); +if (lean::obj_tag(x_71) == 0) { -obj* x_74; obj* x_76; obj* x_77; -lean::dec(x_71); -x_74 = lean::cnstr_get(x_72, 0); -lean::inc(x_74); -if (lean::is_shared(x_72)) { - lean::dec(x_72); - x_76 = lean::box(0); +obj* x_73; obj* x_75; obj* x_76; +lean::dec(x_70); +x_73 = lean::cnstr_get(x_71, 0); +lean::inc(x_73); +if (lean::is_shared(x_71)) { + lean::dec(x_71); + x_75 = lean::box(0); } else { - lean::cnstr_release(x_72, 0); - x_76 = x_72; + lean::cnstr_release(x_71, 0); + x_75 = x_71; } -if (lean::is_scalar(x_76)) { - x_77 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_75)) { + x_76 = lean::alloc_cnstr(0, 1, 0); } else { - x_77 = x_76; + x_76 = x_75; } -lean::cnstr_set(x_77, 0, x_74); -return x_77; +lean::cnstr_set(x_76, 0, x_73); +return x_76; } else { -obj* x_78; obj* x_80; obj* x_81; obj* x_83; obj* x_85; obj* x_86; obj* x_87; obj* x_88; -x_78 = lean::cnstr_get(x_72, 0); -lean::inc(x_78); -if (lean::is_shared(x_72)) { - lean::dec(x_72); - x_80 = lean::box(0); +obj* x_77; obj* x_79; obj* x_80; obj* x_82; obj* x_84; obj* x_85; obj* x_86; obj* x_87; +x_77 = lean::cnstr_get(x_71, 0); +lean::inc(x_77); +if (lean::is_shared(x_71)) { + lean::dec(x_71); + x_79 = lean::box(0); } else { - lean::cnstr_release(x_72, 0); - x_80 = x_72; + lean::cnstr_release(x_71, 0); + x_79 = x_71; } -x_81 = lean::cnstr_get(x_78, 0); -lean::inc(x_81); -x_83 = lean::cnstr_get(x_78, 1); -lean::inc(x_83); -if (lean::is_shared(x_78)) { - lean::dec(x_78); - x_85 = lean::box(0); +x_80 = lean::cnstr_get(x_77, 0); +lean::inc(x_80); +x_82 = lean::cnstr_get(x_77, 1); +lean::inc(x_82); +if (lean::is_shared(x_77)) { + lean::dec(x_77); + x_84 = lean::box(0); } else { - lean::cnstr_release(x_78, 0); - lean::cnstr_release(x_78, 1); - x_85 = x_78; + lean::cnstr_release(x_77, 0); + lean::cnstr_release(x_77, 1); + x_84 = x_77; } -x_86 = lean_expr_mk_mdata(x_71, x_81); -if (lean::is_scalar(x_85)) { - x_87 = lean::alloc_cnstr(0, 2, 0); +x_85 = lean_expr_mk_mdata(x_70, x_80); +if (lean::is_scalar(x_84)) { + x_86 = lean::alloc_cnstr(0, 2, 0); } else { - x_87 = x_85; + x_86 = x_84; +} +lean::cnstr_set(x_86, 0, x_85); +lean::cnstr_set(x_86, 1, x_82); +if (lean::is_scalar(x_79)) { + x_87 = lean::alloc_cnstr(1, 1, 0); +} else { + x_87 = x_79; } lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_83); -if (lean::is_scalar(x_80)) { - x_88 = lean::alloc_cnstr(1, 1, 0); -} else { - x_88 = x_80; -} -lean::cnstr_set(x_88, 0, x_87); -return x_88; +return x_87; } } else { -obj* x_90; obj* x_93; obj* x_96; -lean::dec(x_3); -x_90 = lean::cnstr_get(x_14, 0); -lean::inc(x_90); +obj* x_88; obj* x_91; obj* x_94; +x_88 = lean::cnstr_get(x_14, 0); +lean::inc(x_88); lean::dec(x_14); -x_93 = lean::cnstr_get(x_90, 1); -lean::inc(x_93); -lean::dec(x_90); -x_96 = l_lean_elaborator_attrs__to__pexpr(x_93, x_1, x_2); -if (lean::obj_tag(x_96) == 0) +x_91 = lean::cnstr_get(x_88, 1); +lean::inc(x_91); +lean::dec(x_88); +x_94 = l_lean_elaborator_attrs__to__pexpr(x_91, x_1, x_2); +if (lean::obj_tag(x_94) == 0) { -obj* x_98; obj* x_100; obj* x_101; -lean::dec(x_71); -x_98 = lean::cnstr_get(x_96, 0); -lean::inc(x_98); -if (lean::is_shared(x_96)) { - lean::dec(x_96); - x_100 = lean::box(0); +obj* x_96; obj* x_98; obj* x_99; +lean::dec(x_70); +x_96 = lean::cnstr_get(x_94, 0); +lean::inc(x_96); +if (lean::is_shared(x_94)) { + lean::dec(x_94); + x_98 = lean::box(0); } else { - lean::cnstr_release(x_96, 0); - x_100 = x_96; + lean::cnstr_release(x_94, 0); + x_98 = x_94; } -if (lean::is_scalar(x_100)) { - x_101 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_98)) { + x_99 = lean::alloc_cnstr(0, 1, 0); } else { - x_101 = x_100; + x_99 = x_98; } -lean::cnstr_set(x_101, 0, x_98); -return x_101; +lean::cnstr_set(x_99, 0, x_96); +return x_99; } else { -obj* x_102; obj* x_104; obj* x_105; obj* x_107; obj* x_109; obj* x_110; obj* x_111; obj* x_112; -x_102 = lean::cnstr_get(x_96, 0); -lean::inc(x_102); -if (lean::is_shared(x_96)) { - lean::dec(x_96); - x_104 = lean::box(0); +obj* x_100; obj* x_102; obj* x_103; obj* x_105; obj* x_107; obj* x_108; obj* x_109; obj* x_110; +x_100 = lean::cnstr_get(x_94, 0); +lean::inc(x_100); +if (lean::is_shared(x_94)) { + lean::dec(x_94); + x_102 = lean::box(0); } else { - lean::cnstr_release(x_96, 0); - x_104 = x_96; + lean::cnstr_release(x_94, 0); + x_102 = x_94; } -x_105 = lean::cnstr_get(x_102, 0); +x_103 = lean::cnstr_get(x_100, 0); +lean::inc(x_103); +x_105 = lean::cnstr_get(x_100, 1); lean::inc(x_105); -x_107 = lean::cnstr_get(x_102, 1); -lean::inc(x_107); -if (lean::is_shared(x_102)) { - lean::dec(x_102); - x_109 = lean::box(0); +if (lean::is_shared(x_100)) { + lean::dec(x_100); + x_107 = lean::box(0); } else { - lean::cnstr_release(x_102, 0); - lean::cnstr_release(x_102, 1); - x_109 = x_102; + lean::cnstr_release(x_100, 0); + lean::cnstr_release(x_100, 1); + x_107 = x_100; } -x_110 = lean_expr_mk_mdata(x_71, x_105); -if (lean::is_scalar(x_109)) { - x_111 = lean::alloc_cnstr(0, 2, 0); +x_108 = lean_expr_mk_mdata(x_70, x_103); +if (lean::is_scalar(x_107)) { + x_109 = lean::alloc_cnstr(0, 2, 0); } else { - x_111 = x_109; + x_109 = x_107; } -lean::cnstr_set(x_111, 0, x_110); -lean::cnstr_set(x_111, 1, x_107); -if (lean::is_scalar(x_104)) { - x_112 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_109, 0, x_108); +lean::cnstr_set(x_109, 1, x_105); +if (lean::is_scalar(x_102)) { + x_110 = lean::alloc_cnstr(1, 1, 0); } else { - x_112 = x_104; + x_110 = x_102; } -lean::cnstr_set(x_112, 0, x_111); -return x_112; +lean::cnstr_set(x_110, 0, x_109); +return x_110; } } } @@ -15184,16 +15167,14 @@ return x_0; obj* _init_l_lean_elaborator_elab__def__like___closed__2() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::box(0); x_1 = lean::mk_string("command"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("defs"); -lean::inc(x_0); -x_6 = lean_name_mk_string(x_0, x_4); -x_7 = l_lean_kvmap_set__name(x_0, x_3, x_6); -return x_7; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("defs"); +x_4 = lean_name_mk_string(x_0, x_3); +x_5 = l_lean_kvmap_set__name(x_0, x_2, x_4); +return x_5; } } obj* l_lean_elaborator_elab__def__like(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { @@ -15303,7 +15284,7 @@ if (lean::obj_tag(x_6) == 0) { if (lean::obj_tag(x_63) == 0) { -obj* x_74; obj* x_76; obj* x_77; +obj* x_73; obj* x_75; obj* x_76; lean::dec(x_12); lean::dec(x_8); lean::dec(x_4); @@ -15313,166 +15294,164 @@ lean::dec(x_50); lean::dec(x_30); lean::dec(x_57); lean::dec(x_54); -lean::dec(x_55); -x_74 = lean::cnstr_get(x_63, 0); -lean::inc(x_74); +x_73 = lean::cnstr_get(x_63, 0); +lean::inc(x_73); if (lean::is_shared(x_63)) { lean::dec(x_63); - x_76 = lean::box(0); + x_75 = lean::box(0); } else { lean::cnstr_release(x_63, 0); - x_76 = x_63; + x_75 = x_63; } -if (lean::is_scalar(x_76)) { - x_77 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_75)) { + x_76 = lean::alloc_cnstr(0, 1, 0); } else { - x_77 = x_76; + x_76 = x_75; } -lean::cnstr_set(x_77, 0, x_74); -return x_77; +lean::cnstr_set(x_76, 0, x_73); +return x_76; } else { -obj* x_78; -x_78 = lean::cnstr_get(x_63, 0); -lean::inc(x_78); +obj* x_77; +x_77 = lean::cnstr_get(x_63, 0); +lean::inc(x_77); lean::dec(x_63); x_58 = x_55; -x_59 = x_78; +x_59 = x_77; goto lbl_60; } } else { -obj* x_81; -x_81 = lean::cnstr_get(x_6, 0); -lean::inc(x_81); +obj* x_80; +x_80 = lean::cnstr_get(x_6, 0); +lean::inc(x_80); lean::dec(x_6); if (lean::obj_tag(x_63) == 0) { -obj* x_95; obj* x_97; obj* x_98; +obj* x_93; obj* x_95; obj* x_96; lean::dec(x_12); lean::dec(x_8); lean::dec(x_4); lean::dec(x_0); -lean::dec(x_81); +lean::dec(x_80); lean::dec(x_49); lean::dec(x_50); lean::dec(x_30); lean::dec(x_57); lean::dec(x_54); -lean::dec(x_55); -x_95 = lean::cnstr_get(x_63, 0); -lean::inc(x_95); +x_93 = lean::cnstr_get(x_63, 0); +lean::inc(x_93); if (lean::is_shared(x_63)) { lean::dec(x_63); - x_97 = lean::box(0); + x_95 = lean::box(0); } else { lean::cnstr_release(x_63, 0); - x_97 = x_63; + x_95 = x_63; } -if (lean::is_scalar(x_97)) { - x_98 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_95)) { + x_96 = lean::alloc_cnstr(0, 1, 0); } else { - x_98 = x_97; + x_96 = x_95; } -lean::cnstr_set(x_98, 0, x_95); -return x_98; +lean::cnstr_set(x_96, 0, x_93); +return x_96; } else { -obj* x_99; obj* x_102; obj* x_105; -x_99 = lean::cnstr_get(x_63, 0); -lean::inc(x_99); +obj* x_97; obj* x_100; obj* x_103; +x_97 = lean::cnstr_get(x_63, 0); +lean::inc(x_97); lean::dec(x_63); -x_102 = lean::cnstr_get(x_81, 1); -lean::inc(x_102); -lean::dec(x_81); -x_105 = l_list_map___main___at_lean_elaborator_elab__def__like___spec__3(x_102); -x_58 = x_105; -x_59 = x_99; +x_100 = lean::cnstr_get(x_80, 1); +lean::inc(x_100); +lean::dec(x_80); +x_103 = l_list_map___main___at_lean_elaborator_elab__def__like___spec__3(x_100); +x_58 = x_103; +x_59 = x_97; goto lbl_60; } } } else { -obj* x_106; obj* x_108; obj* x_110; obj* x_112; obj* x_114; obj* x_116; obj* x_118; obj* x_120; obj* x_122; obj* x_126; obj* x_127; obj* x_128; obj* x_130; obj* x_132; obj* x_134; obj* x_136; obj* x_139; obj* x_140; obj* x_142; obj* x_144; obj* x_146; obj* x_148; obj* x_150; obj* x_153; obj* x_154; obj* x_156; -x_106 = lean::cnstr_get(x_6, 0); +obj* x_104; obj* x_106; obj* x_108; obj* x_110; obj* x_112; obj* x_114; obj* x_116; obj* x_118; obj* x_120; obj* x_124; obj* x_125; obj* x_126; obj* x_128; obj* x_130; obj* x_132; obj* x_134; obj* x_137; obj* x_138; obj* x_140; obj* x_142; obj* x_144; obj* x_146; obj* x_148; obj* x_151; obj* x_152; obj* x_154; +x_104 = lean::cnstr_get(x_6, 0); +lean::inc(x_104); +x_106 = lean::cnstr_get(x_52, 0); lean::inc(x_106); -x_108 = lean::cnstr_get(x_52, 0); +x_108 = lean::cnstr_get(x_52, 1); lean::inc(x_108); -x_110 = lean::cnstr_get(x_52, 1); +x_110 = lean::cnstr_get(x_52, 2); lean::inc(x_110); -x_112 = lean::cnstr_get(x_52, 2); +x_112 = lean::cnstr_get(x_52, 3); lean::inc(x_112); -x_114 = lean::cnstr_get(x_52, 3); +x_114 = lean::cnstr_get(x_52, 4); lean::inc(x_114); -x_116 = lean::cnstr_get(x_52, 4); +x_116 = lean::cnstr_get(x_114, 0); lean::inc(x_116); -x_118 = lean::cnstr_get(x_116, 0); +x_118 = lean::cnstr_get(x_114, 1); lean::inc(x_118); -x_120 = lean::cnstr_get(x_116, 1); +x_120 = lean::cnstr_get(x_104, 1); lean::inc(x_120); -x_122 = lean::cnstr_get(x_106, 1); -lean::inc(x_122); -lean::dec(x_106); -lean::inc(x_122); -x_126 = l_list_map___main___at_lean_elaborator_elab__def__like___spec__5(x_122); -x_127 = l_list_foldl___main___at_lean_elaborator_elab__def__like___spec__6(x_120, x_126); -x_128 = lean::cnstr_get(x_116, 2); +lean::dec(x_104); +lean::inc(x_120); +x_124 = l_list_map___main___at_lean_elaborator_elab__def__like___spec__5(x_120); +x_125 = l_list_foldl___main___at_lean_elaborator_elab__def__like___spec__6(x_118, x_124); +x_126 = lean::cnstr_get(x_114, 2); +lean::inc(x_126); +x_128 = lean::cnstr_get(x_114, 3); lean::inc(x_128); -x_130 = lean::cnstr_get(x_116, 3); +x_130 = lean::cnstr_get(x_114, 4); lean::inc(x_130); -x_132 = lean::cnstr_get(x_116, 4); +x_132 = lean::cnstr_get(x_114, 5); lean::inc(x_132); -x_134 = lean::cnstr_get(x_116, 5); +x_134 = lean::cnstr_get(x_114, 6); lean::inc(x_134); -x_136 = lean::cnstr_get(x_116, 6); -lean::inc(x_136); -lean::dec(x_116); -x_139 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_139, 0, x_118); -lean::cnstr_set(x_139, 1, x_127); -lean::cnstr_set(x_139, 2, x_128); -lean::cnstr_set(x_139, 3, x_130); -lean::cnstr_set(x_139, 4, x_132); -lean::cnstr_set(x_139, 5, x_134); -lean::cnstr_set(x_139, 6, x_136); -x_140 = lean::cnstr_get(x_52, 5); +lean::dec(x_114); +x_137 = lean::alloc_cnstr(0, 7, 0); +lean::cnstr_set(x_137, 0, x_116); +lean::cnstr_set(x_137, 1, x_125); +lean::cnstr_set(x_137, 2, x_126); +lean::cnstr_set(x_137, 3, x_128); +lean::cnstr_set(x_137, 4, x_130); +lean::cnstr_set(x_137, 5, x_132); +lean::cnstr_set(x_137, 6, x_134); +x_138 = lean::cnstr_get(x_52, 5); +lean::inc(x_138); +x_140 = lean::cnstr_get(x_52, 6); lean::inc(x_140); -x_142 = lean::cnstr_get(x_52, 6); +x_142 = lean::cnstr_get(x_52, 7); lean::inc(x_142); -x_144 = lean::cnstr_get(x_52, 7); +x_144 = lean::cnstr_get(x_52, 8); lean::inc(x_144); -x_146 = lean::cnstr_get(x_52, 8); +x_146 = lean::cnstr_get(x_52, 9); lean::inc(x_146); -x_148 = lean::cnstr_get(x_52, 9); +x_148 = lean::cnstr_get(x_52, 10); lean::inc(x_148); -x_150 = lean::cnstr_get(x_52, 10); -lean::inc(x_150); lean::dec(x_52); -x_153 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_153, 0, x_108); -lean::cnstr_set(x_153, 1, x_110); -lean::cnstr_set(x_153, 2, x_112); -lean::cnstr_set(x_153, 3, x_114); -lean::cnstr_set(x_153, 4, x_139); -lean::cnstr_set(x_153, 5, x_140); -lean::cnstr_set(x_153, 6, x_142); -lean::cnstr_set(x_153, 7, x_144); -lean::cnstr_set(x_153, 8, x_146); -lean::cnstr_set(x_153, 9, x_148); -lean::cnstr_set(x_153, 10, x_150); -x_154 = l_lean_expander_get__opt__type___main(x_17); +x_151 = lean::alloc_cnstr(0, 11, 0); +lean::cnstr_set(x_151, 0, x_106); +lean::cnstr_set(x_151, 1, x_108); +lean::cnstr_set(x_151, 2, x_110); +lean::cnstr_set(x_151, 3, x_112); +lean::cnstr_set(x_151, 4, x_137); +lean::cnstr_set(x_151, 5, x_138); +lean::cnstr_set(x_151, 6, x_140); +lean::cnstr_set(x_151, 7, x_142); +lean::cnstr_set(x_151, 8, x_144); +lean::cnstr_set(x_151, 9, x_146); +lean::cnstr_set(x_151, 10, x_148); +x_152 = l_lean_expander_get__opt__type___main(x_17); lean::inc(x_4); -x_156 = l_lean_elaborator_to__pexpr___main(x_154, x_4, x_153); +x_154 = l_lean_elaborator_to__pexpr___main(x_152, x_4, x_151); if (lean::obj_tag(x_6) == 0) { -lean::dec(x_122); -if (lean::obj_tag(x_156) == 0) +lean::dec(x_120); +if (lean::obj_tag(x_154) == 0) { -obj* x_168; obj* x_170; obj* x_171; +obj* x_165; obj* x_167; obj* x_168; lean::dec(x_12); lean::dec(x_8); lean::dec(x_4); @@ -15482,41 +15461,40 @@ lean::dec(x_50); lean::dec(x_30); lean::dec(x_57); lean::dec(x_54); -lean::dec(x_55); -x_168 = lean::cnstr_get(x_156, 0); -lean::inc(x_168); -if (lean::is_shared(x_156)) { - lean::dec(x_156); - x_170 = lean::box(0); +x_165 = lean::cnstr_get(x_154, 0); +lean::inc(x_165); +if (lean::is_shared(x_154)) { + lean::dec(x_154); + x_167 = lean::box(0); } else { - lean::cnstr_release(x_156, 0); - x_170 = x_156; + lean::cnstr_release(x_154, 0); + x_167 = x_154; } -if (lean::is_scalar(x_170)) { - x_171 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_167)) { + x_168 = lean::alloc_cnstr(0, 1, 0); } else { - x_171 = x_170; + x_168 = x_167; } -lean::cnstr_set(x_171, 0, x_168); -return x_171; +lean::cnstr_set(x_168, 0, x_165); +return x_168; } else { -obj* x_172; -x_172 = lean::cnstr_get(x_156, 0); -lean::inc(x_172); -lean::dec(x_156); +obj* x_169; +x_169 = lean::cnstr_get(x_154, 0); +lean::inc(x_169); +lean::dec(x_154); x_58 = x_55; -x_59 = x_172; +x_59 = x_169; goto lbl_60; } } else { lean::dec(x_6); -if (lean::obj_tag(x_156) == 0) +if (lean::obj_tag(x_154) == 0) { -obj* x_187; obj* x_189; obj* x_190; +obj* x_183; obj* x_185; obj* x_186; lean::dec(x_12); lean::dec(x_8); lean::dec(x_4); @@ -15526,146 +15504,142 @@ lean::dec(x_50); lean::dec(x_30); lean::dec(x_57); lean::dec(x_54); -lean::dec(x_55); -lean::dec(x_122); -x_187 = lean::cnstr_get(x_156, 0); -lean::inc(x_187); -if (lean::is_shared(x_156)) { - lean::dec(x_156); - x_189 = lean::box(0); +lean::dec(x_120); +x_183 = lean::cnstr_get(x_154, 0); +lean::inc(x_183); +if (lean::is_shared(x_154)) { + lean::dec(x_154); + x_185 = lean::box(0); } else { - lean::cnstr_release(x_156, 0); - x_189 = x_156; + lean::cnstr_release(x_154, 0); + x_185 = x_154; } -if (lean::is_scalar(x_189)) { - x_190 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_185)) { + x_186 = lean::alloc_cnstr(0, 1, 0); } else { - x_190 = x_189; + x_186 = x_185; } -lean::cnstr_set(x_190, 0, x_187); -return x_190; +lean::cnstr_set(x_186, 0, x_183); +return x_186; } else { -obj* x_191; obj* x_194; -x_191 = lean::cnstr_get(x_156, 0); -lean::inc(x_191); -lean::dec(x_156); -x_194 = l_list_map___main___at_lean_elaborator_elab__def__like___spec__7(x_122); -x_58 = x_194; -x_59 = x_191; +obj* x_187; obj* x_190; +x_187 = lean::cnstr_get(x_154, 0); +lean::inc(x_187); +lean::dec(x_154); +x_190 = l_list_map___main___at_lean_elaborator_elab__def__like___spec__7(x_120); +x_58 = x_190; +x_59 = x_187; goto lbl_60; } } } lbl_60: { -obj* x_195; obj* x_197; obj* x_200; obj* x_201; obj* x_203; uint8 x_204; obj* x_207; obj* x_209; obj* x_210; obj* x_212; obj* x_213; -x_195 = lean::cnstr_get(x_59, 0); -lean::inc(x_195); -x_197 = lean::cnstr_get(x_59, 1); -lean::inc(x_197); +obj* x_191; obj* x_193; obj* x_196; obj* x_197; obj* x_199; uint8 x_200; obj* x_203; obj* x_204; obj* x_205; obj* x_207; obj* x_208; +x_191 = lean::cnstr_get(x_59, 0); +lean::inc(x_191); +x_193 = lean::cnstr_get(x_59, 1); +lean::inc(x_193); lean::dec(x_59); -x_200 = l_lean_elaborator_names__to__pexpr(x_58); -x_201 = lean::cnstr_get(x_8, 0); -lean::inc(x_201); -x_203 = l_lean_elaborator_mangle__ident(x_201); -x_204 = 4; -lean::inc(x_195); -lean::inc(x_203); -x_207 = lean_expr_local(x_203, x_203, x_195, x_204); -lean::inc(x_55); -x_209 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_209, 0, x_207); -lean::cnstr_set(x_209, 1, x_55); -x_210 = l_lean_elaborator_mk__eqns___closed__1; -lean::inc(x_210); -x_212 = l_lean_expr_mk__capp(x_210, x_209); +x_196 = l_lean_elaborator_names__to__pexpr(x_58); +x_197 = lean::cnstr_get(x_8, 0); +lean::inc(x_197); +x_199 = l_lean_elaborator_mangle__ident(x_197); +x_200 = 4; +lean::inc(x_191); +lean::inc(x_199); +x_203 = lean_expr_local(x_199, x_199, x_191, x_200); +x_204 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_204, 0, x_203); +lean::cnstr_set(x_204, 1, x_55); +x_205 = l_lean_elaborator_mk__eqns___closed__1; +lean::inc(x_205); +x_207 = l_lean_expr_mk__capp(x_205, x_204); switch (lean::obj_tag(x_12)) { case 0: { -obj* x_218; obj* x_221; obj* x_225; -lean::dec(x_195); +obj* x_213; obj* x_216; obj* x_220; +lean::dec(x_191); lean::dec(x_8); lean::dec(x_54); -x_218 = lean::cnstr_get(x_12, 0); -lean::inc(x_218); +x_213 = lean::cnstr_get(x_12, 0); +lean::inc(x_213); lean::dec(x_12); -x_221 = lean::cnstr_get(x_218, 1); -lean::inc(x_221); -lean::dec(x_218); +x_216 = lean::cnstr_get(x_213, 1); +lean::inc(x_216); +lean::dec(x_213); lean::inc(x_4); -x_225 = l_lean_elaborator_to__pexpr___main(x_221, x_4, x_197); -if (lean::obj_tag(x_225) == 0) +x_220 = l_lean_elaborator_to__pexpr___main(x_216, x_4, x_193); +if (lean::obj_tag(x_220) == 0) { -obj* x_235; obj* x_237; obj* x_238; -lean::dec(x_212); -lean::dec(x_200); +obj* x_229; obj* x_231; obj* x_232; +lean::dec(x_207); +lean::dec(x_196); lean::dec(x_4); lean::dec(x_0); lean::dec(x_49); lean::dec(x_50); lean::dec(x_30); lean::dec(x_57); -lean::dec(x_55); -x_235 = lean::cnstr_get(x_225, 0); -lean::inc(x_235); -if (lean::is_shared(x_225)) { - lean::dec(x_225); - x_237 = lean::box(0); +x_229 = lean::cnstr_get(x_220, 0); +lean::inc(x_229); +if (lean::is_shared(x_220)) { + lean::dec(x_220); + x_231 = lean::box(0); } else { - lean::cnstr_release(x_225, 0); - x_237 = x_225; + lean::cnstr_release(x_220, 0); + x_231 = x_220; } -if (lean::is_scalar(x_237)) { - x_238 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_231)) { + x_232 = lean::alloc_cnstr(0, 1, 0); } else { - x_238 = x_237; + x_232 = x_231; } -lean::cnstr_set(x_238, 0, x_235); -return x_238; +lean::cnstr_set(x_232, 0, x_229); +return x_232; } else { -obj* x_239; -x_239 = lean::cnstr_get(x_225, 0); -lean::inc(x_239); -lean::dec(x_225); -x_213 = x_239; -goto lbl_214; +obj* x_233; +x_233 = lean::cnstr_get(x_220, 0); +lean::inc(x_233); +lean::dec(x_220); +x_208 = x_233; +goto lbl_209; } } case 1: { -obj* x_245; obj* x_246; +obj* x_238; obj* x_239; lean::dec(x_12); lean::dec(x_8); -lean::inc(x_55); -x_245 = l_lean_elaborator_mk__eqns(x_195, x_55); +x_238 = l_lean_elaborator_mk__eqns(x_191, x_55); if (lean::is_scalar(x_54)) { - x_246 = lean::alloc_cnstr(0, 2, 0); + x_239 = lean::alloc_cnstr(0, 2, 0); } else { - x_246 = x_54; + x_239 = x_54; } -lean::cnstr_set(x_246, 0, x_245); -lean::cnstr_set(x_246, 1, x_197); -x_213 = x_246; -goto lbl_214; +lean::cnstr_set(x_239, 0, x_238); +lean::cnstr_set(x_239, 1, x_193); +x_208 = x_239; +goto lbl_209; } default: { -obj* x_247; obj* x_251; -x_247 = lean::cnstr_get(x_12, 0); -lean::inc(x_247); +obj* x_240; obj* x_244; +x_240 = lean::cnstr_get(x_12, 0); +lean::inc(x_240); lean::dec(x_12); lean::inc(x_4); -x_251 = l_list_mmap___main___at_lean_elaborator_elab__def__like___spec__2(x_8, x_247, x_4, x_197); -if (lean::obj_tag(x_251) == 0) +x_244 = l_list_mmap___main___at_lean_elaborator_elab__def__like___spec__2(x_8, x_240, x_4, x_193); +if (lean::obj_tag(x_244) == 0) { -obj* x_263; obj* x_265; obj* x_266; -lean::dec(x_195); -lean::dec(x_212); -lean::dec(x_200); +obj* x_255; obj* x_257; obj* x_258; +lean::dec(x_191); +lean::dec(x_207); +lean::dec(x_196); lean::dec(x_4); lean::dec(x_0); lean::dec(x_49); @@ -15673,118 +15647,116 @@ lean::dec(x_50); lean::dec(x_30); lean::dec(x_57); lean::dec(x_54); -lean::dec(x_55); -x_263 = lean::cnstr_get(x_251, 0); -lean::inc(x_263); -if (lean::is_shared(x_251)) { - lean::dec(x_251); - x_265 = lean::box(0); +x_255 = lean::cnstr_get(x_244, 0); +lean::inc(x_255); +if (lean::is_shared(x_244)) { + lean::dec(x_244); + x_257 = lean::box(0); } else { - lean::cnstr_release(x_251, 0); - x_265 = x_251; + lean::cnstr_release(x_244, 0); + x_257 = x_244; } -if (lean::is_scalar(x_265)) { - x_266 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_257)) { + x_258 = lean::alloc_cnstr(0, 1, 0); } else { - x_266 = x_265; + x_258 = x_257; } -lean::cnstr_set(x_266, 0, x_263); -return x_266; +lean::cnstr_set(x_258, 0, x_255); +return x_258; } else { -obj* x_267; obj* x_270; obj* x_272; obj* x_275; obj* x_276; -x_267 = lean::cnstr_get(x_251, 0); -lean::inc(x_267); -lean::dec(x_251); -x_270 = lean::cnstr_get(x_267, 0); -lean::inc(x_270); -x_272 = lean::cnstr_get(x_267, 1); -lean::inc(x_272); -lean::dec(x_267); -x_275 = l_lean_elaborator_mk__eqns(x_195, x_270); +obj* x_259; obj* x_262; obj* x_264; obj* x_267; obj* x_268; +x_259 = lean::cnstr_get(x_244, 0); +lean::inc(x_259); +lean::dec(x_244); +x_262 = lean::cnstr_get(x_259, 0); +lean::inc(x_262); +x_264 = lean::cnstr_get(x_259, 1); +lean::inc(x_264); +lean::dec(x_259); +x_267 = l_lean_elaborator_mk__eqns(x_191, x_262); if (lean::is_scalar(x_54)) { - x_276 = lean::alloc_cnstr(0, 2, 0); + x_268 = lean::alloc_cnstr(0, 2, 0); } else { - x_276 = x_54; + x_268 = x_54; } -lean::cnstr_set(x_276, 0, x_275); -lean::cnstr_set(x_276, 1, x_272); -x_213 = x_276; -goto lbl_214; +lean::cnstr_set(x_268, 0, x_267); +lean::cnstr_set(x_268, 1, x_264); +x_208 = x_268; +goto lbl_209; } } } -lbl_214: +lbl_209: { -obj* x_277; obj* x_279; obj* x_283; -x_277 = lean::cnstr_get(x_213, 0); -lean::inc(x_277); -x_279 = lean::cnstr_get(x_213, 1); -lean::inc(x_279); -lean::dec(x_213); +obj* x_269; obj* x_271; obj* x_275; +x_269 = lean::cnstr_get(x_208, 0); +lean::inc(x_269); +x_271 = lean::cnstr_get(x_208, 1); +lean::inc(x_271); +lean::dec(x_208); lean::inc(x_4); -x_283 = l_lean_elaborator_simple__binders__to__pexpr(x_30, x_4, x_279); -if (lean::obj_tag(x_283) == 0) +x_275 = l_lean_elaborator_simple__binders__to__pexpr(x_30, x_4, x_271); +if (lean::obj_tag(x_275) == 0) { -obj* x_292; obj* x_295; -lean::dec(x_212); -lean::dec(x_200); -lean::dec(x_277); +obj* x_283; obj* x_286; +lean::dec(x_207); +lean::dec(x_196); lean::dec(x_4); lean::dec(x_0); +lean::dec(x_269); lean::dec(x_50); lean::dec(x_57); -lean::dec(x_55); -x_292 = lean::cnstr_get(x_283, 0); -lean::inc(x_292); -lean::dec(x_283); +x_283 = lean::cnstr_get(x_275, 0); +lean::inc(x_283); +lean::dec(x_275); if (lean::is_scalar(x_49)) { - x_295 = lean::alloc_cnstr(0, 1, 0); + x_286 = lean::alloc_cnstr(0, 1, 0); } else { - x_295 = x_49; + x_286 = x_49; lean::cnstr_set_tag(x_49, 0); } -lean::cnstr_set(x_295, 0, x_292); -return x_295; +lean::cnstr_set(x_286, 0, x_283); +return x_286; } else { -obj* x_297; obj* x_300; obj* x_302; obj* x_305; obj* x_306; obj* x_307; obj* x_308; obj* x_309; obj* x_310; obj* x_312; obj* x_313; obj* x_315; obj* x_316; +obj* x_288; obj* x_291; obj* x_293; obj* x_296; obj* x_297; obj* x_298; obj* x_299; obj* x_300; obj* x_301; obj* x_303; obj* x_304; obj* x_306; obj* x_307; lean::dec(x_49); -x_297 = lean::cnstr_get(x_283, 0); -lean::inc(x_297); -lean::dec(x_283); -x_300 = lean::cnstr_get(x_297, 0); -lean::inc(x_300); -x_302 = lean::cnstr_get(x_297, 1); -lean::inc(x_302); -lean::dec(x_297); -x_305 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_305, 0, x_277); -lean::cnstr_set(x_305, 1, x_55); -x_306 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_306, 0, x_300); -lean::cnstr_set(x_306, 1, x_305); -x_307 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_307, 0, x_212); -lean::cnstr_set(x_307, 1, x_306); -x_308 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_308, 0, x_200); -lean::cnstr_set(x_308, 1, x_307); -x_309 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_309, 0, x_57); -lean::cnstr_set(x_309, 1, x_308); -x_310 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_310, 0, x_50); -lean::cnstr_set(x_310, 1, x_309); -lean::inc(x_210); -x_312 = l_lean_expr_mk__capp(x_210, x_310); -x_313 = l_lean_elaborator_elab__def__like___closed__2; -lean::inc(x_313); -x_315 = lean_expr_mk_mdata(x_313, x_312); -x_316 = l_lean_elaborator_old__elab__command(x_0, x_315, x_4, x_302); -return x_316; +x_288 = lean::cnstr_get(x_275, 0); +lean::inc(x_288); +lean::dec(x_275); +x_291 = lean::cnstr_get(x_288, 0); +lean::inc(x_291); +x_293 = lean::cnstr_get(x_288, 1); +lean::inc(x_293); +lean::dec(x_288); +x_296 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_296, 0, x_269); +lean::cnstr_set(x_296, 1, x_55); +x_297 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_297, 0, x_291); +lean::cnstr_set(x_297, 1, x_296); +x_298 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_298, 0, x_207); +lean::cnstr_set(x_298, 1, x_297); +x_299 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_299, 0, x_196); +lean::cnstr_set(x_299, 1, x_298); +x_300 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_300, 0, x_57); +lean::cnstr_set(x_300, 1, x_299); +x_301 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_301, 0, x_50); +lean::cnstr_set(x_301, 1, x_300); +lean::inc(x_205); +x_303 = l_lean_expr_mk__capp(x_205, x_301); +x_304 = l_lean_elaborator_elab__def__like___closed__2; +lean::inc(x_304); +x_306 = lean_expr_mk_mdata(x_304, x_303); +x_307 = l_lean_elaborator_old__elab__command(x_0, x_306, x_4, x_293); +return x_307; } } } @@ -17016,26 +16988,21 @@ return x_9; obj* _init_l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::box(0); x_1 = lean::mk_string("."); -lean::inc(x_0); -x_3 = l_lean_name_to__string__with__sep___main(x_1, x_0); -x_4 = l_lean_parser_substring_of__string(x_3); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_0); -lean::cnstr_set(x_9, 1, x_4); -lean::cnstr_set(x_9, 2, x_0); -lean::cnstr_set(x_9, 3, x_0); -lean::cnstr_set(x_9, 4, x_0); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_0); -return x_10; +x_2 = l_lean_name_to__string__with__sep___main(x_1, x_0); +x_3 = l_lean_parser_substring_of__string(x_2); +x_4 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_4, 0, x_0); +lean::cnstr_set(x_4, 1, x_3); +lean::cnstr_set(x_4, 2, x_0); +lean::cnstr_set(x_4, 3, x_0); +lean::cnstr_set(x_4, 4, x_0); +x_5 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_5, 0, x_4); +lean::cnstr_set(x_5, 1, x_0); +return x_5; } } obj* _init_l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__2() { @@ -17058,31 +17025,27 @@ return x_5; obj* _init_l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__3() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::box(0); x_1 = lean::mk_string("command"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("constant"); -lean::inc(x_0); -x_6 = lean_name_mk_string(x_0, x_4); -x_7 = l_lean_kvmap_set__name(x_0, x_3, x_6); -return x_7; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("constant"); +x_4 = lean_name_mk_string(x_0, x_3); +x_5 = l_lean_kvmap_set__name(x_0, x_2, x_4); +return x_5; } } obj* _init_l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__4() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::box(0); x_1 = lean::mk_string("command"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("inductives"); -lean::inc(x_0); -x_6 = lean_name_mk_string(x_0, x_4); -x_7 = l_lean_kvmap_set__name(x_0, x_3, x_6); -return x_7; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("inductives"); +x_4 = lean_name_mk_string(x_0, x_3); +x_5 = l_lean_kvmap_set__name(x_0, x_2, x_4); +return x_5; } } obj* _init_l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__5() { @@ -17097,16 +17060,14 @@ return x_1; obj* _init_l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__6() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::box(0); x_1 = lean::mk_string("command"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("structure"); -lean::inc(x_0); -x_6 = lean_name_mk_string(x_0, x_4); -x_7 = l_lean_kvmap_set__name(x_0, x_3, x_6); -return x_7; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("structure"); +x_4 = lean_name_mk_string(x_0, x_3); +x_5 = l_lean_kvmap_set__name(x_0, x_2, x_4); +return x_5; } } obj* _init_l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__7() { @@ -17543,449 +17504,438 @@ lean::inc(x_1); x_241 = l_lean_elaborator_attrs__to__pexpr(x_229, x_1, x_225); if (lean::obj_tag(x_241) == 0) { -obj* x_251; obj* x_254; +obj* x_250; obj* x_253; lean::dec(x_199); lean::dec(x_187); lean::dec(x_223); -lean::dec(x_228); lean::dec(x_176); lean::dec(x_178); lean::dec(x_182); lean::dec(x_1); lean::dec(x_0); -x_251 = lean::cnstr_get(x_241, 0); -lean::inc(x_251); +x_250 = lean::cnstr_get(x_241, 0); +lean::inc(x_250); lean::dec(x_241); if (lean::is_scalar(x_222)) { - x_254 = lean::alloc_cnstr(0, 1, 0); + x_253 = lean::alloc_cnstr(0, 1, 0); } else { - x_254 = x_222; + x_253 = x_222; lean::cnstr_set_tag(x_222, 0); } -lean::cnstr_set(x_254, 0, x_251); -x_5 = x_254; +lean::cnstr_set(x_253, 0, x_250); +x_5 = x_253; goto lbl_6; } else { -obj* x_255; obj* x_257; obj* x_258; obj* x_260; obj* x_264; obj* x_265; obj* x_267; obj* x_268; obj* x_269; -x_255 = lean::cnstr_get(x_241, 0); -lean::inc(x_255); +obj* x_254; obj* x_256; obj* x_257; obj* x_259; obj* x_262; obj* x_263; obj* x_265; obj* x_266; obj* x_267; +x_254 = lean::cnstr_get(x_241, 0); +lean::inc(x_254); if (lean::is_shared(x_241)) { lean::dec(x_241); - x_257 = lean::box(0); + x_256 = lean::box(0); } else { lean::cnstr_release(x_241, 0); - x_257 = x_241; + x_256 = x_241; } -x_258 = lean::cnstr_get(x_255, 0); -lean::inc(x_258); -x_260 = lean::cnstr_get(x_255, 1); -lean::inc(x_260); -lean::dec(x_255); -lean::inc(x_228); -x_264 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_264, 0, x_258); -lean::cnstr_set(x_264, 1, x_228); -x_265 = l_lean_elaborator_mk__eqns___closed__1; -lean::inc(x_265); -x_267 = l_lean_expr_mk__capp(x_265, x_264); +x_257 = lean::cnstr_get(x_254, 0); +lean::inc(x_257); +x_259 = lean::cnstr_get(x_254, 1); +lean::inc(x_259); +lean::dec(x_254); +x_262 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_262, 0, x_257); +lean::cnstr_set(x_262, 1, x_228); +x_263 = l_lean_elaborator_mk__eqns___closed__1; +lean::inc(x_263); +x_265 = l_lean_expr_mk__capp(x_263, x_262); if (lean::obj_tag(x_176) == 0) { -obj* x_271; obj* x_273; -x_271 = l_lean_expander_get__opt__type___main(x_187); +obj* x_269; obj* x_271; +x_269 = l_lean_expander_get__opt__type___main(x_187); lean::inc(x_1); -x_273 = l_lean_elaborator_to__pexpr___main(x_271, x_1, x_260); +x_271 = l_lean_elaborator_to__pexpr___main(x_269, x_1, x_259); if (lean::obj_tag(x_176) == 0) { -if (lean::obj_tag(x_273) == 0) +if (lean::obj_tag(x_271) == 0) { -obj* x_283; obj* x_286; +obj* x_280; obj* x_283; lean::dec(x_199); lean::dec(x_222); lean::dec(x_223); -lean::dec(x_228); lean::dec(x_178); lean::dec(x_182); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_267); -x_283 = lean::cnstr_get(x_273, 0); -lean::inc(x_283); -lean::dec(x_273); -if (lean::is_scalar(x_257)) { - x_286 = lean::alloc_cnstr(0, 1, 0); +lean::dec(x_265); +x_280 = lean::cnstr_get(x_271, 0); +lean::inc(x_280); +lean::dec(x_271); +if (lean::is_scalar(x_256)) { + x_283 = lean::alloc_cnstr(0, 1, 0); } else { - x_286 = x_257; - lean::cnstr_set_tag(x_257, 0); + x_283 = x_256; + lean::cnstr_set_tag(x_256, 0); } -lean::cnstr_set(x_286, 0, x_283); -x_5 = x_286; +lean::cnstr_set(x_283, 0, x_280); +x_5 = x_283; goto lbl_6; } else { +obj* x_285; +lean::dec(x_256); +x_285 = lean::cnstr_get(x_271, 0); +lean::inc(x_285); +lean::dec(x_271); +x_266 = x_228; +x_267 = x_285; +goto lbl_268; +} +} +else +{ obj* x_288; -lean::dec(x_257); -x_288 = lean::cnstr_get(x_273, 0); +x_288 = lean::cnstr_get(x_176, 0); lean::inc(x_288); -lean::dec(x_273); -x_268 = x_228; -x_269 = x_288; -goto lbl_270; -} -} -else -{ -obj* x_291; -x_291 = lean::cnstr_get(x_176, 0); -lean::inc(x_291); lean::dec(x_176); -if (lean::obj_tag(x_273) == 0) +if (lean::obj_tag(x_271) == 0) { -obj* x_304; obj* x_307; +obj* x_300; obj* x_303; lean::dec(x_199); lean::dec(x_222); lean::dec(x_223); -lean::dec(x_228); lean::dec(x_178); lean::dec(x_182); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_291); -lean::dec(x_267); -x_304 = lean::cnstr_get(x_273, 0); -lean::inc(x_304); -lean::dec(x_273); -if (lean::is_scalar(x_257)) { - x_307 = lean::alloc_cnstr(0, 1, 0); +lean::dec(x_288); +lean::dec(x_265); +x_300 = lean::cnstr_get(x_271, 0); +lean::inc(x_300); +lean::dec(x_271); +if (lean::is_scalar(x_256)) { + x_303 = lean::alloc_cnstr(0, 1, 0); } else { - x_307 = x_257; - lean::cnstr_set_tag(x_257, 0); + x_303 = x_256; + lean::cnstr_set_tag(x_256, 0); } -lean::cnstr_set(x_307, 0, x_304); -x_5 = x_307; +lean::cnstr_set(x_303, 0, x_300); +x_5 = x_303; goto lbl_6; } else { -obj* x_309; obj* x_312; obj* x_315; -lean::dec(x_257); -x_309 = lean::cnstr_get(x_273, 0); -lean::inc(x_309); -lean::dec(x_273); -x_312 = lean::cnstr_get(x_291, 1); -lean::inc(x_312); -lean::dec(x_291); -x_315 = l_list_map___main___at_lean_elaborator_declaration_elaborate___spec__3(x_312); -x_268 = x_315; -x_269 = x_309; -goto lbl_270; +obj* x_305; obj* x_308; obj* x_311; +lean::dec(x_256); +x_305 = lean::cnstr_get(x_271, 0); +lean::inc(x_305); +lean::dec(x_271); +x_308 = lean::cnstr_get(x_288, 1); +lean::inc(x_308); +lean::dec(x_288); +x_311 = l_list_map___main___at_lean_elaborator_declaration_elaborate___spec__3(x_308); +x_266 = x_311; +x_267 = x_305; +goto lbl_268; } } } else { -obj* x_316; obj* x_318; obj* x_320; obj* x_322; obj* x_324; obj* x_326; obj* x_328; obj* x_330; obj* x_332; obj* x_336; obj* x_337; obj* x_338; obj* x_340; obj* x_342; obj* x_344; obj* x_346; obj* x_349; obj* x_350; obj* x_352; obj* x_354; obj* x_356; obj* x_358; obj* x_360; obj* x_363; obj* x_364; obj* x_366; -x_316 = lean::cnstr_get(x_176, 0); +obj* x_312; obj* x_314; obj* x_316; obj* x_318; obj* x_320; obj* x_322; obj* x_324; obj* x_326; obj* x_328; obj* x_332; obj* x_333; obj* x_334; obj* x_336; obj* x_338; obj* x_340; obj* x_342; obj* x_345; obj* x_346; obj* x_348; obj* x_350; obj* x_352; obj* x_354; obj* x_356; obj* x_359; obj* x_360; obj* x_362; +x_312 = lean::cnstr_get(x_176, 0); +lean::inc(x_312); +x_314 = lean::cnstr_get(x_259, 0); +lean::inc(x_314); +x_316 = lean::cnstr_get(x_259, 1); lean::inc(x_316); -x_318 = lean::cnstr_get(x_260, 0); +x_318 = lean::cnstr_get(x_259, 2); lean::inc(x_318); -x_320 = lean::cnstr_get(x_260, 1); +x_320 = lean::cnstr_get(x_259, 3); lean::inc(x_320); -x_322 = lean::cnstr_get(x_260, 2); +x_322 = lean::cnstr_get(x_259, 4); lean::inc(x_322); -x_324 = lean::cnstr_get(x_260, 3); +x_324 = lean::cnstr_get(x_322, 0); lean::inc(x_324); -x_326 = lean::cnstr_get(x_260, 4); +x_326 = lean::cnstr_get(x_322, 1); lean::inc(x_326); -x_328 = lean::cnstr_get(x_326, 0); +x_328 = lean::cnstr_get(x_312, 1); lean::inc(x_328); -x_330 = lean::cnstr_get(x_326, 1); -lean::inc(x_330); -x_332 = lean::cnstr_get(x_316, 1); -lean::inc(x_332); -lean::dec(x_316); -lean::inc(x_332); -x_336 = l_list_map___main___at_lean_elaborator_declaration_elaborate___spec__4(x_332); -x_337 = l_list_foldl___main___at_lean_elaborator_declaration_elaborate___spec__5(x_330, x_336); -x_338 = lean::cnstr_get(x_326, 2); +lean::dec(x_312); +lean::inc(x_328); +x_332 = l_list_map___main___at_lean_elaborator_declaration_elaborate___spec__4(x_328); +x_333 = l_list_foldl___main___at_lean_elaborator_declaration_elaborate___spec__5(x_326, x_332); +x_334 = lean::cnstr_get(x_322, 2); +lean::inc(x_334); +x_336 = lean::cnstr_get(x_322, 3); +lean::inc(x_336); +x_338 = lean::cnstr_get(x_322, 4); lean::inc(x_338); -x_340 = lean::cnstr_get(x_326, 3); +x_340 = lean::cnstr_get(x_322, 5); lean::inc(x_340); -x_342 = lean::cnstr_get(x_326, 4); +x_342 = lean::cnstr_get(x_322, 6); lean::inc(x_342); -x_344 = lean::cnstr_get(x_326, 5); -lean::inc(x_344); -x_346 = lean::cnstr_get(x_326, 6); +lean::dec(x_322); +x_345 = lean::alloc_cnstr(0, 7, 0); +lean::cnstr_set(x_345, 0, x_324); +lean::cnstr_set(x_345, 1, x_333); +lean::cnstr_set(x_345, 2, x_334); +lean::cnstr_set(x_345, 3, x_336); +lean::cnstr_set(x_345, 4, x_338); +lean::cnstr_set(x_345, 5, x_340); +lean::cnstr_set(x_345, 6, x_342); +x_346 = lean::cnstr_get(x_259, 5); lean::inc(x_346); -lean::dec(x_326); -x_349 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_349, 0, x_328); -lean::cnstr_set(x_349, 1, x_337); -lean::cnstr_set(x_349, 2, x_338); -lean::cnstr_set(x_349, 3, x_340); -lean::cnstr_set(x_349, 4, x_342); -lean::cnstr_set(x_349, 5, x_344); -lean::cnstr_set(x_349, 6, x_346); -x_350 = lean::cnstr_get(x_260, 5); +x_348 = lean::cnstr_get(x_259, 6); +lean::inc(x_348); +x_350 = lean::cnstr_get(x_259, 7); lean::inc(x_350); -x_352 = lean::cnstr_get(x_260, 6); +x_352 = lean::cnstr_get(x_259, 8); lean::inc(x_352); -x_354 = lean::cnstr_get(x_260, 7); +x_354 = lean::cnstr_get(x_259, 9); lean::inc(x_354); -x_356 = lean::cnstr_get(x_260, 8); +x_356 = lean::cnstr_get(x_259, 10); lean::inc(x_356); -x_358 = lean::cnstr_get(x_260, 9); -lean::inc(x_358); -x_360 = lean::cnstr_get(x_260, 10); -lean::inc(x_360); -lean::dec(x_260); -x_363 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_363, 0, x_318); -lean::cnstr_set(x_363, 1, x_320); -lean::cnstr_set(x_363, 2, x_322); -lean::cnstr_set(x_363, 3, x_324); -lean::cnstr_set(x_363, 4, x_349); -lean::cnstr_set(x_363, 5, x_350); -lean::cnstr_set(x_363, 6, x_352); -lean::cnstr_set(x_363, 7, x_354); -lean::cnstr_set(x_363, 8, x_356); -lean::cnstr_set(x_363, 9, x_358); -lean::cnstr_set(x_363, 10, x_360); -x_364 = l_lean_expander_get__opt__type___main(x_187); +lean::dec(x_259); +x_359 = lean::alloc_cnstr(0, 11, 0); +lean::cnstr_set(x_359, 0, x_314); +lean::cnstr_set(x_359, 1, x_316); +lean::cnstr_set(x_359, 2, x_318); +lean::cnstr_set(x_359, 3, x_320); +lean::cnstr_set(x_359, 4, x_345); +lean::cnstr_set(x_359, 5, x_346); +lean::cnstr_set(x_359, 6, x_348); +lean::cnstr_set(x_359, 7, x_350); +lean::cnstr_set(x_359, 8, x_352); +lean::cnstr_set(x_359, 9, x_354); +lean::cnstr_set(x_359, 10, x_356); +x_360 = l_lean_expander_get__opt__type___main(x_187); lean::inc(x_1); -x_366 = l_lean_elaborator_to__pexpr___main(x_364, x_1, x_363); +x_362 = l_lean_elaborator_to__pexpr___main(x_360, x_1, x_359); if (lean::obj_tag(x_176) == 0) { -lean::dec(x_332); -if (lean::obj_tag(x_366) == 0) +lean::dec(x_328); +if (lean::obj_tag(x_362) == 0) { -obj* x_377; obj* x_380; +obj* x_372; obj* x_375; lean::dec(x_199); lean::dec(x_222); lean::dec(x_223); -lean::dec(x_228); lean::dec(x_178); lean::dec(x_182); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_267); -x_377 = lean::cnstr_get(x_366, 0); -lean::inc(x_377); -lean::dec(x_366); -if (lean::is_scalar(x_257)) { - x_380 = lean::alloc_cnstr(0, 1, 0); +lean::dec(x_265); +x_372 = lean::cnstr_get(x_362, 0); +lean::inc(x_372); +lean::dec(x_362); +if (lean::is_scalar(x_256)) { + x_375 = lean::alloc_cnstr(0, 1, 0); } else { - x_380 = x_257; - lean::cnstr_set_tag(x_257, 0); + x_375 = x_256; + lean::cnstr_set_tag(x_256, 0); } -lean::cnstr_set(x_380, 0, x_377); -x_5 = x_380; +lean::cnstr_set(x_375, 0, x_372); +x_5 = x_375; goto lbl_6; } else { -obj* x_382; -lean::dec(x_257); -x_382 = lean::cnstr_get(x_366, 0); -lean::inc(x_382); -lean::dec(x_366); -x_268 = x_228; -x_269 = x_382; -goto lbl_270; +obj* x_377; +lean::dec(x_256); +x_377 = lean::cnstr_get(x_362, 0); +lean::inc(x_377); +lean::dec(x_362); +x_266 = x_228; +x_267 = x_377; +goto lbl_268; } } else { lean::dec(x_176); -if (lean::obj_tag(x_366) == 0) +if (lean::obj_tag(x_362) == 0) { -obj* x_396; obj* x_399; +obj* x_390; obj* x_393; lean::dec(x_199); lean::dec(x_222); lean::dec(x_223); -lean::dec(x_228); lean::dec(x_178); lean::dec(x_182); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_267); -lean::dec(x_332); -x_396 = lean::cnstr_get(x_366, 0); -lean::inc(x_396); -lean::dec(x_366); -if (lean::is_scalar(x_257)) { - x_399 = lean::alloc_cnstr(0, 1, 0); +lean::dec(x_265); +lean::dec(x_328); +x_390 = lean::cnstr_get(x_362, 0); +lean::inc(x_390); +lean::dec(x_362); +if (lean::is_scalar(x_256)) { + x_393 = lean::alloc_cnstr(0, 1, 0); } else { - x_399 = x_257; - lean::cnstr_set_tag(x_257, 0); + x_393 = x_256; + lean::cnstr_set_tag(x_256, 0); } -lean::cnstr_set(x_399, 0, x_396); -x_5 = x_399; +lean::cnstr_set(x_393, 0, x_390); +x_5 = x_393; goto lbl_6; } else { -obj* x_401; obj* x_404; -lean::dec(x_257); -x_401 = lean::cnstr_get(x_366, 0); +obj* x_395; obj* x_398; +lean::dec(x_256); +x_395 = lean::cnstr_get(x_362, 0); +lean::inc(x_395); +lean::dec(x_362); +x_398 = l_list_map___main___at_lean_elaborator_declaration_elaborate___spec__6(x_328); +x_266 = x_398; +x_267 = x_395; +goto lbl_268; +} +} +} +lbl_268: +{ +obj* x_399; obj* x_401; obj* x_405; +x_399 = lean::cnstr_get(x_267, 0); +lean::inc(x_399); +x_401 = lean::cnstr_get(x_267, 1); lean::inc(x_401); -lean::dec(x_366); -x_404 = l_list_map___main___at_lean_elaborator_declaration_elaborate___spec__6(x_332); -x_268 = x_404; -x_269 = x_401; -goto lbl_270; -} -} -} -lbl_270: -{ -obj* x_405; obj* x_407; obj* x_411; -x_405 = lean::cnstr_get(x_269, 0); -lean::inc(x_405); -x_407 = lean::cnstr_get(x_269, 1); -lean::inc(x_407); -lean::dec(x_269); +lean::dec(x_267); lean::inc(x_1); -x_411 = l_lean_elaborator_simple__binders__to__pexpr(x_199, x_1, x_407); -if (lean::obj_tag(x_411) == 0) +x_405 = l_lean_elaborator_simple__binders__to__pexpr(x_199, x_1, x_401); +if (lean::obj_tag(x_405) == 0) { -obj* x_421; obj* x_424; +obj* x_414; obj* x_417; lean::dec(x_223); -lean::dec(x_228); lean::dec(x_178); lean::dec(x_182); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_267); +lean::dec(x_265); +lean::dec(x_399); +lean::dec(x_266); +x_414 = lean::cnstr_get(x_405, 0); +lean::inc(x_414); lean::dec(x_405); -lean::dec(x_268); -x_421 = lean::cnstr_get(x_411, 0); -lean::inc(x_421); -lean::dec(x_411); if (lean::is_scalar(x_222)) { - x_424 = lean::alloc_cnstr(0, 1, 0); + x_417 = lean::alloc_cnstr(0, 1, 0); } else { - x_424 = x_222; + x_417 = x_222; lean::cnstr_set_tag(x_222, 0); } -lean::cnstr_set(x_424, 0, x_421); -x_5 = x_424; +lean::cnstr_set(x_417, 0, x_414); +x_5 = x_417; goto lbl_6; } else { -obj* x_425; obj* x_428; obj* x_430; obj* x_436; -x_425 = lean::cnstr_get(x_411, 0); -lean::inc(x_425); -lean::dec(x_411); -x_428 = lean::cnstr_get(x_425, 0); -lean::inc(x_428); -x_430 = lean::cnstr_get(x_425, 1); -lean::inc(x_430); -lean::dec(x_425); +obj* x_418; obj* x_421; obj* x_423; obj* x_429; +x_418 = lean::cnstr_get(x_405, 0); +lean::inc(x_418); +lean::dec(x_405); +x_421 = lean::cnstr_get(x_418, 0); +lean::inc(x_421); +x_423 = lean::cnstr_get(x_418, 1); +lean::inc(x_423); +lean::dec(x_418); lean::inc(x_1); lean::inc(x_182); lean::inc(x_0); -x_436 = l_list_mmap___main___at_lean_elaborator_declaration_elaborate___spec__1(x_0, x_182, x_1, x_430); -if (lean::obj_tag(x_436) == 0) +x_429 = l_list_mmap___main___at_lean_elaborator_declaration_elaborate___spec__1(x_0, x_182, x_1, x_423); +if (lean::obj_tag(x_429) == 0) { -obj* x_447; obj* x_450; +obj* x_439; obj* x_442; lean::dec(x_223); -lean::dec(x_228); lean::dec(x_178); lean::dec(x_182); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_267); -lean::dec(x_428); -lean::dec(x_405); -lean::dec(x_268); -x_447 = lean::cnstr_get(x_436, 0); -lean::inc(x_447); -lean::dec(x_436); +lean::dec(x_265); +lean::dec(x_421); +lean::dec(x_399); +lean::dec(x_266); +x_439 = lean::cnstr_get(x_429, 0); +lean::inc(x_439); +lean::dec(x_429); if (lean::is_scalar(x_222)) { - x_450 = lean::alloc_cnstr(0, 1, 0); + x_442 = lean::alloc_cnstr(0, 1, 0); } else { - x_450 = x_222; + x_442 = x_222; lean::cnstr_set_tag(x_222, 0); } -lean::cnstr_set(x_450, 0, x_447); -x_5 = x_450; +lean::cnstr_set(x_442, 0, x_439); +x_5 = x_442; goto lbl_6; } else { -obj* x_452; obj* x_455; obj* x_457; obj* x_460; obj* x_461; obj* x_464; uint8 x_465; obj* x_467; obj* x_469; obj* x_471; obj* x_473; obj* x_475; obj* x_477; obj* x_478; obj* x_480; obj* x_482; obj* x_484; obj* x_485; obj* x_486; obj* x_487; obj* x_488; obj* x_489; obj* x_490; obj* x_491; obj* x_493; obj* x_494; obj* x_496; obj* x_497; +obj* x_444; obj* x_447; obj* x_449; obj* x_452; obj* x_453; obj* x_456; uint8 x_457; obj* x_459; obj* x_460; obj* x_462; obj* x_464; obj* x_465; obj* x_467; obj* x_468; obj* x_470; obj* x_471; obj* x_473; obj* x_474; obj* x_475; obj* x_476; obj* x_477; obj* x_478; obj* x_479; obj* x_480; obj* x_482; obj* x_483; obj* x_485; obj* x_486; lean::dec(x_222); -x_452 = lean::cnstr_get(x_436, 0); -lean::inc(x_452); -lean::dec(x_436); -x_455 = lean::cnstr_get(x_452, 0); -lean::inc(x_455); -x_457 = lean::cnstr_get(x_452, 1); -lean::inc(x_457); -lean::dec(x_452); -x_460 = l_lean_elaborator_names__to__pexpr(x_268); -x_461 = lean::cnstr_get(x_178, 0); -lean::inc(x_461); +x_444 = lean::cnstr_get(x_429, 0); +lean::inc(x_444); +lean::dec(x_429); +x_447 = lean::cnstr_get(x_444, 0); +lean::inc(x_447); +x_449 = lean::cnstr_get(x_444, 1); +lean::inc(x_449); +lean::dec(x_444); +x_452 = l_lean_elaborator_names__to__pexpr(x_266); +x_453 = lean::cnstr_get(x_178, 0); +lean::inc(x_453); lean::dec(x_178); -x_464 = l_lean_elaborator_mangle__ident(x_461); -x_465 = 0; -lean::inc(x_464); -x_467 = lean_expr_local(x_464, x_464, x_405, x_465); -lean::inc(x_228); -x_469 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_469, 0, x_467); -lean::cnstr_set(x_469, 1, x_228); -lean::inc(x_265); -x_471 = l_lean_expr_mk__capp(x_265, x_469); -lean::inc(x_265); -x_473 = l_lean_expr_mk__capp(x_265, x_455); -lean::inc(x_228); +x_456 = l_lean_elaborator_mangle__ident(x_453); +x_457 = 0; +lean::inc(x_456); +x_459 = lean_expr_local(x_456, x_456, x_399, x_457); +x_460 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_460, 0, x_459); +lean::cnstr_set(x_460, 1, x_228); +lean::inc(x_263); +x_462 = l_lean_expr_mk__capp(x_263, x_460); +lean::inc(x_263); +x_464 = l_lean_expr_mk__capp(x_263, x_447); +x_465 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_465, 0, x_464); +lean::cnstr_set(x_465, 1, x_228); +lean::inc(x_263); +x_467 = l_lean_expr_mk__capp(x_263, x_465); +x_468 = l_list_map___main___at_lean_elaborator_declaration_elaborate___spec__2(x_182); +lean::inc(x_263); +x_470 = l_lean_expr_mk__capp(x_263, x_468); +x_471 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_471, 0, x_470); +lean::cnstr_set(x_471, 1, x_228); +lean::inc(x_263); +x_473 = l_lean_expr_mk__capp(x_263, x_471); +x_474 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_474, 0, x_473); +lean::cnstr_set(x_474, 1, x_228); x_475 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_475, 0, x_473); -lean::cnstr_set(x_475, 1, x_228); -lean::inc(x_265); -x_477 = l_lean_expr_mk__capp(x_265, x_475); -x_478 = l_list_map___main___at_lean_elaborator_declaration_elaborate___spec__2(x_182); -lean::inc(x_265); -x_480 = l_lean_expr_mk__capp(x_265, x_478); -lean::inc(x_228); -x_482 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_482, 0, x_480); -lean::cnstr_set(x_482, 1, x_228); -lean::inc(x_265); -x_484 = l_lean_expr_mk__capp(x_265, x_482); -x_485 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_485, 0, x_484); -lean::cnstr_set(x_485, 1, x_228); -x_486 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_486, 0, x_477); -lean::cnstr_set(x_486, 1, x_485); -x_487 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_487, 0, x_428); -lean::cnstr_set(x_487, 1, x_486); -x_488 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_488, 0, x_471); -lean::cnstr_set(x_488, 1, x_487); -x_489 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_489, 0, x_460); -lean::cnstr_set(x_489, 1, x_488); -x_490 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_490, 0, x_267); -lean::cnstr_set(x_490, 1, x_489); -x_491 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_491, 0, x_223); -lean::cnstr_set(x_491, 1, x_490); -lean::inc(x_265); -x_493 = l_lean_expr_mk__capp(x_265, x_491); -x_494 = l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__4; -lean::inc(x_494); -x_496 = lean_expr_mk_mdata(x_494, x_493); -x_497 = l_lean_elaborator_old__elab__command(x_0, x_496, x_1, x_457); -x_5 = x_497; +lean::cnstr_set(x_475, 0, x_467); +lean::cnstr_set(x_475, 1, x_474); +x_476 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_476, 0, x_421); +lean::cnstr_set(x_476, 1, x_475); +x_477 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_477, 0, x_462); +lean::cnstr_set(x_477, 1, x_476); +x_478 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_478, 0, x_452); +lean::cnstr_set(x_478, 1, x_477); +x_479 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_479, 0, x_265); +lean::cnstr_set(x_479, 1, x_478); +x_480 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_480, 0, x_223); +lean::cnstr_set(x_480, 1, x_479); +lean::inc(x_263); +x_482 = l_lean_expr_mk__capp(x_263, x_480); +x_483 = l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__4; +lean::inc(x_483); +x_485 = lean_expr_mk_mdata(x_483, x_482); +x_486 = l_lean_elaborator_old__elab__command(x_0, x_485, x_1, x_449); +x_5 = x_486; goto lbl_6; } } @@ -17997,709 +17947,701 @@ goto lbl_6; } else { -obj* x_504; obj* x_506; +obj* x_493; obj* x_495; lean::dec(x_180); lean::dec(x_176); lean::dec(x_174); lean::dec(x_178); lean::dec(x_182); lean::dec(x_11); -x_504 = l_list_mmap___main___at_lean_elaborator_declaration_elaborate___spec__1___closed__1; -lean::inc(x_504); -x_506 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_504, x_1, x_2); -x_5 = x_506; +x_493 = l_list_mmap___main___at_lean_elaborator_declaration_elaborate___spec__1___closed__1; +lean::inc(x_493); +x_495 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_493, x_1, x_2); +x_5 = x_495; goto lbl_6; } } default: { -obj* x_507; obj* x_510; obj* x_512; obj* x_514; obj* x_516; obj* x_518; obj* x_520; obj* x_522; -x_507 = lean::cnstr_get(x_12, 0); -lean::inc(x_507); +obj* x_496; obj* x_499; obj* x_501; obj* x_503; obj* x_505; obj* x_507; obj* x_509; obj* x_511; +x_496 = lean::cnstr_get(x_12, 0); +lean::inc(x_496); lean::dec(x_12); -x_510 = lean::cnstr_get(x_507, 0); -lean::inc(x_510); -x_512 = lean::cnstr_get(x_507, 1); -lean::inc(x_512); -x_514 = lean::cnstr_get(x_507, 2); -lean::inc(x_514); -x_516 = lean::cnstr_get(x_507, 3); -lean::inc(x_516); -x_518 = lean::cnstr_get(x_507, 4); -lean::inc(x_518); -x_520 = lean::cnstr_get(x_507, 6); -lean::inc(x_520); -x_522 = lean::cnstr_get(x_507, 7); -lean::inc(x_522); +x_499 = lean::cnstr_get(x_496, 0); +lean::inc(x_499); +x_501 = lean::cnstr_get(x_496, 1); +lean::inc(x_501); +x_503 = lean::cnstr_get(x_496, 2); +lean::inc(x_503); +x_505 = lean::cnstr_get(x_496, 3); +lean::inc(x_505); +x_507 = lean::cnstr_get(x_496, 4); +lean::inc(x_507); +x_509 = lean::cnstr_get(x_496, 6); +lean::inc(x_509); +x_511 = lean::cnstr_get(x_496, 7); +lean::inc(x_511); +lean::dec(x_496); +if (lean::obj_tag(x_499) == 0) +{ +obj* x_515; obj* x_517; +lean::dec(x_499); +x_515 = lean::cnstr_get(x_505, 0); +lean::inc(x_515); +x_517 = lean::cnstr_get(x_505, 1); +lean::inc(x_517); +lean::dec(x_505); +if (lean::obj_tag(x_515) == 0) +{ +obj* x_528; obj* x_530; +lean::dec(x_509); lean::dec(x_507); -if (lean::obj_tag(x_510) == 0) -{ -obj* x_526; obj* x_528; -lean::dec(x_510); -x_526 = lean::cnstr_get(x_516, 0); -lean::inc(x_526); -x_528 = lean::cnstr_get(x_516, 1); +lean::dec(x_11); +lean::dec(x_503); +lean::dec(x_501); +lean::dec(x_511); +lean::dec(x_517); +lean::dec(x_515); +x_528 = l_list_mmap___main___at_lean_elaborator_declaration_elaborate___spec__1___closed__1; lean::inc(x_528); -lean::dec(x_516); -if (lean::obj_tag(x_526) == 0) -{ -obj* x_539; obj* x_541; -lean::dec(x_512); -lean::dec(x_11); -lean::dec(x_522); -lean::dec(x_528); -lean::dec(x_526); -lean::dec(x_514); -lean::dec(x_520); -lean::dec(x_518); -x_539 = l_list_mmap___main___at_lean_elaborator_declaration_elaborate___spec__1___closed__1; -lean::inc(x_539); -x_541 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_539, x_1, x_2); -x_5 = x_541; +x_530 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_528, x_1, x_2); +x_5 = x_530; goto lbl_6; } else { -obj* x_542; obj* x_545; obj* x_549; -x_542 = lean::cnstr_get(x_526, 0); -lean::inc(x_542); -lean::dec(x_526); -x_545 = lean::cnstr_get(x_11, 0); -lean::inc(x_545); +obj* x_531; obj* x_534; obj* x_538; +x_531 = lean::cnstr_get(x_515, 0); +lean::inc(x_531); +lean::dec(x_515); +x_534 = lean::cnstr_get(x_11, 0); +lean::inc(x_534); lean::dec(x_11); lean::inc(x_1); -x_549 = l_lean_elaborator_decl__modifiers__to__pexpr(x_545, x_1, x_2); -if (lean::obj_tag(x_549) == 0) +x_538 = l_lean_elaborator_decl__modifiers__to__pexpr(x_534, x_1, x_2); +if (lean::obj_tag(x_538) == 0) { -obj* x_559; obj* x_561; obj* x_562; -lean::dec(x_512); +obj* x_548; obj* x_550; obj* x_551; +lean::dec(x_509); +lean::dec(x_507); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_542); -lean::dec(x_522); -lean::dec(x_528); -lean::dec(x_514); -lean::dec(x_520); -lean::dec(x_518); -x_559 = lean::cnstr_get(x_549, 0); -lean::inc(x_559); -if (lean::is_shared(x_549)) { - lean::dec(x_549); - x_561 = lean::box(0); +lean::dec(x_503); +lean::dec(x_501); +lean::dec(x_531); +lean::dec(x_511); +lean::dec(x_517); +x_548 = lean::cnstr_get(x_538, 0); +lean::inc(x_548); +if (lean::is_shared(x_538)) { + lean::dec(x_538); + x_550 = lean::box(0); } else { - lean::cnstr_release(x_549, 0); - x_561 = x_549; + lean::cnstr_release(x_538, 0); + x_550 = x_538; } -if (lean::is_scalar(x_561)) { - x_562 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_550)) { + x_551 = lean::alloc_cnstr(0, 1, 0); } else { - x_562 = x_561; + x_551 = x_550; } -lean::cnstr_set(x_562, 0, x_559); -x_5 = x_562; +lean::cnstr_set(x_551, 0, x_548); +x_5 = x_551; goto lbl_6; } else { -obj* x_563; obj* x_565; obj* x_566; obj* x_568; obj* x_571; obj* x_572; obj* x_573; -x_563 = lean::cnstr_get(x_549, 0); -lean::inc(x_563); -if (lean::is_shared(x_549)) { - lean::dec(x_549); - x_565 = lean::box(0); +obj* x_552; obj* x_554; obj* x_555; obj* x_557; obj* x_560; obj* x_561; obj* x_562; +x_552 = lean::cnstr_get(x_538, 0); +lean::inc(x_552); +if (lean::is_shared(x_538)) { + lean::dec(x_538); + x_554 = lean::box(0); } else { - lean::cnstr_release(x_549, 0); - x_565 = x_549; + lean::cnstr_release(x_538, 0); + x_554 = x_538; } -x_566 = lean::cnstr_get(x_563, 0); -lean::inc(x_566); -x_568 = lean::cnstr_get(x_563, 1); -lean::inc(x_568); -lean::dec(x_563); -x_571 = lean::box(0); -if (lean::obj_tag(x_512) == 0) +x_555 = lean::cnstr_get(x_552, 0); +lean::inc(x_555); +x_557 = lean::cnstr_get(x_552, 1); +lean::inc(x_557); +lean::dec(x_552); +x_560 = lean::box(0); +if (lean::obj_tag(x_501) == 0) { -obj* x_575; obj* x_577; -x_575 = l_lean_expander_get__opt__type___main(x_528); +obj* x_564; obj* x_566; +x_564 = l_lean_expander_get__opt__type___main(x_517); lean::inc(x_1); -x_577 = l_lean_elaborator_to__pexpr___main(x_575, x_1, x_568); -if (lean::obj_tag(x_512) == 0) +x_566 = l_lean_elaborator_to__pexpr___main(x_564, x_1, x_557); +if (lean::obj_tag(x_501) == 0) { -if (lean::obj_tag(x_577) == 0) +if (lean::obj_tag(x_566) == 0) { -obj* x_588; obj* x_590; obj* x_591; -lean::dec(x_565); -lean::dec(x_566); +obj* x_576; obj* x_578; obj* x_579; +lean::dec(x_509); +lean::dec(x_555); +lean::dec(x_507); +lean::dec(x_554); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_542); -lean::dec(x_522); -lean::dec(x_514); -lean::dec(x_520); -lean::dec(x_518); -lean::dec(x_571); -x_588 = lean::cnstr_get(x_577, 0); -lean::inc(x_588); -if (lean::is_shared(x_577)) { - lean::dec(x_577); - x_590 = lean::box(0); +lean::dec(x_503); +lean::dec(x_531); +lean::dec(x_511); +x_576 = lean::cnstr_get(x_566, 0); +lean::inc(x_576); +if (lean::is_shared(x_566)) { + lean::dec(x_566); + x_578 = lean::box(0); } else { - lean::cnstr_release(x_577, 0); - x_590 = x_577; + lean::cnstr_release(x_566, 0); + x_578 = x_566; } -if (lean::is_scalar(x_590)) { - x_591 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_578)) { + x_579 = lean::alloc_cnstr(0, 1, 0); } else { - x_591 = x_590; + x_579 = x_578; } -lean::cnstr_set(x_591, 0, x_588); -x_5 = x_591; +lean::cnstr_set(x_579, 0, x_576); +x_5 = x_579; goto lbl_6; } else { -obj* x_592; -x_592 = lean::cnstr_get(x_577, 0); -lean::inc(x_592); -lean::dec(x_577); -x_572 = x_571; -x_573 = x_592; -goto lbl_574; +obj* x_580; +x_580 = lean::cnstr_get(x_566, 0); +lean::inc(x_580); +lean::dec(x_566); +x_561 = x_560; +x_562 = x_580; +goto lbl_563; } } else { -obj* x_595; -x_595 = lean::cnstr_get(x_512, 0); -lean::inc(x_595); -lean::dec(x_512); -if (lean::obj_tag(x_577) == 0) +obj* x_583; +x_583 = lean::cnstr_get(x_501, 0); +lean::inc(x_583); +lean::dec(x_501); +if (lean::obj_tag(x_566) == 0) { -obj* x_609; obj* x_611; obj* x_612; -lean::dec(x_565); -lean::dec(x_566); +obj* x_596; obj* x_598; obj* x_599; +lean::dec(x_509); +lean::dec(x_555); +lean::dec(x_507); +lean::dec(x_554); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_542); -lean::dec(x_522); -lean::dec(x_514); -lean::dec(x_520); -lean::dec(x_518); -lean::dec(x_595); -lean::dec(x_571); -x_609 = lean::cnstr_get(x_577, 0); +lean::dec(x_503); +lean::dec(x_531); +lean::dec(x_511); +lean::dec(x_583); +x_596 = lean::cnstr_get(x_566, 0); +lean::inc(x_596); +if (lean::is_shared(x_566)) { + lean::dec(x_566); + x_598 = lean::box(0); +} else { + lean::cnstr_release(x_566, 0); + x_598 = x_566; +} +if (lean::is_scalar(x_598)) { + x_599 = lean::alloc_cnstr(0, 1, 0); +} else { + x_599 = x_598; +} +lean::cnstr_set(x_599, 0, x_596); +x_5 = x_599; +goto lbl_6; +} +else +{ +obj* x_600; obj* x_603; obj* x_606; +x_600 = lean::cnstr_get(x_566, 0); +lean::inc(x_600); +lean::dec(x_566); +x_603 = lean::cnstr_get(x_583, 1); +lean::inc(x_603); +lean::dec(x_583); +x_606 = l_list_map___main___at_lean_elaborator_declaration_elaborate___spec__10(x_603); +x_561 = x_606; +x_562 = x_600; +goto lbl_563; +} +} +} +else +{ +obj* x_607; obj* x_609; obj* x_611; obj* x_613; obj* x_615; obj* x_617; obj* x_619; obj* x_621; obj* x_623; obj* x_627; obj* x_628; obj* x_629; obj* x_631; obj* x_633; obj* x_635; obj* x_637; obj* x_640; obj* x_641; obj* x_643; obj* x_645; obj* x_647; obj* x_649; obj* x_651; obj* x_654; obj* x_655; obj* x_657; +x_607 = lean::cnstr_get(x_501, 0); +lean::inc(x_607); +x_609 = lean::cnstr_get(x_557, 0); lean::inc(x_609); -if (lean::is_shared(x_577)) { - lean::dec(x_577); - x_611 = lean::box(0); -} else { - lean::cnstr_release(x_577, 0); - x_611 = x_577; -} -if (lean::is_scalar(x_611)) { - x_612 = lean::alloc_cnstr(0, 1, 0); -} else { - x_612 = x_611; -} -lean::cnstr_set(x_612, 0, x_609); -x_5 = x_612; -goto lbl_6; -} -else -{ -obj* x_613; obj* x_616; obj* x_619; -x_613 = lean::cnstr_get(x_577, 0); +x_611 = lean::cnstr_get(x_557, 1); +lean::inc(x_611); +x_613 = lean::cnstr_get(x_557, 2); lean::inc(x_613); -lean::dec(x_577); -x_616 = lean::cnstr_get(x_595, 1); -lean::inc(x_616); -lean::dec(x_595); -x_619 = l_list_map___main___at_lean_elaborator_declaration_elaborate___spec__10(x_616); -x_572 = x_619; -x_573 = x_613; -goto lbl_574; -} -} -} -else -{ -obj* x_620; obj* x_622; obj* x_624; obj* x_626; obj* x_628; obj* x_630; obj* x_632; obj* x_634; obj* x_636; obj* x_640; obj* x_641; obj* x_642; obj* x_644; obj* x_646; obj* x_648; obj* x_650; obj* x_653; obj* x_654; obj* x_656; obj* x_658; obj* x_660; obj* x_662; obj* x_664; obj* x_667; obj* x_668; obj* x_670; -x_620 = lean::cnstr_get(x_512, 0); -lean::inc(x_620); -x_622 = lean::cnstr_get(x_568, 0); -lean::inc(x_622); -x_624 = lean::cnstr_get(x_568, 1); -lean::inc(x_624); -x_626 = lean::cnstr_get(x_568, 2); -lean::inc(x_626); -x_628 = lean::cnstr_get(x_568, 3); -lean::inc(x_628); -x_630 = lean::cnstr_get(x_568, 4); -lean::inc(x_630); -x_632 = lean::cnstr_get(x_630, 0); -lean::inc(x_632); -x_634 = lean::cnstr_get(x_630, 1); -lean::inc(x_634); -x_636 = lean::cnstr_get(x_620, 1); -lean::inc(x_636); -lean::dec(x_620); -lean::inc(x_636); -x_640 = l_list_map___main___at_lean_elaborator_declaration_elaborate___spec__11(x_636); -x_641 = l_list_foldl___main___at_lean_elaborator_declaration_elaborate___spec__12(x_634, x_640); -x_642 = lean::cnstr_get(x_630, 2); -lean::inc(x_642); -x_644 = lean::cnstr_get(x_630, 3); -lean::inc(x_644); -x_646 = lean::cnstr_get(x_630, 4); -lean::inc(x_646); -x_648 = lean::cnstr_get(x_630, 5); -lean::inc(x_648); -x_650 = lean::cnstr_get(x_630, 6); -lean::inc(x_650); -lean::dec(x_630); -x_653 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_653, 0, x_632); -lean::cnstr_set(x_653, 1, x_641); -lean::cnstr_set(x_653, 2, x_642); -lean::cnstr_set(x_653, 3, x_644); -lean::cnstr_set(x_653, 4, x_646); -lean::cnstr_set(x_653, 5, x_648); -lean::cnstr_set(x_653, 6, x_650); -x_654 = lean::cnstr_get(x_568, 5); -lean::inc(x_654); -x_656 = lean::cnstr_get(x_568, 6); -lean::inc(x_656); -x_658 = lean::cnstr_get(x_568, 7); -lean::inc(x_658); -x_660 = lean::cnstr_get(x_568, 8); -lean::inc(x_660); -x_662 = lean::cnstr_get(x_568, 9); -lean::inc(x_662); -x_664 = lean::cnstr_get(x_568, 10); -lean::inc(x_664); -lean::dec(x_568); -x_667 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_667, 0, x_622); -lean::cnstr_set(x_667, 1, x_624); -lean::cnstr_set(x_667, 2, x_626); -lean::cnstr_set(x_667, 3, x_628); -lean::cnstr_set(x_667, 4, x_653); -lean::cnstr_set(x_667, 5, x_654); -lean::cnstr_set(x_667, 6, x_656); -lean::cnstr_set(x_667, 7, x_658); -lean::cnstr_set(x_667, 8, x_660); -lean::cnstr_set(x_667, 9, x_662); -lean::cnstr_set(x_667, 10, x_664); -x_668 = l_lean_expander_get__opt__type___main(x_528); +x_615 = lean::cnstr_get(x_557, 3); +lean::inc(x_615); +x_617 = lean::cnstr_get(x_557, 4); +lean::inc(x_617); +x_619 = lean::cnstr_get(x_617, 0); +lean::inc(x_619); +x_621 = lean::cnstr_get(x_617, 1); +lean::inc(x_621); +x_623 = lean::cnstr_get(x_607, 1); +lean::inc(x_623); +lean::dec(x_607); +lean::inc(x_623); +x_627 = l_list_map___main___at_lean_elaborator_declaration_elaborate___spec__11(x_623); +x_628 = l_list_foldl___main___at_lean_elaborator_declaration_elaborate___spec__12(x_621, x_627); +x_629 = lean::cnstr_get(x_617, 2); +lean::inc(x_629); +x_631 = lean::cnstr_get(x_617, 3); +lean::inc(x_631); +x_633 = lean::cnstr_get(x_617, 4); +lean::inc(x_633); +x_635 = lean::cnstr_get(x_617, 5); +lean::inc(x_635); +x_637 = lean::cnstr_get(x_617, 6); +lean::inc(x_637); +lean::dec(x_617); +x_640 = lean::alloc_cnstr(0, 7, 0); +lean::cnstr_set(x_640, 0, x_619); +lean::cnstr_set(x_640, 1, x_628); +lean::cnstr_set(x_640, 2, x_629); +lean::cnstr_set(x_640, 3, x_631); +lean::cnstr_set(x_640, 4, x_633); +lean::cnstr_set(x_640, 5, x_635); +lean::cnstr_set(x_640, 6, x_637); +x_641 = lean::cnstr_get(x_557, 5); +lean::inc(x_641); +x_643 = lean::cnstr_get(x_557, 6); +lean::inc(x_643); +x_645 = lean::cnstr_get(x_557, 7); +lean::inc(x_645); +x_647 = lean::cnstr_get(x_557, 8); +lean::inc(x_647); +x_649 = lean::cnstr_get(x_557, 9); +lean::inc(x_649); +x_651 = lean::cnstr_get(x_557, 10); +lean::inc(x_651); +lean::dec(x_557); +x_654 = lean::alloc_cnstr(0, 11, 0); +lean::cnstr_set(x_654, 0, x_609); +lean::cnstr_set(x_654, 1, x_611); +lean::cnstr_set(x_654, 2, x_613); +lean::cnstr_set(x_654, 3, x_615); +lean::cnstr_set(x_654, 4, x_640); +lean::cnstr_set(x_654, 5, x_641); +lean::cnstr_set(x_654, 6, x_643); +lean::cnstr_set(x_654, 7, x_645); +lean::cnstr_set(x_654, 8, x_647); +lean::cnstr_set(x_654, 9, x_649); +lean::cnstr_set(x_654, 10, x_651); +x_655 = l_lean_expander_get__opt__type___main(x_517); lean::inc(x_1); -x_670 = l_lean_elaborator_to__pexpr___main(x_668, x_1, x_667); -if (lean::obj_tag(x_512) == 0) +x_657 = l_lean_elaborator_to__pexpr___main(x_655, x_1, x_654); +if (lean::obj_tag(x_501) == 0) { -lean::dec(x_636); -if (lean::obj_tag(x_670) == 0) +lean::dec(x_623); +if (lean::obj_tag(x_657) == 0) { -obj* x_682; obj* x_684; obj* x_685; -lean::dec(x_565); -lean::dec(x_566); +obj* x_668; obj* x_670; obj* x_671; +lean::dec(x_509); +lean::dec(x_555); +lean::dec(x_507); +lean::dec(x_554); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_542); -lean::dec(x_522); -lean::dec(x_514); -lean::dec(x_520); -lean::dec(x_518); -lean::dec(x_571); -x_682 = lean::cnstr_get(x_670, 0); -lean::inc(x_682); -if (lean::is_shared(x_670)) { - lean::dec(x_670); - x_684 = lean::box(0); +lean::dec(x_503); +lean::dec(x_531); +lean::dec(x_511); +x_668 = lean::cnstr_get(x_657, 0); +lean::inc(x_668); +if (lean::is_shared(x_657)) { + lean::dec(x_657); + x_670 = lean::box(0); } else { - lean::cnstr_release(x_670, 0); - x_684 = x_670; + lean::cnstr_release(x_657, 0); + x_670 = x_657; } -if (lean::is_scalar(x_684)) { - x_685 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_670)) { + x_671 = lean::alloc_cnstr(0, 1, 0); } else { - x_685 = x_684; + x_671 = x_670; } -lean::cnstr_set(x_685, 0, x_682); -x_5 = x_685; +lean::cnstr_set(x_671, 0, x_668); +x_5 = x_671; goto lbl_6; } else { -obj* x_686; -x_686 = lean::cnstr_get(x_670, 0); +obj* x_672; +x_672 = lean::cnstr_get(x_657, 0); +lean::inc(x_672); +lean::dec(x_657); +x_561 = x_560; +x_562 = x_672; +goto lbl_563; +} +} +else +{ +lean::dec(x_501); +if (lean::obj_tag(x_657) == 0) +{ +obj* x_686; obj* x_688; obj* x_689; +lean::dec(x_509); +lean::dec(x_555); +lean::dec(x_507); +lean::dec(x_554); +lean::dec(x_1); +lean::dec(x_623); +lean::dec(x_0); +lean::dec(x_503); +lean::dec(x_531); +lean::dec(x_511); +x_686 = lean::cnstr_get(x_657, 0); lean::inc(x_686); -lean::dec(x_670); -x_572 = x_571; -x_573 = x_686; -goto lbl_574; -} -} -else -{ -lean::dec(x_512); -if (lean::obj_tag(x_670) == 0) -{ -obj* x_701; obj* x_703; obj* x_704; -lean::dec(x_565); -lean::dec(x_566); -lean::dec(x_1); -lean::dec(x_0); -lean::dec(x_542); -lean::dec(x_522); -lean::dec(x_514); -lean::dec(x_520); -lean::dec(x_518); -lean::dec(x_571); -lean::dec(x_636); -x_701 = lean::cnstr_get(x_670, 0); -lean::inc(x_701); -if (lean::is_shared(x_670)) { - lean::dec(x_670); - x_703 = lean::box(0); +if (lean::is_shared(x_657)) { + lean::dec(x_657); + x_688 = lean::box(0); } else { - lean::cnstr_release(x_670, 0); - x_703 = x_670; + lean::cnstr_release(x_657, 0); + x_688 = x_657; } -if (lean::is_scalar(x_703)) { - x_704 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_688)) { + x_689 = lean::alloc_cnstr(0, 1, 0); } else { - x_704 = x_703; + x_689 = x_688; } -lean::cnstr_set(x_704, 0, x_701); -x_5 = x_704; +lean::cnstr_set(x_689, 0, x_686); +x_5 = x_689; goto lbl_6; } else { -obj* x_705; obj* x_708; -x_705 = lean::cnstr_get(x_670, 0); -lean::inc(x_705); -lean::dec(x_670); -x_708 = l_list_map___main___at_lean_elaborator_declaration_elaborate___spec__13(x_636); -x_572 = x_708; -x_573 = x_705; -goto lbl_574; +obj* x_690; obj* x_693; +x_690 = lean::cnstr_get(x_657, 0); +lean::inc(x_690); +lean::dec(x_657); +x_693 = l_list_map___main___at_lean_elaborator_declaration_elaborate___spec__13(x_623); +x_561 = x_693; +x_562 = x_690; +goto lbl_563; } } } -lbl_574: +lbl_563: { -obj* x_709; obj* x_711; obj* x_715; -x_709 = lean::cnstr_get(x_573, 0); -lean::inc(x_709); -x_711 = lean::cnstr_get(x_573, 1); -lean::inc(x_711); -lean::dec(x_573); +obj* x_694; obj* x_696; obj* x_700; +x_694 = lean::cnstr_get(x_562, 0); +lean::inc(x_694); +x_696 = lean::cnstr_get(x_562, 1); +lean::inc(x_696); +lean::dec(x_562); lean::inc(x_1); -x_715 = l_lean_elaborator_simple__binders__to__pexpr(x_542, x_1, x_711); -if (lean::obj_tag(x_715) == 0) +x_700 = l_lean_elaborator_simple__binders__to__pexpr(x_531, x_1, x_696); +if (lean::obj_tag(x_700) == 0) { -obj* x_726; obj* x_729; -lean::dec(x_709); -lean::dec(x_566); +obj* x_710; obj* x_713; +lean::dec(x_509); +lean::dec(x_555); +lean::dec(x_507); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_522); -lean::dec(x_514); -lean::dec(x_520); -lean::dec(x_518); -lean::dec(x_571); -lean::dec(x_572); -x_726 = lean::cnstr_get(x_715, 0); +lean::dec(x_503); +lean::dec(x_511); +lean::dec(x_561); +lean::dec(x_694); +x_710 = lean::cnstr_get(x_700, 0); +lean::inc(x_710); +lean::dec(x_700); +if (lean::is_scalar(x_554)) { + x_713 = lean::alloc_cnstr(0, 1, 0); +} else { + x_713 = x_554; + lean::cnstr_set_tag(x_554, 0); +} +lean::cnstr_set(x_713, 0, x_710); +x_5 = x_713; +goto lbl_6; +} +else +{ +obj* x_714; obj* x_717; obj* x_719; obj* x_722; obj* x_723; obj* x_726; obj* x_727; uint8 x_728; obj* x_731; obj* x_732; +x_714 = lean::cnstr_get(x_700, 0); +lean::inc(x_714); +lean::dec(x_700); +x_717 = lean::cnstr_get(x_714, 0); +lean::inc(x_717); +x_719 = lean::cnstr_get(x_714, 1); +lean::inc(x_719); +lean::dec(x_714); +x_722 = l_lean_elaborator_names__to__pexpr(x_561); +x_723 = lean::cnstr_get(x_503, 0); +lean::inc(x_723); +lean::dec(x_503); +x_726 = l_lean_elaborator_mangle__ident(x_723); +x_727 = l_lean_elaborator_dummy; +x_728 = 0; +lean::inc(x_727); lean::inc(x_726); -lean::dec(x_715); -if (lean::is_scalar(x_565)) { - x_729 = lean::alloc_cnstr(0, 1, 0); -} else { - x_729 = x_565; - lean::cnstr_set_tag(x_565, 0); -} -lean::cnstr_set(x_729, 0, x_726); -x_5 = x_729; -goto lbl_6; +x_731 = lean_expr_local(x_726, x_726, x_727, x_728); +if (lean::obj_tag(x_507) == 0) +{ +x_732 = x_560; +goto lbl_733; } else { -obj* x_730; obj* x_733; obj* x_735; obj* x_738; obj* x_739; obj* x_742; obj* x_743; uint8 x_744; obj* x_747; obj* x_748; -x_730 = lean::cnstr_get(x_715, 0); -lean::inc(x_730); -lean::dec(x_715); -x_733 = lean::cnstr_get(x_730, 0); -lean::inc(x_733); -x_735 = lean::cnstr_get(x_730, 1); -lean::inc(x_735); -lean::dec(x_730); -x_738 = l_lean_elaborator_names__to__pexpr(x_572); -x_739 = lean::cnstr_get(x_514, 0); -lean::inc(x_739); -lean::dec(x_514); -x_742 = l_lean_elaborator_mangle__ident(x_739); -x_743 = l_lean_elaborator_dummy; -x_744 = 0; -lean::inc(x_743); -lean::inc(x_742); -x_747 = lean_expr_local(x_742, x_742, x_743, x_744); -if (lean::obj_tag(x_518) == 0) -{ -x_748 = x_571; -goto lbl_749; +obj* x_734; obj* x_737; +x_734 = lean::cnstr_get(x_507, 0); +lean::inc(x_734); +lean::dec(x_507); +x_737 = lean::cnstr_get(x_734, 1); +lean::inc(x_737); +lean::dec(x_734); +x_732 = x_737; +goto lbl_733; } -else +lbl_733: { -obj* x_750; obj* x_753; -x_750 = lean::cnstr_get(x_518, 0); -lean::inc(x_750); -lean::dec(x_518); -x_753 = lean::cnstr_get(x_750, 1); -lean::inc(x_753); -lean::dec(x_750); -x_748 = x_753; -goto lbl_749; -} -lbl_749: -{ -obj* x_757; +obj* x_741; lean::inc(x_1); -x_757 = l_list_mmap___main___at_lean_elaborator_declaration_elaborate___spec__7(x_748, x_1, x_735); -if (lean::obj_tag(x_757) == 0) +x_741 = l_list_mmap___main___at_lean_elaborator_declaration_elaborate___spec__7(x_732, x_1, x_719); +if (lean::obj_tag(x_741) == 0) { -obj* x_768; obj* x_771; -lean::dec(x_747); -lean::dec(x_709); -lean::dec(x_566); +obj* x_751; obj* x_754; +lean::dec(x_509); +lean::dec(x_555); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_522); -lean::dec(x_520); -lean::dec(x_571); -lean::dec(x_733); -lean::dec(x_738); -x_768 = lean::cnstr_get(x_757, 0); -lean::inc(x_768); -lean::dec(x_757); -if (lean::is_scalar(x_565)) { - x_771 = lean::alloc_cnstr(0, 1, 0); +lean::dec(x_511); +lean::dec(x_694); +lean::dec(x_722); +lean::dec(x_717); +lean::dec(x_731); +x_751 = lean::cnstr_get(x_741, 0); +lean::inc(x_751); +lean::dec(x_741); +if (lean::is_scalar(x_554)) { + x_754 = lean::alloc_cnstr(0, 1, 0); } else { - x_771 = x_565; - lean::cnstr_set_tag(x_565, 0); + x_754 = x_554; + lean::cnstr_set_tag(x_554, 0); } -lean::cnstr_set(x_771, 0, x_768); -x_5 = x_771; +lean::cnstr_set(x_754, 0, x_751); +x_5 = x_754; goto lbl_6; } else { -obj* x_772; obj* x_775; obj* x_777; obj* x_780; obj* x_782; obj* x_785; obj* x_786; -x_772 = lean::cnstr_get(x_757, 0); -lean::inc(x_772); -lean::dec(x_757); -x_775 = lean::cnstr_get(x_772, 0); -lean::inc(x_775); -x_777 = lean::cnstr_get(x_772, 1); -lean::inc(x_777); -lean::dec(x_772); -x_780 = l_lean_elaborator_mk__eqns___closed__1; -lean::inc(x_780); -x_782 = l_lean_expr_mk__capp(x_780, x_775); +obj* x_755; obj* x_758; obj* x_760; obj* x_763; obj* x_765; obj* x_768; obj* x_769; +x_755 = lean::cnstr_get(x_741, 0); +lean::inc(x_755); +lean::dec(x_741); +x_758 = lean::cnstr_get(x_755, 0); +lean::inc(x_758); +x_760 = lean::cnstr_get(x_755, 1); +lean::inc(x_760); +lean::dec(x_755); +x_763 = l_lean_elaborator_mk__eqns___closed__1; +lean::inc(x_763); +x_765 = l_lean_expr_mk__capp(x_763, x_758); lean::inc(x_1); lean::inc(x_0); -x_785 = l_list_mmap___main___at_lean_elaborator_declaration_elaborate___spec__9(x_0, x_522, x_1, x_777); -if (lean::obj_tag(x_520) == 0) +x_768 = l_list_mmap___main___at_lean_elaborator_declaration_elaborate___spec__9(x_0, x_511, x_1, x_760); +if (lean::obj_tag(x_509) == 0) { -obj* x_788; -x_788 = l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__7; -lean::inc(x_788); -x_786 = x_788; -goto lbl_787; +obj* x_771; +x_771 = l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__7; +lean::inc(x_771); +x_769 = x_771; +goto lbl_770; } else { -obj* x_790; obj* x_792; obj* x_795; -x_790 = lean::cnstr_get(x_520, 0); -lean::inc(x_790); -x_792 = lean::cnstr_get(x_790, 0); -lean::inc(x_792); -lean::dec(x_790); -x_795 = l_lean_elaborator_mangle__ident(x_792); -x_786 = x_795; -goto lbl_787; +obj* x_773; obj* x_775; obj* x_778; +x_773 = lean::cnstr_get(x_509, 0); +lean::inc(x_773); +x_775 = lean::cnstr_get(x_773, 0); +lean::inc(x_775); +lean::dec(x_773); +x_778 = l_lean_elaborator_mangle__ident(x_775); +x_769 = x_778; +goto lbl_770; } -lbl_787: +lbl_770: { -obj* x_798; -lean::inc(x_743); -lean::inc(x_786); -x_798 = lean_expr_local(x_786, x_786, x_743, x_744); -if (lean::obj_tag(x_520) == 0) +obj* x_781; +lean::inc(x_727); +lean::inc(x_769); +x_781 = lean_expr_local(x_769, x_769, x_727, x_728); +if (lean::obj_tag(x_509) == 0) { -if (lean::obj_tag(x_785) == 0) +if (lean::obj_tag(x_768) == 0) { -obj* x_809; obj* x_812; -lean::dec(x_747); -lean::dec(x_709); -lean::dec(x_566); +obj* x_791; obj* x_794; +lean::dec(x_781); +lean::dec(x_765); +lean::dec(x_555); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_798); -lean::dec(x_571); -lean::dec(x_733); -lean::dec(x_782); -lean::dec(x_738); -x_809 = lean::cnstr_get(x_785, 0); -lean::inc(x_809); -lean::dec(x_785); -if (lean::is_scalar(x_565)) { - x_812 = lean::alloc_cnstr(0, 1, 0); +lean::dec(x_694); +lean::dec(x_722); +lean::dec(x_717); +lean::dec(x_731); +x_791 = lean::cnstr_get(x_768, 0); +lean::inc(x_791); +lean::dec(x_768); +if (lean::is_scalar(x_554)) { + x_794 = lean::alloc_cnstr(0, 1, 0); } else { - x_812 = x_565; - lean::cnstr_set_tag(x_565, 0); + x_794 = x_554; + lean::cnstr_set_tag(x_554, 0); } -lean::cnstr_set(x_812, 0, x_809); -x_5 = x_812; +lean::cnstr_set(x_794, 0, x_791); +x_5 = x_794; goto lbl_6; } else { -obj* x_814; obj* x_817; obj* x_819; obj* x_823; obj* x_824; obj* x_825; obj* x_827; obj* x_828; obj* x_829; obj* x_830; obj* x_831; obj* x_832; obj* x_833; obj* x_834; obj* x_836; obj* x_837; obj* x_839; obj* x_840; -lean::dec(x_565); -x_814 = lean::cnstr_get(x_785, 0); -lean::inc(x_814); -lean::dec(x_785); -x_817 = lean::cnstr_get(x_814, 0); -lean::inc(x_817); -x_819 = lean::cnstr_get(x_814, 1); +obj* x_796; obj* x_799; obj* x_801; obj* x_805; obj* x_806; obj* x_807; obj* x_809; obj* x_810; obj* x_811; obj* x_812; obj* x_813; obj* x_814; obj* x_815; obj* x_816; obj* x_818; obj* x_819; obj* x_821; obj* x_822; +lean::dec(x_554); +x_796 = lean::cnstr_get(x_768, 0); +lean::inc(x_796); +lean::dec(x_768); +x_799 = lean::cnstr_get(x_796, 0); +lean::inc(x_799); +x_801 = lean::cnstr_get(x_796, 1); +lean::inc(x_801); +lean::dec(x_796); +lean::inc(x_763); +x_805 = l_lean_expr_mk__capp(x_763, x_799); +x_806 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_806, 0, x_805); +lean::cnstr_set(x_806, 1, x_560); +x_807 = l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__5; +lean::inc(x_807); +x_809 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_809, 0, x_807); +lean::cnstr_set(x_809, 1, x_806); +x_810 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_810, 0, x_781); +lean::cnstr_set(x_810, 1, x_809); +x_811 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_811, 0, x_694); +lean::cnstr_set(x_811, 1, x_810); +x_812 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_812, 0, x_765); +lean::cnstr_set(x_812, 1, x_811); +x_813 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_813, 0, x_717); +lean::cnstr_set(x_813, 1, x_812); +x_814 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_814, 0, x_731); +lean::cnstr_set(x_814, 1, x_813); +x_815 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_815, 0, x_722); +lean::cnstr_set(x_815, 1, x_814); +x_816 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_816, 0, x_555); +lean::cnstr_set(x_816, 1, x_815); +lean::inc(x_763); +x_818 = l_lean_expr_mk__capp(x_763, x_816); +x_819 = l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__6; lean::inc(x_819); -lean::dec(x_814); -lean::inc(x_780); -x_823 = l_lean_expr_mk__capp(x_780, x_817); -x_824 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_824, 0, x_823); -lean::cnstr_set(x_824, 1, x_571); -x_825 = l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__5; -lean::inc(x_825); -x_827 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_827, 0, x_825); -lean::cnstr_set(x_827, 1, x_824); -x_828 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_828, 0, x_798); -lean::cnstr_set(x_828, 1, x_827); -x_829 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_829, 0, x_709); -lean::cnstr_set(x_829, 1, x_828); -x_830 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_830, 0, x_782); -lean::cnstr_set(x_830, 1, x_829); -x_831 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_831, 0, x_733); -lean::cnstr_set(x_831, 1, x_830); -x_832 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_832, 0, x_747); -lean::cnstr_set(x_832, 1, x_831); -x_833 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_833, 0, x_738); -lean::cnstr_set(x_833, 1, x_832); -x_834 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_834, 0, x_566); -lean::cnstr_set(x_834, 1, x_833); -lean::inc(x_780); -x_836 = l_lean_expr_mk__capp(x_780, x_834); -x_837 = l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__6; -lean::inc(x_837); -x_839 = lean_expr_mk_mdata(x_837, x_836); -x_840 = l_lean_elaborator_old__elab__command(x_0, x_839, x_1, x_819); -x_5 = x_840; +x_821 = lean_expr_mk_mdata(x_819, x_818); +x_822 = l_lean_elaborator_old__elab__command(x_0, x_821, x_1, x_801); +x_5 = x_822; goto lbl_6; } } else { -obj* x_841; -x_841 = lean::cnstr_get(x_520, 0); -lean::inc(x_841); -lean::dec(x_520); -if (lean::obj_tag(x_785) == 0) +obj* x_823; +x_823 = lean::cnstr_get(x_509, 0); +lean::inc(x_823); +lean::dec(x_509); +if (lean::obj_tag(x_768) == 0) { -obj* x_855; obj* x_858; -lean::dec(x_747); -lean::dec(x_709); -lean::dec(x_566); +obj* x_836; obj* x_839; +lean::dec(x_781); +lean::dec(x_765); +lean::dec(x_555); lean::dec(x_1); lean::dec(x_0); -lean::dec(x_798); -lean::dec(x_841); -lean::dec(x_571); -lean::dec(x_733); -lean::dec(x_782); -lean::dec(x_738); -x_855 = lean::cnstr_get(x_785, 0); -lean::inc(x_855); -lean::dec(x_785); -if (lean::is_scalar(x_565)) { - x_858 = lean::alloc_cnstr(0, 1, 0); +lean::dec(x_823); +lean::dec(x_694); +lean::dec(x_722); +lean::dec(x_717); +lean::dec(x_731); +x_836 = lean::cnstr_get(x_768, 0); +lean::inc(x_836); +lean::dec(x_768); +if (lean::is_scalar(x_554)) { + x_839 = lean::alloc_cnstr(0, 1, 0); } else { - x_858 = x_565; - lean::cnstr_set_tag(x_565, 0); + x_839 = x_554; + lean::cnstr_set_tag(x_554, 0); } -lean::cnstr_set(x_858, 0, x_855); -x_5 = x_858; +lean::cnstr_set(x_839, 0, x_836); +x_5 = x_839; goto lbl_6; } else { -obj* x_860; obj* x_863; obj* x_865; obj* x_868; obj* x_871; obj* x_873; obj* x_874; obj* x_875; obj* x_876; obj* x_877; obj* x_878; obj* x_879; obj* x_880; obj* x_881; obj* x_882; obj* x_884; obj* x_885; obj* x_887; obj* x_888; -lean::dec(x_565); -x_860 = lean::cnstr_get(x_785, 0); -lean::inc(x_860); -lean::dec(x_785); -x_863 = lean::cnstr_get(x_860, 0); -lean::inc(x_863); -x_865 = lean::cnstr_get(x_860, 1); -lean::inc(x_865); -lean::dec(x_860); -x_868 = lean::cnstr_get(x_841, 1); -lean::inc(x_868); +obj* x_841; obj* x_844; obj* x_846; obj* x_849; obj* x_852; obj* x_854; obj* x_855; obj* x_856; obj* x_857; obj* x_858; obj* x_859; obj* x_860; obj* x_861; obj* x_862; obj* x_863; obj* x_865; obj* x_866; obj* x_868; obj* x_869; +lean::dec(x_554); +x_841 = lean::cnstr_get(x_768, 0); +lean::inc(x_841); +lean::dec(x_768); +x_844 = lean::cnstr_get(x_841, 0); +lean::inc(x_844); +x_846 = lean::cnstr_get(x_841, 1); +lean::inc(x_846); lean::dec(x_841); -x_871 = l_lean_elaborator_infer__mod__to__pexpr(x_868); -lean::inc(x_780); -x_873 = l_lean_expr_mk__capp(x_780, x_863); -x_874 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_874, 0, x_873); -lean::cnstr_set(x_874, 1, x_571); -x_875 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_875, 0, x_871); -lean::cnstr_set(x_875, 1, x_874); -x_876 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_876, 0, x_798); -lean::cnstr_set(x_876, 1, x_875); -x_877 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_877, 0, x_709); -lean::cnstr_set(x_877, 1, x_876); -x_878 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_878, 0, x_782); -lean::cnstr_set(x_878, 1, x_877); -x_879 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_879, 0, x_733); -lean::cnstr_set(x_879, 1, x_878); -x_880 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_880, 0, x_747); -lean::cnstr_set(x_880, 1, x_879); -x_881 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_881, 0, x_738); -lean::cnstr_set(x_881, 1, x_880); -x_882 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_882, 0, x_566); -lean::cnstr_set(x_882, 1, x_881); -lean::inc(x_780); -x_884 = l_lean_expr_mk__capp(x_780, x_882); -x_885 = l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__6; -lean::inc(x_885); -x_887 = lean_expr_mk_mdata(x_885, x_884); -x_888 = l_lean_elaborator_old__elab__command(x_0, x_887, x_1, x_865); -x_5 = x_888; +x_849 = lean::cnstr_get(x_823, 1); +lean::inc(x_849); +lean::dec(x_823); +x_852 = l_lean_elaborator_infer__mod__to__pexpr(x_849); +lean::inc(x_763); +x_854 = l_lean_expr_mk__capp(x_763, x_844); +x_855 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_855, 0, x_854); +lean::cnstr_set(x_855, 1, x_560); +x_856 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_856, 0, x_852); +lean::cnstr_set(x_856, 1, x_855); +x_857 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_857, 0, x_781); +lean::cnstr_set(x_857, 1, x_856); +x_858 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_858, 0, x_694); +lean::cnstr_set(x_858, 1, x_857); +x_859 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_859, 0, x_765); +lean::cnstr_set(x_859, 1, x_858); +x_860 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_860, 0, x_717); +lean::cnstr_set(x_860, 1, x_859); +x_861 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_861, 0, x_731); +lean::cnstr_set(x_861, 1, x_860); +x_862 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_862, 0, x_722); +lean::cnstr_set(x_862, 1, x_861); +x_863 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_863, 0, x_555); +lean::cnstr_set(x_863, 1, x_862); +lean::inc(x_763); +x_865 = l_lean_expr_mk__capp(x_763, x_863); +x_866 = l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__6; +lean::inc(x_866); +x_868 = lean_expr_mk_mdata(x_866, x_865); +x_869 = l_lean_elaborator_old__elab__command(x_0, x_868, x_1, x_846); +x_5 = x_869; goto lbl_6; } } @@ -18713,19 +18655,19 @@ goto lbl_6; } else { -obj* x_897; obj* x_899; -lean::dec(x_512); -lean::dec(x_510); +obj* x_878; obj* x_880; +lean::dec(x_509); +lean::dec(x_507); lean::dec(x_11); -lean::dec(x_522); -lean::dec(x_516); -lean::dec(x_514); -lean::dec(x_520); -lean::dec(x_518); -x_897 = l_list_mmap___main___at_lean_elaborator_declaration_elaborate___spec__1___closed__1; -lean::inc(x_897); -x_899 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_897, x_1, x_2); -x_5 = x_899; +lean::dec(x_505); +lean::dec(x_503); +lean::dec(x_501); +lean::dec(x_499); +lean::dec(x_511); +x_878 = l_list_mmap___main___at_lean_elaborator_declaration_elaborate___spec__1___closed__1; +lean::inc(x_878); +x_880 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_0, x_878, x_1, x_2); +x_5 = x_880; goto lbl_6; } } @@ -18734,95 +18676,95 @@ lbl_6: { if (lean::obj_tag(x_5) == 0) { -obj* x_901; obj* x_903; obj* x_904; +obj* x_882; obj* x_884; obj* x_885; lean::dec(x_3); -x_901 = lean::cnstr_get(x_5, 0); -lean::inc(x_901); +x_882 = lean::cnstr_get(x_5, 0); +lean::inc(x_882); if (lean::is_shared(x_5)) { lean::dec(x_5); - x_903 = lean::box(0); + x_884 = lean::box(0); } else { lean::cnstr_release(x_5, 0); - x_903 = x_5; + x_884 = x_5; } -if (lean::is_scalar(x_903)) { - x_904 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_884)) { + x_885 = lean::alloc_cnstr(0, 1, 0); } else { - x_904 = x_903; + x_885 = x_884; } -lean::cnstr_set(x_904, 0, x_901); -return x_904; +lean::cnstr_set(x_885, 0, x_882); +return x_885; } else { -obj* x_905; obj* x_907; obj* x_908; obj* x_910; obj* x_911; obj* x_913; obj* x_915; obj* x_917; obj* x_919; obj* x_921; obj* x_923; obj* x_925; obj* x_927; obj* x_929; obj* x_932; obj* x_933; obj* x_934; obj* x_935; -x_905 = lean::cnstr_get(x_5, 0); -lean::inc(x_905); +obj* x_886; obj* x_888; obj* x_889; obj* x_891; obj* x_892; obj* x_894; obj* x_896; obj* x_898; obj* x_900; obj* x_902; obj* x_904; obj* x_906; obj* x_908; obj* x_910; obj* x_913; obj* x_914; obj* x_915; obj* x_916; +x_886 = lean::cnstr_get(x_5, 0); +lean::inc(x_886); if (lean::is_shared(x_5)) { lean::dec(x_5); - x_907 = lean::box(0); + x_888 = lean::box(0); } else { lean::cnstr_release(x_5, 0); - x_907 = x_5; + x_888 = x_5; } -x_908 = lean::cnstr_get(x_905, 1); +x_889 = lean::cnstr_get(x_886, 1); +lean::inc(x_889); +if (lean::is_shared(x_886)) { + lean::dec(x_886); + x_891 = lean::box(0); +} else { + lean::cnstr_release(x_886, 0); + lean::cnstr_release(x_886, 1); + x_891 = x_886; +} +x_892 = lean::cnstr_get(x_889, 0); +lean::inc(x_892); +x_894 = lean::cnstr_get(x_889, 1); +lean::inc(x_894); +x_896 = lean::cnstr_get(x_889, 2); +lean::inc(x_896); +x_898 = lean::cnstr_get(x_889, 3); +lean::inc(x_898); +x_900 = lean::cnstr_get(x_889, 5); +lean::inc(x_900); +x_902 = lean::cnstr_get(x_889, 6); +lean::inc(x_902); +x_904 = lean::cnstr_get(x_889, 7); +lean::inc(x_904); +x_906 = lean::cnstr_get(x_889, 8); +lean::inc(x_906); +x_908 = lean::cnstr_get(x_889, 9); lean::inc(x_908); -if (lean::is_shared(x_905)) { - lean::dec(x_905); - x_910 = lean::box(0); +x_910 = lean::cnstr_get(x_889, 10); +lean::inc(x_910); +lean::dec(x_889); +x_913 = lean::alloc_cnstr(0, 11, 0); +lean::cnstr_set(x_913, 0, x_892); +lean::cnstr_set(x_913, 1, x_894); +lean::cnstr_set(x_913, 2, x_896); +lean::cnstr_set(x_913, 3, x_898); +lean::cnstr_set(x_913, 4, x_3); +lean::cnstr_set(x_913, 5, x_900); +lean::cnstr_set(x_913, 6, x_902); +lean::cnstr_set(x_913, 7, x_904); +lean::cnstr_set(x_913, 8, x_906); +lean::cnstr_set(x_913, 9, x_908); +lean::cnstr_set(x_913, 10, x_910); +x_914 = lean::box(0); +if (lean::is_scalar(x_891)) { + x_915 = lean::alloc_cnstr(0, 2, 0); } else { - lean::cnstr_release(x_905, 0); - lean::cnstr_release(x_905, 1); - x_910 = x_905; + x_915 = x_891; } -x_911 = lean::cnstr_get(x_908, 0); -lean::inc(x_911); -x_913 = lean::cnstr_get(x_908, 1); -lean::inc(x_913); -x_915 = lean::cnstr_get(x_908, 2); -lean::inc(x_915); -x_917 = lean::cnstr_get(x_908, 3); -lean::inc(x_917); -x_919 = lean::cnstr_get(x_908, 5); -lean::inc(x_919); -x_921 = lean::cnstr_get(x_908, 6); -lean::inc(x_921); -x_923 = lean::cnstr_get(x_908, 7); -lean::inc(x_923); -x_925 = lean::cnstr_get(x_908, 8); -lean::inc(x_925); -x_927 = lean::cnstr_get(x_908, 9); -lean::inc(x_927); -x_929 = lean::cnstr_get(x_908, 10); -lean::inc(x_929); -lean::dec(x_908); -x_932 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_932, 0, x_911); -lean::cnstr_set(x_932, 1, x_913); -lean::cnstr_set(x_932, 2, x_915); -lean::cnstr_set(x_932, 3, x_917); -lean::cnstr_set(x_932, 4, x_3); -lean::cnstr_set(x_932, 5, x_919); -lean::cnstr_set(x_932, 6, x_921); -lean::cnstr_set(x_932, 7, x_923); -lean::cnstr_set(x_932, 8, x_925); -lean::cnstr_set(x_932, 9, x_927); -lean::cnstr_set(x_932, 10, x_929); -x_933 = lean::box(0); -if (lean::is_scalar(x_910)) { - x_934 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_915, 0, x_914); +lean::cnstr_set(x_915, 1, x_913); +if (lean::is_scalar(x_888)) { + x_916 = lean::alloc_cnstr(1, 1, 0); } else { - x_934 = x_910; + x_916 = x_888; } -lean::cnstr_set(x_934, 0, x_933); -lean::cnstr_set(x_934, 1, x_932); -if (lean::is_scalar(x_907)) { - x_935 = lean::alloc_cnstr(1, 1, 0); -} else { - x_935 = x_907; -} -lean::cnstr_set(x_935, 0, x_934); -return x_935; +lean::cnstr_set(x_916, 0, x_915); +return x_916; } } } @@ -18994,8 +18936,8 @@ if (lean::obj_tag(x_43) == 0) obj* x_48; obj* x_50; obj* x_51; lean::dec(x_6); lean::dec(x_10); -lean::dec(x_42); lean::dec(x_38); +lean::dec(x_42); x_48 = lean::cnstr_get(x_43, 0); lean::inc(x_48); if (lean::is_shared(x_43)) { @@ -19093,7 +19035,7 @@ lean::inc(x_73); x_77 = l_lean_elaborator_ordered__rbmap_find___at_lean_elaborator_variables_elaborate___spec__1(x_73, x_70); if (lean::obj_tag(x_77) == 0) { -obj* x_81; obj* x_82; obj* x_85; obj* x_86; obj* x_89; obj* x_90; obj* x_91; obj* x_94; +obj* x_81; obj* x_82; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_92; lean::dec(x_15); lean::dec(x_71); lean::dec(x_73); @@ -19103,153 +19045,151 @@ lean::inc(x_70); lean::inc(x_82); x_85 = l_lean_name_to__string__with__sep___main(x_82, x_70); x_86 = l_lean_parser_substring_of__string(x_85); -lean::inc(x_81); -lean::inc(x_81); -x_89 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_89, 0, x_81); -lean::cnstr_set(x_89, 1, x_86); -lean::cnstr_set(x_89, 2, x_70); -lean::cnstr_set(x_89, 3, x_81); -lean::cnstr_set(x_89, 4, x_81); -x_90 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_90, 0, x_89); -x_91 = l_string_join___closed__1; +x_87 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_87, 0, x_81); +lean::cnstr_set(x_87, 1, x_86); +lean::cnstr_set(x_87, 2, x_70); +lean::cnstr_set(x_87, 3, x_81); +lean::cnstr_set(x_87, 4, x_81); +x_88 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +x_89 = l_string_join___closed__1; lean::inc(x_1); -lean::inc(x_91); -x_94 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_90, x_91, x_1, x_2); -if (lean::obj_tag(x_94) == 0) +lean::inc(x_89); +x_92 = l_lean_expander_error___at_lean_elaborator_level__get__app__args___main___spec__1___rarg(x_88, x_89, x_1, x_2); +if (lean::obj_tag(x_92) == 0) { -obj* x_100; obj* x_102; obj* x_103; +obj* x_98; obj* x_100; obj* x_101; lean::dec(x_6); lean::dec(x_10); lean::dec(x_8); lean::dec(x_1); lean::dec(x_19); -x_100 = lean::cnstr_get(x_94, 0); -lean::inc(x_100); -if (lean::is_shared(x_94)) { - lean::dec(x_94); - x_102 = lean::box(0); +x_98 = lean::cnstr_get(x_92, 0); +lean::inc(x_98); +if (lean::is_shared(x_92)) { + lean::dec(x_92); + x_100 = lean::box(0); } else { - lean::cnstr_release(x_94, 0); - x_102 = x_94; + lean::cnstr_release(x_92, 0); + x_100 = x_92; } -if (lean::is_scalar(x_102)) { - x_103 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_100)) { + x_101 = lean::alloc_cnstr(0, 1, 0); } else { - x_103 = x_102; + x_101 = x_100; } -lean::cnstr_set(x_103, 0, x_100); -return x_103; +lean::cnstr_set(x_101, 0, x_98); +return x_101; } else { -obj* x_104; obj* x_107; uint8 x_110; obj* x_111; obj* x_112; -x_104 = lean::cnstr_get(x_94, 0); -lean::inc(x_104); -lean::dec(x_94); -x_107 = lean::cnstr_get(x_104, 1); -lean::inc(x_107); -lean::dec(x_104); -x_110 = 0; -x_111 = lean::box(x_110); +obj* x_102; obj* x_105; uint8 x_108; obj* x_109; obj* x_110; +x_102 = lean::cnstr_get(x_92, 0); +lean::inc(x_102); +lean::dec(x_92); +x_105 = lean::cnstr_get(x_102, 1); +lean::inc(x_105); +lean::dec(x_102); +x_108 = 0; +x_109 = lean::box(x_108); if (lean::is_scalar(x_19)) { - x_112 = lean::alloc_cnstr(0, 2, 0); + x_110 = lean::alloc_cnstr(0, 2, 0); } else { - x_112 = x_19; + x_110 = x_19; } -lean::cnstr_set(x_112, 0, x_111); -lean::cnstr_set(x_112, 1, x_107); -x_11 = x_112; +lean::cnstr_set(x_110, 0, x_109); +lean::cnstr_set(x_110, 1, x_105); +x_11 = x_110; goto lbl_12; } } else { -obj* x_113; obj* x_116; obj* x_119; obj* x_121; obj* x_123; obj* x_125; obj* x_127; obj* x_129; obj* x_131; obj* x_133; obj* x_136; uint8 x_137; obj* x_139; obj* x_140; obj* x_141; obj* x_143; obj* x_145; obj* x_147; obj* x_150; obj* x_151; obj* x_153; obj* x_155; obj* x_157; obj* x_159; obj* x_161; obj* x_164; uint8 x_165; obj* x_166; obj* x_167; -x_113 = lean::cnstr_get(x_77, 0); -lean::inc(x_113); +obj* x_111; obj* x_114; obj* x_117; obj* x_119; obj* x_121; obj* x_123; obj* x_125; obj* x_127; obj* x_129; obj* x_131; obj* x_134; uint8 x_135; obj* x_137; obj* x_138; obj* x_139; obj* x_141; obj* x_143; obj* x_145; obj* x_148; obj* x_149; obj* x_151; obj* x_153; obj* x_155; obj* x_157; obj* x_159; obj* x_162; uint8 x_163; obj* x_164; obj* x_165; +x_111 = lean::cnstr_get(x_77, 0); +lean::inc(x_111); lean::dec(x_77); -x_116 = lean::cnstr_get(x_113, 1); -lean::inc(x_116); -lean::dec(x_113); -x_119 = lean::cnstr_get(x_2, 0); +x_114 = lean::cnstr_get(x_111, 1); +lean::inc(x_114); +lean::dec(x_111); +x_117 = lean::cnstr_get(x_2, 0); +lean::inc(x_117); +x_119 = lean::cnstr_get(x_2, 1); lean::inc(x_119); -x_121 = lean::cnstr_get(x_2, 1); +x_121 = lean::cnstr_get(x_2, 2); lean::inc(x_121); -x_123 = lean::cnstr_get(x_2, 2); +x_123 = lean::cnstr_get(x_2, 3); lean::inc(x_123); -x_125 = lean::cnstr_get(x_2, 3); +x_125 = lean::cnstr_get(x_71, 0); lean::inc(x_125); -x_127 = lean::cnstr_get(x_71, 0); +x_127 = lean::cnstr_get(x_71, 1); lean::inc(x_127); -x_129 = lean::cnstr_get(x_71, 1); +x_129 = lean::cnstr_get(x_114, 0); lean::inc(x_129); -x_131 = lean::cnstr_get(x_116, 0); +x_131 = lean::cnstr_get(x_114, 1); lean::inc(x_131); -x_133 = lean::cnstr_get(x_116, 1); -lean::inc(x_133); -lean::dec(x_116); -x_136 = lean::alloc_cnstr(0, 2, 1); -lean::cnstr_set(x_136, 0, x_131); -lean::cnstr_set(x_136, 1, x_133); -x_137 = lean::unbox(x_15); +lean::dec(x_114); +x_134 = lean::alloc_cnstr(0, 2, 1); +lean::cnstr_set(x_134, 0, x_129); +lean::cnstr_set(x_134, 1, x_131); +x_135 = lean::unbox(x_15); lean::dec(x_15); -lean::cnstr_set_scalar(x_136, sizeof(void*)*2, x_137); -x_139 = x_136; -x_140 = l_lean_elaborator_ordered__rbmap_insert___at_lean_elaborator_variables_elaborate___spec__3(x_73, x_70, x_139); -x_141 = lean::cnstr_get(x_71, 3); +lean::cnstr_set_scalar(x_134, sizeof(void*)*2, x_135); +x_137 = x_134; +x_138 = l_lean_elaborator_ordered__rbmap_insert___at_lean_elaborator_variables_elaborate___spec__3(x_73, x_70, x_137); +x_139 = lean::cnstr_get(x_71, 3); +lean::inc(x_139); +x_141 = lean::cnstr_get(x_71, 4); lean::inc(x_141); -x_143 = lean::cnstr_get(x_71, 4); +x_143 = lean::cnstr_get(x_71, 5); lean::inc(x_143); -x_145 = lean::cnstr_get(x_71, 5); +x_145 = lean::cnstr_get(x_71, 6); lean::inc(x_145); -x_147 = lean::cnstr_get(x_71, 6); -lean::inc(x_147); lean::dec(x_71); -x_150 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_150, 0, x_127); -lean::cnstr_set(x_150, 1, x_129); -lean::cnstr_set(x_150, 2, x_140); -lean::cnstr_set(x_150, 3, x_141); -lean::cnstr_set(x_150, 4, x_143); -lean::cnstr_set(x_150, 5, x_145); -lean::cnstr_set(x_150, 6, x_147); -x_151 = lean::cnstr_get(x_2, 5); +x_148 = lean::alloc_cnstr(0, 7, 0); +lean::cnstr_set(x_148, 0, x_125); +lean::cnstr_set(x_148, 1, x_127); +lean::cnstr_set(x_148, 2, x_138); +lean::cnstr_set(x_148, 3, x_139); +lean::cnstr_set(x_148, 4, x_141); +lean::cnstr_set(x_148, 5, x_143); +lean::cnstr_set(x_148, 6, x_145); +x_149 = lean::cnstr_get(x_2, 5); +lean::inc(x_149); +x_151 = lean::cnstr_get(x_2, 6); lean::inc(x_151); -x_153 = lean::cnstr_get(x_2, 6); +x_153 = lean::cnstr_get(x_2, 7); lean::inc(x_153); -x_155 = lean::cnstr_get(x_2, 7); +x_155 = lean::cnstr_get(x_2, 8); lean::inc(x_155); -x_157 = lean::cnstr_get(x_2, 8); +x_157 = lean::cnstr_get(x_2, 9); lean::inc(x_157); -x_159 = lean::cnstr_get(x_2, 9); +x_159 = lean::cnstr_get(x_2, 10); lean::inc(x_159); -x_161 = lean::cnstr_get(x_2, 10); -lean::inc(x_161); lean::dec(x_2); -x_164 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_164, 0, x_119); -lean::cnstr_set(x_164, 1, x_121); -lean::cnstr_set(x_164, 2, x_123); -lean::cnstr_set(x_164, 3, x_125); -lean::cnstr_set(x_164, 4, x_150); -lean::cnstr_set(x_164, 5, x_151); -lean::cnstr_set(x_164, 6, x_153); -lean::cnstr_set(x_164, 7, x_155); -lean::cnstr_set(x_164, 8, x_157); -lean::cnstr_set(x_164, 9, x_159); -lean::cnstr_set(x_164, 10, x_161); -x_165 = 0; -x_166 = lean::box(x_165); +x_162 = lean::alloc_cnstr(0, 11, 0); +lean::cnstr_set(x_162, 0, x_117); +lean::cnstr_set(x_162, 1, x_119); +lean::cnstr_set(x_162, 2, x_121); +lean::cnstr_set(x_162, 3, x_123); +lean::cnstr_set(x_162, 4, x_148); +lean::cnstr_set(x_162, 5, x_149); +lean::cnstr_set(x_162, 6, x_151); +lean::cnstr_set(x_162, 7, x_153); +lean::cnstr_set(x_162, 8, x_155); +lean::cnstr_set(x_162, 9, x_157); +lean::cnstr_set(x_162, 10, x_159); +x_163 = 0; +x_164 = lean::box(x_163); if (lean::is_scalar(x_19)) { - x_167 = lean::alloc_cnstr(0, 2, 0); + x_165 = lean::alloc_cnstr(0, 2, 0); } else { - x_167 = x_19; + x_165 = x_19; } -lean::cnstr_set(x_167, 0, x_166); -lean::cnstr_set(x_167, 1, x_164); -x_11 = x_167; +lean::cnstr_set(x_165, 0, x_164); +lean::cnstr_set(x_165, 1, x_162); +x_11 = x_165; goto lbl_12; } } @@ -19267,16 +19207,14 @@ return x_0; obj* _init_l_lean_elaborator_variables_elaborate___closed__2() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::box(0); x_1 = lean::mk_string("command"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("variables"); -lean::inc(x_0); -x_6 = lean_name_mk_string(x_0, x_4); -x_7 = l_lean_kvmap_set__name(x_0, x_3, x_6); -return x_7; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("variables"); +x_4 = lean_name_mk_string(x_0, x_3); +x_5 = l_lean_kvmap_set__name(x_0, x_2, x_4); +return x_5; } } obj* l_lean_elaborator_variables_elaborate(obj* x_0, obj* x_1, obj* x_2) { @@ -22755,7 +22693,7 @@ goto lbl_8; } else { -obj* x_17; obj* x_19; obj* x_21; obj* x_23; obj* x_25; obj* x_27; obj* x_30; obj* x_33; obj* x_34; uint8 x_35; obj* x_36; obj* x_37; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_49; obj* x_51; obj* x_53; obj* x_55; obj* x_58; obj* x_59; obj* x_60; +obj* x_17; obj* x_19; obj* x_21; obj* x_23; obj* x_25; obj* x_27; obj* x_30; obj* x_33; obj* x_34; uint8 x_35; obj* x_36; obj* x_37; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_48; obj* x_50; obj* x_52; obj* x_54; obj* x_57; obj* x_58; obj* x_59; lean::dec(x_6); x_17 = lean::cnstr_get(x_2, 0); lean::inc(x_17); @@ -22780,241 +22718,240 @@ x_36 = l_string_join___closed__1; x_37 = l_lean_elaborator_notation_elaborate___closed__2; lean::inc(x_37); lean::inc(x_36); -lean::inc(x_33); lean::inc(x_34); -x_42 = lean::alloc_cnstr(0, 5, 1); -lean::cnstr_set(x_42, 0, x_30); -lean::cnstr_set(x_42, 1, x_34); -lean::cnstr_set(x_42, 2, x_33); -lean::cnstr_set(x_42, 3, x_36); -lean::cnstr_set(x_42, 4, x_37); -lean::cnstr_set_scalar(x_42, sizeof(void*)*5, x_35); -x_43 = x_42; -x_44 = lean::cnstr_get(x_2, 5); -lean::inc(x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_43); -lean::cnstr_set(x_46, 1, x_44); -x_47 = lean::cnstr_get(x_2, 6); -lean::inc(x_47); -x_49 = lean::cnstr_get(x_2, 7); -lean::inc(x_49); -x_51 = lean::cnstr_get(x_2, 8); -lean::inc(x_51); -x_53 = lean::cnstr_get(x_2, 9); -lean::inc(x_53); -x_55 = lean::cnstr_get(x_2, 10); -lean::inc(x_55); +x_41 = lean::alloc_cnstr(0, 5, 1); +lean::cnstr_set(x_41, 0, x_30); +lean::cnstr_set(x_41, 1, x_34); +lean::cnstr_set(x_41, 2, x_33); +lean::cnstr_set(x_41, 3, x_36); +lean::cnstr_set(x_41, 4, x_37); +lean::cnstr_set_scalar(x_41, sizeof(void*)*5, x_35); +x_42 = x_41; +x_43 = lean::cnstr_get(x_2, 5); +lean::inc(x_43); +x_45 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_45, 0, x_42); +lean::cnstr_set(x_45, 1, x_43); +x_46 = lean::cnstr_get(x_2, 6); +lean::inc(x_46); +x_48 = lean::cnstr_get(x_2, 7); +lean::inc(x_48); +x_50 = lean::cnstr_get(x_2, 8); +lean::inc(x_50); +x_52 = lean::cnstr_get(x_2, 9); +lean::inc(x_52); +x_54 = lean::cnstr_get(x_2, 10); +lean::inc(x_54); lean::dec(x_2); -x_58 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_58, 0, x_17); -lean::cnstr_set(x_58, 1, x_19); -lean::cnstr_set(x_58, 2, x_21); -lean::cnstr_set(x_58, 3, x_23); -lean::cnstr_set(x_58, 4, x_25); -lean::cnstr_set(x_58, 5, x_46); -lean::cnstr_set(x_58, 6, x_47); -lean::cnstr_set(x_58, 7, x_49); -lean::cnstr_set(x_58, 8, x_51); -lean::cnstr_set(x_58, 9, x_53); -lean::cnstr_set(x_58, 10, x_55); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_33); -lean::cnstr_set(x_59, 1, x_58); -x_60 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_60, 0, x_59); -return x_60; +x_57 = lean::alloc_cnstr(0, 11, 0); +lean::cnstr_set(x_57, 0, x_17); +lean::cnstr_set(x_57, 1, x_19); +lean::cnstr_set(x_57, 2, x_21); +lean::cnstr_set(x_57, 3, x_23); +lean::cnstr_set(x_57, 4, x_25); +lean::cnstr_set(x_57, 5, x_45); +lean::cnstr_set(x_57, 6, x_46); +lean::cnstr_set(x_57, 7, x_48); +lean::cnstr_set(x_57, 8, x_50); +lean::cnstr_set(x_57, 9, x_52); +lean::cnstr_set(x_57, 10, x_54); +x_58 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_58, 0, x_33); +lean::cnstr_set(x_58, 1, x_57); +x_59 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_59, 0, x_58); +return x_59; } lbl_8: { -obj* x_63; +obj* x_62; lean::dec(x_7); lean::inc(x_1); -x_63 = l_lean_elaborator_notation_elaborate__aux(x_6, x_1, x_2); -if (lean::obj_tag(x_63) == 0) +x_62 = l_lean_elaborator_notation_elaborate__aux(x_6, x_1, x_2); +if (lean::obj_tag(x_62) == 0) { -obj* x_65; obj* x_67; obj* x_68; +obj* x_64; obj* x_66; obj* x_67; lean::dec(x_1); -x_65 = lean::cnstr_get(x_63, 0); -lean::inc(x_65); -if (lean::is_shared(x_63)) { - lean::dec(x_63); - x_67 = lean::box(0); +x_64 = lean::cnstr_get(x_62, 0); +lean::inc(x_64); +if (lean::is_shared(x_62)) { + lean::dec(x_62); + x_66 = lean::box(0); } else { - lean::cnstr_release(x_63, 0); - x_67 = x_63; + lean::cnstr_release(x_62, 0); + x_66 = x_62; } -if (lean::is_scalar(x_67)) { - x_68 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_66)) { + x_67 = lean::alloc_cnstr(0, 1, 0); } else { - x_68 = x_67; + x_67 = x_66; } -lean::cnstr_set(x_68, 0, x_65); -return x_68; +lean::cnstr_set(x_67, 0, x_64); +return x_67; } else { -obj* x_69; obj* x_71; obj* x_72; obj* x_74; obj* x_79; -x_69 = lean::cnstr_get(x_63, 0); -lean::inc(x_69); -if (lean::is_shared(x_63)) { - lean::dec(x_63); - x_71 = lean::box(0); +obj* x_68; obj* x_70; obj* x_71; obj* x_73; obj* x_78; +x_68 = lean::cnstr_get(x_62, 0); +lean::inc(x_68); +if (lean::is_shared(x_62)) { + lean::dec(x_62); + x_70 = lean::box(0); } else { - lean::cnstr_release(x_63, 0); - x_71 = x_63; + lean::cnstr_release(x_62, 0); + x_70 = x_62; } -x_72 = lean::cnstr_get(x_69, 0); -lean::inc(x_72); -x_74 = lean::cnstr_get(x_69, 1); -lean::inc(x_74); -lean::dec(x_69); +x_71 = lean::cnstr_get(x_68, 0); +lean::inc(x_71); +x_73 = lean::cnstr_get(x_68, 1); +lean::inc(x_73); +lean::dec(x_68); lean::inc(x_1); -lean::inc(x_72); -x_79 = l_lean_elaborator_register__notation__macro(x_72, x_1, x_74); -if (lean::obj_tag(x_79) == 0) +lean::inc(x_71); +x_78 = l_lean_elaborator_register__notation__macro(x_71, x_1, x_73); +if (lean::obj_tag(x_78) == 0) { -obj* x_82; obj* x_85; +obj* x_81; obj* x_84; lean::dec(x_1); -lean::dec(x_72); -x_82 = lean::cnstr_get(x_79, 0); -lean::inc(x_82); -lean::dec(x_79); -if (lean::is_scalar(x_71)) { - x_85 = lean::alloc_cnstr(0, 1, 0); -} else { - x_85 = x_71; - lean::cnstr_set_tag(x_71, 0); -} -lean::cnstr_set(x_85, 0, x_82); -return x_85; -} -else -{ -obj* x_87; obj* x_90; obj* x_92; obj* x_95; lean::dec(x_71); -x_87 = lean::cnstr_get(x_79, 0); -lean::inc(x_87); -lean::dec(x_79); -x_90 = lean::cnstr_get(x_87, 0); -lean::inc(x_90); -x_92 = lean::cnstr_get(x_87, 1); -lean::inc(x_92); -lean::dec(x_87); -x_95 = lean::cnstr_get(x_72, 0); -lean::inc(x_95); -lean::dec(x_72); -if (lean::obj_tag(x_95) == 0) -{ -obj* x_98; obj* x_100; obj* x_102; obj* x_103; obj* x_105; obj* x_107; obj* x_109; obj* x_111; obj* x_113; obj* x_115; obj* x_117; obj* x_119; obj* x_122; obj* x_123; -x_98 = lean::cnstr_get(x_92, 0); -lean::inc(x_98); -x_100 = lean::cnstr_get(x_92, 1); -lean::inc(x_100); -x_102 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_102, 0, x_90); -lean::cnstr_set(x_102, 1, x_100); -x_103 = lean::cnstr_get(x_92, 2); -lean::inc(x_103); -x_105 = lean::cnstr_get(x_92, 3); -lean::inc(x_105); -x_107 = lean::cnstr_get(x_92, 4); -lean::inc(x_107); -x_109 = lean::cnstr_get(x_92, 5); -lean::inc(x_109); -x_111 = lean::cnstr_get(x_92, 6); -lean::inc(x_111); -x_113 = lean::cnstr_get(x_92, 7); -lean::inc(x_113); -x_115 = lean::cnstr_get(x_92, 8); -lean::inc(x_115); -x_117 = lean::cnstr_get(x_92, 9); -lean::inc(x_117); -x_119 = lean::cnstr_get(x_92, 10); -lean::inc(x_119); -lean::dec(x_92); -x_122 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_122, 0, x_98); -lean::cnstr_set(x_122, 1, x_102); -lean::cnstr_set(x_122, 2, x_103); -lean::cnstr_set(x_122, 3, x_105); -lean::cnstr_set(x_122, 4, x_107); -lean::cnstr_set(x_122, 5, x_109); -lean::cnstr_set(x_122, 6, x_111); -lean::cnstr_set(x_122, 7, x_113); -lean::cnstr_set(x_122, 8, x_115); -lean::cnstr_set(x_122, 9, x_117); -lean::cnstr_set(x_122, 10, x_119); -x_123 = l_lean_elaborator_update__parser__config(x_1, x_122); -return x_123; +x_81 = lean::cnstr_get(x_78, 0); +lean::inc(x_81); +lean::dec(x_78); +if (lean::is_scalar(x_70)) { + x_84 = lean::alloc_cnstr(0, 1, 0); +} else { + x_84 = x_70; + lean::cnstr_set_tag(x_70, 0); +} +lean::cnstr_set(x_84, 0, x_81); +return x_84; } else { -obj* x_125; obj* x_127; obj* x_129; obj* x_131; obj* x_133; obj* x_135; obj* x_137; obj* x_138; obj* x_140; obj* x_142; obj* x_144; obj* x_146; obj* x_148; obj* x_151; obj* x_152; obj* x_154; obj* x_156; obj* x_158; obj* x_160; obj* x_162; obj* x_165; obj* x_166; -lean::dec(x_95); -x_125 = lean::cnstr_get(x_92, 0); -lean::inc(x_125); -x_127 = lean::cnstr_get(x_92, 1); -lean::inc(x_127); -x_129 = lean::cnstr_get(x_92, 2); -lean::inc(x_129); -x_131 = lean::cnstr_get(x_92, 3); -lean::inc(x_131); -x_133 = lean::cnstr_get(x_92, 4); -lean::inc(x_133); -x_135 = lean::cnstr_get(x_133, 0); -lean::inc(x_135); -x_137 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_137, 0, x_90); -lean::cnstr_set(x_137, 1, x_135); -x_138 = lean::cnstr_get(x_133, 1); -lean::inc(x_138); -x_140 = lean::cnstr_get(x_133, 2); -lean::inc(x_140); -x_142 = lean::cnstr_get(x_133, 3); -lean::inc(x_142); -x_144 = lean::cnstr_get(x_133, 4); -lean::inc(x_144); -x_146 = lean::cnstr_get(x_133, 5); -lean::inc(x_146); -x_148 = lean::cnstr_get(x_133, 6); -lean::inc(x_148); -lean::dec(x_133); -x_151 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_151, 0, x_137); -lean::cnstr_set(x_151, 1, x_138); -lean::cnstr_set(x_151, 2, x_140); -lean::cnstr_set(x_151, 3, x_142); -lean::cnstr_set(x_151, 4, x_144); -lean::cnstr_set(x_151, 5, x_146); -lean::cnstr_set(x_151, 6, x_148); -x_152 = lean::cnstr_get(x_92, 5); -lean::inc(x_152); -x_154 = lean::cnstr_get(x_92, 6); -lean::inc(x_154); -x_156 = lean::cnstr_get(x_92, 7); -lean::inc(x_156); -x_158 = lean::cnstr_get(x_92, 8); -lean::inc(x_158); -x_160 = lean::cnstr_get(x_92, 9); -lean::inc(x_160); -x_162 = lean::cnstr_get(x_92, 10); -lean::inc(x_162); -lean::dec(x_92); -x_165 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_165, 0, x_125); -lean::cnstr_set(x_165, 1, x_127); -lean::cnstr_set(x_165, 2, x_129); -lean::cnstr_set(x_165, 3, x_131); -lean::cnstr_set(x_165, 4, x_151); -lean::cnstr_set(x_165, 5, x_152); -lean::cnstr_set(x_165, 6, x_154); -lean::cnstr_set(x_165, 7, x_156); -lean::cnstr_set(x_165, 8, x_158); -lean::cnstr_set(x_165, 9, x_160); -lean::cnstr_set(x_165, 10, x_162); -x_166 = l_lean_elaborator_update__parser__config(x_1, x_165); -return x_166; +obj* x_86; obj* x_89; obj* x_91; obj* x_94; +lean::dec(x_70); +x_86 = lean::cnstr_get(x_78, 0); +lean::inc(x_86); +lean::dec(x_78); +x_89 = lean::cnstr_get(x_86, 0); +lean::inc(x_89); +x_91 = lean::cnstr_get(x_86, 1); +lean::inc(x_91); +lean::dec(x_86); +x_94 = lean::cnstr_get(x_71, 0); +lean::inc(x_94); +lean::dec(x_71); +if (lean::obj_tag(x_94) == 0) +{ +obj* x_97; obj* x_99; obj* x_101; obj* x_102; obj* x_104; obj* x_106; obj* x_108; obj* x_110; obj* x_112; obj* x_114; obj* x_116; obj* x_118; obj* x_121; obj* x_122; +x_97 = lean::cnstr_get(x_91, 0); +lean::inc(x_97); +x_99 = lean::cnstr_get(x_91, 1); +lean::inc(x_99); +x_101 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_101, 0, x_89); +lean::cnstr_set(x_101, 1, x_99); +x_102 = lean::cnstr_get(x_91, 2); +lean::inc(x_102); +x_104 = lean::cnstr_get(x_91, 3); +lean::inc(x_104); +x_106 = lean::cnstr_get(x_91, 4); +lean::inc(x_106); +x_108 = lean::cnstr_get(x_91, 5); +lean::inc(x_108); +x_110 = lean::cnstr_get(x_91, 6); +lean::inc(x_110); +x_112 = lean::cnstr_get(x_91, 7); +lean::inc(x_112); +x_114 = lean::cnstr_get(x_91, 8); +lean::inc(x_114); +x_116 = lean::cnstr_get(x_91, 9); +lean::inc(x_116); +x_118 = lean::cnstr_get(x_91, 10); +lean::inc(x_118); +lean::dec(x_91); +x_121 = lean::alloc_cnstr(0, 11, 0); +lean::cnstr_set(x_121, 0, x_97); +lean::cnstr_set(x_121, 1, x_101); +lean::cnstr_set(x_121, 2, x_102); +lean::cnstr_set(x_121, 3, x_104); +lean::cnstr_set(x_121, 4, x_106); +lean::cnstr_set(x_121, 5, x_108); +lean::cnstr_set(x_121, 6, x_110); +lean::cnstr_set(x_121, 7, x_112); +lean::cnstr_set(x_121, 8, x_114); +lean::cnstr_set(x_121, 9, x_116); +lean::cnstr_set(x_121, 10, x_118); +x_122 = l_lean_elaborator_update__parser__config(x_1, x_121); +return x_122; +} +else +{ +obj* x_124; obj* x_126; obj* x_128; obj* x_130; obj* x_132; obj* x_134; obj* x_136; obj* x_137; obj* x_139; obj* x_141; obj* x_143; obj* x_145; obj* x_147; obj* x_150; obj* x_151; obj* x_153; obj* x_155; obj* x_157; obj* x_159; obj* x_161; obj* x_164; obj* x_165; +lean::dec(x_94); +x_124 = lean::cnstr_get(x_91, 0); +lean::inc(x_124); +x_126 = lean::cnstr_get(x_91, 1); +lean::inc(x_126); +x_128 = lean::cnstr_get(x_91, 2); +lean::inc(x_128); +x_130 = lean::cnstr_get(x_91, 3); +lean::inc(x_130); +x_132 = lean::cnstr_get(x_91, 4); +lean::inc(x_132); +x_134 = lean::cnstr_get(x_132, 0); +lean::inc(x_134); +x_136 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_136, 0, x_89); +lean::cnstr_set(x_136, 1, x_134); +x_137 = lean::cnstr_get(x_132, 1); +lean::inc(x_137); +x_139 = lean::cnstr_get(x_132, 2); +lean::inc(x_139); +x_141 = lean::cnstr_get(x_132, 3); +lean::inc(x_141); +x_143 = lean::cnstr_get(x_132, 4); +lean::inc(x_143); +x_145 = lean::cnstr_get(x_132, 5); +lean::inc(x_145); +x_147 = lean::cnstr_get(x_132, 6); +lean::inc(x_147); +lean::dec(x_132); +x_150 = lean::alloc_cnstr(0, 7, 0); +lean::cnstr_set(x_150, 0, x_136); +lean::cnstr_set(x_150, 1, x_137); +lean::cnstr_set(x_150, 2, x_139); +lean::cnstr_set(x_150, 3, x_141); +lean::cnstr_set(x_150, 4, x_143); +lean::cnstr_set(x_150, 5, x_145); +lean::cnstr_set(x_150, 6, x_147); +x_151 = lean::cnstr_get(x_91, 5); +lean::inc(x_151); +x_153 = lean::cnstr_get(x_91, 6); +lean::inc(x_153); +x_155 = lean::cnstr_get(x_91, 7); +lean::inc(x_155); +x_157 = lean::cnstr_get(x_91, 8); +lean::inc(x_157); +x_159 = lean::cnstr_get(x_91, 9); +lean::inc(x_159); +x_161 = lean::cnstr_get(x_91, 10); +lean::inc(x_161); +lean::dec(x_91); +x_164 = lean::alloc_cnstr(0, 11, 0); +lean::cnstr_set(x_164, 0, x_124); +lean::cnstr_set(x_164, 1, x_126); +lean::cnstr_set(x_164, 2, x_128); +lean::cnstr_set(x_164, 3, x_130); +lean::cnstr_set(x_164, 4, x_150); +lean::cnstr_set(x_164, 5, x_151); +lean::cnstr_set(x_164, 6, x_153); +lean::cnstr_set(x_164, 7, x_155); +lean::cnstr_set(x_164, 8, x_157); +lean::cnstr_set(x_164, 9, x_159); +lean::cnstr_set(x_164, 10, x_161); +x_165 = l_lean_elaborator_update__parser__config(x_1, x_164); +return x_165; } } } @@ -23528,16 +23465,14 @@ return x_130; obj* _init_l_lean_elaborator_attribute_elaborate___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::box(0); x_1 = lean::mk_string("command"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("attribute"); -lean::inc(x_0); -x_6 = lean_name_mk_string(x_0, x_4); -x_7 = l_lean_kvmap_set__name(x_0, x_3, x_6); -return x_7; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("attribute"); +x_4 = lean_name_mk_string(x_0, x_3); +x_5 = l_lean_kvmap_set__name(x_0, x_2, x_4); +return x_5; } } obj* _init_l_lean_elaborator_attribute_elaborate___closed__2() { @@ -23661,16 +23596,14 @@ return x_62; obj* _init_l_lean_elaborator_check_elaborate___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::box(0); x_1 = lean::mk_string("command"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("#check"); -lean::inc(x_0); -x_6 = lean_name_mk_string(x_0, x_4); -x_7 = l_lean_kvmap_set__name(x_0, x_3, x_6); -return x_7; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("#check"); +x_4 = lean_name_mk_string(x_0, x_3); +x_5 = l_lean_kvmap_set__name(x_0, x_2, x_4); +return x_5; } } obj* l_lean_elaborator_check_elaborate(obj* x_0, obj* x_1, obj* x_2) { @@ -23965,19 +23898,17 @@ return x_53; obj* _init_l_lean_elaborator_init__quot_elaborate___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; x_0 = lean::box(0); x_1 = lean::mk_string("command"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("init_quot"); -lean::inc(x_0); -x_6 = lean_name_mk_string(x_0, x_4); -x_7 = l_lean_kvmap_set__name(x_0, x_3, x_6); -x_8 = l_lean_elaborator_dummy; -lean::inc(x_8); -x_10 = lean_expr_mk_mdata(x_7, x_8); -return x_10; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("init_quot"); +x_4 = lean_name_mk_string(x_0, x_3); +x_5 = l_lean_kvmap_set__name(x_0, x_2, x_4); +x_6 = l_lean_elaborator_dummy; +lean::inc(x_6); +x_8 = lean_expr_mk_mdata(x_5, x_6); +return x_8; } } obj* l_lean_elaborator_init__quot_elaborate(obj* x_0, obj* x_1, obj* x_2) { @@ -26351,7 +26282,7 @@ return x_7; obj* _init_l_rbmap_from__list___at_lean_elaborator_elaborators___spec__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* 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_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_59; obj* x_60; obj* x_61; obj* x_63; obj* x_64; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* 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_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_55; obj* x_56; obj* x_57; 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_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; x_0 = l_lean_parser_module_header; x_1 = lean::alloc_closure(reinterpret_cast(l_rbmap_from__list___at_lean_elaborator_elaborators___spec__1___lambda__2), 3, 0); lean::inc(x_0); @@ -26449,57 +26380,56 @@ x_63 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_63, 0, x_60); lean::cnstr_set(x_63, 1, x_61); x_64 = lean::box(0); -lean::inc(x_64); +x_65 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_65, 0, x_63); +lean::cnstr_set(x_65, 1, x_64); x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_63); -lean::cnstr_set(x_66, 1, x_64); +lean::cnstr_set(x_66, 0, x_59); +lean::cnstr_set(x_66, 1, x_65); x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_59); +lean::cnstr_set(x_67, 0, x_55); lean::cnstr_set(x_67, 1, x_66); x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_55); +lean::cnstr_set(x_68, 0, x_51); lean::cnstr_set(x_68, 1, x_67); x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_51); +lean::cnstr_set(x_69, 0, x_47); lean::cnstr_set(x_69, 1, x_68); x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_47); +lean::cnstr_set(x_70, 0, x_43); lean::cnstr_set(x_70, 1, x_69); x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_43); +lean::cnstr_set(x_71, 0, x_39); lean::cnstr_set(x_71, 1, x_70); x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_39); +lean::cnstr_set(x_72, 0, x_35); lean::cnstr_set(x_72, 1, x_71); x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_35); +lean::cnstr_set(x_73, 0, x_31); lean::cnstr_set(x_73, 1, x_72); x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_31); +lean::cnstr_set(x_74, 0, x_27); lean::cnstr_set(x_74, 1, x_73); x_75 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_75, 0, x_27); +lean::cnstr_set(x_75, 0, x_23); lean::cnstr_set(x_75, 1, x_74); x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_23); +lean::cnstr_set(x_76, 0, x_19); lean::cnstr_set(x_76, 1, x_75); x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_19); +lean::cnstr_set(x_77, 0, x_15); lean::cnstr_set(x_77, 1, x_76); x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_15); +lean::cnstr_set(x_78, 0, x_11); lean::cnstr_set(x_78, 1, x_77); x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_11); +lean::cnstr_set(x_79, 0, x_7); lean::cnstr_set(x_79, 1, x_78); x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_7); +lean::cnstr_set(x_80, 0, x_3); lean::cnstr_set(x_80, 1, x_79); -x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_3); -lean::cnstr_set(x_81, 1, x_80); -x_82 = l_list_foldl___main___at_lean_elaborator_elaborators___spec__5(x_64, x_81); -return x_82; +x_81 = l_list_foldl___main___at_lean_elaborator_elaborators___spec__5(x_64, x_80); +return x_81; } } obj* _init_l_lean_elaborator_elaborators() { @@ -26609,55 +26539,54 @@ _start: obj* x_2; uint8 x_3; x_2 = lean::box(0); x_3 = lean_name_dec_eq(x_1, x_2); -lean::dec(x_2); if (x_3 == 0) { -obj* x_5; obj* x_8; uint8 x_11; -x_5 = lean::cnstr_get(x_0, 4); -lean::inc(x_5); +obj* x_4; obj* x_7; uint8 x_10; +x_4 = lean::cnstr_get(x_0, 4); +lean::inc(x_4); lean::dec(x_0); -x_8 = lean::cnstr_get(x_5, 4); -lean::inc(x_8); +x_7 = lean::cnstr_get(x_4, 4); +lean::inc(x_7); lean::inc(x_1); -x_11 = l_list_decidable__mem___main___at_lean_elaborator_is__open__namespace___main___spec__1(x_1, x_8); -if (x_11 == 0) +x_10 = l_list_decidable__mem___main___at_lean_elaborator_is__open__namespace___main___spec__1(x_1, x_7); +if (x_10 == 0) { -obj* x_12; obj* x_15; uint8 x_16; -x_12 = lean::cnstr_get(x_5, 5); -lean::inc(x_12); -lean::dec(x_5); -x_15 = l_list_foldr___main___at_lean_elaborator_is__open__namespace___main___spec__2(x_1, x_12); -x_16 = lean::unbox(x_15); -lean::dec(x_15); -if (x_16 == 0) +obj* x_11; obj* x_14; uint8 x_15; +x_11 = lean::cnstr_get(x_4, 5); +lean::inc(x_11); +lean::dec(x_4); +x_14 = l_list_foldr___main___at_lean_elaborator_is__open__namespace___main___spec__2(x_1, x_11); +x_15 = lean::unbox(x_14); +lean::dec(x_14); +if (x_15 == 0) +{ +uint8 x_17; +x_17 = 0; +return x_17; +} +else { uint8 x_18; -x_18 = 0; +x_18 = 1; return x_18; } -else -{ -uint8 x_19; -x_19 = 1; -return x_19; -} } else { -uint8 x_22; +uint8 x_21; lean::dec(x_1); -lean::dec(x_5); -x_22 = 1; -return x_22; +lean::dec(x_4); +x_21 = 1; +return x_21; } } else { -uint8 x_25; +uint8 x_24; lean::dec(x_1); lean::dec(x_0); -x_25 = 1; -return x_25; +x_24 = 1; +return x_24; } } } @@ -27588,29 +27517,27 @@ return x_0; obj* _init_l_lean_elaborator_ordered__rbmap_empty___at_lean_elaborator_run___spec__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; +obj* x_0; obj* x_1; obj* x_2; x_0 = lean::box(0); x_1 = lean::mk_nat_obj(0u); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_0); -lean::cnstr_set(x_3, 1, x_0); -lean::cnstr_set(x_3, 2, x_1); -return x_3; +x_2 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_2, 0, x_0); +lean::cnstr_set(x_2, 1, x_0); +lean::cnstr_set(x_2, 2, x_1); +return x_2; } } obj* _init_l_lean_elaborator_ordered__rbmap_empty___at_lean_elaborator_run___spec__2() { _start: { -obj* x_0; obj* x_1; obj* x_3; +obj* x_0; obj* x_1; obj* x_2; x_0 = lean::box(0); x_1 = lean::mk_nat_obj(0u); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_0); -lean::cnstr_set(x_3, 1, x_0); -lean::cnstr_set(x_3, 2, x_1); -return x_3; +x_2 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_2, 0, x_0); +lean::cnstr_set(x_2, 1, x_0); +lean::cnstr_set(x_2, 2, x_1); +return x_2; } } obj* l_reader__t_pure___at_lean_elaborator_run___spec__3___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -28044,33 +27971,29 @@ return x_17; obj* _init_l_lean_elaborator_run___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; uint8 x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_17; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint8 x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_13; x_0 = lean::box(0); x_1 = lean::mk_string("trace"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("as_messages"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = l_lean_options_mk; -x_7 = 1; -lean::inc(x_6); -x_9 = l_lean_kvmap_set__bool(x_6, x_5, x_7); -x_10 = l_lean_elaborator_ordered__rbmap_empty___at_lean_elaborator_run___spec__1; -x_11 = l_lean_elaborator_ordered__rbmap_empty___at_lean_elaborator_run___spec__2; -lean::inc(x_11); +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("as_messages"); +x_4 = lean_name_mk_string(x_2, x_3); +x_5 = l_lean_options_mk; +x_6 = 1; +lean::inc(x_5); +x_8 = l_lean_kvmap_set__bool(x_5, x_4, x_6); +x_9 = l_lean_elaborator_ordered__rbmap_empty___at_lean_elaborator_run___spec__1; +x_10 = l_lean_elaborator_ordered__rbmap_empty___at_lean_elaborator_run___spec__2; lean::inc(x_10); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_17 = lean::alloc_cnstr(0, 7, 0); -lean::cnstr_set(x_17, 0, x_0); -lean::cnstr_set(x_17, 1, x_10); -lean::cnstr_set(x_17, 2, x_11); -lean::cnstr_set(x_17, 3, x_0); -lean::cnstr_set(x_17, 4, x_0); -lean::cnstr_set(x_17, 5, x_0); -lean::cnstr_set(x_17, 6, x_9); -return x_17; +lean::inc(x_9); +x_13 = lean::alloc_cnstr(0, 7, 0); +lean::cnstr_set(x_13, 0, x_0); +lean::cnstr_set(x_13, 1, x_9); +lean::cnstr_set(x_13, 2, x_10); +lean::cnstr_set(x_13, 3, x_0); +lean::cnstr_set(x_13, 4, x_0); +lean::cnstr_set(x_13, 5, x_0); +lean::cnstr_set(x_13, 6, x_8); +return x_13; } } obj* _init_l_lean_elaborator_run___closed__2() { @@ -28140,7 +28063,7 @@ return x_0; obj* l_lean_elaborator_run(obj* x_0) { _start: { -obj* x_1; obj* x_2; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_30; obj* x_31; obj* x_33; +obj* x_1; obj* x_2; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_28; obj* x_29; obj* x_31; x_1 = lean::box(0); x_2 = lean::cnstr_get(x_0, 1); lean::inc(x_2); @@ -28161,35 +28084,33 @@ lean::inc(x_12); lean::inc(x_11); lean::inc(x_10); lean::inc(x_9); -lean::inc(x_1); -lean::inc(x_1); -x_21 = lean::alloc_cnstr(0, 11, 0); -lean::cnstr_set(x_21, 0, x_1); -lean::cnstr_set(x_21, 1, x_1); -lean::cnstr_set(x_21, 2, x_9); -lean::cnstr_set(x_21, 3, x_1); -lean::cnstr_set(x_21, 4, x_10); -lean::cnstr_set(x_21, 5, x_11); -lean::cnstr_set(x_21, 6, x_2); -lean::cnstr_set(x_21, 7, x_8); -lean::cnstr_set(x_21, 8, x_12); -lean::cnstr_set(x_21, 9, x_13); -lean::cnstr_set(x_21, 10, x_9); -x_22 = l_lean_elaborator_run___closed__4; -x_23 = l_lean_elaborator_run___closed__5; -x_24 = l_lean_elaborator_run___closed__6; -x_25 = l_lean_elaborator_max__recursion; -lean::inc(x_25); -lean::inc(x_24); +x_19 = lean::alloc_cnstr(0, 11, 0); +lean::cnstr_set(x_19, 0, x_1); +lean::cnstr_set(x_19, 1, x_1); +lean::cnstr_set(x_19, 2, x_9); +lean::cnstr_set(x_19, 3, x_1); +lean::cnstr_set(x_19, 4, x_10); +lean::cnstr_set(x_19, 5, x_11); +lean::cnstr_set(x_19, 6, x_2); +lean::cnstr_set(x_19, 7, x_8); +lean::cnstr_set(x_19, 8, x_12); +lean::cnstr_set(x_19, 9, x_13); +lean::cnstr_set(x_19, 10, x_9); +x_20 = l_lean_elaborator_run___closed__4; +x_21 = l_lean_elaborator_run___closed__5; +x_22 = l_lean_elaborator_run___closed__6; +x_23 = l_lean_elaborator_max__recursion; lean::inc(x_23); lean::inc(x_22); -x_30 = l_lean_parser_rec__t_run___at_lean_elaborator_run___spec__5(x_22, x_23, x_24, x_25, x_0, x_21); -x_31 = l_lean_elaborator_run___closed__7; -lean::inc(x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_coroutine_bind___main___rarg), 3, 2); -lean::closure_set(x_33, 0, x_30); -lean::closure_set(x_33, 1, x_31); -return x_33; +lean::inc(x_21); +lean::inc(x_20); +x_28 = l_lean_parser_rec__t_run___at_lean_elaborator_run___spec__5(x_20, x_21, x_22, x_23, x_0, x_19); +x_29 = l_lean_elaborator_run___closed__7; +lean::inc(x_29); +x_31 = lean::alloc_closure(reinterpret_cast(l_coroutine_bind___main___rarg), 3, 2); +lean::closure_set(x_31, 0, x_28); +lean::closure_set(x_31, 1, x_29); +return x_31; } } void initialize_init_lean_parser_module(); diff --git a/src/boot/init/lean/expander.cpp b/src/boot/init/lean/expander.cpp index c04740093e..01c18ff61e 100644 --- a/src/boot/init/lean/expander.cpp +++ b/src/boot/init/lean/expander.cpp @@ -520,28 +520,26 @@ return x_4; obj* l_lean_expander_coe__name__ident(obj* x_0) { _start: { -obj* x_1; obj* x_2; obj* x_5; obj* x_6; obj* x_9; +obj* x_1; obj* x_2; obj* x_5; obj* x_6; obj* x_7; x_1 = lean::box(0); x_2 = l_lean_name_to__string___closed__1; lean::inc(x_0); lean::inc(x_2); x_5 = l_lean_name_to__string__with__sep___main(x_2, x_0); x_6 = l_lean_parser_substring_of__string(x_5); -lean::inc(x_1); -lean::inc(x_1); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_1); -lean::cnstr_set(x_9, 1, x_6); -lean::cnstr_set(x_9, 2, x_0); -lean::cnstr_set(x_9, 3, x_1); -lean::cnstr_set(x_9, 4, x_1); -return x_9; +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_1); +lean::cnstr_set(x_7, 1, x_6); +lean::cnstr_set(x_7, 2, x_0); +lean::cnstr_set(x_7, 3, x_1); +lean::cnstr_set(x_7, 4, x_1); +return x_7; } } obj* l_lean_expander_glob__id(obj* x_0) { _start: { -obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_8; obj* x_9; obj* x_12; obj* x_15; obj* x_16; obj* x_17; +obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; x_1 = l_lean_parser_ident__univs_has__view; x_2 = lean::cnstr_get(x_1, 1); lean::inc(x_2); @@ -551,24 +549,21 @@ lean::inc(x_0); lean::inc(x_5); x_8 = l_lean_name_to__string__with__sep___main(x_5, x_0); x_9 = l_lean_parser_substring_of__string(x_8); -lean::inc(x_4); lean::inc(x_0); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_0); -lean::cnstr_set(x_12, 1, x_4); -lean::inc(x_4); -lean::inc(x_4); -x_15 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_15, 0, x_4); -lean::cnstr_set(x_15, 1, x_9); -lean::cnstr_set(x_15, 2, x_0); -lean::cnstr_set(x_15, 3, x_12); -lean::cnstr_set(x_15, 4, x_4); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_4); -x_17 = lean::apply_1(x_2, x_16); -return x_17; +x_11 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_11, 0, x_0); +lean::cnstr_set(x_11, 1, x_4); +x_12 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_12, 0, x_4); +lean::cnstr_set(x_12, 1, x_9); +lean::cnstr_set(x_12, 2, x_0); +lean::cnstr_set(x_12, 3, x_11); +lean::cnstr_set(x_12, 4, x_4); +x_13 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_4); +x_14 = lean::apply_1(x_2, x_13); +return x_14; } } obj* l_lean_expander_coe__ident__ident__univs(obj* x_0) { @@ -1135,8 +1130,8 @@ switch (lean::obj_tag(x_64)) { case 0: { obj* x_70; -lean::dec(x_64); lean::dec(x_57); +lean::dec(x_64); lean::inc(x_3); x_70 = l___private_init_lean_expander_1__pop__stx__arg(x_55, x_3); if (lean::obj_tag(x_70) == 0) @@ -1166,7 +1161,7 @@ return x_79; } else { -obj* x_80; obj* x_83; obj* x_85; obj* x_88; obj* x_90; obj* x_92; obj* x_95; obj* x_96; obj* x_98; obj* x_99; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; +obj* x_80; obj* x_83; obj* x_85; obj* x_88; obj* x_90; obj* x_92; obj* x_95; obj* x_96; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; x_80 = lean::cnstr_get(x_70, 0); lean::inc(x_80); lean::dec(x_70); @@ -1187,510 +1182,508 @@ x_96 = lean::cnstr_get(x_95, 0); lean::inc(x_96); x_98 = lean::apply_1(x_96, x_83); x_99 = lean::box(0); -lean::inc(x_99); if (lean::is_scalar(x_13)) { - x_101 = lean::alloc_cnstr(1, 2, 0); + x_100 = lean::alloc_cnstr(1, 2, 0); } else { - x_101 = x_13; + x_100 = x_13; } -lean::cnstr_set(x_101, 0, x_98); +lean::cnstr_set(x_100, 0, x_98); +lean::cnstr_set(x_100, 1, x_99); +x_101 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_101, 0, x_100); lean::cnstr_set(x_101, 1, x_99); -x_102 = lean::alloc_cnstr(0, 2, 0); +x_102 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_99); -x_103 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_103, 0, x_102); if (lean::is_scalar(x_66)) { - x_104 = lean::alloc_cnstr(1, 1, 0); + x_103 = lean::alloc_cnstr(1, 1, 0); } else { - x_104 = x_66; + x_103 = x_66; } -lean::cnstr_set(x_104, 0, x_103); -x_105 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_105, 0, x_88); -lean::cnstr_set(x_105, 1, x_90); -lean::cnstr_set(x_105, 2, x_92); -lean::cnstr_set(x_105, 3, x_104); +lean::cnstr_set(x_103, 0, x_102); +x_104 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_104, 0, x_88); +lean::cnstr_set(x_104, 1, x_90); +lean::cnstr_set(x_104, 2, x_92); +lean::cnstr_set(x_104, 3, x_103); x_1 = x_11; -x_2 = x_105; +x_2 = x_104; goto _start; } } case 1: { -obj* x_111; +obj* x_110; lean::dec(x_13); -lean::dec(x_64); lean::dec(x_57); +lean::dec(x_64); lean::inc(x_3); -x_111 = l___private_init_lean_expander_1__pop__stx__arg(x_55, x_3); -if (lean::obj_tag(x_111) == 0) +x_110 = l___private_init_lean_expander_1__pop__stx__arg(x_55, x_3); +if (lean::obj_tag(x_110) == 0) { -obj* x_116; obj* x_118; obj* x_119; +obj* x_115; obj* x_117; obj* x_118; lean::dec(x_3); lean::dec(x_0); lean::dec(x_11); lean::dec(x_66); -x_116 = lean::cnstr_get(x_111, 0); -lean::inc(x_116); -if (lean::is_shared(x_111)) { - lean::dec(x_111); - x_118 = lean::box(0); +x_115 = lean::cnstr_get(x_110, 0); +lean::inc(x_115); +if (lean::is_shared(x_110)) { + lean::dec(x_110); + x_117 = lean::box(0); } else { - lean::cnstr_release(x_111, 0); - x_118 = x_111; + lean::cnstr_release(x_110, 0); + x_117 = x_110; } -if (lean::is_scalar(x_118)) { - x_119 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_117)) { + x_118 = lean::alloc_cnstr(0, 1, 0); } else { - x_119 = x_118; + x_118 = x_117; } -lean::cnstr_set(x_119, 0, x_116); -return x_119; +lean::cnstr_set(x_118, 0, x_115); +return x_118; } else { -obj* x_120; obj* x_123; obj* x_125; obj* x_128; obj* x_130; obj* x_132; obj* x_135; obj* x_136; obj* x_138; obj* x_139; obj* x_140; -x_120 = lean::cnstr_get(x_111, 0); -lean::inc(x_120); -lean::dec(x_111); -x_123 = lean::cnstr_get(x_120, 0); -lean::inc(x_123); -x_125 = lean::cnstr_get(x_120, 1); -lean::inc(x_125); -lean::dec(x_120); -x_128 = lean::cnstr_get(x_125, 0); -lean::inc(x_128); -x_130 = lean::cnstr_get(x_125, 1); -lean::inc(x_130); -x_132 = lean::cnstr_get(x_125, 2); -lean::inc(x_132); -lean::dec(x_125); -x_135 = l_lean_parser_term_binders_has__view; -x_136 = lean::cnstr_get(x_135, 0); -lean::inc(x_136); -x_138 = lean::apply_1(x_136, x_123); +obj* x_119; obj* x_122; obj* x_124; obj* x_127; obj* x_129; obj* x_131; obj* x_134; obj* x_135; obj* x_137; obj* x_138; obj* x_139; +x_119 = lean::cnstr_get(x_110, 0); +lean::inc(x_119); +lean::dec(x_110); +x_122 = lean::cnstr_get(x_119, 0); +lean::inc(x_122); +x_124 = lean::cnstr_get(x_119, 1); +lean::inc(x_124); +lean::dec(x_119); +x_127 = lean::cnstr_get(x_124, 0); +lean::inc(x_127); +x_129 = lean::cnstr_get(x_124, 1); +lean::inc(x_129); +x_131 = lean::cnstr_get(x_124, 2); +lean::inc(x_131); +lean::dec(x_124); +x_134 = l_lean_parser_term_binders_has__view; +x_135 = lean::cnstr_get(x_134, 0); +lean::inc(x_135); +x_137 = lean::apply_1(x_135, x_122); if (lean::is_scalar(x_66)) { - x_139 = lean::alloc_cnstr(1, 1, 0); + x_138 = lean::alloc_cnstr(1, 1, 0); } else { - x_139 = x_66; + x_138 = x_66; } -lean::cnstr_set(x_139, 0, x_138); -x_140 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_140, 0, x_128); -lean::cnstr_set(x_140, 1, x_130); -lean::cnstr_set(x_140, 2, x_132); -lean::cnstr_set(x_140, 3, x_139); +lean::cnstr_set(x_138, 0, x_137); +x_139 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_139, 0, x_127); +lean::cnstr_set(x_139, 1, x_129); +lean::cnstr_set(x_139, 2, x_131); +lean::cnstr_set(x_139, 3, x_138); x_1 = x_11; -x_2 = x_140; +x_2 = x_139; goto _start; } } default: { -obj* x_143; obj* x_146; obj* x_148; +obj* x_142; obj* x_145; obj* x_147; lean::dec(x_66); -x_143 = lean::cnstr_get(x_64, 0); -lean::inc(x_143); +x_142 = lean::cnstr_get(x_64, 0); +lean::inc(x_142); lean::dec(x_64); -x_146 = lean::cnstr_get(x_143, 0); -lean::inc(x_146); -x_148 = lean::cnstr_get(x_143, 1); -lean::inc(x_148); -lean::dec(x_143); -if (lean::obj_tag(x_148) == 0) +x_145 = lean::cnstr_get(x_142, 0); +lean::inc(x_145); +x_147 = lean::cnstr_get(x_142, 1); +lean::inc(x_147); +lean::dec(x_142); +if (lean::obj_tag(x_147) == 0) { -obj* x_152; +obj* x_151; lean::inc(x_3); -x_152 = l___private_init_lean_expander_1__pop__stx__arg(x_55, x_3); -if (lean::obj_tag(x_152) == 0) +x_151 = l___private_init_lean_expander_1__pop__stx__arg(x_55, x_3); +if (lean::obj_tag(x_151) == 0) { -obj* x_159; obj* x_161; obj* x_162; -lean::dec(x_146); +obj* x_158; obj* x_160; obj* x_161; +lean::dec(x_145); lean::dec(x_3); lean::dec(x_0); lean::dec(x_11); lean::dec(x_13); lean::dec(x_57); -x_159 = lean::cnstr_get(x_152, 0); -lean::inc(x_159); -if (lean::is_shared(x_152)) { - lean::dec(x_152); - x_161 = lean::box(0); +x_158 = lean::cnstr_get(x_151, 0); +lean::inc(x_158); +if (lean::is_shared(x_151)) { + lean::dec(x_151); + x_160 = lean::box(0); } else { - lean::cnstr_release(x_152, 0); - x_161 = x_152; + lean::cnstr_release(x_151, 0); + x_160 = x_151; } -if (lean::is_scalar(x_161)) { - x_162 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_160)) { + x_161 = lean::alloc_cnstr(0, 1, 0); } else { - x_162 = x_161; + x_161 = x_160; } -lean::cnstr_set(x_162, 0, x_159); -return x_162; +lean::cnstr_set(x_161, 0, x_158); +return x_161; } else { -obj* x_163; obj* x_166; obj* x_168; obj* x_171; obj* x_173; obj* x_175; obj* x_176; obj* x_178; obj* x_179; obj* x_182; -x_163 = lean::cnstr_get(x_152, 0); -lean::inc(x_163); -lean::dec(x_152); -x_166 = lean::cnstr_get(x_163, 0); -lean::inc(x_166); -x_168 = lean::cnstr_get(x_163, 1); -lean::inc(x_168); -lean::dec(x_163); -x_171 = lean::cnstr_get(x_168, 0); -lean::inc(x_171); -x_173 = lean::cnstr_get(x_168, 1); -lean::inc(x_173); +obj* x_162; obj* x_165; obj* x_167; obj* x_170; obj* x_172; obj* x_174; obj* x_175; obj* x_177; obj* x_178; obj* x_181; +x_162 = lean::cnstr_get(x_151, 0); +lean::inc(x_162); +lean::dec(x_151); +x_165 = lean::cnstr_get(x_162, 0); +lean::inc(x_165); +x_167 = lean::cnstr_get(x_162, 1); +lean::inc(x_167); +lean::dec(x_162); +x_170 = lean::cnstr_get(x_167, 0); +lean::inc(x_170); +x_172 = lean::cnstr_get(x_167, 1); +lean::inc(x_172); if (lean::is_scalar(x_57)) { - x_175 = lean::alloc_cnstr(0, 2, 0); + x_174 = lean::alloc_cnstr(0, 2, 0); } else { - x_175 = x_57; + x_174 = x_57; } -lean::cnstr_set(x_175, 0, x_146); -lean::cnstr_set(x_175, 1, x_166); -x_176 = lean::cnstr_get(x_168, 2); -lean::inc(x_176); +lean::cnstr_set(x_174, 0, x_145); +lean::cnstr_set(x_174, 1, x_165); +x_175 = lean::cnstr_get(x_167, 2); +lean::inc(x_175); if (lean::is_scalar(x_13)) { - x_178 = lean::alloc_cnstr(1, 2, 0); + x_177 = lean::alloc_cnstr(1, 2, 0); } else { - x_178 = x_13; + x_177 = x_13; } -lean::cnstr_set(x_178, 0, x_175); -lean::cnstr_set(x_178, 1, x_176); -x_179 = lean::cnstr_get(x_168, 3); -lean::inc(x_179); -lean::dec(x_168); -x_182 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_182, 0, x_171); -lean::cnstr_set(x_182, 1, x_173); -lean::cnstr_set(x_182, 2, x_178); -lean::cnstr_set(x_182, 3, x_179); +lean::cnstr_set(x_177, 0, x_174); +lean::cnstr_set(x_177, 1, x_175); +x_178 = lean::cnstr_get(x_167, 3); +lean::inc(x_178); +lean::dec(x_167); +x_181 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_181, 0, x_170); +lean::cnstr_set(x_181, 1, x_172); +lean::cnstr_set(x_181, 2, x_177); +lean::cnstr_set(x_181, 3, x_178); x_1 = x_11; -x_2 = x_182; +x_2 = x_181; goto _start; } } else { -obj* x_184; obj* x_187; -x_184 = lean::cnstr_get(x_148, 0); -lean::inc(x_184); -lean::dec(x_148); -x_187 = lean::cnstr_get(x_184, 1); -lean::inc(x_187); -lean::dec(x_184); -switch (lean::obj_tag(x_187)) { +obj* x_183; obj* x_186; +x_183 = lean::cnstr_get(x_147, 0); +lean::inc(x_183); +lean::dec(x_147); +x_186 = lean::cnstr_get(x_183, 1); +lean::inc(x_186); +lean::dec(x_183); +switch (lean::obj_tag(x_186)) { case 0: { -obj* x_192; -lean::dec(x_187); +obj* x_191; +lean::dec(x_186); lean::inc(x_3); -x_192 = l___private_init_lean_expander_1__pop__stx__arg(x_55, x_3); -if (lean::obj_tag(x_192) == 0) +x_191 = l___private_init_lean_expander_1__pop__stx__arg(x_55, x_3); +if (lean::obj_tag(x_191) == 0) { -obj* x_199; obj* x_201; obj* x_202; -lean::dec(x_146); +obj* x_198; obj* x_200; obj* x_201; +lean::dec(x_145); lean::dec(x_3); lean::dec(x_0); lean::dec(x_11); lean::dec(x_13); lean::dec(x_57); -x_199 = lean::cnstr_get(x_192, 0); -lean::inc(x_199); -if (lean::is_shared(x_192)) { - lean::dec(x_192); - x_201 = lean::box(0); +x_198 = lean::cnstr_get(x_191, 0); +lean::inc(x_198); +if (lean::is_shared(x_191)) { + lean::dec(x_191); + x_200 = lean::box(0); } else { - lean::cnstr_release(x_192, 0); - x_201 = x_192; + lean::cnstr_release(x_191, 0); + x_200 = x_191; } -if (lean::is_scalar(x_201)) { - x_202 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_200)) { + x_201 = lean::alloc_cnstr(0, 1, 0); } else { - x_202 = x_201; + x_201 = x_200; } -lean::cnstr_set(x_202, 0, x_199); -return x_202; +lean::cnstr_set(x_201, 0, x_198); +return x_201; } else { -obj* x_203; obj* x_206; obj* x_208; obj* x_211; obj* x_213; obj* x_215; obj* x_216; obj* x_218; obj* x_219; obj* x_222; -x_203 = lean::cnstr_get(x_192, 0); -lean::inc(x_203); -lean::dec(x_192); -x_206 = lean::cnstr_get(x_203, 0); -lean::inc(x_206); -x_208 = lean::cnstr_get(x_203, 1); -lean::inc(x_208); -lean::dec(x_203); -x_211 = lean::cnstr_get(x_208, 0); -lean::inc(x_211); -x_213 = lean::cnstr_get(x_208, 1); -lean::inc(x_213); +obj* x_202; obj* x_205; obj* x_207; obj* x_210; obj* x_212; obj* x_214; obj* x_215; obj* x_217; obj* x_218; obj* x_221; +x_202 = lean::cnstr_get(x_191, 0); +lean::inc(x_202); +lean::dec(x_191); +x_205 = lean::cnstr_get(x_202, 0); +lean::inc(x_205); +x_207 = lean::cnstr_get(x_202, 1); +lean::inc(x_207); +lean::dec(x_202); +x_210 = lean::cnstr_get(x_207, 0); +lean::inc(x_210); +x_212 = lean::cnstr_get(x_207, 1); +lean::inc(x_212); if (lean::is_scalar(x_57)) { - x_215 = lean::alloc_cnstr(0, 2, 0); + x_214 = lean::alloc_cnstr(0, 2, 0); } else { - x_215 = x_57; + x_214 = x_57; } -lean::cnstr_set(x_215, 0, x_146); -lean::cnstr_set(x_215, 1, x_206); -x_216 = lean::cnstr_get(x_208, 2); -lean::inc(x_216); +lean::cnstr_set(x_214, 0, x_145); +lean::cnstr_set(x_214, 1, x_205); +x_215 = lean::cnstr_get(x_207, 2); +lean::inc(x_215); if (lean::is_scalar(x_13)) { - x_218 = lean::alloc_cnstr(1, 2, 0); + x_217 = lean::alloc_cnstr(1, 2, 0); } else { - x_218 = x_13; + x_217 = x_13; } -lean::cnstr_set(x_218, 0, x_215); -lean::cnstr_set(x_218, 1, x_216); -x_219 = lean::cnstr_get(x_208, 3); -lean::inc(x_219); -lean::dec(x_208); -x_222 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_222, 0, x_211); -lean::cnstr_set(x_222, 1, x_213); -lean::cnstr_set(x_222, 2, x_218); -lean::cnstr_set(x_222, 3, x_219); +lean::cnstr_set(x_217, 0, x_214); +lean::cnstr_set(x_217, 1, x_215); +x_218 = lean::cnstr_get(x_207, 3); +lean::inc(x_218); +lean::dec(x_207); +x_221 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_221, 0, x_210); +lean::cnstr_set(x_221, 1, x_212); +lean::cnstr_set(x_221, 2, x_217); +lean::cnstr_set(x_221, 3, x_218); x_1 = x_11; -x_2 = x_222; +x_2 = x_221; goto _start; } } case 2: { -obj* x_224; obj* x_228; -x_224 = lean::cnstr_get(x_187, 0); -lean::inc(x_224); -lean::dec(x_187); +obj* x_223; obj* x_227; +x_223 = lean::cnstr_get(x_186, 0); +lean::inc(x_223); +lean::dec(x_186); lean::inc(x_3); -x_228 = l___private_init_lean_expander_1__pop__stx__arg(x_55, x_3); -if (lean::obj_tag(x_228) == 0) +x_227 = l___private_init_lean_expander_1__pop__stx__arg(x_55, x_3); +if (lean::obj_tag(x_227) == 0) { -obj* x_236; obj* x_238; obj* x_239; -lean::dec(x_146); +obj* x_235; obj* x_237; obj* x_238; +lean::dec(x_145); lean::dec(x_3); lean::dec(x_0); lean::dec(x_11); lean::dec(x_13); -lean::dec(x_224); lean::dec(x_57); -x_236 = lean::cnstr_get(x_228, 0); -lean::inc(x_236); -if (lean::is_shared(x_228)) { - lean::dec(x_228); - x_238 = lean::box(0); +lean::dec(x_223); +x_235 = lean::cnstr_get(x_227, 0); +lean::inc(x_235); +if (lean::is_shared(x_227)) { + lean::dec(x_227); + x_237 = lean::box(0); } else { - lean::cnstr_release(x_228, 0); - x_238 = x_228; + lean::cnstr_release(x_227, 0); + x_237 = x_227; } -if (lean::is_scalar(x_238)) { - x_239 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_237)) { + x_238 = lean::alloc_cnstr(0, 1, 0); } else { - x_239 = x_238; + x_238 = x_237; } -lean::cnstr_set(x_239, 0, x_236); -return x_239; +lean::cnstr_set(x_238, 0, x_235); +return x_238; } else { -obj* x_240; obj* x_242; obj* x_243; obj* x_245; obj* x_248; obj* x_250; obj* x_252; obj* x_254; -x_240 = lean::cnstr_get(x_228, 0); -lean::inc(x_240); -if (lean::is_shared(x_228)) { - lean::dec(x_228); - x_242 = lean::box(0); +obj* x_239; obj* x_241; obj* x_242; obj* x_244; obj* x_247; obj* x_249; obj* x_251; obj* x_253; +x_239 = lean::cnstr_get(x_227, 0); +lean::inc(x_239); +if (lean::is_shared(x_227)) { + lean::dec(x_227); + x_241 = lean::box(0); } else { - lean::cnstr_release(x_228, 0); - x_242 = x_228; + lean::cnstr_release(x_227, 0); + x_241 = x_227; } -x_243 = lean::cnstr_get(x_240, 0); -lean::inc(x_243); -x_245 = lean::cnstr_get(x_240, 1); -lean::inc(x_245); -lean::dec(x_240); -x_248 = lean::cnstr_get(x_245, 0); -lean::inc(x_248); -x_250 = lean::cnstr_get(x_245, 1); -lean::inc(x_250); -x_252 = lean::cnstr_get(x_245, 2); -lean::inc(x_252); -x_254 = lean::cnstr_get(x_245, 3); -lean::inc(x_254); -if (lean::obj_tag(x_254) == 0) +x_242 = lean::cnstr_get(x_239, 0); +lean::inc(x_242); +x_244 = lean::cnstr_get(x_239, 1); +lean::inc(x_244); +lean::dec(x_239); +x_247 = lean::cnstr_get(x_244, 0); +lean::inc(x_247); +x_249 = lean::cnstr_get(x_244, 1); +lean::inc(x_249); +x_251 = lean::cnstr_get(x_244, 2); +lean::inc(x_251); +x_253 = lean::cnstr_get(x_244, 3); +lean::inc(x_253); +if (lean::obj_tag(x_253) == 0) { -obj* x_264; obj* x_268; -lean::dec(x_146); +obj* x_263; obj* x_267; +lean::dec(x_145); lean::dec(x_13); -lean::dec(x_248); -lean::dec(x_243); -lean::dec(x_250); -lean::dec(x_252); -lean::dec(x_224); +lean::dec(x_251); +lean::dec(x_247); +lean::dec(x_249); lean::dec(x_57); -x_264 = l___private_init_lean_expander_1__pop__stx__arg___closed__1; -lean::inc(x_3); -lean::inc(x_264); -lean::inc(x_0); -x_268 = l_lean_expander_error___at___private_init_lean_expander_1__pop__stx__arg___spec__1___rarg(x_0, x_264, x_245, x_3); -if (lean::obj_tag(x_268) == 0) -{ -obj* x_272; obj* x_275; -lean::dec(x_3); -lean::dec(x_0); -lean::dec(x_11); -x_272 = lean::cnstr_get(x_268, 0); -lean::inc(x_272); -lean::dec(x_268); -if (lean::is_scalar(x_242)) { - x_275 = lean::alloc_cnstr(0, 1, 0); -} else { - x_275 = x_242; - lean::cnstr_set_tag(x_242, 0); -} -lean::cnstr_set(x_275, 0, x_272); -return x_275; -} -else -{ -obj* x_277; obj* x_280; +lean::dec(x_223); lean::dec(x_242); -x_277 = lean::cnstr_get(x_268, 0); -lean::inc(x_277); -lean::dec(x_268); -x_280 = lean::cnstr_get(x_277, 1); -lean::inc(x_280); -lean::dec(x_277); +x_263 = l___private_init_lean_expander_1__pop__stx__arg___closed__1; +lean::inc(x_3); +lean::inc(x_263); +lean::inc(x_0); +x_267 = l_lean_expander_error___at___private_init_lean_expander_1__pop__stx__arg___spec__1___rarg(x_0, x_263, x_244, x_3); +if (lean::obj_tag(x_267) == 0) +{ +obj* x_271; obj* x_274; +lean::dec(x_3); +lean::dec(x_0); +lean::dec(x_11); +x_271 = lean::cnstr_get(x_267, 0); +lean::inc(x_271); +lean::dec(x_267); +if (lean::is_scalar(x_241)) { + x_274 = lean::alloc_cnstr(0, 1, 0); +} else { + x_274 = x_241; + lean::cnstr_set_tag(x_241, 0); +} +lean::cnstr_set(x_274, 0, x_271); +return x_274; +} +else +{ +obj* x_276; obj* x_279; +lean::dec(x_241); +x_276 = lean::cnstr_get(x_267, 0); +lean::inc(x_276); +lean::dec(x_267); +x_279 = lean::cnstr_get(x_276, 1); +lean::inc(x_279); +lean::dec(x_276); x_1 = x_11; -x_2 = x_280; +x_2 = x_279; goto _start; } } else { -obj* x_286; obj* x_288; obj* x_289; obj* x_291; obj* x_292; obj* x_295; obj* x_296; obj* x_297; obj* x_298; obj* x_299; obj* x_302; obj* x_303; obj* x_306; obj* x_308; obj* x_311; obj* x_312; obj* x_313; obj* x_314; obj* x_316; obj* x_317; obj* x_318; obj* x_319; obj* x_320; -lean::dec(x_245); -lean::dec(x_242); -x_286 = lean::cnstr_get(x_254, 0); -lean::inc(x_286); -x_288 = l_lean_parser_term_lambda_has__view; -x_289 = lean::cnstr_get(x_288, 1); -lean::inc(x_289); -x_291 = lean::box(0); -x_292 = lean::cnstr_get(x_224, 3); -lean::inc(x_292); +obj* x_285; obj* x_287; obj* x_288; obj* x_290; obj* x_291; obj* x_293; obj* x_294; obj* x_295; obj* x_296; obj* x_297; obj* x_300; obj* x_301; obj* x_304; obj* x_306; obj* x_309; obj* x_310; obj* x_311; obj* x_312; obj* x_314; obj* x_315; obj* x_316; obj* x_317; obj* x_318; +lean::dec(x_244); +lean::dec(x_241); +x_285 = lean::cnstr_get(x_253, 0); +lean::inc(x_285); +x_287 = l_lean_parser_term_lambda_has__view; +x_288 = lean::cnstr_get(x_287, 1); +lean::inc(x_288); +x_290 = lean::box(0); +x_291 = lean::cnstr_get(x_223, 3); lean::inc(x_291); if (lean::is_scalar(x_13)) { - x_295 = lean::alloc_cnstr(1, 2, 0); + x_293 = lean::alloc_cnstr(1, 2, 0); } else { - x_295 = x_13; + x_293 = x_13; } -lean::cnstr_set(x_295, 0, x_292); -lean::cnstr_set(x_295, 1, x_291); -x_296 = l_list_map___main___at_lean_expander_mk__notation__transformer___spec__3(x_295); -x_297 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_297, 0, x_296); -lean::cnstr_set(x_297, 1, x_291); -x_298 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_298, 0, x_297); -x_299 = lean::cnstr_get(x_224, 5); -lean::inc(x_299); -lean::dec(x_224); -x_302 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__2; -x_303 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__3; -lean::inc(x_303); -lean::inc(x_302); -x_306 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_306, 0, x_302); -lean::cnstr_set(x_306, 1, x_298); -lean::cnstr_set(x_306, 2, x_303); -lean::cnstr_set(x_306, 3, x_299); -lean::inc(x_289); -x_308 = lean::apply_1(x_289, x_306); -lean::inc(x_303); -lean::inc(x_302); -x_311 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_311, 0, x_302); -lean::cnstr_set(x_311, 1, x_286); -lean::cnstr_set(x_311, 2, x_303); -lean::cnstr_set(x_311, 3, x_243); -x_312 = lean::apply_1(x_289, x_311); -x_313 = l_lean_parser_term_app_has__view; -x_314 = lean::cnstr_get(x_313, 1); -lean::inc(x_314); -x_316 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_316, 0, x_308); -lean::cnstr_set(x_316, 1, x_312); -x_317 = lean::apply_1(x_314, x_316); +lean::cnstr_set(x_293, 0, x_291); +lean::cnstr_set(x_293, 1, x_290); +x_294 = l_list_map___main___at_lean_expander_mk__notation__transformer___spec__3(x_293); +x_295 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_295, 0, x_294); +lean::cnstr_set(x_295, 1, x_290); +x_296 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_296, 0, x_295); +x_297 = lean::cnstr_get(x_223, 5); +lean::inc(x_297); +lean::dec(x_223); +x_300 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__2; +x_301 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__3; +lean::inc(x_301); +lean::inc(x_300); +x_304 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_304, 0, x_300); +lean::cnstr_set(x_304, 1, x_296); +lean::cnstr_set(x_304, 2, x_301); +lean::cnstr_set(x_304, 3, x_297); +lean::inc(x_288); +x_306 = lean::apply_1(x_288, x_304); +lean::inc(x_301); +lean::inc(x_300); +x_309 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_309, 0, x_300); +lean::cnstr_set(x_309, 1, x_285); +lean::cnstr_set(x_309, 2, x_301); +lean::cnstr_set(x_309, 3, x_242); +x_310 = lean::apply_1(x_288, x_309); +x_311 = l_lean_parser_term_app_has__view; +x_312 = lean::cnstr_get(x_311, 1); +lean::inc(x_312); +x_314 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_314, 0, x_306); +lean::cnstr_set(x_314, 1, x_310); +x_315 = lean::apply_1(x_312, x_314); if (lean::is_scalar(x_57)) { - x_318 = lean::alloc_cnstr(0, 2, 0); + x_316 = lean::alloc_cnstr(0, 2, 0); } else { - x_318 = x_57; + x_316 = x_57; } -lean::cnstr_set(x_318, 0, x_146); -lean::cnstr_set(x_318, 1, x_317); -x_319 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_319, 0, x_318); -lean::cnstr_set(x_319, 1, x_252); -x_320 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_320, 0, x_248); -lean::cnstr_set(x_320, 1, x_250); -lean::cnstr_set(x_320, 2, x_319); -lean::cnstr_set(x_320, 3, x_254); +lean::cnstr_set(x_316, 0, x_145); +lean::cnstr_set(x_316, 1, x_315); +x_317 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_317, 0, x_316); +lean::cnstr_set(x_317, 1, x_251); +x_318 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_318, 0, x_247); +lean::cnstr_set(x_318, 1, x_249); +lean::cnstr_set(x_318, 2, x_317); +lean::cnstr_set(x_318, 3, x_253); x_1 = x_11; -x_2 = x_320; +x_2 = x_318; goto _start; } } } default: { -obj* x_326; obj* x_330; -lean::dec(x_146); -lean::dec(x_187); +obj* x_324; obj* x_328; +lean::dec(x_145); lean::dec(x_13); +lean::dec(x_186); lean::dec(x_57); -x_326 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__1; +x_324 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__1; lean::inc(x_3); -lean::inc(x_326); +lean::inc(x_324); lean::inc(x_0); -x_330 = l_lean_expander_error___at___private_init_lean_expander_1__pop__stx__arg___spec__1___rarg(x_0, x_326, x_55, x_3); -if (lean::obj_tag(x_330) == 0) +x_328 = l_lean_expander_error___at___private_init_lean_expander_1__pop__stx__arg___spec__1___rarg(x_0, x_324, x_55, x_3); +if (lean::obj_tag(x_328) == 0) { -obj* x_334; obj* x_336; obj* x_337; +obj* x_332; obj* x_334; obj* x_335; lean::dec(x_3); lean::dec(x_0); lean::dec(x_11); -x_334 = lean::cnstr_get(x_330, 0); -lean::inc(x_334); -if (lean::is_shared(x_330)) { - lean::dec(x_330); - x_336 = lean::box(0); +x_332 = lean::cnstr_get(x_328, 0); +lean::inc(x_332); +if (lean::is_shared(x_328)) { + lean::dec(x_328); + x_334 = lean::box(0); } else { - lean::cnstr_release(x_330, 0); - x_336 = x_330; + lean::cnstr_release(x_328, 0); + x_334 = x_328; } -if (lean::is_scalar(x_336)) { - x_337 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_334)) { + x_335 = lean::alloc_cnstr(0, 1, 0); } else { - x_337 = x_336; + x_335 = x_334; } -lean::cnstr_set(x_337, 0, x_334); -return x_337; +lean::cnstr_set(x_335, 0, x_332); +return x_335; } else { -obj* x_338; obj* x_341; -x_338 = lean::cnstr_get(x_330, 0); -lean::inc(x_338); -lean::dec(x_330); -x_341 = lean::cnstr_get(x_338, 1); -lean::inc(x_341); -lean::dec(x_338); +obj* x_336; obj* x_339; +x_336 = lean::cnstr_get(x_328, 0); +lean::inc(x_336); +lean::dec(x_328); +x_339 = lean::cnstr_get(x_336, 1); +lean::inc(x_339); +lean::dec(x_336); x_1 = x_11; -x_2 = x_341; +x_2 = x_339; goto _start; } } @@ -1702,576 +1695,574 @@ goto _start; } lbl_17: { -obj* x_345; obj* x_347; obj* x_348; -x_345 = lean::cnstr_get(x_16, 1); -lean::inc(x_345); +obj* x_343; obj* x_345; obj* x_346; +x_343 = lean::cnstr_get(x_16, 1); +lean::inc(x_343); if (lean::is_shared(x_16)) { lean::dec(x_16); - x_347 = lean::box(0); + x_345 = lean::box(0); } else { lean::cnstr_release(x_16, 0); lean::cnstr_release(x_16, 1); - x_347 = x_16; + x_345 = x_16; } -x_348 = lean::cnstr_get(x_9, 1); -lean::inc(x_348); +x_346 = lean::cnstr_get(x_9, 1); +lean::inc(x_346); lean::dec(x_9); -if (lean::obj_tag(x_348) == 0) +if (lean::obj_tag(x_346) == 0) { -lean::dec(x_347); +lean::dec(x_345); x_1 = x_11; -x_2 = x_345; +x_2 = x_343; goto _start; } else { -obj* x_353; obj* x_355; -x_353 = lean::cnstr_get(x_348, 0); -lean::inc(x_353); -if (lean::is_shared(x_348)) { - lean::dec(x_348); - x_355 = lean::box(0); +obj* x_351; obj* x_353; +x_351 = lean::cnstr_get(x_346, 0); +lean::inc(x_351); +if (lean::is_shared(x_346)) { + lean::dec(x_346); + x_353 = lean::box(0); } else { - lean::cnstr_release(x_348, 0); - x_355 = x_348; + lean::cnstr_release(x_346, 0); + x_353 = x_346; } -switch (lean::obj_tag(x_353)) { +switch (lean::obj_tag(x_351)) { case 0: { -obj* x_359; -lean::dec(x_347); -lean::dec(x_353); +obj* x_357; +lean::dec(x_345); +lean::dec(x_351); lean::inc(x_3); -x_359 = l___private_init_lean_expander_1__pop__stx__arg(x_345, x_3); -if (lean::obj_tag(x_359) == 0) +x_357 = l___private_init_lean_expander_1__pop__stx__arg(x_343, x_3); +if (lean::obj_tag(x_357) == 0) { -obj* x_364; obj* x_366; obj* x_367; +obj* x_362; obj* x_364; obj* x_365; lean::dec(x_3); lean::dec(x_0); lean::dec(x_11); -lean::dec(x_355); -x_364 = lean::cnstr_get(x_359, 0); -lean::inc(x_364); -if (lean::is_shared(x_359)) { - lean::dec(x_359); - x_366 = lean::box(0); +lean::dec(x_353); +x_362 = lean::cnstr_get(x_357, 0); +lean::inc(x_362); +if (lean::is_shared(x_357)) { + lean::dec(x_357); + x_364 = lean::box(0); } else { - lean::cnstr_release(x_359, 0); - x_366 = x_359; + lean::cnstr_release(x_357, 0); + x_364 = x_357; } -if (lean::is_scalar(x_366)) { - x_367 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_364)) { + x_365 = lean::alloc_cnstr(0, 1, 0); } else { - x_367 = x_366; + x_365 = x_364; } -lean::cnstr_set(x_367, 0, x_364); -return x_367; +lean::cnstr_set(x_365, 0, x_362); +return x_365; } else { -obj* x_368; obj* x_371; obj* x_373; obj* x_376; obj* x_378; obj* x_380; obj* x_383; obj* x_384; obj* x_386; obj* x_387; obj* x_389; obj* x_390; obj* x_391; obj* x_392; obj* x_393; -x_368 = lean::cnstr_get(x_359, 0); -lean::inc(x_368); -lean::dec(x_359); -x_371 = lean::cnstr_get(x_368, 0); +obj* x_366; obj* x_369; obj* x_371; obj* x_374; obj* x_376; obj* x_378; obj* x_381; obj* x_382; obj* x_384; obj* x_385; obj* x_386; obj* x_387; obj* x_388; obj* x_389; obj* x_390; +x_366 = lean::cnstr_get(x_357, 0); +lean::inc(x_366); +lean::dec(x_357); +x_369 = lean::cnstr_get(x_366, 0); +lean::inc(x_369); +x_371 = lean::cnstr_get(x_366, 1); lean::inc(x_371); -x_373 = lean::cnstr_get(x_368, 1); -lean::inc(x_373); -lean::dec(x_368); -x_376 = lean::cnstr_get(x_373, 0); +lean::dec(x_366); +x_374 = lean::cnstr_get(x_371, 0); +lean::inc(x_374); +x_376 = lean::cnstr_get(x_371, 1); lean::inc(x_376); -x_378 = lean::cnstr_get(x_373, 1); +x_378 = lean::cnstr_get(x_371, 2); lean::inc(x_378); -x_380 = lean::cnstr_get(x_373, 2); -lean::inc(x_380); -lean::dec(x_373); -x_383 = l_lean_parser_term_binder__ident_has__view; -x_384 = lean::cnstr_get(x_383, 0); -lean::inc(x_384); -x_386 = lean::apply_1(x_384, x_371); -x_387 = lean::box(0); -lean::inc(x_387); -x_389 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_389, 0, x_386); -lean::cnstr_set(x_389, 1, x_387); -x_390 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_390, 0, x_389); -lean::cnstr_set(x_390, 1, x_387); -x_391 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_391, 0, x_390); -if (lean::is_scalar(x_355)) { - x_392 = lean::alloc_cnstr(1, 1, 0); +lean::dec(x_371); +x_381 = l_lean_parser_term_binder__ident_has__view; +x_382 = lean::cnstr_get(x_381, 0); +lean::inc(x_382); +x_384 = lean::apply_1(x_382, x_369); +x_385 = lean::box(0); +x_386 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_386, 0, x_384); +lean::cnstr_set(x_386, 1, x_385); +x_387 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_387, 0, x_386); +lean::cnstr_set(x_387, 1, x_385); +x_388 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_388, 0, x_387); +if (lean::is_scalar(x_353)) { + x_389 = lean::alloc_cnstr(1, 1, 0); } else { - x_392 = x_355; + x_389 = x_353; } -lean::cnstr_set(x_392, 0, x_391); -x_393 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_393, 0, x_376); -lean::cnstr_set(x_393, 1, x_378); -lean::cnstr_set(x_393, 2, x_380); -lean::cnstr_set(x_393, 3, x_392); +lean::cnstr_set(x_389, 0, x_388); +x_390 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_390, 0, x_374); +lean::cnstr_set(x_390, 1, x_376); +lean::cnstr_set(x_390, 2, x_378); +lean::cnstr_set(x_390, 3, x_389); x_1 = x_11; -x_2 = x_393; +x_2 = x_390; goto _start; } } case 1: { -obj* x_398; -lean::dec(x_347); -lean::dec(x_353); +obj* x_395; +lean::dec(x_345); +lean::dec(x_351); lean::inc(x_3); -x_398 = l___private_init_lean_expander_1__pop__stx__arg(x_345, x_3); -if (lean::obj_tag(x_398) == 0) +x_395 = l___private_init_lean_expander_1__pop__stx__arg(x_343, x_3); +if (lean::obj_tag(x_395) == 0) { -obj* x_403; obj* x_405; obj* x_406; +obj* x_400; obj* x_402; obj* x_403; lean::dec(x_3); lean::dec(x_0); lean::dec(x_11); -lean::dec(x_355); -x_403 = lean::cnstr_get(x_398, 0); -lean::inc(x_403); -if (lean::is_shared(x_398)) { - lean::dec(x_398); - x_405 = lean::box(0); +lean::dec(x_353); +x_400 = lean::cnstr_get(x_395, 0); +lean::inc(x_400); +if (lean::is_shared(x_395)) { + lean::dec(x_395); + x_402 = lean::box(0); } else { - lean::cnstr_release(x_398, 0); - x_405 = x_398; + lean::cnstr_release(x_395, 0); + x_402 = x_395; } -if (lean::is_scalar(x_405)) { - x_406 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_402)) { + x_403 = lean::alloc_cnstr(0, 1, 0); } else { - x_406 = x_405; + x_403 = x_402; } -lean::cnstr_set(x_406, 0, x_403); -return x_406; +lean::cnstr_set(x_403, 0, x_400); +return x_403; } else { -obj* x_407; obj* x_410; obj* x_412; obj* x_415; obj* x_417; obj* x_419; obj* x_422; obj* x_423; obj* x_425; obj* x_426; obj* x_427; -x_407 = lean::cnstr_get(x_398, 0); +obj* x_404; obj* x_407; obj* x_409; obj* x_412; obj* x_414; obj* x_416; obj* x_419; obj* x_420; obj* x_422; obj* x_423; obj* x_424; +x_404 = lean::cnstr_get(x_395, 0); +lean::inc(x_404); +lean::dec(x_395); +x_407 = lean::cnstr_get(x_404, 0); lean::inc(x_407); -lean::dec(x_398); -x_410 = lean::cnstr_get(x_407, 0); -lean::inc(x_410); -x_412 = lean::cnstr_get(x_407, 1); +x_409 = lean::cnstr_get(x_404, 1); +lean::inc(x_409); +lean::dec(x_404); +x_412 = lean::cnstr_get(x_409, 0); lean::inc(x_412); -lean::dec(x_407); -x_415 = lean::cnstr_get(x_412, 0); -lean::inc(x_415); -x_417 = lean::cnstr_get(x_412, 1); -lean::inc(x_417); -x_419 = lean::cnstr_get(x_412, 2); -lean::inc(x_419); -lean::dec(x_412); -x_422 = l_lean_parser_term_binders_has__view; -x_423 = lean::cnstr_get(x_422, 0); -lean::inc(x_423); -x_425 = lean::apply_1(x_423, x_410); -if (lean::is_scalar(x_355)) { - x_426 = lean::alloc_cnstr(1, 1, 0); +x_414 = lean::cnstr_get(x_409, 1); +lean::inc(x_414); +x_416 = lean::cnstr_get(x_409, 2); +lean::inc(x_416); +lean::dec(x_409); +x_419 = l_lean_parser_term_binders_has__view; +x_420 = lean::cnstr_get(x_419, 0); +lean::inc(x_420); +x_422 = lean::apply_1(x_420, x_407); +if (lean::is_scalar(x_353)) { + x_423 = lean::alloc_cnstr(1, 1, 0); } else { - x_426 = x_355; + x_423 = x_353; } -lean::cnstr_set(x_426, 0, x_425); -x_427 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_427, 0, x_415); -lean::cnstr_set(x_427, 1, x_417); -lean::cnstr_set(x_427, 2, x_419); -lean::cnstr_set(x_427, 3, x_426); +lean::cnstr_set(x_423, 0, x_422); +x_424 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_424, 0, x_412); +lean::cnstr_set(x_424, 1, x_414); +lean::cnstr_set(x_424, 2, x_416); +lean::cnstr_set(x_424, 3, x_423); x_1 = x_11; -x_2 = x_427; +x_2 = x_424; goto _start; } } default: { -obj* x_430; obj* x_433; obj* x_435; -lean::dec(x_355); -x_430 = lean::cnstr_get(x_353, 0); -lean::inc(x_430); +obj* x_427; obj* x_430; obj* x_432; lean::dec(x_353); -x_433 = lean::cnstr_get(x_430, 0); -lean::inc(x_433); -x_435 = lean::cnstr_get(x_430, 1); -lean::inc(x_435); -lean::dec(x_430); -if (lean::obj_tag(x_435) == 0) +x_427 = lean::cnstr_get(x_351, 0); +lean::inc(x_427); +lean::dec(x_351); +x_430 = lean::cnstr_get(x_427, 0); +lean::inc(x_430); +x_432 = lean::cnstr_get(x_427, 1); +lean::inc(x_432); +lean::dec(x_427); +if (lean::obj_tag(x_432) == 0) { -obj* x_439; +obj* x_436; lean::inc(x_3); -x_439 = l___private_init_lean_expander_1__pop__stx__arg(x_345, x_3); -if (lean::obj_tag(x_439) == 0) +x_436 = l___private_init_lean_expander_1__pop__stx__arg(x_343, x_3); +if (lean::obj_tag(x_436) == 0) { -obj* x_445; obj* x_447; obj* x_448; -lean::dec(x_433); +obj* x_442; obj* x_444; obj* x_445; lean::dec(x_3); lean::dec(x_0); lean::dec(x_11); -lean::dec(x_347); -x_445 = lean::cnstr_get(x_439, 0); -lean::inc(x_445); -if (lean::is_shared(x_439)) { - lean::dec(x_439); - x_447 = lean::box(0); +lean::dec(x_345); +lean::dec(x_430); +x_442 = lean::cnstr_get(x_436, 0); +lean::inc(x_442); +if (lean::is_shared(x_436)) { + lean::dec(x_436); + x_444 = lean::box(0); } else { - lean::cnstr_release(x_439, 0); - x_447 = x_439; + lean::cnstr_release(x_436, 0); + x_444 = x_436; } -if (lean::is_scalar(x_447)) { - x_448 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_444)) { + x_445 = lean::alloc_cnstr(0, 1, 0); } else { - x_448 = x_447; + x_445 = x_444; } -lean::cnstr_set(x_448, 0, x_445); -return x_448; +lean::cnstr_set(x_445, 0, x_442); +return x_445; } else { -obj* x_449; obj* x_452; obj* x_454; obj* x_457; obj* x_459; obj* x_461; obj* x_462; obj* x_464; obj* x_465; obj* x_468; -x_449 = lean::cnstr_get(x_439, 0); +obj* x_446; obj* x_449; obj* x_451; obj* x_454; obj* x_456; obj* x_458; obj* x_459; obj* x_461; obj* x_462; obj* x_465; +x_446 = lean::cnstr_get(x_436, 0); +lean::inc(x_446); +lean::dec(x_436); +x_449 = lean::cnstr_get(x_446, 0); lean::inc(x_449); -lean::dec(x_439); -x_452 = lean::cnstr_get(x_449, 0); -lean::inc(x_452); -x_454 = lean::cnstr_get(x_449, 1); +x_451 = lean::cnstr_get(x_446, 1); +lean::inc(x_451); +lean::dec(x_446); +x_454 = lean::cnstr_get(x_451, 0); lean::inc(x_454); -lean::dec(x_449); -x_457 = lean::cnstr_get(x_454, 0); -lean::inc(x_457); -x_459 = lean::cnstr_get(x_454, 1); -lean::inc(x_459); -if (lean::is_scalar(x_347)) { - x_461 = lean::alloc_cnstr(0, 2, 0); +x_456 = lean::cnstr_get(x_451, 1); +lean::inc(x_456); +if (lean::is_scalar(x_345)) { + x_458 = lean::alloc_cnstr(0, 2, 0); } else { - x_461 = x_347; + x_458 = x_345; } -lean::cnstr_set(x_461, 0, x_433); -lean::cnstr_set(x_461, 1, x_452); -x_462 = lean::cnstr_get(x_454, 2); +lean::cnstr_set(x_458, 0, x_430); +lean::cnstr_set(x_458, 1, x_449); +x_459 = lean::cnstr_get(x_451, 2); +lean::inc(x_459); +x_461 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_461, 0, x_458); +lean::cnstr_set(x_461, 1, x_459); +x_462 = lean::cnstr_get(x_451, 3); lean::inc(x_462); -x_464 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_464, 0, x_461); -lean::cnstr_set(x_464, 1, x_462); -x_465 = lean::cnstr_get(x_454, 3); -lean::inc(x_465); -lean::dec(x_454); -x_468 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_468, 0, x_457); -lean::cnstr_set(x_468, 1, x_459); -lean::cnstr_set(x_468, 2, x_464); -lean::cnstr_set(x_468, 3, x_465); +lean::dec(x_451); +x_465 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_465, 0, x_454); +lean::cnstr_set(x_465, 1, x_456); +lean::cnstr_set(x_465, 2, x_461); +lean::cnstr_set(x_465, 3, x_462); x_1 = x_11; -x_2 = x_468; +x_2 = x_465; goto _start; } } else { -obj* x_470; obj* x_473; -x_470 = lean::cnstr_get(x_435, 0); +obj* x_467; obj* x_470; +x_467 = lean::cnstr_get(x_432, 0); +lean::inc(x_467); +lean::dec(x_432); +x_470 = lean::cnstr_get(x_467, 1); lean::inc(x_470); -lean::dec(x_435); -x_473 = lean::cnstr_get(x_470, 1); -lean::inc(x_473); -lean::dec(x_470); -switch (lean::obj_tag(x_473)) { +lean::dec(x_467); +switch (lean::obj_tag(x_470)) { case 0: { -obj* x_478; -lean::dec(x_473); +obj* x_475; +lean::dec(x_470); lean::inc(x_3); -x_478 = l___private_init_lean_expander_1__pop__stx__arg(x_345, x_3); -if (lean::obj_tag(x_478) == 0) +x_475 = l___private_init_lean_expander_1__pop__stx__arg(x_343, x_3); +if (lean::obj_tag(x_475) == 0) { -obj* x_484; obj* x_486; obj* x_487; -lean::dec(x_433); +obj* x_481; obj* x_483; obj* x_484; lean::dec(x_3); lean::dec(x_0); lean::dec(x_11); -lean::dec(x_347); -x_484 = lean::cnstr_get(x_478, 0); -lean::inc(x_484); -if (lean::is_shared(x_478)) { - lean::dec(x_478); - x_486 = lean::box(0); +lean::dec(x_345); +lean::dec(x_430); +x_481 = lean::cnstr_get(x_475, 0); +lean::inc(x_481); +if (lean::is_shared(x_475)) { + lean::dec(x_475); + x_483 = lean::box(0); } else { - lean::cnstr_release(x_478, 0); - x_486 = x_478; + lean::cnstr_release(x_475, 0); + x_483 = x_475; } -if (lean::is_scalar(x_486)) { - x_487 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_483)) { + x_484 = lean::alloc_cnstr(0, 1, 0); } else { - x_487 = x_486; + x_484 = x_483; } -lean::cnstr_set(x_487, 0, x_484); -return x_487; +lean::cnstr_set(x_484, 0, x_481); +return x_484; } else { -obj* x_488; obj* x_491; obj* x_493; obj* x_496; obj* x_498; obj* x_500; obj* x_501; obj* x_503; obj* x_504; obj* x_507; -x_488 = lean::cnstr_get(x_478, 0); +obj* x_485; obj* x_488; obj* x_490; obj* x_493; obj* x_495; obj* x_497; obj* x_498; obj* x_500; obj* x_501; obj* x_504; +x_485 = lean::cnstr_get(x_475, 0); +lean::inc(x_485); +lean::dec(x_475); +x_488 = lean::cnstr_get(x_485, 0); lean::inc(x_488); -lean::dec(x_478); -x_491 = lean::cnstr_get(x_488, 0); -lean::inc(x_491); -x_493 = lean::cnstr_get(x_488, 1); +x_490 = lean::cnstr_get(x_485, 1); +lean::inc(x_490); +lean::dec(x_485); +x_493 = lean::cnstr_get(x_490, 0); lean::inc(x_493); -lean::dec(x_488); -x_496 = lean::cnstr_get(x_493, 0); -lean::inc(x_496); -x_498 = lean::cnstr_get(x_493, 1); -lean::inc(x_498); -if (lean::is_scalar(x_347)) { - x_500 = lean::alloc_cnstr(0, 2, 0); +x_495 = lean::cnstr_get(x_490, 1); +lean::inc(x_495); +if (lean::is_scalar(x_345)) { + x_497 = lean::alloc_cnstr(0, 2, 0); } else { - x_500 = x_347; + x_497 = x_345; } -lean::cnstr_set(x_500, 0, x_433); -lean::cnstr_set(x_500, 1, x_491); -x_501 = lean::cnstr_get(x_493, 2); +lean::cnstr_set(x_497, 0, x_430); +lean::cnstr_set(x_497, 1, x_488); +x_498 = lean::cnstr_get(x_490, 2); +lean::inc(x_498); +x_500 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_500, 0, x_497); +lean::cnstr_set(x_500, 1, x_498); +x_501 = lean::cnstr_get(x_490, 3); lean::inc(x_501); -x_503 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_503, 0, x_500); -lean::cnstr_set(x_503, 1, x_501); -x_504 = lean::cnstr_get(x_493, 3); -lean::inc(x_504); -lean::dec(x_493); -x_507 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_507, 0, x_496); -lean::cnstr_set(x_507, 1, x_498); -lean::cnstr_set(x_507, 2, x_503); -lean::cnstr_set(x_507, 3, x_504); +lean::dec(x_490); +x_504 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_504, 0, x_493); +lean::cnstr_set(x_504, 1, x_495); +lean::cnstr_set(x_504, 2, x_500); +lean::cnstr_set(x_504, 3, x_501); x_1 = x_11; -x_2 = x_507; +x_2 = x_504; goto _start; } } case 2: { -obj* x_509; obj* x_513; -x_509 = lean::cnstr_get(x_473, 0); -lean::inc(x_509); -lean::dec(x_473); +obj* x_506; obj* x_510; +x_506 = lean::cnstr_get(x_470, 0); +lean::inc(x_506); +lean::dec(x_470); lean::inc(x_3); -x_513 = l___private_init_lean_expander_1__pop__stx__arg(x_345, x_3); -if (lean::obj_tag(x_513) == 0) +x_510 = l___private_init_lean_expander_1__pop__stx__arg(x_343, x_3); +if (lean::obj_tag(x_510) == 0) { -obj* x_520; obj* x_522; obj* x_523; -lean::dec(x_433); -lean::dec(x_509); +obj* x_517; obj* x_519; obj* x_520; lean::dec(x_3); lean::dec(x_0); lean::dec(x_11); -lean::dec(x_347); -x_520 = lean::cnstr_get(x_513, 0); -lean::inc(x_520); -if (lean::is_shared(x_513)) { - lean::dec(x_513); - x_522 = lean::box(0); +lean::dec(x_506); +lean::dec(x_345); +lean::dec(x_430); +x_517 = lean::cnstr_get(x_510, 0); +lean::inc(x_517); +if (lean::is_shared(x_510)) { + lean::dec(x_510); + x_519 = lean::box(0); } else { - lean::cnstr_release(x_513, 0); - x_522 = x_513; + lean::cnstr_release(x_510, 0); + x_519 = x_510; } -if (lean::is_scalar(x_522)) { - x_523 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_519)) { + x_520 = lean::alloc_cnstr(0, 1, 0); } else { - x_523 = x_522; + x_520 = x_519; } -lean::cnstr_set(x_523, 0, x_520); -return x_523; +lean::cnstr_set(x_520, 0, x_517); +return x_520; } else { -obj* x_524; obj* x_526; obj* x_527; obj* x_529; obj* x_532; obj* x_534; obj* x_536; obj* x_538; -x_524 = lean::cnstr_get(x_513, 0); +obj* x_521; obj* x_523; obj* x_524; obj* x_526; obj* x_529; obj* x_531; obj* x_533; obj* x_535; +x_521 = lean::cnstr_get(x_510, 0); +lean::inc(x_521); +if (lean::is_shared(x_510)) { + lean::dec(x_510); + x_523 = lean::box(0); +} else { + lean::cnstr_release(x_510, 0); + x_523 = x_510; +} +x_524 = lean::cnstr_get(x_521, 0); lean::inc(x_524); -if (lean::is_shared(x_513)) { - lean::dec(x_513); - x_526 = lean::box(0); -} else { - lean::cnstr_release(x_513, 0); - x_526 = x_513; -} -x_527 = lean::cnstr_get(x_524, 0); -lean::inc(x_527); -x_529 = lean::cnstr_get(x_524, 1); +x_526 = lean::cnstr_get(x_521, 1); +lean::inc(x_526); +lean::dec(x_521); +x_529 = lean::cnstr_get(x_526, 0); lean::inc(x_529); +x_531 = lean::cnstr_get(x_526, 1); +lean::inc(x_531); +x_533 = lean::cnstr_get(x_526, 2); +lean::inc(x_533); +x_535 = lean::cnstr_get(x_526, 3); +lean::inc(x_535); +if (lean::obj_tag(x_535) == 0) +{ +obj* x_544; obj* x_548; +lean::dec(x_529); lean::dec(x_524); -x_532 = lean::cnstr_get(x_529, 0); -lean::inc(x_532); -x_534 = lean::cnstr_get(x_529, 1); -lean::inc(x_534); -x_536 = lean::cnstr_get(x_529, 2); -lean::inc(x_536); -x_538 = lean::cnstr_get(x_529, 3); -lean::inc(x_538); -if (lean::obj_tag(x_538) == 0) -{ -obj* x_547; obj* x_551; -lean::dec(x_433); -lean::dec(x_509); -lean::dec(x_536); -lean::dec(x_532); -lean::dec(x_527); -lean::dec(x_347); -lean::dec(x_534); -x_547 = l___private_init_lean_expander_1__pop__stx__arg___closed__1; +lean::dec(x_531); +lean::dec(x_506); +lean::dec(x_345); +lean::dec(x_533); +lean::dec(x_430); +x_544 = l___private_init_lean_expander_1__pop__stx__arg___closed__1; lean::inc(x_3); -lean::inc(x_547); +lean::inc(x_544); lean::inc(x_0); -x_551 = l_lean_expander_error___at___private_init_lean_expander_1__pop__stx__arg___spec__1___rarg(x_0, x_547, x_529, x_3); -if (lean::obj_tag(x_551) == 0) +x_548 = l_lean_expander_error___at___private_init_lean_expander_1__pop__stx__arg___spec__1___rarg(x_0, x_544, x_526, x_3); +if (lean::obj_tag(x_548) == 0) { -obj* x_555; obj* x_558; +obj* x_552; obj* x_555; lean::dec(x_3); lean::dec(x_0); lean::dec(x_11); -x_555 = lean::cnstr_get(x_551, 0); -lean::inc(x_555); -lean::dec(x_551); -if (lean::is_scalar(x_526)) { - x_558 = lean::alloc_cnstr(0, 1, 0); +x_552 = lean::cnstr_get(x_548, 0); +lean::inc(x_552); +lean::dec(x_548); +if (lean::is_scalar(x_523)) { + x_555 = lean::alloc_cnstr(0, 1, 0); } else { - x_558 = x_526; - lean::cnstr_set_tag(x_526, 0); + x_555 = x_523; + lean::cnstr_set_tag(x_523, 0); } -lean::cnstr_set(x_558, 0, x_555); -return x_558; +lean::cnstr_set(x_555, 0, x_552); +return x_555; } else { -obj* x_560; obj* x_563; -lean::dec(x_526); -x_560 = lean::cnstr_get(x_551, 0); +obj* x_557; obj* x_560; +lean::dec(x_523); +x_557 = lean::cnstr_get(x_548, 0); +lean::inc(x_557); +lean::dec(x_548); +x_560 = lean::cnstr_get(x_557, 1); lean::inc(x_560); -lean::dec(x_551); -x_563 = lean::cnstr_get(x_560, 1); -lean::inc(x_563); -lean::dec(x_560); +lean::dec(x_557); x_1 = x_11; -x_2 = x_563; +x_2 = x_560; goto _start; } } else { -obj* x_569; obj* x_571; obj* x_572; obj* x_574; obj* x_575; obj* x_578; obj* x_579; obj* x_580; obj* x_581; obj* x_582; obj* x_585; obj* x_586; obj* x_589; obj* x_591; obj* x_594; obj* x_595; obj* x_596; obj* x_597; obj* x_599; obj* x_600; obj* x_601; obj* x_602; obj* x_603; -lean::dec(x_529); +obj* x_566; obj* x_568; obj* x_569; obj* x_571; obj* x_572; obj* x_574; obj* x_575; obj* x_576; obj* x_577; obj* x_578; obj* x_581; obj* x_582; obj* x_585; obj* x_587; obj* x_590; obj* x_591; obj* x_592; obj* x_593; obj* x_595; obj* x_596; obj* x_597; obj* x_598; obj* x_599; +lean::dec(x_523); lean::dec(x_526); -x_569 = lean::cnstr_get(x_538, 0); +x_566 = lean::cnstr_get(x_535, 0); +lean::inc(x_566); +x_568 = l_lean_parser_term_lambda_has__view; +x_569 = lean::cnstr_get(x_568, 1); lean::inc(x_569); -x_571 = l_lean_parser_term_lambda_has__view; -x_572 = lean::cnstr_get(x_571, 1); +x_571 = lean::box(0); +x_572 = lean::cnstr_get(x_506, 3); lean::inc(x_572); -x_574 = lean::box(0); -x_575 = lean::cnstr_get(x_509, 3); -lean::inc(x_575); -lean::inc(x_574); -x_578 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_578, 0, x_575); -lean::cnstr_set(x_578, 1, x_574); -x_579 = l_list_map___main___at_lean_expander_mk__notation__transformer___spec__3(x_578); -x_580 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_580, 0, x_579); -lean::cnstr_set(x_580, 1, x_574); -x_581 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_581, 0, x_580); -x_582 = lean::cnstr_get(x_509, 5); +x_574 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_574, 0, x_572); +lean::cnstr_set(x_574, 1, x_571); +x_575 = l_list_map___main___at_lean_expander_mk__notation__transformer___spec__3(x_574); +x_576 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_576, 0, x_575); +lean::cnstr_set(x_576, 1, x_571); +x_577 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_577, 0, x_576); +x_578 = lean::cnstr_get(x_506, 5); +lean::inc(x_578); +lean::dec(x_506); +x_581 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__2; +x_582 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__3; lean::inc(x_582); -lean::dec(x_509); -x_585 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__2; -x_586 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__3; -lean::inc(x_586); -lean::inc(x_585); -x_589 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_589, 0, x_585); -lean::cnstr_set(x_589, 1, x_581); -lean::cnstr_set(x_589, 2, x_586); -lean::cnstr_set(x_589, 3, x_582); -lean::inc(x_572); -x_591 = lean::apply_1(x_572, x_589); -lean::inc(x_586); -lean::inc(x_585); -x_594 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_594, 0, x_585); -lean::cnstr_set(x_594, 1, x_569); -lean::cnstr_set(x_594, 2, x_586); -lean::cnstr_set(x_594, 3, x_527); -x_595 = lean::apply_1(x_572, x_594); -x_596 = l_lean_parser_term_app_has__view; -x_597 = lean::cnstr_get(x_596, 1); -lean::inc(x_597); -x_599 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_599, 0, x_591); -lean::cnstr_set(x_599, 1, x_595); -x_600 = lean::apply_1(x_597, x_599); -if (lean::is_scalar(x_347)) { - x_601 = lean::alloc_cnstr(0, 2, 0); +lean::inc(x_581); +x_585 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_585, 0, x_581); +lean::cnstr_set(x_585, 1, x_577); +lean::cnstr_set(x_585, 2, x_582); +lean::cnstr_set(x_585, 3, x_578); +lean::inc(x_569); +x_587 = lean::apply_1(x_569, x_585); +lean::inc(x_582); +lean::inc(x_581); +x_590 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_590, 0, x_581); +lean::cnstr_set(x_590, 1, x_566); +lean::cnstr_set(x_590, 2, x_582); +lean::cnstr_set(x_590, 3, x_524); +x_591 = lean::apply_1(x_569, x_590); +x_592 = l_lean_parser_term_app_has__view; +x_593 = lean::cnstr_get(x_592, 1); +lean::inc(x_593); +x_595 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_595, 0, x_587); +lean::cnstr_set(x_595, 1, x_591); +x_596 = lean::apply_1(x_593, x_595); +if (lean::is_scalar(x_345)) { + x_597 = lean::alloc_cnstr(0, 2, 0); } else { - x_601 = x_347; + x_597 = x_345; } -lean::cnstr_set(x_601, 0, x_433); -lean::cnstr_set(x_601, 1, x_600); -x_602 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_602, 0, x_601); -lean::cnstr_set(x_602, 1, x_536); -x_603 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_603, 0, x_532); -lean::cnstr_set(x_603, 1, x_534); -lean::cnstr_set(x_603, 2, x_602); -lean::cnstr_set(x_603, 3, x_538); +lean::cnstr_set(x_597, 0, x_430); +lean::cnstr_set(x_597, 1, x_596); +x_598 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_598, 0, x_597); +lean::cnstr_set(x_598, 1, x_533); +x_599 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_599, 0, x_529); +lean::cnstr_set(x_599, 1, x_531); +lean::cnstr_set(x_599, 2, x_598); +lean::cnstr_set(x_599, 3, x_535); x_1 = x_11; -x_2 = x_603; +x_2 = x_599; goto _start; } } } default: { -obj* x_608; obj* x_612; -lean::dec(x_473); -lean::dec(x_433); -lean::dec(x_347); -x_608 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__1; +obj* x_604; obj* x_608; +lean::dec(x_470); +lean::dec(x_345); +lean::dec(x_430); +x_604 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__1; lean::inc(x_3); -lean::inc(x_608); +lean::inc(x_604); lean::inc(x_0); -x_612 = l_lean_expander_error___at___private_init_lean_expander_1__pop__stx__arg___spec__1___rarg(x_0, x_608, x_345, x_3); -if (lean::obj_tag(x_612) == 0) +x_608 = l_lean_expander_error___at___private_init_lean_expander_1__pop__stx__arg___spec__1___rarg(x_0, x_604, x_343, x_3); +if (lean::obj_tag(x_608) == 0) { -obj* x_616; obj* x_618; obj* x_619; +obj* x_612; obj* x_614; obj* x_615; lean::dec(x_3); lean::dec(x_0); lean::dec(x_11); -x_616 = lean::cnstr_get(x_612, 0); -lean::inc(x_616); -if (lean::is_shared(x_612)) { - lean::dec(x_612); - x_618 = lean::box(0); +x_612 = lean::cnstr_get(x_608, 0); +lean::inc(x_612); +if (lean::is_shared(x_608)) { + lean::dec(x_608); + x_614 = lean::box(0); } else { - lean::cnstr_release(x_612, 0); - x_618 = x_612; + lean::cnstr_release(x_608, 0); + x_614 = x_608; } -if (lean::is_scalar(x_618)) { - x_619 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_614)) { + x_615 = lean::alloc_cnstr(0, 1, 0); } else { - x_619 = x_618; + x_615 = x_614; } -lean::cnstr_set(x_619, 0, x_616); -return x_619; +lean::cnstr_set(x_615, 0, x_612); +return x_615; } else { -obj* x_620; obj* x_623; -x_620 = lean::cnstr_get(x_612, 0); -lean::inc(x_620); -lean::dec(x_612); -x_623 = lean::cnstr_get(x_620, 1); -lean::inc(x_623); -lean::dec(x_620); +obj* x_616; obj* x_619; +x_616 = lean::cnstr_get(x_608, 0); +lean::inc(x_616); +lean::dec(x_608); +x_619 = lean::cnstr_get(x_616, 1); +lean::inc(x_619); +lean::dec(x_616); x_1 = x_11; -x_2 = x_623; +x_2 = x_619; goto _start; } } @@ -2474,7 +2465,7 @@ return x_8; } else { -obj* x_9; obj* x_11; obj* x_12; obj* x_15; obj* x_19; obj* x_20; obj* x_23; obj* x_25; obj* x_27; +obj* x_9; obj* x_11; obj* x_12; obj* x_15; obj* x_17; obj* x_18; obj* x_21; obj* x_23; obj* x_25; x_9 = lean::cnstr_get(x_4, 0); lean::inc(x_9); if (lean::is_shared(x_4)) { @@ -2488,184 +2479,181 @@ x_12 = lean::cnstr_get(x_9, 1); lean::inc(x_12); lean::dec(x_9); x_15 = lean::box(0); -lean::inc(x_15); -lean::inc(x_15); lean::inc(x_1); -x_19 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_19, 0, x_1); -lean::cnstr_set(x_19, 1, x_12); -lean::cnstr_set(x_19, 2, x_15); -lean::cnstr_set(x_19, 3, x_15); -x_20 = lean::cnstr_get(x_0, 1); -lean::inc(x_20); +x_17 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_17, 0, x_1); +lean::cnstr_set(x_17, 1, x_12); +lean::cnstr_set(x_17, 2, x_15); +lean::cnstr_set(x_17, 3, x_15); +x_18 = lean::cnstr_get(x_0, 1); +lean::inc(x_18); lean::dec(x_0); -x_23 = lean::cnstr_get(x_20, 2); +x_21 = lean::cnstr_get(x_18, 2); +lean::inc(x_21); +x_23 = lean::cnstr_get(x_21, 0); lean::inc(x_23); -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -if (lean::obj_tag(x_25) == 0) +if (lean::obj_tag(x_23) == 0) { -obj* x_29; -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_15); -lean::cnstr_set(x_29, 1, x_19); -x_27 = x_29; -goto lbl_28; +obj* x_27; +x_27 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_27, 0, x_15); +lean::cnstr_set(x_27, 1, x_17); +x_25 = x_27; +goto lbl_26; } else { -obj* x_30; obj* x_34; -x_30 = lean::cnstr_get(x_25, 0); -lean::inc(x_30); -lean::dec(x_25); +obj* x_28; obj* x_32; +x_28 = lean::cnstr_get(x_23, 0); +lean::inc(x_28); +lean::dec(x_23); lean::inc(x_2); -x_34 = l___private_init_lean_expander_1__pop__stx__arg(x_19, x_2); -if (lean::obj_tag(x_34) == 0) +x_32 = l___private_init_lean_expander_1__pop__stx__arg(x_17, x_2); +if (lean::obj_tag(x_32) == 0) { -obj* x_42; obj* x_44; obj* x_45; -lean::dec(x_20); +obj* x_39; obj* x_41; obj* x_42; +lean::dec(x_18); lean::dec(x_11); lean::dec(x_1); -lean::dec(x_15); lean::dec(x_2); -lean::dec(x_30); -lean::dec(x_23); -x_42 = lean::cnstr_get(x_34, 0); -lean::inc(x_42); -if (lean::is_shared(x_34)) { - lean::dec(x_34); - x_44 = lean::box(0); +lean::dec(x_28); +lean::dec(x_21); +x_39 = lean::cnstr_get(x_32, 0); +lean::inc(x_39); +if (lean::is_shared(x_32)) { + lean::dec(x_32); + x_41 = lean::box(0); } else { - lean::cnstr_release(x_34, 0); - x_44 = x_34; + lean::cnstr_release(x_32, 0); + x_41 = x_32; } -if (lean::is_scalar(x_44)) { - x_45 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_41)) { + x_42 = lean::alloc_cnstr(0, 1, 0); } else { - x_45 = x_44; + x_42 = x_41; } -lean::cnstr_set(x_45, 0, x_42); -return x_45; +lean::cnstr_set(x_42, 0, x_39); +return x_42; } else { -obj* x_46; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_56; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_65; obj* x_66; -x_46 = lean::cnstr_get(x_34, 0); +obj* x_43; obj* x_46; obj* x_48; obj* x_50; obj* x_51; obj* x_53; obj* x_55; obj* x_56; obj* x_58; obj* x_59; obj* x_62; obj* x_63; +x_43 = lean::cnstr_get(x_32, 0); +lean::inc(x_43); +lean::dec(x_32); +x_46 = lean::cnstr_get(x_43, 0); lean::inc(x_46); -lean::dec(x_34); -x_49 = lean::cnstr_get(x_46, 0); -lean::inc(x_49); -x_51 = lean::cnstr_get(x_46, 1); +x_48 = lean::cnstr_get(x_43, 1); +lean::inc(x_48); +if (lean::is_shared(x_43)) { + lean::dec(x_43); + x_50 = lean::box(0); +} else { + lean::cnstr_release(x_43, 0); + lean::cnstr_release(x_43, 1); + x_50 = x_43; +} +x_51 = lean::cnstr_get(x_48, 0); lean::inc(x_51); -if (lean::is_shared(x_46)) { - lean::dec(x_46); - x_53 = lean::box(0); +x_53 = lean::cnstr_get(x_48, 1); +lean::inc(x_53); +if (lean::is_scalar(x_50)) { + x_55 = lean::alloc_cnstr(0, 2, 0); } else { - lean::cnstr_release(x_46, 0); - lean::cnstr_release(x_46, 1); - x_53 = x_46; + x_55 = x_50; } -x_54 = lean::cnstr_get(x_51, 0); -lean::inc(x_54); -x_56 = lean::cnstr_get(x_51, 1); +lean::cnstr_set(x_55, 0, x_28); +lean::cnstr_set(x_55, 1, x_46); +x_56 = lean::cnstr_get(x_48, 2); lean::inc(x_56); -if (lean::is_scalar(x_53)) { - x_58 = lean::alloc_cnstr(0, 2, 0); -} else { - x_58 = x_53; -} -lean::cnstr_set(x_58, 0, x_30); -lean::cnstr_set(x_58, 1, x_49); -x_59 = lean::cnstr_get(x_51, 2); +x_58 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_58, 0, x_55); +lean::cnstr_set(x_58, 1, x_56); +x_59 = lean::cnstr_get(x_48, 3); lean::inc(x_59); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_58); -lean::cnstr_set(x_61, 1, x_59); -x_62 = lean::cnstr_get(x_51, 3); -lean::inc(x_62); -lean::dec(x_51); -x_65 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_65, 0, x_54); -lean::cnstr_set(x_65, 1, x_56); -lean::cnstr_set(x_65, 2, x_61); -lean::cnstr_set(x_65, 3, x_62); -x_66 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_66, 0, x_15); -lean::cnstr_set(x_66, 1, x_65); -x_27 = x_66; -goto lbl_28; +lean::dec(x_48); +x_62 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_62, 0, x_51); +lean::cnstr_set(x_62, 1, x_53); +lean::cnstr_set(x_62, 2, x_58); +lean::cnstr_set(x_62, 3, x_59); +x_63 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_63, 0, x_15); +lean::cnstr_set(x_63, 1, x_62); +x_25 = x_63; +goto lbl_26; } } -lbl_28: +lbl_26: { -obj* x_67; obj* x_70; obj* x_73; -x_67 = lean::cnstr_get(x_27, 1); +obj* x_64; obj* x_67; obj* x_70; +x_64 = lean::cnstr_get(x_25, 1); +lean::inc(x_64); +lean::dec(x_25); +x_67 = lean::cnstr_get(x_21, 1); lean::inc(x_67); -lean::dec(x_27); -x_70 = lean::cnstr_get(x_23, 1); -lean::inc(x_70); -lean::dec(x_23); -x_73 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4(x_1, x_70, x_67, x_2); -if (lean::obj_tag(x_73) == 0) +lean::dec(x_21); +x_70 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4(x_1, x_67, x_64, x_2); +if (lean::obj_tag(x_70) == 0) { -obj* x_76; obj* x_78; obj* x_79; -lean::dec(x_20); +obj* x_73; obj* x_75; obj* x_76; +lean::dec(x_18); lean::dec(x_11); -x_76 = lean::cnstr_get(x_73, 0); -lean::inc(x_76); -if (lean::is_shared(x_73)) { - lean::dec(x_73); - x_78 = lean::box(0); +x_73 = lean::cnstr_get(x_70, 0); +lean::inc(x_73); +if (lean::is_shared(x_70)) { + lean::dec(x_70); + x_75 = lean::box(0); } else { - lean::cnstr_release(x_73, 0); - x_78 = x_73; + lean::cnstr_release(x_70, 0); + x_75 = x_70; } -if (lean::is_scalar(x_78)) { - x_79 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_75)) { + x_76 = lean::alloc_cnstr(0, 1, 0); } else { - x_79 = x_78; + x_76 = x_75; } -lean::cnstr_set(x_79, 0, x_76); -return x_79; +lean::cnstr_set(x_76, 0, x_73); +return x_76; } else { -obj* x_80; obj* x_82; obj* x_83; obj* x_86; obj* x_89; obj* x_90; obj* x_91; obj* x_94; obj* x_95; obj* x_96; -x_80 = lean::cnstr_get(x_73, 0); -lean::inc(x_80); -if (lean::is_shared(x_73)) { - lean::dec(x_73); - x_82 = lean::box(0); +obj* x_77; obj* x_79; obj* x_80; obj* x_83; obj* x_86; obj* x_87; obj* x_88; obj* x_91; obj* x_92; obj* x_93; +x_77 = lean::cnstr_get(x_70, 0); +lean::inc(x_77); +if (lean::is_shared(x_70)) { + lean::dec(x_70); + x_79 = lean::box(0); } else { - lean::cnstr_release(x_73, 0); - x_82 = x_73; + lean::cnstr_release(x_70, 0); + x_79 = x_70; } -x_83 = lean::cnstr_get(x_80, 1); +x_80 = lean::cnstr_get(x_77, 1); +lean::inc(x_80); +lean::dec(x_77); +x_83 = lean::cnstr_get(x_80, 2); lean::inc(x_83); lean::dec(x_80); -x_86 = lean::cnstr_get(x_83, 2); -lean::inc(x_86); -lean::dec(x_83); -x_89 = l_list_map___main___at_lean_expander_mk__notation__transformer___spec__5(x_86); -x_90 = lean::alloc_closure(reinterpret_cast(l_lean_expander_mk__notation__transformer___lambda__1), 2, 1); -lean::closure_set(x_90, 0, x_89); -x_91 = lean::cnstr_get(x_20, 4); -lean::inc(x_91); -lean::dec(x_20); -x_94 = l_lean_parser_syntax_mreplace___main___at_lean_parser_syntax_replace___spec__1(x_90, x_91); +x_86 = l_list_map___main___at_lean_expander_mk__notation__transformer___spec__5(x_83); +x_87 = lean::alloc_closure(reinterpret_cast(l_lean_expander_mk__notation__transformer___lambda__1), 2, 1); +lean::closure_set(x_87, 0, x_86); +x_88 = lean::cnstr_get(x_18, 4); +lean::inc(x_88); +lean::dec(x_18); +x_91 = l_lean_parser_syntax_mreplace___main___at_lean_parser_syntax_replace___spec__1(x_87, x_88); if (lean::is_scalar(x_11)) { - x_95 = lean::alloc_cnstr(1, 1, 0); + x_92 = lean::alloc_cnstr(1, 1, 0); } else { - x_95 = x_11; + x_92 = x_11; } -lean::cnstr_set(x_95, 0, x_94); -if (lean::is_scalar(x_82)) { - x_96 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_92, 0, x_91); +if (lean::is_scalar(x_79)) { + x_93 = lean::alloc_cnstr(1, 1, 0); } else { - x_96 = x_82; + x_93 = x_79; } -lean::cnstr_set(x_96, 0, x_95); -return x_96; +lean::cnstr_set(x_93, 0, x_92); +return x_93; } } } @@ -2713,49 +2701,43 @@ return x_1; obj* _init_l_lean_expander_mixfix__to__notation__spec___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_10; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = lean::mk_string("b"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_lean_name_to__string__with__sep___main(x_4, x_3); -x_7 = l_lean_parser_substring_of__string(x_6); -lean::inc(x_0); -lean::inc(x_0); -x_10 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_10, 0, x_0); -lean::cnstr_set(x_10, 1, x_7); -lean::cnstr_set(x_10, 2, x_3); -lean::cnstr_set(x_10, 3, x_0); -lean::cnstr_set(x_10, 4, x_0); -return x_10; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("."); +lean::inc(x_2); +x_5 = l_lean_name_to__string__with__sep___main(x_3, x_2); +x_6 = l_lean_parser_substring_of__string(x_5); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_0); +lean::cnstr_set(x_7, 1, x_6); +lean::cnstr_set(x_7, 2, x_2); +lean::cnstr_set(x_7, 3, x_0); +lean::cnstr_set(x_7, 4, x_0); +return x_7; } } obj* _init_l_lean_expander_mixfix__to__notation__spec___closed__2() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_10; obj* x_11; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; x_0 = lean::box(0); x_1 = lean::mk_string("a"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_lean_name_to__string__with__sep___main(x_4, x_3); -x_7 = l_lean_parser_substring_of__string(x_6); -lean::inc(x_0); -lean::inc(x_0); -x_10 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_10, 0, x_0); -lean::cnstr_set(x_10, 1, x_7); -lean::cnstr_set(x_10, 2, x_3); -lean::cnstr_set(x_10, 3, x_0); -lean::cnstr_set(x_10, 4, x_0); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -return x_11; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("."); +lean::inc(x_2); +x_5 = l_lean_name_to__string__with__sep___main(x_3, x_2); +x_6 = l_lean_parser_substring_of__string(x_5); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_0); +lean::cnstr_set(x_7, 1, x_6); +lean::cnstr_set(x_7, 2, x_2); +lean::cnstr_set(x_7, 3, x_0); +lean::cnstr_set(x_7, 4, x_0); +x_8 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_8, 0, x_7); +return x_8; } } obj* _init_l_lean_expander_mixfix__to__notation__spec___closed__3() { @@ -2777,24 +2759,21 @@ return x_0; obj* _init_l_lean_expander_mixfix__to__notation__spec___closed__5() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_10; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = lean::mk_string("b"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_lean_name_to__string__with__sep___main(x_4, x_3); -x_7 = l_lean_parser_substring_of__string(x_6); -lean::inc(x_0); -lean::inc(x_0); -x_10 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_10, 0, x_0); -lean::cnstr_set(x_10, 1, x_7); -lean::cnstr_set(x_10, 2, x_3); -lean::cnstr_set(x_10, 3, x_0); -lean::cnstr_set(x_10, 4, x_0); -return x_10; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("."); +lean::inc(x_2); +x_5 = l_lean_name_to__string__with__sep___main(x_3, x_2); +x_6 = l_lean_parser_substring_of__string(x_5); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_0); +lean::cnstr_set(x_7, 1, x_6); +lean::cnstr_set(x_7, 2, x_2); +lean::cnstr_set(x_7, 3, x_0); +lean::cnstr_set(x_7, 4, x_0); +return x_7; } } obj* _init_l_lean_expander_mixfix__to__notation__spec___closed__6() { @@ -2814,7 +2793,7 @@ lean::inc(x_5); switch (lean::obj_tag(x_0)) { case 0: { -obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; +obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; lean::dec(x_0); lean::dec(x_2); x_11 = lean::box(0); @@ -2836,116 +2815,115 @@ lean::cnstr_set(x_22, 0, x_21); x_23 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_23, 0, x_1); lean::cnstr_set(x_23, 1, x_22); -lean::inc(x_11); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_11); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_11); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -return x_27; +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_11); +x_25 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_25, 0, x_11); +lean::cnstr_set(x_25, 1, x_24); +x_26 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_26, 0, x_25); +return x_26; } case 3: { lean::dec(x_0); if (lean::obj_tag(x_5) == 0) { -obj* x_30; +obj* x_29; lean::dec(x_2); -x_30 = lean::box(0); -x_3 = x_30; +x_29 = lean::box(0); +x_3 = x_29; goto lbl_4; } else { -obj* x_31; obj* x_33; obj* x_34; obj* x_36; obj* x_37; uint8 x_38; -x_31 = lean::cnstr_get(x_5, 0); -lean::inc(x_31); +obj* x_30; obj* x_32; obj* x_33; obj* x_35; obj* x_36; uint8 x_37; +x_30 = lean::cnstr_get(x_5, 0); +lean::inc(x_30); if (lean::is_shared(x_5)) { lean::dec(x_5); - x_33 = lean::box(0); + x_32 = lean::box(0); } else { lean::cnstr_release(x_5, 0); - x_33 = x_5; + x_32 = x_5; } -x_34 = lean::cnstr_get(x_31, 1); -lean::inc(x_34); -x_36 = l_lean_parser_command_notation__spec_precedence__term_view_to__nat___main(x_34); -x_37 = lean::mk_nat_obj(0u); -x_38 = lean::nat_dec_eq(x_36, x_37); -lean::dec(x_37); -if (x_38 == 0) -{ -obj* x_42; obj* x_43; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_53; -lean::dec(x_2); -lean::dec(x_31); -x_42 = lean::mk_nat_obj(1u); -x_43 = lean::nat_sub(x_36, x_42); -lean::dec(x_42); +x_33 = lean::cnstr_get(x_30, 1); +lean::inc(x_33); +x_35 = l_lean_parser_command_notation__spec_precedence__term_view_to__nat___main(x_33); +x_36 = lean::mk_nat_obj(0u); +x_37 = lean::nat_dec_eq(x_35, x_36); lean::dec(x_36); -x_46 = l_lean_parser_number_view_of__nat(x_43); +if (x_37 == 0) +{ +obj* x_41; obj* x_42; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_52; +lean::dec(x_2); +lean::dec(x_30); +x_41 = lean::mk_nat_obj(1u); +x_42 = lean::nat_sub(x_35, x_41); +lean::dec(x_41); +lean::dec(x_35); +x_45 = l_lean_parser_number_view_of__nat(x_42); +x_46 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_46, 0, x_45); x_47 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_47, 0, x_46); x_48 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_48, 0, x_47); -x_49 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_49, 0, x_48); -x_50 = l_lean_expander_mixfix__to__notation__spec___lambda__1___closed__1; -lean::inc(x_50); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_50); -lean::cnstr_set(x_52, 1, x_49); -if (lean::is_scalar(x_33)) { - x_53 = lean::alloc_cnstr(1, 1, 0); +x_49 = l_lean_expander_mixfix__to__notation__spec___lambda__1___closed__1; +lean::inc(x_49); +x_51 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_51, 0, x_49); +lean::cnstr_set(x_51, 1, x_48); +if (lean::is_scalar(x_32)) { + x_52 = lean::alloc_cnstr(1, 1, 0); } else { - x_53 = x_33; + x_52 = x_32; } -lean::cnstr_set(x_53, 0, x_52); -x_3 = x_53; +lean::cnstr_set(x_52, 0, x_51); +x_3 = x_52; goto lbl_4; } else { -obj* x_56; obj* x_57; obj* x_59; obj* x_60; obj* x_62; -lean::dec(x_36); -lean::dec(x_33); -x_56 = l_lean_parser_command_notation__spec_precedence_has__view; -x_57 = lean::cnstr_get(x_56, 1); -lean::inc(x_57); -x_59 = lean::apply_1(x_57, x_31); -x_60 = l_lean_expander_mixfix__to__notation__spec___closed__6; -lean::inc(x_60); -x_62 = l_lean_expander_error___at_lean_expander_mk__notation__transformer___spec__1___rarg(x_59, x_60, x_2); -if (lean::obj_tag(x_62) == 0) +obj* x_55; obj* x_56; obj* x_58; obj* x_59; obj* x_61; +lean::dec(x_32); +lean::dec(x_35); +x_55 = l_lean_parser_command_notation__spec_precedence_has__view; +x_56 = lean::cnstr_get(x_55, 1); +lean::inc(x_56); +x_58 = lean::apply_1(x_56, x_30); +x_59 = l_lean_expander_mixfix__to__notation__spec___closed__6; +lean::inc(x_59); +x_61 = l_lean_expander_error___at_lean_expander_mk__notation__transformer___spec__1___rarg(x_58, x_59, x_2); +if (lean::obj_tag(x_61) == 0) { -obj* x_64; obj* x_66; obj* x_67; +obj* x_63; obj* x_65; obj* x_66; lean::dec(x_1); -x_64 = lean::cnstr_get(x_62, 0); -lean::inc(x_64); -if (lean::is_shared(x_62)) { - lean::dec(x_62); - x_66 = lean::box(0); +x_63 = lean::cnstr_get(x_61, 0); +lean::inc(x_63); +if (lean::is_shared(x_61)) { + lean::dec(x_61); + x_65 = lean::box(0); } else { - lean::cnstr_release(x_62, 0); - x_66 = x_62; + lean::cnstr_release(x_61, 0); + x_65 = x_61; } -if (lean::is_scalar(x_66)) { - x_67 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_65)) { + x_66 = lean::alloc_cnstr(0, 1, 0); } else { - x_67 = x_66; + x_66 = x_65; } -lean::cnstr_set(x_67, 0, x_64); -return x_67; +lean::cnstr_set(x_66, 0, x_63); +return x_66; } else { -obj* x_68; -x_68 = lean::cnstr_get(x_62, 0); -lean::inc(x_68); -lean::dec(x_62); -x_3 = x_68; +obj* x_67; +x_67 = lean::cnstr_get(x_61, 0); +lean::inc(x_67); +lean::dec(x_61); +x_3 = x_67; goto lbl_4; } } @@ -2953,162 +2931,153 @@ goto lbl_4; } case 4: { -obj* x_74; obj* x_76; obj* x_77; obj* x_78; obj* x_80; obj* x_81; +obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_78; obj* x_79; lean::dec(x_5); lean::dec(x_0); lean::dec(x_2); -x_74 = lean::box(0); -lean::inc(x_74); -x_76 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_76, 0, x_1); -lean::cnstr_set(x_76, 1, x_74); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_74); -x_78 = l_lean_expander_mixfix__to__notation__spec___closed__2; -lean::inc(x_78); -x_80 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_80, 0, x_78); -lean::cnstr_set(x_80, 1, x_77); -x_81 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_81, 0, x_80); -return x_81; +x_73 = lean::box(0); +x_74 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_74, 0, x_1); +lean::cnstr_set(x_74, 1, x_73); +x_75 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_75, 0, x_74); +lean::cnstr_set(x_75, 1, x_73); +x_76 = l_lean_expander_mixfix__to__notation__spec___closed__2; +lean::inc(x_76); +x_78 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_78, 0, x_76); +lean::cnstr_set(x_78, 1, x_75); +x_79 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_79, 0, x_78); +return x_79; } default: { -obj* x_84; +obj* x_82; lean::dec(x_0); lean::dec(x_2); -x_84 = lean::box(0); -x_7 = x_84; +x_82 = lean::box(0); +x_7 = x_82; goto lbl_8; } } lbl_4: { -obj* 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; -x_85 = lean::box(0); -x_86 = l_lean_expander_mixfix__to__notation__spec___closed__1; -lean::inc(x_86); -x_88 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_88, 0, x_86); -lean::cnstr_set(x_88, 1, x_3); -x_89 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -x_90 = lean::alloc_cnstr(1, 1, 0); +obj* x_83; obj* x_84; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_93; obj* x_94; +x_83 = lean::box(0); +x_84 = l_lean_expander_mixfix__to__notation__spec___closed__1; +lean::inc(x_84); +x_86 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_86, 0, x_84); +lean::cnstr_set(x_86, 1, x_3); +x_87 = lean::alloc_cnstr(2, 1, 0); +lean::cnstr_set(x_87, 0, x_86); +x_88 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +x_89 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_89, 0, x_1); +lean::cnstr_set(x_89, 1, x_88); +x_90 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_90, 0, x_89); -x_91 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_91, 0, x_1); -lean::cnstr_set(x_91, 1, x_90); -x_92 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set(x_92, 1, x_85); -x_93 = l_lean_expander_mixfix__to__notation__spec___closed__2; -lean::inc(x_93); -x_95 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_95, 0, x_93); -lean::cnstr_set(x_95, 1, x_92); -x_96 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_96, 0, x_95); -return x_96; +lean::cnstr_set(x_90, 1, x_83); +x_91 = l_lean_expander_mixfix__to__notation__spec___closed__2; +lean::inc(x_91); +x_93 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_93, 0, x_91); +lean::cnstr_set(x_93, 1, x_90); +x_94 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_94, 0, x_93); +return x_94; } lbl_8: { -obj* x_98; obj* x_99; obj* x_101; obj* x_102; obj* x_104; obj* x_105; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_114; obj* x_115; +obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_102; obj* x_103; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_112; obj* x_113; lean::dec(x_7); -x_98 = lean::box(0); -x_99 = l_lean_expander_mixfix__to__notation__spec___closed__3; -lean::inc(x_99); -x_101 = l_option_map___rarg(x_99, x_5); -x_102 = l_lean_expander_mixfix__to__notation__spec___closed__4; -lean::inc(x_102); -x_104 = l_option_map___rarg(x_102, x_101); -x_105 = l_lean_expander_mixfix__to__notation__spec___closed__1; -lean::inc(x_105); -x_107 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_107, 0, x_105); -lean::cnstr_set(x_107, 1, x_104); -x_108 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_108, 0, x_107); -x_109 = lean::alloc_cnstr(1, 1, 0); +x_96 = lean::box(0); +x_97 = l_lean_expander_mixfix__to__notation__spec___closed__3; +lean::inc(x_97); +x_99 = l_option_map___rarg(x_97, x_5); +x_100 = l_lean_expander_mixfix__to__notation__spec___closed__4; +lean::inc(x_100); +x_102 = l_option_map___rarg(x_100, x_99); +x_103 = l_lean_expander_mixfix__to__notation__spec___closed__1; +lean::inc(x_103); +x_105 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_105, 0, x_103); +lean::cnstr_set(x_105, 1, x_102); +x_106 = lean::alloc_cnstr(2, 1, 0); +lean::cnstr_set(x_106, 0, x_105); +x_107 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_107, 0, x_106); +x_108 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_108, 0, x_1); +lean::cnstr_set(x_108, 1, x_107); +x_109 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_109, 0, x_108); -x_110 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_110, 0, x_1); -lean::cnstr_set(x_110, 1, x_109); -x_111 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_111, 0, x_110); -lean::cnstr_set(x_111, 1, x_98); -x_112 = l_lean_expander_mixfix__to__notation__spec___closed__2; -lean::inc(x_112); -x_114 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_114, 0, x_112); -lean::cnstr_set(x_114, 1, x_111); -x_115 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_115, 0, x_114); -return x_115; +lean::cnstr_set(x_109, 1, x_96); +x_110 = l_lean_expander_mixfix__to__notation__spec___closed__2; +lean::inc(x_110); +x_112 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_112, 0, x_110); +lean::cnstr_set(x_112, 1, x_109); +x_113 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_113, 0, x_112); +return x_113; } } } obj* _init_l_lean_expander_mixfix_transform___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_14; obj* x_15; obj* x_16; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; x_0 = lean::box(0); x_1 = l_lean_parser_ident__univs_has__view; x_2 = lean::cnstr_get(x_1, 1); lean::inc(x_2); x_4 = lean::mk_string("a"); -lean::inc(x_0); -x_6 = lean_name_mk_string(x_0, x_4); -x_7 = lean::mk_string("."); -lean::inc(x_6); -x_9 = l_lean_name_to__string__with__sep___main(x_7, x_6); -x_10 = l_lean_parser_substring_of__string(x_9); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_14 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_14, 0, x_0); -lean::cnstr_set(x_14, 1, x_10); -lean::cnstr_set(x_14, 2, x_6); -lean::cnstr_set(x_14, 3, x_0); -lean::cnstr_set(x_14, 4, x_0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_0); -x_16 = lean::apply_1(x_2, x_15); -return x_16; +x_5 = lean_name_mk_string(x_0, x_4); +x_6 = lean::mk_string("."); +lean::inc(x_5); +x_8 = l_lean_name_to__string__with__sep___main(x_6, x_5); +x_9 = l_lean_parser_substring_of__string(x_8); +x_10 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_10, 0, x_0); +lean::cnstr_set(x_10, 1, x_9); +lean::cnstr_set(x_10, 2, x_5); +lean::cnstr_set(x_10, 3, x_0); +lean::cnstr_set(x_10, 4, x_0); +x_11 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_11, 0, x_10); +lean::cnstr_set(x_11, 1, x_0); +x_12 = lean::apply_1(x_2, x_11); +return x_12; } } obj* _init_l_lean_expander_mixfix_transform___closed__2() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_14; obj* x_15; obj* x_16; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; x_0 = lean::box(0); x_1 = l_lean_parser_ident__univs_has__view; x_2 = lean::cnstr_get(x_1, 1); lean::inc(x_2); x_4 = lean::mk_string("b"); -lean::inc(x_0); -x_6 = lean_name_mk_string(x_0, x_4); -x_7 = lean::mk_string("."); -lean::inc(x_6); -x_9 = l_lean_name_to__string__with__sep___main(x_7, x_6); -x_10 = l_lean_parser_substring_of__string(x_9); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_14 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_14, 0, x_0); -lean::cnstr_set(x_14, 1, x_10); -lean::cnstr_set(x_14, 2, x_6); -lean::cnstr_set(x_14, 3, x_0); -lean::cnstr_set(x_14, 4, x_0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_0); -x_16 = lean::apply_1(x_2, x_15); -return x_16; +x_5 = lean_name_mk_string(x_0, x_4); +x_6 = lean::mk_string("."); +lean::inc(x_5); +x_8 = l_lean_name_to__string__with__sep___main(x_6, x_5); +x_9 = l_lean_parser_substring_of__string(x_8); +x_10 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_10, 0, x_0); +lean::cnstr_set(x_10, 1, x_9); +lean::cnstr_set(x_10, 2, x_5); +lean::cnstr_set(x_10, 3, x_0); +lean::cnstr_set(x_10, 4, x_0); +x_11 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_11, 0, x_10); +lean::cnstr_set(x_11, 1, x_0); +x_12 = lean::apply_1(x_2, x_11); +return x_12; } } obj* _init_l_lean_expander_mixfix_transform___closed__3() { @@ -3144,32 +3113,28 @@ return x_4; obj* _init_l_lean_expander_mixfix_transform___closed__5() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_14; obj* x_15; obj* x_16; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; x_0 = lean::box(0); x_1 = l_lean_parser_ident__univs_has__view; x_2 = lean::cnstr_get(x_1, 1); lean::inc(x_2); x_4 = lean::mk_string("b"); -lean::inc(x_0); -x_6 = lean_name_mk_string(x_0, x_4); -x_7 = lean::mk_string("."); -lean::inc(x_6); -x_9 = l_lean_name_to__string__with__sep___main(x_7, x_6); -x_10 = l_lean_parser_substring_of__string(x_9); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_14 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_14, 0, x_0); -lean::cnstr_set(x_14, 1, x_10); -lean::cnstr_set(x_14, 2, x_6); -lean::cnstr_set(x_14, 3, x_0); -lean::cnstr_set(x_14, 4, x_0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_0); -x_16 = lean::apply_1(x_2, x_15); -return x_16; +x_5 = lean_name_mk_string(x_0, x_4); +x_6 = lean::mk_string("."); +lean::inc(x_5); +x_8 = l_lean_name_to__string__with__sep___main(x_6, x_5); +x_9 = l_lean_parser_substring_of__string(x_8); +x_10 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_10, 0, x_0); +lean::cnstr_set(x_10, 1, x_9); +lean::cnstr_set(x_10, 2, x_5); +lean::cnstr_set(x_10, 3, x_0); +lean::cnstr_set(x_10, 4, x_0); +x_11 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_11, 0, x_10); +lean::cnstr_set(x_11, 1, x_0); +x_12 = lean::apply_1(x_2, x_11); +return x_12; } } obj* _init_l_lean_expander_mixfix_transform___closed__6() { @@ -3680,24 +3645,21 @@ return x_4; obj* _init_l_lean_expander_binder__ident__to__ident___main___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_10; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = lean::mk_string("a"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_lean_name_to__string__with__sep___main(x_4, x_3); -x_7 = l_lean_parser_substring_of__string(x_6); -lean::inc(x_0); -lean::inc(x_0); -x_10 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_10, 0, x_0); -lean::cnstr_set(x_10, 1, x_7); -lean::cnstr_set(x_10, 2, x_3); -lean::cnstr_set(x_10, 3, x_0); -lean::cnstr_set(x_10, 4, x_0); -return x_10; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("."); +lean::inc(x_2); +x_5 = l_lean_name_to__string__with__sep___main(x_3, x_2); +x_6 = l_lean_parser_substring_of__string(x_5); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_0); +lean::cnstr_set(x_7, 1, x_6); +lean::cnstr_set(x_7, 2, x_2); +lean::cnstr_set(x_7, 3, x_0); +lean::cnstr_set(x_7, 4, x_0); +return x_7; } } obj* l_lean_expander_binder__ident__to__ident___main(obj* x_0) { @@ -4909,20 +4871,18 @@ return x_0; obj* _init_l_lean_expander_expand__bracketed__binder___main___closed__3() { _start: { -obj* x_0; obj* x_3; uint8 x_4; obj* x_5; obj* x_6; +obj* x_0; obj* x_1; uint8 x_2; obj* x_3; obj* x_4; x_0 = lean::box(0); -lean::inc(x_0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_0); -lean::cnstr_set(x_3, 1, x_0); -lean::cnstr_set(x_3, 2, x_0); -x_4 = 0; -x_5 = lean::box(x_4); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_3); -return x_6; +x_1 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_1, 0, x_0); +lean::cnstr_set(x_1, 1, x_0); +lean::cnstr_set(x_1, 2, x_0); +x_2 = 0; +x_3 = lean::box(x_2); +x_4 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_4, 0, x_3); +lean::cnstr_set(x_4, 1, x_1); +return x_4; } } obj* _init_l_lean_expander_expand__bracketed__binder___main___closed__4() { @@ -4947,30 +4907,26 @@ return x_0; obj* _init_l_lean_expander_expand__bracketed__binder___main___closed__6() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_11; obj* x_12; obj* x_13; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; x_0 = lean::box(0); x_1 = lean::mk_string("_inst_"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_lean_name_to__string__with__sep___main(x_4, x_3); -x_7 = l_lean_parser_substring_of__string(x_6); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_11 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_11, 0, x_0); -lean::cnstr_set(x_11, 1, x_7); -lean::cnstr_set(x_11, 2, x_3); -lean::cnstr_set(x_11, 3, x_0); -lean::cnstr_set(x_11, 4, x_0); -x_12 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_0); -return x_13; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("."); +lean::inc(x_2); +x_5 = l_lean_name_to__string__with__sep___main(x_3, x_2); +x_6 = l_lean_parser_substring_of__string(x_5); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_0); +lean::cnstr_set(x_7, 1, x_6); +lean::cnstr_set(x_7, 2, x_2); +lean::cnstr_set(x_7, 3, x_0); +lean::cnstr_set(x_7, 4, x_0); +x_8 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_8, 0, x_7); +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_0); +return x_9; } } obj* _init_l_lean_expander_expand__bracketed__binder___main___closed__7() { @@ -5677,7 +5633,7 @@ lean::inc(x_319); lean::dec(x_316); if (lean::obj_tag(x_319) == 0) { -obj* x_322; obj* x_325; obj* x_327; obj* x_328; obj* x_330; obj* x_331; obj* x_334; obj* x_336; obj* x_337; obj* x_338; uint8 x_339; obj* x_340; obj* x_341; +obj* x_322; obj* x_325; obj* x_327; obj* x_328; obj* x_329; obj* x_330; obj* x_333; obj* x_335; obj* x_336; obj* x_337; uint8 x_338; obj* x_339; obj* x_340; x_322 = lean::cnstr_get(x_319, 0); lean::inc(x_322); lean::dec(x_319); @@ -5686,103 +5642,102 @@ lean::inc(x_325); x_327 = lean::alloc_cnstr(0, 1, 0); lean::cnstr_set(x_327, 0, x_325); x_328 = lean::box(0); -lean::inc(x_328); -x_330 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_330, 0, x_327); -lean::cnstr_set(x_330, 1, x_328); -x_331 = lean::cnstr_get(x_322, 2); -lean::inc(x_331); +x_329 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_329, 0, x_327); +lean::cnstr_set(x_329, 1, x_328); +x_330 = lean::cnstr_get(x_322, 2); +lean::inc(x_330); lean::dec(x_322); -x_334 = l_lean_expander_mk__simple__binder___closed__1; -lean::inc(x_334); -x_336 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_336, 0, x_334); -lean::cnstr_set(x_336, 1, x_331); -x_337 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_337, 0, x_336); -x_338 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_338, 0, x_330); -lean::cnstr_set(x_338, 1, x_337); -lean::cnstr_set(x_338, 2, x_328); -x_339 = 3; -x_340 = lean::box(x_339); -x_341 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_341, 0, x_340); -lean::cnstr_set(x_341, 1, x_338); -x_2 = x_341; +x_333 = l_lean_expander_mk__simple__binder___closed__1; +lean::inc(x_333); +x_335 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_335, 0, x_333); +lean::cnstr_set(x_335, 1, x_330); +x_336 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_336, 0, x_335); +x_337 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_337, 0, x_329); +lean::cnstr_set(x_337, 1, x_336); +lean::cnstr_set(x_337, 2, x_328); +x_338 = 3; +x_339 = lean::box(x_338); +x_340 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_340, 0, x_339); +lean::cnstr_set(x_340, 1, x_337); +x_2 = x_340; goto lbl_3; } else { -obj* x_342; obj* x_345; obj* x_346; obj* x_348; obj* x_349; obj* x_350; obj* x_352; uint8 x_353; obj* x_354; obj* x_355; -x_342 = lean::cnstr_get(x_319, 0); -lean::inc(x_342); +obj* x_341; obj* x_344; obj* x_345; obj* x_347; obj* x_348; obj* x_349; obj* x_351; uint8 x_352; obj* x_353; obj* x_354; +x_341 = lean::cnstr_get(x_319, 0); +lean::inc(x_341); lean::dec(x_319); -x_345 = lean::box(0); -x_346 = l_lean_expander_mk__simple__binder___closed__1; -lean::inc(x_346); -x_348 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_348, 0, x_346); -lean::cnstr_set(x_348, 1, x_342); -x_349 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_349, 0, x_348); -x_350 = l_lean_expander_expand__bracketed__binder___main___closed__6; -lean::inc(x_350); -x_352 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_352, 0, x_350); -lean::cnstr_set(x_352, 1, x_349); -lean::cnstr_set(x_352, 2, x_345); -x_353 = 3; -x_354 = lean::box(x_353); -x_355 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_355, 0, x_354); -lean::cnstr_set(x_355, 1, x_352); -x_2 = x_355; +x_344 = lean::box(0); +x_345 = l_lean_expander_mk__simple__binder___closed__1; +lean::inc(x_345); +x_347 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_347, 0, x_345); +lean::cnstr_set(x_347, 1, x_341); +x_348 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_348, 0, x_347); +x_349 = l_lean_expander_expand__bracketed__binder___main___closed__6; +lean::inc(x_349); +x_351 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_351, 0, x_349); +lean::cnstr_set(x_351, 1, x_348); +lean::cnstr_set(x_351, 2, x_344); +x_352 = 3; +x_353 = lean::box(x_352); +x_354 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_354, 0, x_353); +lean::cnstr_set(x_354, 1, x_351); +x_2 = x_354; goto lbl_3; } } default: { -obj* x_356; obj* x_359; obj* x_360; obj* x_362; obj* x_363; obj* x_366; -x_356 = lean::cnstr_get(x_0, 0); -lean::inc(x_356); +obj* x_355; obj* x_358; obj* x_359; obj* x_361; obj* x_362; obj* x_365; +x_355 = lean::cnstr_get(x_0, 0); +lean::inc(x_355); lean::dec(x_0); -x_359 = l_lean_parser_term_anonymous__constructor_has__view; -x_360 = lean::cnstr_get(x_359, 1); -lean::inc(x_360); -x_362 = lean::apply_1(x_360, x_356); -x_363 = l_lean_expander_expand__bracketed__binder___main___closed__7; +x_358 = l_lean_parser_term_anonymous__constructor_has__view; +x_359 = lean::cnstr_get(x_358, 1); +lean::inc(x_359); +x_361 = lean::apply_1(x_359, x_355); +x_362 = l_lean_expander_expand__bracketed__binder___main___closed__7; lean::inc(x_1); -lean::inc(x_363); -x_366 = l_lean_expander_error___at_lean_expander_mk__notation__transformer___spec__1___rarg(x_362, x_363, x_1); -if (lean::obj_tag(x_366) == 0) +lean::inc(x_362); +x_365 = l_lean_expander_error___at_lean_expander_mk__notation__transformer___spec__1___rarg(x_361, x_362, x_1); +if (lean::obj_tag(x_365) == 0) { -obj* x_368; obj* x_370; obj* x_371; +obj* x_367; obj* x_369; obj* x_370; lean::dec(x_1); -x_368 = lean::cnstr_get(x_366, 0); -lean::inc(x_368); -if (lean::is_shared(x_366)) { - lean::dec(x_366); - x_370 = lean::box(0); +x_367 = lean::cnstr_get(x_365, 0); +lean::inc(x_367); +if (lean::is_shared(x_365)) { + lean::dec(x_365); + x_369 = lean::box(0); } else { - lean::cnstr_release(x_366, 0); - x_370 = x_366; + lean::cnstr_release(x_365, 0); + x_369 = x_365; } -if (lean::is_scalar(x_370)) { - x_371 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_369)) { + x_370 = lean::alloc_cnstr(0, 1, 0); } else { - x_371 = x_370; + x_370 = x_369; } -lean::cnstr_set(x_371, 0, x_368); -return x_371; +lean::cnstr_set(x_370, 0, x_367); +return x_370; } else { -obj* x_372; -x_372 = lean::cnstr_get(x_366, 0); -lean::inc(x_372); -lean::dec(x_366); -x_2 = x_372; +obj* x_371; +x_371 = lean::cnstr_get(x_365, 0); +lean::inc(x_371); +lean::dec(x_365); +x_2 = x_371; goto lbl_3; } } @@ -5791,130 +5746,130 @@ goto lbl_3; } lbl_3: { -obj* x_375; obj* x_377; obj* x_380; -x_375 = lean::cnstr_get(x_2, 0); -lean::inc(x_375); -x_377 = lean::cnstr_get(x_2, 1); -lean::inc(x_377); +obj* x_374; obj* x_376; obj* x_379; +x_374 = lean::cnstr_get(x_2, 0); +lean::inc(x_374); +x_376 = lean::cnstr_get(x_2, 1); +lean::inc(x_376); lean::dec(x_2); -x_380 = lean::cnstr_get(x_377, 2); -lean::inc(x_380); -if (lean::obj_tag(x_380) == 0) +x_379 = lean::cnstr_get(x_376, 2); +lean::inc(x_379); +if (lean::obj_tag(x_379) == 0) { -obj* x_383; uint8 x_385; obj* x_387; obj* x_388; +obj* x_382; uint8 x_384; obj* x_386; obj* x_387; lean::dec(x_1); -x_383 = lean::cnstr_get(x_377, 0); -lean::inc(x_383); -x_385 = lean::unbox(x_375); -lean::dec(x_375); -x_387 = l_list_map___main___at_lean_expander_expand__bracketed__binder___main___spec__2(x_385, x_377, x_383); -x_388 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_388, 0, x_387); -return x_388; +x_382 = lean::cnstr_get(x_376, 0); +lean::inc(x_382); +x_384 = lean::unbox(x_374); +lean::dec(x_374); +x_386 = l_list_map___main___at_lean_expander_expand__bracketed__binder___main___spec__2(x_384, x_376, x_382); +x_387 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_387, 0, x_386); +return x_387; } else { -obj* x_389; -x_389 = lean::cnstr_get(x_380, 0); -lean::inc(x_389); -lean::dec(x_380); -if (lean::obj_tag(x_389) == 0) +obj* x_388; +x_388 = lean::cnstr_get(x_379, 0); +lean::inc(x_388); +lean::dec(x_379); +if (lean::obj_tag(x_388) == 0) { -obj* x_393; obj* x_396; uint8 x_398; obj* x_400; obj* x_401; +obj* x_392; obj* x_395; uint8 x_397; obj* x_399; obj* x_400; lean::dec(x_1); -x_393 = lean::cnstr_get(x_389, 0); -lean::inc(x_393); -lean::dec(x_389); -x_396 = lean::cnstr_get(x_377, 0); -lean::inc(x_396); -x_398 = lean::unbox(x_375); -lean::dec(x_375); -x_400 = l_list_map___main___at_lean_expander_expand__bracketed__binder___main___spec__3(x_398, x_377, x_393, x_396); -x_401 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_401, 0, x_400); -return x_401; +x_392 = lean::cnstr_get(x_388, 0); +lean::inc(x_392); +lean::dec(x_388); +x_395 = lean::cnstr_get(x_376, 0); +lean::inc(x_395); +x_397 = lean::unbox(x_374); +lean::dec(x_374); +x_399 = l_list_map___main___at_lean_expander_expand__bracketed__binder___main___spec__3(x_397, x_376, x_392, x_395); +x_400 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_400, 0, x_399); +return x_400; } else { -obj* x_402; obj* x_404; -x_402 = lean::cnstr_get(x_389, 0); -lean::inc(x_402); -x_404 = lean::cnstr_get(x_377, 1); -lean::inc(x_404); -if (lean::obj_tag(x_404) == 0) +obj* x_401; obj* x_403; +x_401 = lean::cnstr_get(x_388, 0); +lean::inc(x_401); +x_403 = lean::cnstr_get(x_376, 1); +lean::inc(x_403); +if (lean::obj_tag(x_403) == 0) { -obj* x_408; uint8 x_411; obj* x_413; obj* x_414; +obj* x_407; uint8 x_410; obj* x_412; obj* x_413; lean::dec(x_1); -lean::dec(x_389); -x_408 = lean::cnstr_get(x_377, 0); -lean::inc(x_408); -lean::dec(x_377); -x_411 = lean::unbox(x_375); -lean::dec(x_375); -x_413 = l_list_map___main___at_lean_expander_expand__bracketed__binder___main___spec__4(x_411, x_402, x_408); -x_414 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_414, 0, x_413); -return x_414; +lean::dec(x_388); +x_407 = lean::cnstr_get(x_376, 0); +lean::inc(x_407); +lean::dec(x_376); +x_410 = lean::unbox(x_374); +lean::dec(x_374); +x_412 = l_list_map___main___at_lean_expander_expand__bracketed__binder___main___spec__4(x_410, x_401, x_407); +x_413 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_413, 0, x_412); +return x_413; } else { -obj* x_417; obj* x_418; obj* x_420; obj* x_421; obj* x_423; -lean::dec(x_404); -lean::dec(x_402); -x_417 = l_lean_parser_term_binder__default_has__view; -x_418 = lean::cnstr_get(x_417, 1); -lean::inc(x_418); -x_420 = lean::apply_1(x_418, x_389); -x_421 = l_lean_expander_expand__bracketed__binder___main___closed__2; -lean::inc(x_421); -x_423 = l_lean_expander_error___at_lean_expander_mk__notation__transformer___spec__1___rarg(x_420, x_421, x_1); -if (lean::obj_tag(x_423) == 0) +obj* x_416; obj* x_417; obj* x_419; obj* x_420; obj* x_422; +lean::dec(x_403); +lean::dec(x_401); +x_416 = l_lean_parser_term_binder__default_has__view; +x_417 = lean::cnstr_get(x_416, 1); +lean::inc(x_417); +x_419 = lean::apply_1(x_417, x_388); +x_420 = l_lean_expander_expand__bracketed__binder___main___closed__2; +lean::inc(x_420); +x_422 = l_lean_expander_error___at_lean_expander_mk__notation__transformer___spec__1___rarg(x_419, x_420, x_1); +if (lean::obj_tag(x_422) == 0) { -obj* x_426; obj* x_428; obj* x_429; -lean::dec(x_375); -lean::dec(x_377); -x_426 = lean::cnstr_get(x_423, 0); -lean::inc(x_426); -if (lean::is_shared(x_423)) { - lean::dec(x_423); - x_428 = lean::box(0); +obj* x_425; obj* x_427; obj* x_428; +lean::dec(x_374); +lean::dec(x_376); +x_425 = lean::cnstr_get(x_422, 0); +lean::inc(x_425); +if (lean::is_shared(x_422)) { + lean::dec(x_422); + x_427 = lean::box(0); } else { - lean::cnstr_release(x_423, 0); - x_428 = x_423; + lean::cnstr_release(x_422, 0); + x_427 = x_422; } -if (lean::is_scalar(x_428)) { - x_429 = lean::alloc_cnstr(0, 1, 0); +if (lean::is_scalar(x_427)) { + x_428 = lean::alloc_cnstr(0, 1, 0); } else { - x_429 = x_428; + x_428 = x_427; } -lean::cnstr_set(x_429, 0, x_426); -return x_429; +lean::cnstr_set(x_428, 0, x_425); +return x_428; } else { -obj* x_430; obj* x_432; obj* x_433; uint8 x_436; obj* x_438; obj* x_439; -x_430 = lean::cnstr_get(x_423, 0); -lean::inc(x_430); -if (lean::is_shared(x_423)) { - lean::dec(x_423); - x_432 = lean::box(0); +obj* x_429; obj* x_431; obj* x_432; uint8 x_435; obj* x_437; obj* x_438; +x_429 = lean::cnstr_get(x_422, 0); +lean::inc(x_429); +if (lean::is_shared(x_422)) { + lean::dec(x_422); + x_431 = lean::box(0); } else { - lean::cnstr_release(x_423, 0); - x_432 = x_423; + lean::cnstr_release(x_422, 0); + x_431 = x_422; } -x_433 = lean::cnstr_get(x_377, 0); -lean::inc(x_433); -lean::dec(x_377); -x_436 = lean::unbox(x_375); -lean::dec(x_375); -x_438 = l_list_map___main___at_lean_expander_expand__bracketed__binder___main___spec__5(x_436, x_430, x_433); -if (lean::is_scalar(x_432)) { - x_439 = lean::alloc_cnstr(1, 1, 0); +x_432 = lean::cnstr_get(x_376, 0); +lean::inc(x_432); +lean::dec(x_376); +x_435 = lean::unbox(x_374); +lean::dec(x_374); +x_437 = l_list_map___main___at_lean_expander_expand__bracketed__binder___main___spec__5(x_435, x_429, x_432); +if (lean::is_scalar(x_431)) { + x_438 = lean::alloc_cnstr(1, 1, 0); } else { - x_439 = x_432; + x_438 = x_431; } -lean::cnstr_set(x_439, 0, x_438); -return x_439; +lean::cnstr_set(x_438, 0, x_437); +return x_438; } } } @@ -6167,40 +6122,34 @@ return x_4; obj* _init_l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__2() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_11; obj* x_12; obj* x_13; obj* x_16; obj* x_17; obj* x_19; obj* x_20; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; x_0 = lean::box(0); x_1 = lean::mk_string("x"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_lean_name_to__string__with__sep___main(x_4, x_3); -x_7 = l_lean_parser_substring_of__string(x_6); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_11 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_11, 0, x_0); -lean::cnstr_set(x_11, 1, x_7); -lean::cnstr_set(x_11, 2, x_3); -lean::cnstr_set(x_11, 3, x_0); -lean::cnstr_set(x_11, 4, x_0); -x_12 = l_lean_parser_ident__univs_has__view; -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -lean::inc(x_0); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_11); -lean::cnstr_set(x_16, 1, x_0); -x_17 = lean::apply_1(x_13, x_16); -lean::inc(x_0); -x_19 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_0); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_0); -return x_20; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("."); +lean::inc(x_2); +x_5 = l_lean_name_to__string__with__sep___main(x_3, x_2); +x_6 = l_lean_parser_substring_of__string(x_5); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_0); +lean::cnstr_set(x_7, 1, x_6); +lean::cnstr_set(x_7, 2, x_2); +lean::cnstr_set(x_7, 3, x_0); +lean::cnstr_set(x_7, 4, x_0); +x_8 = l_lean_parser_ident__univs_has__view; +x_9 = lean::cnstr_get(x_8, 1); +lean::inc(x_9); +x_11 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_11, 0, x_7); +lean::cnstr_set(x_11, 1, x_0); +x_12 = lean::apply_1(x_9, x_11); +x_13 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_0); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_0); +return x_14; } } obj* _init_l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__3() { @@ -6221,40 +6170,36 @@ return x_4; obj* _init_l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__4() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; uint8 x_20; obj* x_21; obj* x_22; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; uint8 x_16; obj* x_17; obj* x_18; x_0 = lean::box(0); x_1 = lean::mk_string("x"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_lean_name_to__string__with__sep___main(x_4, x_3); -x_7 = l_lean_parser_substring_of__string(x_6); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_11 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_11, 0, x_0); -lean::cnstr_set(x_11, 1, x_7); -lean::cnstr_set(x_11, 2, x_3); -lean::cnstr_set(x_11, 3, x_0); -lean::cnstr_set(x_11, 4, x_0); -x_12 = l_lean_parser_term_hole_has__view; -x_13 = lean::cnstr_get(x_12, 1); -lean::inc(x_13); -x_15 = lean::mk_string("_"); -x_16 = l_string_trim(x_15); -x_17 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_17, 0, x_0); -lean::cnstr_set(x_17, 1, x_16); +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("."); +lean::inc(x_2); +x_5 = l_lean_name_to__string__with__sep___main(x_3, x_2); +x_6 = l_lean_parser_substring_of__string(x_5); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_0); +lean::cnstr_set(x_7, 1, x_6); +lean::cnstr_set(x_7, 2, x_2); +lean::cnstr_set(x_7, 3, x_0); +lean::cnstr_set(x_7, 4, x_0); +x_8 = l_lean_parser_term_hole_has__view; +x_9 = lean::cnstr_get(x_8, 1); +lean::inc(x_9); +x_11 = lean::mk_string("_"); +x_12 = l_string_trim(x_11); +x_13 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_13, 0, x_0); +lean::cnstr_set(x_13, 1, x_12); +x_14 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_14, 0, x_13); +x_15 = lean::apply_1(x_9, x_14); +x_16 = 0; +x_17 = l_lean_expander_mk__simple__binder(x_7, x_16, x_15); x_18 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_18, 0, x_17); -x_19 = lean::apply_1(x_13, x_18); -x_20 = 0; -x_21 = l_lean_expander_mk__simple__binder(x_11, x_20, x_19); -x_22 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_22, 0, x_21); -return x_22; +return x_18; } } obj* l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -6332,7 +6277,7 @@ lean::dec(x_7); switch (lean::obj_tag(x_26)) { case 4: { -obj* x_33; obj* x_36; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_47; obj* x_48; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_62; obj* x_63; obj* x_64; obj* x_66; obj* x_67; +obj* x_33; obj* x_36; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_57; obj* x_58; obj* x_59; obj* x_61; obj* x_62; lean::dec(x_3); lean::dec(x_25); x_33 = lean::cnstr_get(x_26, 0); @@ -6346,125 +6291,120 @@ x_40 = l_lean_parser_term_anonymous__constructor_has__view; x_41 = lean::cnstr_get(x_40, 1); lean::inc(x_41); x_43 = lean::apply_1(x_41, x_33); -lean::inc(x_36); -x_45 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_36); -lean::inc(x_36); +x_44 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_44, 0, x_43); +lean::cnstr_set(x_44, 1, x_36); if (lean::is_scalar(x_11)) { - x_47 = lean::alloc_cnstr(1, 2, 0); + x_45 = lean::alloc_cnstr(1, 2, 0); } else { - x_47 = x_11; + x_45 = x_11; } -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set(x_47, 1, x_36); -x_48 = l_lean_expander_mixfix_transform___closed__4; -lean::inc(x_48); -x_50 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_50, 0, x_47); -lean::cnstr_set(x_50, 1, x_48); -lean::cnstr_set(x_50, 2, x_23); -lean::inc(x_36); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_50); -lean::cnstr_set(x_52, 1, x_36); -lean::inc(x_36); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_52); -lean::cnstr_set(x_54, 1, x_36); -x_55 = l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__1; -x_56 = l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__2; -x_57 = l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__3; -lean::inc(x_57); -lean::inc(x_36); -lean::inc(x_56); -lean::inc(x_55); -x_62 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_62, 0, x_55); -lean::cnstr_set(x_62, 1, x_56); -lean::cnstr_set(x_62, 2, x_36); -lean::cnstr_set(x_62, 3, x_57); -lean::cnstr_set(x_62, 4, x_36); -lean::cnstr_set(x_62, 5, x_54); -x_63 = lean::apply_1(x_38, x_62); -x_64 = l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__4; -lean::inc(x_64); -x_66 = lean::apply_2(x_0, x_64, x_63); -x_67 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_67, 0, x_66); -return x_67; +lean::cnstr_set(x_45, 0, x_44); +lean::cnstr_set(x_45, 1, x_36); +x_46 = l_lean_expander_mixfix_transform___closed__4; +lean::inc(x_46); +x_48 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_48, 0, x_45); +lean::cnstr_set(x_48, 1, x_46); +lean::cnstr_set(x_48, 2, x_23); +x_49 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_49, 0, x_48); +lean::cnstr_set(x_49, 1, x_36); +x_50 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_50, 0, x_49); +lean::cnstr_set(x_50, 1, x_36); +x_51 = l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__1; +x_52 = l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__2; +x_53 = l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__3; +lean::inc(x_53); +lean::inc(x_52); +lean::inc(x_51); +x_57 = lean::alloc_cnstr(0, 6, 0); +lean::cnstr_set(x_57, 0, x_51); +lean::cnstr_set(x_57, 1, x_52); +lean::cnstr_set(x_57, 2, x_36); +lean::cnstr_set(x_57, 3, x_53); +lean::cnstr_set(x_57, 4, x_36); +lean::cnstr_set(x_57, 5, x_50); +x_58 = lean::apply_1(x_38, x_57); +x_59 = l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__4; +lean::inc(x_59); +x_61 = lean::apply_2(x_0, x_59, x_58); +x_62 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_62, 0, x_61); +return x_62; } default: { -obj* x_69; +obj* x_64; lean::dec(x_11); -x_69 = lean::box(0); -x_29 = x_69; +x_64 = lean::box(0); +x_29 = x_64; goto lbl_30; } } lbl_30: { -obj* x_71; +obj* x_66; lean::dec(x_29); -x_71 = l_lean_expander_expand__bracketed__binder___main(x_26, x_3); -if (lean::obj_tag(x_71) == 0) +x_66 = l_lean_expander_expand__bracketed__binder___main(x_26, x_3); +if (lean::obj_tag(x_66) == 0) { -obj* x_74; obj* x_77; +obj* x_69; obj* x_72; lean::dec(x_0); lean::dec(x_23); -x_74 = lean::cnstr_get(x_71, 0); -lean::inc(x_74); -lean::dec(x_71); +x_69 = lean::cnstr_get(x_66, 0); +lean::inc(x_69); +lean::dec(x_66); if (lean::is_scalar(x_25)) { - x_77 = lean::alloc_cnstr(0, 1, 0); + x_72 = lean::alloc_cnstr(0, 1, 0); } else { - x_77 = x_25; + x_72 = x_25; lean::cnstr_set_tag(x_25, 0); } -lean::cnstr_set(x_77, 0, x_74); +lean::cnstr_set(x_72, 0, x_69); +return x_72; +} +else +{ +obj* x_73; obj* x_76; obj* x_77; +x_73 = lean::cnstr_get(x_66, 0); +lean::inc(x_73); +lean::dec(x_66); +x_76 = l_list_foldr___main___at_lean_expander_expand__binders___spec__5(x_0, x_23, x_73); +if (lean::is_scalar(x_25)) { + x_77 = lean::alloc_cnstr(1, 1, 0); +} else { + x_77 = x_25; +} +lean::cnstr_set(x_77, 0, x_76); return x_77; } -else -{ -obj* x_78; obj* x_81; obj* x_82; -x_78 = lean::cnstr_get(x_71, 0); -lean::inc(x_78); -lean::dec(x_71); -x_81 = l_list_foldr___main___at_lean_expander_expand__binders___spec__5(x_0, x_23, x_78); -if (lean::is_scalar(x_25)) { - x_82 = lean::alloc_cnstr(1, 1, 0); -} else { - x_82 = x_25; -} -lean::cnstr_set(x_82, 0, x_81); -return x_82; -} } } else { -obj* x_85; obj* x_88; uint8 x_89; obj* x_90; obj* x_92; obj* x_93; obj* x_94; obj* x_95; +obj* x_80; obj* x_83; uint8 x_84; obj* x_85; obj* x_87; obj* x_88; obj* x_89; obj* x_90; lean::dec(x_11); lean::dec(x_3); -x_85 = lean::cnstr_get(x_7, 0); -lean::inc(x_85); +x_80 = lean::cnstr_get(x_7, 0); +lean::inc(x_80); lean::dec(x_7); -x_88 = l_lean_expander_binder__ident__to__ident___main(x_85); -x_89 = 0; -x_90 = l_lean_expander_get__opt__type___main___closed__1; -lean::inc(x_90); -x_92 = l_lean_expander_mk__simple__binder(x_88, x_89, x_90); -x_93 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_93, 0, x_92); -x_94 = lean::apply_2(x_0, x_93, x_23); +x_83 = l_lean_expander_binder__ident__to__ident___main(x_80); +x_84 = 0; +x_85 = l_lean_expander_get__opt__type___main___closed__1; +lean::inc(x_85); +x_87 = l_lean_expander_mk__simple__binder(x_83, x_84, x_85); +x_88 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +x_89 = lean::apply_2(x_0, x_88, x_23); if (lean::is_scalar(x_25)) { - x_95 = lean::alloc_cnstr(1, 1, 0); + x_90 = lean::alloc_cnstr(1, 1, 0); } else { - x_95 = x_25; + x_90 = x_25; } -lean::cnstr_set(x_95, 0, x_94); -return x_95; +lean::cnstr_set(x_90, 0, x_89); +return x_90; } } } @@ -7086,24 +7026,21 @@ return x_13; obj* _init_l_lean_expander_arrow_transform___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_10; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = lean::mk_string("a"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_lean_name_to__string__with__sep___main(x_4, x_3); -x_7 = l_lean_parser_substring_of__string(x_6); -lean::inc(x_0); -lean::inc(x_0); -x_10 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_10, 0, x_0); -lean::cnstr_set(x_10, 1, x_7); -lean::cnstr_set(x_10, 2, x_3); -lean::cnstr_set(x_10, 3, x_0); -lean::cnstr_set(x_10, 4, x_0); -return x_10; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("."); +lean::inc(x_2); +x_5 = l_lean_name_to__string__with__sep___main(x_3, x_2); +x_6 = l_lean_parser_substring_of__string(x_5); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_0); +lean::cnstr_set(x_7, 1, x_6); +lean::cnstr_set(x_7, 2, x_2); +lean::cnstr_set(x_7, 3, x_0); +lean::cnstr_set(x_7, 4, x_0); +return x_7; } } obj* _init_l_lean_expander_arrow_transform___closed__2() { @@ -7416,24 +7353,21 @@ return x_44; obj* _init_l_lean_expander_assume_transform___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_10; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = lean::mk_string("this"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_lean_name_to__string__with__sep___main(x_4, x_3); -x_7 = l_lean_parser_substring_of__string(x_6); -lean::inc(x_0); -lean::inc(x_0); -x_10 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_10, 0, x_0); -lean::cnstr_set(x_10, 1, x_7); -lean::cnstr_set(x_10, 2, x_3); -lean::cnstr_set(x_10, 3, x_0); -lean::cnstr_set(x_10, 4, x_0); -return x_10; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("."); +lean::inc(x_2); +x_5 = l_lean_name_to__string__with__sep___main(x_3, x_2); +x_6 = l_lean_parser_substring_of__string(x_5); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_0); +lean::cnstr_set(x_7, 1, x_6); +lean::cnstr_set(x_7, 2, x_2); +lean::cnstr_set(x_7, 3, x_0); +lean::cnstr_set(x_7, 4, x_0); +return x_7; } } obj* l_lean_expander_assume_transform(obj* x_0, obj* x_1) { @@ -7595,7 +7529,7 @@ return x_24; } else { -obj* x_25; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_33; obj* x_36; obj* x_37; obj* x_38; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_50; obj* x_53; obj* x_55; obj* x_56; obj* x_59; obj* x_60; obj* x_62; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_81; obj* x_82; obj* x_83; +obj* x_25; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_33; obj* x_36; obj* x_37; obj* x_38; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_50; obj* x_53; obj* x_55; obj* x_56; obj* x_58; obj* x_59; obj* x_61; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_80; obj* x_81; obj* x_82; x_25 = lean::cnstr_get(x_7, 0); lean::inc(x_25); if (lean::is_shared(x_7)) { @@ -7645,59 +7579,58 @@ lean::cnstr_set(x_53, 3, x_47); lean::inc(x_31); x_55 = lean::apply_1(x_31, x_53); x_56 = lean::box(0); -lean::inc(x_56); lean::inc(x_28); -x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_28); -lean::cnstr_set(x_59, 1, x_56); -x_60 = l_lean_expander_if_transform___closed__2; -lean::inc(x_60); -x_62 = l_list_foldl___main___at_lean_parser_term_mk__app___spec__1(x_60, x_59); +x_58 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_58, 0, x_28); +lean::cnstr_set(x_58, 1, x_56); +x_59 = l_lean_expander_if_transform___closed__2; +lean::inc(x_59); +x_61 = l_list_foldl___main___at_lean_parser_term_mk__app___spec__1(x_59, x_58); lean::inc(x_38); lean::inc(x_37); lean::inc(x_36); -x_66 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_66, 0, x_36); -lean::cnstr_set(x_66, 1, x_33); -lean::cnstr_set(x_66, 2, x_37); -lean::cnstr_set(x_66, 3, x_62); -lean::cnstr_set(x_66, 4, x_38); -x_67 = lean::alloc_cnstr(0, 1, 0); +x_65 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_65, 0, x_36); +lean::cnstr_set(x_65, 1, x_33); +lean::cnstr_set(x_65, 2, x_37); +lean::cnstr_set(x_65, 3, x_61); +lean::cnstr_set(x_65, 4, x_38); +x_66 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_66, 0, x_65); +x_67 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_67, 0, x_66); -x_68 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_68, 0, x_67); -x_69 = lean::cnstr_get(x_6, 6); -lean::inc(x_69); +x_68 = lean::cnstr_get(x_6, 6); +lean::inc(x_68); lean::dec(x_6); lean::inc(x_50); lean::inc(x_49); -x_74 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_74, 0, x_49); -lean::cnstr_set(x_74, 1, x_68); -lean::cnstr_set(x_74, 2, x_50); -lean::cnstr_set(x_74, 3, x_69); -x_75 = lean::apply_1(x_31, x_74); +x_73 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_73, 0, x_49); +lean::cnstr_set(x_73, 1, x_67); +lean::cnstr_set(x_73, 2, x_50); +lean::cnstr_set(x_73, 3, x_68); +x_74 = lean::apply_1(x_31, x_73); +x_75 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_75, 0, x_74); +lean::cnstr_set(x_75, 1, x_56); x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_75); -lean::cnstr_set(x_76, 1, x_56); +lean::cnstr_set(x_76, 0, x_55); +lean::cnstr_set(x_76, 1, x_75); x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_55); +lean::cnstr_set(x_77, 0, x_28); lean::cnstr_set(x_77, 1, x_76); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_28); -lean::cnstr_set(x_78, 1, x_77); -x_79 = l_lean_expander_if_transform___closed__3; -lean::inc(x_79); -x_81 = l_list_foldl___main___at_lean_parser_term_mk__app___spec__1(x_79, x_78); +x_78 = l_lean_expander_if_transform___closed__3; +lean::inc(x_78); +x_80 = l_list_foldl___main___at_lean_parser_term_mk__app___spec__1(x_78, x_77); if (lean::is_scalar(x_27)) { - x_82 = lean::alloc_cnstr(1, 1, 0); + x_81 = lean::alloc_cnstr(1, 1, 0); } else { - x_82 = x_27; + x_81 = x_27; } +lean::cnstr_set(x_81, 0, x_80); +x_82 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_82, 0, x_81); -x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_82); -return x_83; +return x_82; } } } @@ -7742,33 +7675,32 @@ return x_9; obj* _init_l_lean_expander_let_transform___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; x_0 = lean::box(0); x_1 = lean::mk_string(" : "); x_2 = l_string_trim(x_1); -lean::inc(x_0); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_0); -lean::cnstr_set(x_4, 1, x_2); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = l_lean_parser_term_hole_has__view; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_9 = lean::mk_string("_"); -x_10 = l_string_trim(x_9); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_0); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::apply_1(x_7, x_12); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_5); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -return x_15; +x_3 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_3, 0, x_0); +lean::cnstr_set(x_3, 1, x_2); +x_4 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_4, 0, x_3); +x_5 = l_lean_parser_term_hole_has__view; +x_6 = lean::cnstr_get(x_5, 1); +lean::inc(x_6); +x_8 = lean::mk_string("_"); +x_9 = l_string_trim(x_8); +x_10 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_10, 0, x_0); +lean::cnstr_set(x_10, 1, x_9); +x_11 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_11, 0, x_10); +x_12 = lean::apply_1(x_6, x_11); +x_13 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_13, 0, x_4); +lean::cnstr_set(x_13, 1, x_12); +x_14 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_14, 0, x_13); +return x_14; } } obj* l_lean_expander_let_transform(obj* x_0, obj* x_1) { @@ -7872,158 +7804,150 @@ return x_45; } else { -obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_56; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_77; obj* x_78; obj* x_80; obj* x_82; obj* x_85; obj* x_86; obj* x_87; obj* x_89; obj* x_92; obj* x_93; obj* x_94; obj* x_95; +obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_55; obj* x_57; obj* x_58; obj* x_60; obj* x_61; obj* x_62; obj* x_66; obj* x_67; obj* x_68; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_76; obj* x_77; obj* x_79; obj* x_81; obj* x_84; obj* x_85; obj* x_86; obj* x_88; obj* x_91; obj* x_92; obj* x_93; obj* x_94; x_47 = lean::box(0); x_48 = l_list_map___main___at_lean_expander_let_transform___spec__1(x_14); x_49 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_49, 0, x_48); x_50 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_50, 0, x_49); -lean::inc(x_47); -x_52 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_52, 0, x_47); -lean::cnstr_set(x_52, 1, x_50); -x_53 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_53, 0, x_52); -x_54 = lean::cnstr_get(x_3, 1); -lean::inc(x_54); -x_56 = lean::cnstr_get(x_6, 0); -lean::inc(x_56); -x_58 = l_lean_parser_term_pi_has__view; -x_59 = lean::cnstr_get(x_58, 1); -lean::inc(x_59); -x_61 = l_lean_expander_get__opt__type___main(x_16); -x_62 = l_lean_expander_arrow_transform___closed__2; -x_63 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__3; -lean::inc(x_63); +x_51 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_51, 0, x_47); +lean::cnstr_set(x_51, 1, x_50); +x_52 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_52, 0, x_51); +x_53 = lean::cnstr_get(x_3, 1); lean::inc(x_53); +x_55 = lean::cnstr_get(x_6, 0); +lean::inc(x_55); +x_57 = l_lean_parser_term_pi_has__view; +x_58 = lean::cnstr_get(x_57, 1); +lean::inc(x_58); +x_60 = l_lean_expander_get__opt__type___main(x_16); +x_61 = l_lean_expander_arrow_transform___closed__2; +x_62 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__3; lean::inc(x_62); -x_67 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_67, 0, x_62); -lean::cnstr_set(x_67, 1, x_53); -lean::cnstr_set(x_67, 2, x_63); -lean::cnstr_set(x_67, 3, x_61); -x_68 = lean::apply_1(x_59, x_67); -x_69 = l_lean_expander_mk__simple__binder___closed__1; -lean::inc(x_69); -x_71 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_71, 0, x_69); -lean::cnstr_set(x_71, 1, x_68); -x_72 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_72, 0, x_71); +lean::inc(x_52); +lean::inc(x_61); +x_66 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_66, 0, x_61); +lean::cnstr_set(x_66, 1, x_52); +lean::cnstr_set(x_66, 2, x_62); +lean::cnstr_set(x_66, 3, x_60); +x_67 = lean::apply_1(x_58, x_66); +x_68 = l_lean_expander_mk__simple__binder___closed__1; +lean::inc(x_68); +x_70 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_70, 0, x_68); +lean::cnstr_set(x_70, 1, x_67); +x_71 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_71, 0, x_70); if (lean::is_scalar(x_18)) { - x_73 = lean::alloc_cnstr(0, 3, 0); + x_72 = lean::alloc_cnstr(0, 3, 0); } else { - x_73 = x_18; + x_72 = x_18; } -lean::cnstr_set(x_73, 0, x_12); -lean::cnstr_set(x_73, 1, x_47); -lean::cnstr_set(x_73, 2, x_72); +lean::cnstr_set(x_72, 0, x_12); +lean::cnstr_set(x_72, 1, x_47); +lean::cnstr_set(x_72, 2, x_71); if (lean::is_scalar(x_11)) { - x_74 = lean::alloc_cnstr(0, 1, 0); + x_73 = lean::alloc_cnstr(0, 1, 0); } else { - x_74 = x_11; + x_73 = x_11; } -lean::cnstr_set(x_74, 0, x_73); -x_75 = lean::cnstr_get(x_6, 2); -lean::inc(x_75); -x_77 = l_lean_parser_term_lambda_has__view; -x_78 = lean::cnstr_get(x_77, 1); -lean::inc(x_78); -x_80 = lean::cnstr_get(x_6, 3); -lean::inc(x_80); -x_82 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__2; -lean::inc(x_63); -lean::inc(x_82); -x_85 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_85, 0, x_82); -lean::cnstr_set(x_85, 1, x_53); -lean::cnstr_set(x_85, 2, x_63); -lean::cnstr_set(x_85, 3, x_80); -x_86 = lean::apply_1(x_78, x_85); -x_87 = lean::cnstr_get(x_6, 4); -lean::inc(x_87); -x_89 = lean::cnstr_get(x_6, 5); -lean::inc(x_89); +lean::cnstr_set(x_73, 0, x_72); +x_74 = lean::cnstr_get(x_6, 2); +lean::inc(x_74); +x_76 = l_lean_parser_term_lambda_has__view; +x_77 = lean::cnstr_get(x_76, 1); +lean::inc(x_77); +x_79 = lean::cnstr_get(x_6, 3); +lean::inc(x_79); +x_81 = l_list_mmap_x_27___main___at_lean_expander_mk__notation__transformer___spec__4___closed__2; +lean::inc(x_62); +lean::inc(x_81); +x_84 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_84, 0, x_81); +lean::cnstr_set(x_84, 1, x_52); +lean::cnstr_set(x_84, 2, x_62); +lean::cnstr_set(x_84, 3, x_79); +x_85 = lean::apply_1(x_77, x_84); +x_86 = lean::cnstr_get(x_6, 4); +lean::inc(x_86); +x_88 = lean::cnstr_get(x_6, 5); +lean::inc(x_88); lean::dec(x_6); -x_92 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_92, 0, x_56); -lean::cnstr_set(x_92, 1, x_74); -lean::cnstr_set(x_92, 2, x_75); -lean::cnstr_set(x_92, 3, x_86); -lean::cnstr_set(x_92, 4, x_87); -lean::cnstr_set(x_92, 5, x_89); -x_93 = lean::apply_1(x_54, x_92); +x_91 = lean::alloc_cnstr(0, 6, 0); +lean::cnstr_set(x_91, 0, x_55); +lean::cnstr_set(x_91, 1, x_73); +lean::cnstr_set(x_91, 2, x_74); +lean::cnstr_set(x_91, 3, x_85); +lean::cnstr_set(x_91, 4, x_86); +lean::cnstr_set(x_91, 5, x_88); +x_92 = lean::apply_1(x_53, x_91); +x_93 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_93, 0, x_92); x_94 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_94, 0, x_93); -x_95 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_95, 0, x_94); -return x_95; +return x_94; } } else { -obj* x_96; obj* x_99; obj* x_100; obj* x_102; obj* x_103; obj* x_106; obj* x_108; obj* x_110; obj* x_112; obj* x_113; obj* x_116; obj* x_118; obj* x_120; obj* x_122; obj* x_123; obj* x_124; obj* x_128; obj* x_129; obj* x_130; obj* x_131; -x_96 = lean::cnstr_get(x_7, 0); -lean::inc(x_96); +obj* x_95; obj* x_98; obj* x_99; obj* x_101; obj* x_102; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_111; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_120; obj* x_121; obj* x_122; obj* x_123; +x_95 = lean::cnstr_get(x_7, 0); +lean::inc(x_95); lean::dec(x_7); -x_99 = l_lean_parser_term_match_has__view; -x_100 = lean::cnstr_get(x_99, 1); -lean::inc(x_100); -x_102 = lean::box(0); -x_103 = lean::cnstr_get(x_6, 3); -lean::inc(x_103); +x_98 = l_lean_parser_term_match_has__view; +x_99 = lean::cnstr_get(x_98, 1); +lean::inc(x_99); +x_101 = lean::box(0); +x_102 = lean::cnstr_get(x_6, 3); lean::inc(x_102); +x_104 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_104, 0, x_102); +lean::cnstr_set(x_104, 1, x_101); +x_105 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_105, 0, x_104); +lean::cnstr_set(x_105, 1, x_101); x_106 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_106, 0, x_103); -lean::cnstr_set(x_106, 1, x_102); -lean::inc(x_102); -x_108 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_108, 0, x_106); -lean::cnstr_set(x_108, 1, x_102); -lean::inc(x_102); -x_110 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_110, 0, x_96); -lean::cnstr_set(x_110, 1, x_102); -lean::inc(x_102); -x_112 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_112, 0, x_110); -lean::cnstr_set(x_112, 1, x_102); -x_113 = lean::cnstr_get(x_6, 5); -lean::inc(x_113); +lean::cnstr_set(x_106, 0, x_95); +lean::cnstr_set(x_106, 1, x_101); +x_107 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_107, 0, x_106); +lean::cnstr_set(x_107, 1, x_101); +x_108 = lean::cnstr_get(x_6, 5); +lean::inc(x_108); lean::dec(x_6); -x_116 = l_lean_expander_mixfix_transform___closed__4; +x_111 = l_lean_expander_mixfix_transform___closed__4; +lean::inc(x_111); +x_113 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_113, 0, x_107); +lean::cnstr_set(x_113, 1, x_111); +lean::cnstr_set(x_113, 2, x_108); +x_114 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_114, 0, x_113); +lean::cnstr_set(x_114, 1, x_101); +x_115 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_115, 0, x_114); +lean::cnstr_set(x_115, 1, x_101); +x_116 = l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__1; +x_117 = l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__3; +lean::inc(x_117); lean::inc(x_116); -x_118 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_118, 0, x_112); -lean::cnstr_set(x_118, 1, x_116); -lean::cnstr_set(x_118, 2, x_113); -lean::inc(x_102); -x_120 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_120, 0, x_118); -lean::cnstr_set(x_120, 1, x_102); -lean::inc(x_102); -x_122 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_122, 0, x_120); -lean::cnstr_set(x_122, 1, x_102); -x_123 = l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__1; -x_124 = l_list_mfoldr___main___at_lean_expander_expand__binders___spec__6___closed__3; -lean::inc(x_124); -lean::inc(x_102); -lean::inc(x_123); -x_128 = lean::alloc_cnstr(0, 6, 0); -lean::cnstr_set(x_128, 0, x_123); -lean::cnstr_set(x_128, 1, x_108); -lean::cnstr_set(x_128, 2, x_102); -lean::cnstr_set(x_128, 3, x_124); -lean::cnstr_set(x_128, 4, x_102); -lean::cnstr_set(x_128, 5, x_122); -x_129 = lean::apply_1(x_100, x_128); -x_130 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_130, 0, x_129); -x_131 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_131, 0, x_130); -return x_131; +x_120 = lean::alloc_cnstr(0, 6, 0); +lean::cnstr_set(x_120, 0, x_116); +lean::cnstr_set(x_120, 1, x_105); +lean::cnstr_set(x_120, 2, x_101); +lean::cnstr_set(x_120, 3, x_117); +lean::cnstr_set(x_120, 4, x_101); +lean::cnstr_set(x_120, 5, x_115); +x_121 = lean::apply_1(x_99, x_120); +x_122 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_122, 0, x_121); +x_123 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_123, 0, x_122); +return x_123; } } } @@ -8179,60 +8103,53 @@ return x_56; obj* _init_l_lean_expander_declaration_transform___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; x_0 = lean::box(0); x_1 = lean::mk_string("@["); x_2 = l_string_trim(x_1); -lean::inc(x_0); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_0); -lean::cnstr_set(x_4, 1, x_2); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = lean::mk_string("]"); -x_7 = l_string_trim(x_6); -lean::inc(x_0); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_0); -lean::cnstr_set(x_9, 1, x_7); -x_10 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_10, 0, x_9); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_5); -lean::cnstr_set(x_11, 1, x_0); -lean::cnstr_set(x_11, 2, x_10); -return x_11; +x_3 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_3, 0, x_0); +lean::cnstr_set(x_3, 1, x_2); +x_4 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_4, 0, x_3); +x_5 = lean::mk_string("]"); +x_6 = l_string_trim(x_5); +x_7 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_7, 0, x_0); +lean::cnstr_set(x_7, 1, x_6); +x_8 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_8, 0, x_7); +x_9 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_9, 0, x_4); +lean::cnstr_set(x_9, 1, x_0); +lean::cnstr_set(x_9, 2, x_8); +return x_9; } } obj* _init_l_lean_expander_declaration_transform___closed__2() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_11; obj* x_13; obj* x_14; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; x_0 = lean::box(0); x_1 = lean::mk_string("class"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("."); -lean::inc(x_3); -x_6 = l_lean_name_to__string__with__sep___main(x_4, x_3); -x_7 = l_lean_parser_substring_of__string(x_6); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_11 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_11, 0, x_0); -lean::cnstr_set(x_11, 1, x_7); -lean::cnstr_set(x_11, 2, x_3); -lean::cnstr_set(x_11, 3, x_0); -lean::cnstr_set(x_11, 4, x_0); -lean::inc(x_0); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_0); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_0); -return x_14; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("."); +lean::inc(x_2); +x_5 = l_lean_name_to__string__with__sep___main(x_3, x_2); +x_6 = l_lean_parser_substring_of__string(x_5); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_0); +lean::cnstr_set(x_7, 1, x_6); +lean::cnstr_set(x_7, 2, x_2); +lean::cnstr_set(x_7, 3, x_0); +lean::cnstr_set(x_7, 4, x_0); +x_8 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_8, 0, x_7); +lean::cnstr_set(x_8, 1, x_0); +x_9 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_0); +return x_9; } } obj* _init_l_lean_expander_declaration_transform___closed__3() { @@ -8943,33 +8860,32 @@ return x_9; obj* _init_l_list_mmap___main___at_lean_expander_variables_transform___spec__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; x_0 = lean::box(0); x_1 = lean::mk_string(" : "); x_2 = l_string_trim(x_1); -lean::inc(x_0); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_0); -lean::cnstr_set(x_4, 1, x_2); -x_5 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_5, 0, x_4); -x_6 = l_lean_expander_binding__annotation__update_has__view; -x_7 = lean::cnstr_get(x_6, 1); -lean::inc(x_7); -x_9 = lean::mk_string("dummy"); -x_10 = l_string_trim(x_9); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_0); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::apply_1(x_7, x_12); -x_14 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_14, 0, x_5); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_15, 0, x_14); -return x_15; +x_3 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_3, 0, x_0); +lean::cnstr_set(x_3, 1, x_2); +x_4 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_4, 0, x_3); +x_5 = l_lean_expander_binding__annotation__update_has__view; +x_6 = lean::cnstr_get(x_5, 1); +lean::inc(x_6); +x_8 = lean::mk_string("dummy"); +x_9 = l_string_trim(x_8); +x_10 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_10, 0, x_0); +lean::cnstr_set(x_10, 1, x_9); +x_11 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_11, 0, x_10); +x_12 = lean::apply_1(x_6, x_11); +x_13 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_13, 0, x_4); +lean::cnstr_set(x_13, 1, x_12); +x_14 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_14, 0, x_13); +return x_14; } } obj* l_list_mmap___main___at_lean_expander_variables_transform___spec__1(obj* x_0, obj* x_1) { @@ -9495,42 +9411,39 @@ return x_15; obj* _init_l_lean_expander_sorry_transform___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; 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_0 = lean::box(0); x_1 = lean::mk_string("sorry_ax"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = l_lean_expander_glob__id(x_3); -x_5 = l_lean_parser_term_hole_has__view; -x_6 = lean::cnstr_get(x_5, 1); -lean::inc(x_6); -x_8 = lean::mk_string("_"); -x_9 = l_string_trim(x_8); -lean::inc(x_0); -x_11 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_11, 0, x_0); -lean::cnstr_set(x_11, 1, x_9); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::apply_1(x_6, x_12); -x_14 = lean::mk_string("bool"); -lean::inc(x_0); -x_16 = lean_name_mk_string(x_0, x_14); -x_17 = lean::mk_string("ff"); -x_18 = lean_name_mk_string(x_16, x_17); -x_19 = l_lean_expander_glob__id(x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = l_lean_expander_glob__id(x_2); +x_4 = l_lean_parser_term_hole_has__view; +x_5 = lean::cnstr_get(x_4, 1); +lean::inc(x_5); +x_7 = lean::mk_string("_"); +x_8 = l_string_trim(x_7); +x_9 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_9, 0, x_0); +lean::cnstr_set(x_9, 1, x_8); +x_10 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_10, 0, x_9); +x_11 = lean::apply_1(x_5, x_10); +x_12 = lean::mk_string("bool"); +x_13 = lean_name_mk_string(x_0, x_12); +x_14 = lean::mk_string("ff"); +x_15 = lean_name_mk_string(x_13, x_14); +x_16 = l_lean_expander_glob__id(x_15); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_16); +lean::cnstr_set(x_17, 1, x_0); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_11); +lean::cnstr_set(x_18, 1, x_17); +x_19 = l_list_foldl___main___at_lean_parser_term_mk__app___spec__1(x_3, x_18); +x_20 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_0); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_13); -lean::cnstr_set(x_21, 1, x_20); -x_22 = l_list_foldl___main___at_lean_parser_term_mk__app___spec__1(x_4, x_21); -x_23 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_23, 0, x_22); -x_24 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_24, 0, x_23); -return x_24; +x_21 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_21, 0, x_20); +return x_21; } } obj* l_lean_expander_sorry_transform(obj* x_0, obj* x_1) { @@ -9802,7 +9715,7 @@ goto _start; obj* _init_l_rbmap_from__list___at_lean_expander_builtin__transformers___spec__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* 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_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_59; obj* x_60; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_73; obj* x_75; obj* x_76; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* 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_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_59; obj* x_60; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_73; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; x_0 = l_lean_parser_command_mixfix; x_1 = lean::alloc_closure(reinterpret_cast(l_lean_expander_mixfix_transform), 2, 0); lean::inc(x_0); @@ -9918,66 +9831,65 @@ x_75 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_75, 0, x_72); lean::cnstr_set(x_75, 1, x_73); x_76 = lean::box(0); -lean::inc(x_76); +x_77 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_77, 0, x_75); +lean::cnstr_set(x_77, 1, x_76); x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_75); -lean::cnstr_set(x_78, 1, x_76); +lean::cnstr_set(x_78, 0, x_71); +lean::cnstr_set(x_78, 1, x_77); x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_71); +lean::cnstr_set(x_79, 0, x_67); lean::cnstr_set(x_79, 1, x_78); x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_67); +lean::cnstr_set(x_80, 0, x_63); lean::cnstr_set(x_80, 1, x_79); x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_63); +lean::cnstr_set(x_81, 0, x_59); lean::cnstr_set(x_81, 1, x_80); x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_59); +lean::cnstr_set(x_82, 0, x_55); lean::cnstr_set(x_82, 1, x_81); x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_55); +lean::cnstr_set(x_83, 0, x_51); lean::cnstr_set(x_83, 1, x_82); x_84 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_84, 0, x_51); +lean::cnstr_set(x_84, 0, x_47); lean::cnstr_set(x_84, 1, x_83); x_85 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_85, 0, x_47); +lean::cnstr_set(x_85, 0, x_43); lean::cnstr_set(x_85, 1, x_84); x_86 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_86, 0, x_43); +lean::cnstr_set(x_86, 0, x_39); lean::cnstr_set(x_86, 1, x_85); x_87 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_87, 0, x_39); +lean::cnstr_set(x_87, 0, x_35); lean::cnstr_set(x_87, 1, x_86); x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_35); +lean::cnstr_set(x_88, 0, x_31); lean::cnstr_set(x_88, 1, x_87); x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_31); +lean::cnstr_set(x_89, 0, x_27); lean::cnstr_set(x_89, 1, x_88); x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_27); +lean::cnstr_set(x_90, 0, x_23); lean::cnstr_set(x_90, 1, x_89); x_91 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_91, 0, x_23); +lean::cnstr_set(x_91, 0, x_19); lean::cnstr_set(x_91, 1, x_90); x_92 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_92, 0, x_19); +lean::cnstr_set(x_92, 0, x_15); lean::cnstr_set(x_92, 1, x_91); x_93 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_93, 0, x_15); +lean::cnstr_set(x_93, 0, x_11); lean::cnstr_set(x_93, 1, x_92); x_94 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_94, 0, x_11); +lean::cnstr_set(x_94, 0, x_7); lean::cnstr_set(x_94, 1, x_93); x_95 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_95, 0, x_7); +lean::cnstr_set(x_95, 0, x_3); lean::cnstr_set(x_95, 1, x_94); -x_96 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_96, 0, x_3); -lean::cnstr_set(x_96, 1, x_95); -x_97 = l_list_foldl___main___at_lean_expander_builtin__transformers___spec__5(x_76, x_96); -return x_97; +x_96 = l_list_foldl___main___at_lean_expander_builtin__transformers___spec__5(x_76, x_95); +return x_96; } } obj* _init_l_lean_expander_builtin__transformers() { diff --git a/src/boot/init/lean/expr.cpp b/src/boot/init/lean/expr.cpp index 2f0dacbf57..b2499d926f 100644 --- a/src/boot/init/lean/expr.cpp +++ b/src/boot/init/lean/expr.cpp @@ -139,15 +139,14 @@ return x_4; obj* _init_l_lean_mk__dec__is__true___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::box(0); x_1 = lean::mk_string("decidable"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("is_true"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean_expr_mk_const(x_5, x_0); -return x_6; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("is_true"); +x_4 = lean_name_mk_string(x_2, x_3); +x_5 = lean_expr_mk_const(x_4, x_0); +return x_5; } } obj* l_lean_mk__dec__is__true(obj* x_0, obj* x_1) { @@ -163,15 +162,14 @@ return x_4; obj* _init_l_lean_mk__dec__is__false___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::box(0); x_1 = lean::mk_string("decidable"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::mk_string("is_false"); -x_5 = lean_name_mk_string(x_3, x_4); -x_6 = lean_expr_mk_const(x_5, x_0); -return x_6; +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::mk_string("is_false"); +x_4 = lean_name_mk_string(x_2, x_3); +x_5 = lean_expr_mk_const(x_4, x_0); +return x_5; } } obj* l_lean_mk__dec__is__false(obj* x_0, obj* x_1) { diff --git a/src/boot/init/lean/frontend.cpp b/src/boot/init/lean/frontend.cpp index 96bb41d841..5fa920bf44 100644 --- a/src/boot/init/lean/frontend.cpp +++ b/src/boot/init/lean/frontend.cpp @@ -143,7 +143,7 @@ return x_23; } else { -obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_37; obj* x_38; obj* x_40; obj* x_41; +obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_36; obj* x_37; obj* x_39; obj* x_40; x_24 = lean::cnstr_get(x_17, 0); lean::inc(x_24); if (lean::is_shared(x_17)) { @@ -165,27 +165,26 @@ lean::cnstr_set(x_30, 1, x_24); x_31 = lean::box(0); x_32 = l_lean_parser_term_builtin__leading__parsers; x_33 = l_lean_parser_term_builtin__trailing__parsers; -lean::inc(x_31); lean::inc(x_33); lean::inc(x_32); -x_37 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_37, 0, x_30); -lean::cnstr_set(x_37, 1, x_32); -lean::cnstr_set(x_37, 2, x_33); -lean::cnstr_set(x_37, 3, x_31); -lean::cnstr_set(x_37, 4, x_31); -x_38 = l_lean_parser_command_builtin__command__parsers; -lean::inc(x_38); -x_40 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_40, 0, x_37); -lean::cnstr_set(x_40, 1, x_38); +x_36 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_36, 0, x_30); +lean::cnstr_set(x_36, 1, x_32); +lean::cnstr_set(x_36, 2, x_33); +lean::cnstr_set(x_36, 3, x_31); +lean::cnstr_set(x_36, 4, x_31); +x_37 = l_lean_parser_command_builtin__command__parsers; +lean::inc(x_37); +x_39 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_39, 0, x_36); +lean::cnstr_set(x_39, 1, x_37); if (lean::is_scalar(x_26)) { - x_41 = lean::alloc_cnstr(1, 1, 0); + x_40 = lean::alloc_cnstr(1, 1, 0); } else { - x_41 = x_26; + x_40 = x_26; } -lean::cnstr_set(x_41, 0, x_40); -return x_41; +lean::cnstr_set(x_40, 0, x_39); +return x_40; } } } diff --git a/src/boot/init/lean/ir/format.cpp b/src/boot/init/lean/ir/format.cpp index 84c6fb2140..c94831ecf2 100644 --- a/src/boot/init/lean/ir/format.cpp +++ b/src/boot/init/lean/ir/format.cpp @@ -515,68 +515,66 @@ lean::inc(x_5); lean::dec(x_0); x_8 = lean::box(0); x_9 = lean_name_dec_eq(x_3, x_8); -lean::dec(x_8); if (x_9 == 0) { -obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; -x_11 = l_lean_ir_id_to__string___main(x_3); -x_12 = l_lean_name_to__string___closed__1; -x_13 = lean::string_append(x_11, x_12); -x_14 = l_lean_ir_id__part_to__string(x_5); -x_15 = lean::string_append(x_13, x_14); -lean::dec(x_14); -return x_15; +obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; +x_10 = l_lean_ir_id_to__string___main(x_3); +x_11 = l_lean_name_to__string___closed__1; +x_12 = lean::string_append(x_10, x_11); +x_13 = l_lean_ir_id__part_to__string(x_5); +x_14 = lean::string_append(x_12, x_13); +lean::dec(x_13); +return x_14; } else { -uint8 x_19; +uint8 x_18; lean::dec(x_3); lean::inc(x_5); -x_19 = l_lean_ir_is__reserved(x_5); -if (x_19 == 0) +x_18 = l_lean_ir_is__reserved(x_5); +if (x_18 == 0) { -obj* x_20; -x_20 = l_lean_ir_id__part_to__string(x_5); -return x_20; +obj* x_19; +x_19 = l_lean_ir_id__part_to__string(x_5); +return x_19; } else { -obj* x_21; -x_21 = l_lean_ir_escape__string(x_5); -return x_21; +obj* x_20; +x_20 = l_lean_ir_escape__string(x_5); +return x_20; } } } default: { -obj* x_22; obj* x_24; obj* x_27; uint8 x_28; -x_22 = lean::cnstr_get(x_0, 0); -lean::inc(x_22); -x_24 = lean::cnstr_get(x_0, 1); -lean::inc(x_24); +obj* x_21; obj* x_23; obj* x_26; uint8 x_27; +x_21 = lean::cnstr_get(x_0, 0); +lean::inc(x_21); +x_23 = lean::cnstr_get(x_0, 1); +lean::inc(x_23); lean::dec(x_0); -x_27 = lean::box(0); -x_28 = lean_name_dec_eq(x_22, x_27); -lean::dec(x_27); -if (x_28 == 0) +x_26 = lean::box(0); +x_27 = lean_name_dec_eq(x_21, x_26); +if (x_27 == 0) { -obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; -x_30 = l_lean_ir_id_to__string___main(x_22); -x_31 = l_lean_name_to__string___closed__1; -x_32 = lean::string_append(x_30, x_31); -x_33 = l_nat_repr(x_24); -x_34 = l_lean_ir_escape__string(x_33); -x_35 = lean::string_append(x_32, x_34); -lean::dec(x_34); -return x_35; +obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; +x_28 = l_lean_ir_id_to__string___main(x_21); +x_29 = l_lean_name_to__string___closed__1; +x_30 = lean::string_append(x_28, x_29); +x_31 = l_nat_repr(x_23); +x_32 = l_lean_ir_escape__string(x_31); +x_33 = lean::string_append(x_30, x_32); +lean::dec(x_32); +return x_33; } else { -obj* x_38; obj* x_39; -lean::dec(x_22); -x_38 = l_nat_repr(x_24); -x_39 = l_lean_ir_escape__string(x_38); -return x_39; +obj* x_36; obj* x_37; +lean::dec(x_21); +x_36 = l_nat_repr(x_23); +x_37 = l_lean_ir_escape__string(x_36); +return x_37; } } } @@ -4161,7 +4159,7 @@ 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; +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; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; x_10 = lean::cnstr_get(x_0, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_0, 1); @@ -4184,25 +4182,23 @@ 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_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; +x_28 = l_lean_format_join__sep___main___at_lean_ir_decl_to__format___main___spec__1(x_12, x_25); +x_29 = lean::alloc_cnstr(4, 2, 1); +lean::cnstr_set(x_29, 0, x_27); +lean::cnstr_set(x_29, 1, x_28); +lean::cnstr_set_scalar(x_29, sizeof(void*)*2, x_16); +x_30 = 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_30); +lean::cnstr_set(x_31, 0, x_30); +lean::cnstr_set(x_31, 1, x_25); 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; +return x_32; } } } diff --git a/src/boot/init/lean/ir/lirc.cpp b/src/boot/init/lean/ir/lirc.cpp index 25009f7435..beca424460 100644 --- a/src/boot/init/lean/ir/lirc.cpp +++ b/src/boot/init/lean/ir/lirc.cpp @@ -471,170 +471,167 @@ obj* x_1; uint8 x_3; x_3 = lean::string_iterator_has_next(x_0); if (x_3 == 0) { -obj* x_4; obj* x_5; obj* x_6; obj* x_10; +obj* x_4; obj* x_5; obj* x_6; obj* x_9; x_4 = lean::box(0); x_5 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_6 = l_mjoin___rarg___closed__1; -lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); -x_10 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_5, x_6, x_4, x_4, x_0); -x_1 = x_10; +x_9 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_5, x_6, x_4, x_4, x_0); +x_1 = x_9; goto lbl_2; } else { -uint32 x_11; uint8 x_12; -x_11 = lean::string_iterator_curr(x_0); -x_12 = l_char_is__alpha(x_11); -if (x_12 == 0) +uint32 x_10; uint8 x_11; +x_10 = lean::string_iterator_curr(x_0); +x_11 = l_char_is__alpha(x_10); +if (x_11 == 0) { -uint32 x_13; uint8 x_14; -x_13 = 95; -x_14 = x_11 == x_13; -if (x_14 == 0) +uint32 x_12; uint8 x_13; +x_12 = 95; +x_13 = x_10 == x_12; +if (x_13 == 0) { -if (x_12 == 0) +if (x_11 == 0) { -obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_25; -x_15 = l_char_quote__core(x_11); -x_16 = l_char_has__repr___closed__1; -lean::inc(x_16); -x_18 = lean::string_append(x_16, x_15); -lean::dec(x_15); -x_20 = lean::string_append(x_18, x_16); -x_21 = lean::box(0); -x_22 = l_mjoin___rarg___closed__1; +obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; +x_14 = l_char_quote__core(x_10); +x_15 = l_char_has__repr___closed__1; +lean::inc(x_15); +x_17 = lean::string_append(x_15, x_14); +lean::dec(x_14); +x_19 = lean::string_append(x_17, x_15); +x_20 = lean::box(0); +x_21 = l_mjoin___rarg___closed__1; lean::inc(x_21); -lean::inc(x_22); -x_25 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_20, x_22, x_21, x_21, x_0); -x_1 = x_25; +x_23 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_19, x_21, x_20, x_20, x_0); +x_1 = x_23; goto lbl_2; } else { -obj* x_26; obj* x_27; obj* x_28; obj* x_29; -x_26 = lean::string_iterator_next(x_0); -x_27 = lean::box(0); -x_28 = lean::box_uint32(x_11); -x_29 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_26); -lean::cnstr_set(x_29, 2, x_27); -x_1 = x_29; +obj* x_24; obj* x_25; obj* x_26; obj* x_27; +x_24 = lean::string_iterator_next(x_0); +x_25 = lean::box(0); +x_26 = lean::box_uint32(x_10); +x_27 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_27, 0, x_26); +lean::cnstr_set(x_27, 1, x_24); +lean::cnstr_set(x_27, 2, x_25); +x_1 = x_27; goto lbl_2; } } else { -obj* x_30; obj* x_31; obj* x_32; obj* x_33; -x_30 = lean::string_iterator_next(x_0); -x_31 = lean::box(0); -x_32 = lean::box_uint32(x_11); -x_33 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_30); -lean::cnstr_set(x_33, 2, x_31); -x_1 = x_33; +obj* x_28; obj* x_29; obj* x_30; obj* x_31; +x_28 = lean::string_iterator_next(x_0); +x_29 = lean::box(0); +x_30 = lean::box_uint32(x_10); +x_31 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_31, 0, x_30); +lean::cnstr_set(x_31, 1, x_28); +lean::cnstr_set(x_31, 2, x_29); +x_1 = x_31; goto lbl_2; } } else { -if (x_12 == 0) +if (x_11 == 0) { -obj* x_34; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_44; -x_34 = l_char_quote__core(x_11); -x_35 = l_char_has__repr___closed__1; -lean::inc(x_35); -x_37 = lean::string_append(x_35, x_34); -lean::dec(x_34); -x_39 = lean::string_append(x_37, x_35); -x_40 = lean::box(0); -x_41 = l_mjoin___rarg___closed__1; -lean::inc(x_40); -lean::inc(x_41); -x_44 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_39, x_41, x_40, x_40, x_0); -x_1 = x_44; +obj* x_32; obj* x_33; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_41; +x_32 = l_char_quote__core(x_10); +x_33 = l_char_has__repr___closed__1; +lean::inc(x_33); +x_35 = lean::string_append(x_33, x_32); +lean::dec(x_32); +x_37 = lean::string_append(x_35, x_33); +x_38 = lean::box(0); +x_39 = l_mjoin___rarg___closed__1; +lean::inc(x_39); +x_41 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_37, x_39, x_38, x_38, x_0); +x_1 = x_41; goto lbl_2; } else { -obj* x_45; obj* x_46; obj* x_47; obj* x_48; -x_45 = lean::string_iterator_next(x_0); -x_46 = lean::box(0); -x_47 = lean::box_uint32(x_11); -x_48 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_45); -lean::cnstr_set(x_48, 2, x_46); -x_1 = x_48; +obj* x_42; obj* x_43; obj* x_44; obj* x_45; +x_42 = lean::string_iterator_next(x_0); +x_43 = lean::box(0); +x_44 = lean::box_uint32(x_10); +x_45 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_45, 0, x_44); +lean::cnstr_set(x_45, 1, x_42); +lean::cnstr_set(x_45, 2, x_43); +x_1 = x_45; goto lbl_2; } } } lbl_2: { -obj* x_49; obj* x_51; -x_49 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_49); -x_51 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_49, x_1); -if (lean::obj_tag(x_51) == 0) +obj* x_46; obj* x_48; +x_46 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_46); +x_48 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_46, x_1); +if (lean::obj_tag(x_48) == 0) { -obj* x_52; obj* x_54; obj* x_56; uint32 x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_66; -x_52 = lean::cnstr_get(x_51, 0); -lean::inc(x_52); -x_54 = lean::cnstr_get(x_51, 1); -lean::inc(x_54); -x_56 = lean::cnstr_get(x_51, 2); -lean::inc(x_56); -lean::dec(x_51); -x_59 = lean::unbox_uint32(x_52); -lean::dec(x_52); -x_61 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_parse__input__aux___main___spec__5(x_59, x_54); -x_62 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_56, x_61); -x_63 = l_lean_parser_parsec__t_try__mk__res___rarg(x_62); -x_64 = l_lean_parser_c__identifier___at_lean_ir_parse__input__aux___main___spec__4___closed__1; -lean::inc(x_64); -x_66 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_63, x_64); -return x_66; +obj* x_49; obj* x_51; obj* x_53; uint32 x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_63; +x_49 = lean::cnstr_get(x_48, 0); +lean::inc(x_49); +x_51 = lean::cnstr_get(x_48, 1); +lean::inc(x_51); +x_53 = lean::cnstr_get(x_48, 2); +lean::inc(x_53); +lean::dec(x_48); +x_56 = lean::unbox_uint32(x_49); +lean::dec(x_49); +x_58 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_parse__input__aux___main___spec__5(x_56, x_51); +x_59 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_53, x_58); +x_60 = l_lean_parser_parsec__t_try__mk__res___rarg(x_59); +x_61 = l_lean_parser_c__identifier___at_lean_ir_parse__input__aux___main___spec__4___closed__1; +lean::inc(x_61); +x_63 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_60, x_61); +return x_63; } else { -obj* x_67; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_77; obj* x_79; uint8 x_80; obj* x_81; obj* x_82; -x_67 = lean::cnstr_get(x_51, 0); +obj* x_64; obj* x_66; obj* x_67; obj* x_69; obj* x_71; obj* x_74; obj* x_76; uint8 x_77; obj* x_78; obj* x_79; +x_64 = lean::cnstr_get(x_48, 0); +lean::inc(x_64); +if (lean::is_shared(x_48)) { + lean::dec(x_48); + x_66 = lean::box(0); +} else { + lean::cnstr_release(x_48, 0); + x_66 = x_48; +} +x_67 = lean::cnstr_get(x_64, 0); lean::inc(x_67); -if (lean::is_shared(x_51)) { - lean::dec(x_51); - x_69 = lean::box(0); -} else { - lean::cnstr_release(x_51, 0); - x_69 = x_51; -} -x_70 = lean::cnstr_get(x_67, 0); -lean::inc(x_70); -x_72 = lean::cnstr_get(x_67, 1); -lean::inc(x_72); -x_74 = lean::cnstr_get(x_67, 3); +x_69 = lean::cnstr_get(x_64, 1); +lean::inc(x_69); +x_71 = lean::cnstr_get(x_64, 3); +lean::inc(x_71); +lean::dec(x_64); +x_74 = l_lean_parser_c__identifier___at_lean_ir_parse__input__aux___main___spec__4___closed__1; lean::inc(x_74); -lean::dec(x_67); -x_77 = l_lean_parser_c__identifier___at_lean_ir_parse__input__aux___main___spec__4___closed__1; -lean::inc(x_77); -x_79 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_79, 0, x_70); -lean::cnstr_set(x_79, 1, x_72); -lean::cnstr_set(x_79, 2, x_77); -lean::cnstr_set(x_79, 3, x_74); -x_80 = 0; -if (lean::is_scalar(x_69)) { - x_81 = lean::alloc_cnstr(1, 1, 1); +x_76 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_76, 0, x_67); +lean::cnstr_set(x_76, 1, x_69); +lean::cnstr_set(x_76, 2, x_74); +lean::cnstr_set(x_76, 3, x_71); +x_77 = 0; +if (lean::is_scalar(x_66)) { + x_78 = lean::alloc_cnstr(1, 1, 1); } else { - x_81 = x_69; + x_78 = x_66; } -lean::cnstr_set(x_81, 0, x_79); -lean::cnstr_set_scalar(x_81, sizeof(void*)*1, x_80); -x_82 = x_81; -return x_82; +lean::cnstr_set(x_78, 0, x_76); +lean::cnstr_set_scalar(x_78, sizeof(void*)*1, x_77); +x_79 = x_78; +return x_79; } } } @@ -721,7 +718,6 @@ lbl_13: if (lean::obj_tag(x_12) == 0) { lean::dec(x_8); -lean::dec(x_11); lean::dec(x_1); lean::dec(x_3); lean::dec(x_2); @@ -729,511 +725,510 @@ return x_12; } else { -obj* x_40; uint8 x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_47; -x_40 = lean::cnstr_get(x_12, 0); -lean::inc(x_40); -x_42 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); -if (x_42 == 0) +obj* x_39; uint8 x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_46; +x_39 = lean::cnstr_get(x_12, 0); +lean::inc(x_39); +x_41 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); +if (x_41 == 0) { -obj* x_50; obj* x_53; +obj* x_49; obj* x_52; lean::dec(x_12); -x_50 = l_list_repr___main___rarg___closed__2; +x_49 = l_list_repr___main___rarg___closed__2; lean::inc(x_3); -lean::inc(x_50); -x_53 = l_lean_ir_symbol(x_50, x_3); -if (lean::obj_tag(x_53) == 0) +lean::inc(x_49); +x_52 = l_lean_ir_symbol(x_49, x_3); +if (lean::obj_tag(x_52) == 0) { -obj* x_54; obj* x_56; obj* x_58; obj* x_59; -x_54 = lean::cnstr_get(x_53, 1); -lean::inc(x_54); -x_56 = lean::cnstr_get(x_53, 2); -lean::inc(x_56); -if (lean::is_shared(x_53)) { - lean::dec(x_53); - x_58 = lean::box(0); +obj* x_53; obj* x_55; obj* x_57; obj* x_58; +x_53 = lean::cnstr_get(x_52, 1); +lean::inc(x_53); +x_55 = lean::cnstr_get(x_52, 2); +lean::inc(x_55); +if (lean::is_shared(x_52)) { + lean::dec(x_52); + x_57 = lean::box(0); } else { - lean::cnstr_release(x_53, 0); - lean::cnstr_release(x_53, 1); - lean::cnstr_release(x_53, 2); - x_58 = x_53; + lean::cnstr_release(x_52, 0); + lean::cnstr_release(x_52, 1); + lean::cnstr_release(x_52, 2); + x_57 = x_52; } -x_59 = l_lean_parser_c__identifier___at_lean_ir_parse__input__aux___main___spec__4(x_54); -if (lean::obj_tag(x_59) == 0) +x_58 = l_lean_parser_c__identifier___at_lean_ir_parse__input__aux___main___spec__4(x_53); +if (lean::obj_tag(x_58) == 0) { -obj* x_60; obj* x_62; obj* x_64; obj* x_66; obj* x_67; -x_60 = lean::cnstr_get(x_59, 0); -lean::inc(x_60); -x_62 = lean::cnstr_get(x_59, 1); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_59, 2); -lean::inc(x_64); -if (lean::is_shared(x_59)) { - lean::dec(x_59); - x_66 = lean::box(0); +obj* x_59; obj* x_61; obj* x_63; obj* x_65; obj* x_66; +x_59 = lean::cnstr_get(x_58, 0); +lean::inc(x_59); +x_61 = lean::cnstr_get(x_58, 1); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_58, 2); +lean::inc(x_63); +if (lean::is_shared(x_58)) { + lean::dec(x_58); + x_65 = lean::box(0); } else { - lean::cnstr_release(x_59, 0); - lean::cnstr_release(x_59, 1); - lean::cnstr_release(x_59, 2); - x_66 = x_59; + lean::cnstr_release(x_58, 0); + lean::cnstr_release(x_58, 1); + lean::cnstr_release(x_58, 2); + x_65 = x_58; } -x_67 = l_lean_parser_monad__parsec_whitespace___at_lean_ir_symbol___spec__2(x_62); -if (lean::obj_tag(x_67) == 0) +x_66 = l_lean_parser_monad__parsec_whitespace___at_lean_ir_symbol___spec__2(x_61); +if (lean::obj_tag(x_66) == 0) { -obj* x_68; obj* x_70; obj* x_73; obj* x_75; obj* x_76; obj* x_77; -x_68 = lean::cnstr_get(x_67, 1); -lean::inc(x_68); -x_70 = lean::cnstr_get(x_67, 2); -lean::inc(x_70); -lean::dec(x_67); -x_73 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_73); -if (lean::is_scalar(x_58)) { - x_75 = lean::alloc_cnstr(0, 3, 0); +obj* x_67; obj* x_69; obj* x_72; obj* x_74; obj* x_75; obj* x_76; +x_67 = lean::cnstr_get(x_66, 1); +lean::inc(x_67); +x_69 = lean::cnstr_get(x_66, 2); +lean::inc(x_69); +lean::dec(x_66); +x_72 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_72); +if (lean::is_scalar(x_57)) { + x_74 = lean::alloc_cnstr(0, 3, 0); } else { - x_75 = x_58; + x_74 = x_57; } -lean::cnstr_set(x_75, 0, x_60); -lean::cnstr_set(x_75, 1, x_68); -lean::cnstr_set(x_75, 2, x_73); -x_76 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_70, x_75); -x_77 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_64, x_76); -if (lean::obj_tag(x_77) == 0) +lean::cnstr_set(x_74, 0, x_59); +lean::cnstr_set(x_74, 1, x_67); +lean::cnstr_set(x_74, 2, x_72); +x_75 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_69, x_74); +x_76 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_63, x_75); +if (lean::obj_tag(x_76) == 0) { -obj* x_78; obj* x_80; obj* x_82; obj* x_85; obj* x_87; -x_78 = lean::cnstr_get(x_77, 0); -lean::inc(x_78); -x_80 = lean::cnstr_get(x_77, 1); -lean::inc(x_80); -x_82 = lean::cnstr_get(x_77, 2); -lean::inc(x_82); +obj* x_77; obj* x_79; obj* x_81; obj* x_84; obj* x_86; +x_77 = lean::cnstr_get(x_76, 0); +lean::inc(x_77); +x_79 = lean::cnstr_get(x_76, 1); +lean::inc(x_79); +x_81 = lean::cnstr_get(x_76, 2); +lean::inc(x_81); +lean::dec(x_76); +x_84 = l_list_repr___main___rarg___closed__3; +lean::inc(x_84); +x_86 = l_lean_ir_symbol(x_84, x_79); +if (lean::obj_tag(x_86) == 0) +{ +obj* x_87; obj* x_89; obj* x_92; obj* x_94; obj* x_95; obj* x_96; obj* x_97; +x_87 = lean::cnstr_get(x_86, 1); +lean::inc(x_87); +x_89 = lean::cnstr_get(x_86, 2); +lean::inc(x_89); +lean::dec(x_86); +x_92 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_92, 0, x_77); +lean::inc(x_72); +if (lean::is_scalar(x_65)) { + x_94 = lean::alloc_cnstr(0, 3, 0); +} else { + x_94 = x_65; +} +lean::cnstr_set(x_94, 0, x_92); +lean::cnstr_set(x_94, 1, x_87); +lean::cnstr_set(x_94, 2, x_72); +x_95 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_89, x_94); +x_96 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_81, x_95); +x_97 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_96); +x_46 = x_97; +goto lbl_47; +} +else +{ +obj* x_100; uint8 x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; +lean::dec(x_65); lean::dec(x_77); -x_85 = l_list_repr___main___rarg___closed__3; -lean::inc(x_85); -x_87 = l_lean_ir_symbol(x_85, x_80); -if (lean::obj_tag(x_87) == 0) -{ -obj* x_88; obj* x_90; obj* x_93; obj* x_95; obj* x_96; obj* x_97; obj* x_98; -x_88 = lean::cnstr_get(x_87, 1); -lean::inc(x_88); -x_90 = lean::cnstr_get(x_87, 2); -lean::inc(x_90); -lean::dec(x_87); -x_93 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_93, 0, x_78); -lean::inc(x_73); -if (lean::is_scalar(x_66)) { - x_95 = lean::alloc_cnstr(0, 3, 0); +x_100 = lean::cnstr_get(x_86, 0); +lean::inc(x_100); +x_102 = lean::cnstr_get_scalar(x_86, sizeof(void*)*1); +if (lean::is_shared(x_86)) { + lean::dec(x_86); + x_103 = lean::box(0); } else { - x_95 = x_66; + lean::cnstr_release(x_86, 0); + x_103 = x_86; } -lean::cnstr_set(x_95, 0, x_93); -lean::cnstr_set(x_95, 1, x_88); -lean::cnstr_set(x_95, 2, x_73); -x_96 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_90, x_95); -x_97 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_82, x_96); -x_98 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_56, x_97); -x_47 = x_98; -goto lbl_48; -} -else -{ -obj* x_101; uint8 x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; -lean::dec(x_66); -lean::dec(x_78); -x_101 = lean::cnstr_get(x_87, 0); -lean::inc(x_101); -x_103 = lean::cnstr_get_scalar(x_87, sizeof(void*)*1); -if (lean::is_shared(x_87)) { - lean::dec(x_87); - x_104 = lean::box(0); +if (lean::is_scalar(x_103)) { + x_104 = lean::alloc_cnstr(1, 1, 1); } else { - lean::cnstr_release(x_87, 0); - x_104 = x_87; + x_104 = x_103; } -if (lean::is_scalar(x_104)) { - x_105 = lean::alloc_cnstr(1, 1, 1); -} else { - x_105 = x_104; -} -lean::cnstr_set(x_105, 0, x_101); -lean::cnstr_set_scalar(x_105, sizeof(void*)*1, x_103); -x_106 = x_105; -x_107 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_82, x_106); -x_108 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_56, x_107); -x_47 = x_108; -goto lbl_48; +lean::cnstr_set(x_104, 0, x_100); +lean::cnstr_set_scalar(x_104, sizeof(void*)*1, x_102); +x_105 = x_104; +x_106 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_81, x_105); +x_107 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_106); +x_46 = x_107; +goto lbl_47; } } else { -obj* x_110; uint8 x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; -lean::dec(x_66); -x_110 = lean::cnstr_get(x_77, 0); -lean::inc(x_110); -x_112 = lean::cnstr_get_scalar(x_77, sizeof(void*)*1); -if (lean::is_shared(x_77)) { - lean::dec(x_77); - x_113 = lean::box(0); +obj* x_109; uint8 x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; +lean::dec(x_65); +x_109 = lean::cnstr_get(x_76, 0); +lean::inc(x_109); +x_111 = lean::cnstr_get_scalar(x_76, sizeof(void*)*1); +if (lean::is_shared(x_76)) { + lean::dec(x_76); + x_112 = lean::box(0); } else { - lean::cnstr_release(x_77, 0); - x_113 = x_77; + lean::cnstr_release(x_76, 0); + x_112 = x_76; } -if (lean::is_scalar(x_113)) { - x_114 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_112)) { + x_113 = lean::alloc_cnstr(1, 1, 1); } else { - x_114 = x_113; + x_113 = x_112; } -lean::cnstr_set(x_114, 0, x_110); -lean::cnstr_set_scalar(x_114, sizeof(void*)*1, x_112); -x_115 = x_114; -x_116 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_56, x_115); -x_47 = x_116; -goto lbl_48; +lean::cnstr_set(x_113, 0, x_109); +lean::cnstr_set_scalar(x_113, sizeof(void*)*1, x_111); +x_114 = x_113; +x_115 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_114); +x_46 = x_115; +goto lbl_47; } } else { -obj* x_119; uint8 x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; -lean::dec(x_60); -lean::dec(x_66); -x_119 = lean::cnstr_get(x_67, 0); -lean::inc(x_119); -x_121 = lean::cnstr_get_scalar(x_67, sizeof(void*)*1); -if (lean::is_shared(x_67)) { - lean::dec(x_67); - x_122 = lean::box(0); +obj* x_118; uint8 x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; +lean::dec(x_59); +lean::dec(x_65); +x_118 = lean::cnstr_get(x_66, 0); +lean::inc(x_118); +x_120 = lean::cnstr_get_scalar(x_66, sizeof(void*)*1); +if (lean::is_shared(x_66)) { + lean::dec(x_66); + x_121 = lean::box(0); } else { - lean::cnstr_release(x_67, 0); - x_122 = x_67; + lean::cnstr_release(x_66, 0); + x_121 = x_66; } -if (lean::is_scalar(x_122)) { - x_123 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_121)) { + x_122 = lean::alloc_cnstr(1, 1, 1); } else { - x_123 = x_122; + x_122 = x_121; } -lean::cnstr_set(x_123, 0, x_119); -lean::cnstr_set_scalar(x_123, sizeof(void*)*1, x_121); -x_124 = x_123; -x_125 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_64, x_124); -if (lean::obj_tag(x_125) == 0) +lean::cnstr_set(x_122, 0, x_118); +lean::cnstr_set_scalar(x_122, sizeof(void*)*1, x_120); +x_123 = x_122; +x_124 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_63, x_123); +if (lean::obj_tag(x_124) == 0) { -obj* x_126; obj* x_128; obj* x_130; obj* x_133; obj* x_135; -x_126 = lean::cnstr_get(x_125, 0); -lean::inc(x_126); -x_128 = lean::cnstr_get(x_125, 1); -lean::inc(x_128); -x_130 = lean::cnstr_get(x_125, 2); -lean::inc(x_130); +obj* x_125; obj* x_127; obj* x_129; obj* x_132; obj* x_134; +x_125 = lean::cnstr_get(x_124, 0); +lean::inc(x_125); +x_127 = lean::cnstr_get(x_124, 1); +lean::inc(x_127); +x_129 = lean::cnstr_get(x_124, 2); +lean::inc(x_129); +lean::dec(x_124); +x_132 = l_list_repr___main___rarg___closed__3; +lean::inc(x_132); +x_134 = l_lean_ir_symbol(x_132, x_127); +if (lean::obj_tag(x_134) == 0) +{ +obj* x_135; obj* x_137; obj* x_140; obj* x_141; obj* x_143; obj* x_144; obj* x_145; obj* x_146; +x_135 = lean::cnstr_get(x_134, 1); +lean::inc(x_135); +x_137 = lean::cnstr_get(x_134, 2); +lean::inc(x_137); +lean::dec(x_134); +x_140 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_140, 0, x_125); +x_141 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_141); +if (lean::is_scalar(x_57)) { + x_143 = lean::alloc_cnstr(0, 3, 0); +} else { + x_143 = x_57; +} +lean::cnstr_set(x_143, 0, x_140); +lean::cnstr_set(x_143, 1, x_135); +lean::cnstr_set(x_143, 2, x_141); +x_144 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_137, x_143); +x_145 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_129, x_144); +x_146 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_145); +x_46 = x_146; +goto lbl_47; +} +else +{ +obj* x_149; uint8 x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; lean::dec(x_125); -x_133 = l_list_repr___main___rarg___closed__3; -lean::inc(x_133); -x_135 = l_lean_ir_symbol(x_133, x_128); -if (lean::obj_tag(x_135) == 0) -{ -obj* x_136; obj* x_138; obj* x_141; obj* x_142; obj* x_144; obj* x_145; obj* x_146; obj* x_147; -x_136 = lean::cnstr_get(x_135, 1); -lean::inc(x_136); -x_138 = lean::cnstr_get(x_135, 2); -lean::inc(x_138); -lean::dec(x_135); -x_141 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_141, 0, x_126); -x_142 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_142); -if (lean::is_scalar(x_58)) { - x_144 = lean::alloc_cnstr(0, 3, 0); +lean::dec(x_57); +x_149 = lean::cnstr_get(x_134, 0); +lean::inc(x_149); +x_151 = lean::cnstr_get_scalar(x_134, sizeof(void*)*1); +if (lean::is_shared(x_134)) { + lean::dec(x_134); + x_152 = lean::box(0); } else { - x_144 = x_58; + lean::cnstr_release(x_134, 0); + x_152 = x_134; } -lean::cnstr_set(x_144, 0, x_141); -lean::cnstr_set(x_144, 1, x_136); -lean::cnstr_set(x_144, 2, x_142); -x_145 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_138, x_144); -x_146 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_130, x_145); -x_147 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_56, x_146); -x_47 = x_147; -goto lbl_48; -} -else -{ -obj* x_150; uint8 x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; -lean::dec(x_126); -lean::dec(x_58); -x_150 = lean::cnstr_get(x_135, 0); -lean::inc(x_150); -x_152 = lean::cnstr_get_scalar(x_135, sizeof(void*)*1); -if (lean::is_shared(x_135)) { - lean::dec(x_135); - x_153 = lean::box(0); +if (lean::is_scalar(x_152)) { + x_153 = lean::alloc_cnstr(1, 1, 1); } else { - lean::cnstr_release(x_135, 0); - x_153 = x_135; + x_153 = x_152; } -if (lean::is_scalar(x_153)) { - x_154 = lean::alloc_cnstr(1, 1, 1); -} else { - x_154 = x_153; -} -lean::cnstr_set(x_154, 0, x_150); -lean::cnstr_set_scalar(x_154, sizeof(void*)*1, x_152); -x_155 = x_154; -x_156 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_130, x_155); -x_157 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_56, x_156); -x_47 = x_157; -goto lbl_48; +lean::cnstr_set(x_153, 0, x_149); +lean::cnstr_set_scalar(x_153, sizeof(void*)*1, x_151); +x_154 = x_153; +x_155 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_129, x_154); +x_156 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_155); +x_46 = x_156; +goto lbl_47; } } else { -obj* x_159; uint8 x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; -lean::dec(x_58); -x_159 = lean::cnstr_get(x_125, 0); -lean::inc(x_159); -x_161 = lean::cnstr_get_scalar(x_125, sizeof(void*)*1); -if (lean::is_shared(x_125)) { - lean::dec(x_125); - x_162 = lean::box(0); +obj* x_158; uint8 x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; +lean::dec(x_57); +x_158 = lean::cnstr_get(x_124, 0); +lean::inc(x_158); +x_160 = lean::cnstr_get_scalar(x_124, sizeof(void*)*1); +if (lean::is_shared(x_124)) { + lean::dec(x_124); + x_161 = lean::box(0); } else { - lean::cnstr_release(x_125, 0); - x_162 = x_125; + lean::cnstr_release(x_124, 0); + x_161 = x_124; } -if (lean::is_scalar(x_162)) { - x_163 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_161)) { + x_162 = lean::alloc_cnstr(1, 1, 1); } else { - x_163 = x_162; + x_162 = x_161; } -lean::cnstr_set(x_163, 0, x_159); -lean::cnstr_set_scalar(x_163, sizeof(void*)*1, x_161); -x_164 = x_163; -x_165 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_56, x_164); -x_47 = x_165; -goto lbl_48; +lean::cnstr_set(x_162, 0, x_158); +lean::cnstr_set_scalar(x_162, sizeof(void*)*1, x_160); +x_163 = x_162; +x_164 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_163); +x_46 = x_164; +goto lbl_47; } } } else { -obj* x_167; uint8 x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; -lean::dec(x_58); -x_167 = lean::cnstr_get(x_59, 0); -lean::inc(x_167); -x_169 = lean::cnstr_get_scalar(x_59, sizeof(void*)*1); -if (lean::is_shared(x_59)) { - lean::dec(x_59); - x_170 = lean::box(0); +obj* x_166; uint8 x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; +lean::dec(x_57); +x_166 = lean::cnstr_get(x_58, 0); +lean::inc(x_166); +x_168 = lean::cnstr_get_scalar(x_58, sizeof(void*)*1); +if (lean::is_shared(x_58)) { + lean::dec(x_58); + x_169 = lean::box(0); } else { - lean::cnstr_release(x_59, 0); - x_170 = x_59; + lean::cnstr_release(x_58, 0); + x_169 = x_58; } -if (lean::is_scalar(x_170)) { - x_171 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_169)) { + x_170 = lean::alloc_cnstr(1, 1, 1); } else { - x_171 = x_170; + x_170 = x_169; } -lean::cnstr_set(x_171, 0, x_167); -lean::cnstr_set_scalar(x_171, sizeof(void*)*1, x_169); -x_172 = x_171; -x_173 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_56, x_172); -x_47 = x_173; -goto lbl_48; +lean::cnstr_set(x_170, 0, x_166); +lean::cnstr_set_scalar(x_170, sizeof(void*)*1, x_168); +x_171 = x_170; +x_172 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_171); +x_46 = x_172; +goto lbl_47; } } else { -obj* x_174; uint8 x_176; obj* x_177; obj* x_178; obj* x_179; -x_174 = lean::cnstr_get(x_53, 0); -lean::inc(x_174); -x_176 = lean::cnstr_get_scalar(x_53, sizeof(void*)*1); -if (lean::is_shared(x_53)) { - lean::dec(x_53); - x_177 = lean::box(0); +obj* x_173; uint8 x_175; obj* x_176; obj* x_177; obj* x_178; +x_173 = lean::cnstr_get(x_52, 0); +lean::inc(x_173); +x_175 = lean::cnstr_get_scalar(x_52, sizeof(void*)*1); +if (lean::is_shared(x_52)) { + lean::dec(x_52); + x_176 = lean::box(0); } else { - lean::cnstr_release(x_53, 0); - x_177 = x_53; + lean::cnstr_release(x_52, 0); + x_176 = x_52; } -if (lean::is_scalar(x_177)) { - x_178 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_176)) { + x_177 = lean::alloc_cnstr(1, 1, 1); } else { - x_178 = x_177; + x_177 = x_176; } -lean::cnstr_set(x_178, 0, x_174); -lean::cnstr_set_scalar(x_178, sizeof(void*)*1, x_176); -x_179 = x_178; -x_47 = x_179; -goto lbl_48; +lean::cnstr_set(x_177, 0, x_173); +lean::cnstr_set_scalar(x_177, sizeof(void*)*1, x_175); +x_178 = x_177; +x_46 = x_178; +goto lbl_47; } } else { lean::dec(x_8); -lean::dec(x_40); -lean::dec(x_11); +lean::dec(x_39); lean::dec(x_1); lean::dec(x_3); lean::dec(x_2); return x_12; } -lbl_46: +lbl_45: { -obj* x_186; -x_186 = l_lean_ir_parse__decl(x_44); -if (lean::obj_tag(x_186) == 0) +obj* x_184; +x_184 = l_lean_ir_parse__decl(x_43); +if (lean::obj_tag(x_184) == 0) { -obj* x_187; obj* x_189; obj* x_191; -x_187 = lean::cnstr_get(x_186, 0); +obj* x_185; obj* x_187; obj* x_189; +x_185 = lean::cnstr_get(x_184, 0); +lean::inc(x_185); +x_187 = lean::cnstr_get(x_184, 1); lean::inc(x_187); -x_189 = lean::cnstr_get(x_186, 1); +x_189 = lean::cnstr_get(x_184, 2); lean::inc(x_189); -x_191 = lean::cnstr_get(x_186, 2); -lean::inc(x_191); -lean::dec(x_186); -if (lean::obj_tag(x_43) == 0) +lean::dec(x_184); +if (lean::obj_tag(x_42) == 0) { -obj* x_194; obj* x_195; obj* x_196; obj* x_197; obj* x_198; -x_194 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_194, 0, x_187); -lean::cnstr_set(x_194, 1, x_1); -x_195 = l_lean_ir_parse__input__aux___main(x_8, x_194, x_2, x_189); -x_196 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_191, x_195); -x_197 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_45, x_196); -x_198 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_40, x_197); -return x_198; +obj* x_192; obj* x_193; obj* x_194; obj* x_195; obj* x_196; +x_192 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_192, 0, x_185); +lean::cnstr_set(x_192, 1, x_1); +x_193 = l_lean_ir_parse__input__aux___main(x_8, x_192, x_2, x_187); +x_194 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_189, x_193); +x_195 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_44, x_194); +x_196 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_195); +return x_196; } else { -obj* x_199; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; obj* x_209; -x_199 = lean::cnstr_get(x_43, 0); -lean::inc(x_199); -lean::dec(x_43); -lean::inc(x_187); -x_203 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_203, 0, x_187); -lean::cnstr_set(x_203, 1, x_1); -x_204 = l_lean_ir_decl_name(x_187); -x_205 = l_rbnode_insert___at_lean_ir_parse__input__aux___main___spec__2(x_2, x_204, x_199); -x_206 = l_lean_ir_parse__input__aux___main(x_8, x_203, x_205, x_189); -x_207 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_191, x_206); -x_208 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_45, x_207); -x_209 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_40, x_208); -return x_209; +obj* x_197; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; +x_197 = lean::cnstr_get(x_42, 0); +lean::inc(x_197); +lean::dec(x_42); +lean::inc(x_185); +x_201 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_201, 0, x_185); +lean::cnstr_set(x_201, 1, x_1); +x_202 = l_lean_ir_decl_name(x_185); +x_203 = l_rbnode_insert___at_lean_ir_parse__input__aux___main___spec__2(x_2, x_202, x_197); +x_204 = l_lean_ir_parse__input__aux___main(x_8, x_201, x_203, x_187); +x_205 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_189, x_204); +x_206 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_44, x_205); +x_207 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_206); +return x_207; } } else { -obj* x_214; uint8 x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; +obj* x_212; uint8 x_214; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; lean::dec(x_8); lean::dec(x_1); lean::dec(x_2); -lean::dec(x_43); -x_214 = lean::cnstr_get(x_186, 0); -lean::inc(x_214); -x_216 = lean::cnstr_get_scalar(x_186, sizeof(void*)*1); -if (lean::is_shared(x_186)) { - lean::dec(x_186); - x_217 = lean::box(0); +lean::dec(x_42); +x_212 = lean::cnstr_get(x_184, 0); +lean::inc(x_212); +x_214 = lean::cnstr_get_scalar(x_184, sizeof(void*)*1); +if (lean::is_shared(x_184)) { + lean::dec(x_184); + x_215 = lean::box(0); } else { - lean::cnstr_release(x_186, 0); - x_217 = x_186; + lean::cnstr_release(x_184, 0); + x_215 = x_184; } -if (lean::is_scalar(x_217)) { - x_218 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_215)) { + x_216 = lean::alloc_cnstr(1, 1, 1); } else { - x_218 = x_217; + x_216 = x_215; } -lean::cnstr_set(x_218, 0, x_214); -lean::cnstr_set_scalar(x_218, sizeof(void*)*1, x_216); -x_219 = x_218; -x_220 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_45, x_219); -x_221 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_40, x_220); -return x_221; +lean::cnstr_set(x_216, 0, x_212); +lean::cnstr_set_scalar(x_216, sizeof(void*)*1, x_214); +x_217 = x_216; +x_218 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_44, x_217); +x_219 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_218); +return x_219; } } -lbl_48: +lbl_47: { -obj* x_222; -if (lean::obj_tag(x_47) == 0) +obj* x_220; +if (lean::obj_tag(x_46) == 0) { lean::dec(x_3); -x_222 = x_11; -goto lbl_223; +x_220 = x_11; +goto lbl_221; } else { -obj* x_225; uint8 x_227; -x_225 = lean::cnstr_get(x_47, 0); -lean::inc(x_225); -x_227 = lean::cnstr_get_scalar(x_47, sizeof(void*)*1); -if (x_227 == 0) +obj* x_223; uint8 x_225; +x_223 = lean::cnstr_get(x_46, 0); +lean::inc(x_223); +x_225 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); +if (x_225 == 0) { -obj* x_229; obj* x_232; obj* x_234; obj* x_235; -lean::dec(x_47); -x_229 = lean::cnstr_get(x_225, 2); -lean::inc(x_229); -lean::dec(x_225); -x_232 = l_mjoin___rarg___closed__1; -lean::inc(x_232); -x_234 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_234, 0, x_229); -lean::closure_set(x_234, 1, x_232); -x_235 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_235, 0, x_234); -x_43 = x_11; -x_44 = x_3; -x_45 = x_235; -goto lbl_46; +obj* x_227; obj* x_230; obj* x_232; obj* x_233; +lean::dec(x_46); +x_227 = lean::cnstr_get(x_223, 2); +lean::inc(x_227); +lean::dec(x_223); +x_230 = l_mjoin___rarg___closed__1; +lean::inc(x_230); +x_232 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_232, 0, x_227); +lean::closure_set(x_232, 1, x_230); +x_233 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_233, 0, x_232); +x_42 = x_11; +x_43 = x_3; +x_44 = x_233; +goto lbl_45; } else { -lean::dec(x_225); +lean::dec(x_223); lean::dec(x_3); -x_222 = x_11; -goto lbl_223; +x_220 = x_11; +goto lbl_221; } } -lbl_223: +lbl_221: { -lean::dec(x_222); -if (lean::obj_tag(x_47) == 0) +lean::dec(x_220); +if (lean::obj_tag(x_46) == 0) { -obj* x_239; obj* x_241; obj* x_243; -x_239 = lean::cnstr_get(x_47, 0); +obj* x_237; obj* x_239; obj* x_241; +x_237 = lean::cnstr_get(x_46, 0); +lean::inc(x_237); +x_239 = lean::cnstr_get(x_46, 1); lean::inc(x_239); -x_241 = lean::cnstr_get(x_47, 1); +x_241 = lean::cnstr_get(x_46, 2); lean::inc(x_241); -x_243 = lean::cnstr_get(x_47, 2); -lean::inc(x_243); -lean::dec(x_47); +lean::dec(x_46); +x_42 = x_237; x_43 = x_239; x_44 = x_241; -x_45 = x_243; -goto lbl_46; +goto lbl_45; } else { -obj* x_249; uint8 x_251; obj* x_252; obj* x_253; obj* x_254; obj* x_255; +obj* x_247; uint8 x_249; obj* x_250; obj* x_251; obj* x_252; obj* x_253; lean::dec(x_8); lean::dec(x_1); lean::dec(x_2); -x_249 = lean::cnstr_get(x_47, 0); -lean::inc(x_249); -x_251 = lean::cnstr_get_scalar(x_47, sizeof(void*)*1); -if (lean::is_shared(x_47)) { - lean::dec(x_47); - x_252 = lean::box(0); +x_247 = lean::cnstr_get(x_46, 0); +lean::inc(x_247); +x_249 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); +if (lean::is_shared(x_46)) { + lean::dec(x_46); + x_250 = lean::box(0); } else { - lean::cnstr_release(x_47, 0); - x_252 = x_47; + lean::cnstr_release(x_46, 0); + x_250 = x_46; } -if (lean::is_scalar(x_252)) { - x_253 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_250)) { + x_251 = lean::alloc_cnstr(1, 1, 1); } else { - x_253 = x_252; + x_251 = x_250; } -lean::cnstr_set(x_253, 0, x_249); -lean::cnstr_set_scalar(x_253, sizeof(void*)*1, x_251); -x_254 = x_253; -x_255 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_40, x_254); -return x_255; +lean::cnstr_set(x_251, 0, x_247); +lean::cnstr_set_scalar(x_251, sizeof(void*)*1, x_249); +x_252 = x_251; +x_253 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_252); +return x_253; } } } @@ -1242,19 +1237,19 @@ return x_255; } else { -obj* x_257; obj* x_258; obj* x_259; obj* x_261; +obj* x_255; obj* x_256; obj* x_257; obj* x_259; lean::dec(x_0); -x_257 = l_list_reverse___rarg(x_1); -x_258 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_258, 0, x_257); -lean::cnstr_set(x_258, 1, x_2); -x_259 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_259); -x_261 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_261, 0, x_258); -lean::cnstr_set(x_261, 1, x_3); -lean::cnstr_set(x_261, 2, x_259); -return x_261; +x_255 = l_list_reverse___rarg(x_1); +x_256 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_256, 0, x_255); +lean::cnstr_set(x_256, 1, x_2); +x_257 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_257); +x_259 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_259, 0, x_256); +lean::cnstr_set(x_259, 1, x_3); +lean::cnstr_set(x_259, 2, x_257); +return x_259; } } } diff --git a/src/boot/init/lean/ir/parser.cpp b/src/boot/init/lean/ir/parser.cpp index 4c51a891ab..1666ca866f 100644 --- a/src/boot/init/lean/ir/parser.cpp +++ b/src/boot/init/lean/ir/parser.cpp @@ -706,7 +706,7 @@ return x_74; } else { -obj* x_76; obj* x_78; obj* x_80; obj* x_81; obj* x_82; obj* x_85; obj* x_86; obj* x_88; obj* x_89; +obj* x_76; obj* x_78; obj* x_80; obj* x_81; obj* x_82; obj* x_84; obj* x_85; obj* x_87; obj* x_88; lean::dec(x_15); x_76 = l_char_quote__core(x_45); lean::inc(x_5); @@ -715,99 +715,98 @@ lean::dec(x_76); x_80 = lean::string_append(x_78, x_5); x_81 = lean::box(0); x_82 = l_mjoin___rarg___closed__1; -lean::inc(x_81); lean::inc(x_82); -x_85 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_80, x_82, x_81, x_81, x_11); -x_86 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_86); -x_88 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_86, x_85); -x_89 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_13, x_88); -if (lean::obj_tag(x_89) == 0) +x_84 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_80, x_82, x_81, x_81, x_11); +x_85 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_85); +x_87 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_85, x_84); +x_88 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_13, x_87); +if (lean::obj_tag(x_88) == 0) { -obj* x_90; obj* x_92; obj* x_95; obj* x_96; obj* x_97; obj* x_98; -x_90 = lean::cnstr_get(x_89, 1); -lean::inc(x_90); -x_92 = lean::cnstr_get(x_89, 2); -lean::inc(x_92); -lean::dec(x_89); -x_95 = l_lean_parser_monad__parsec_whitespace___at_lean_ir_symbol___spec__2(x_90); -x_96 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_92, x_95); -x_97 = l_lean_parser_parsec__t_try__mk__res___rarg(x_96); -x_98 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_97, x_9); -return x_98; +obj* x_89; obj* x_91; obj* x_94; obj* x_95; obj* x_96; obj* x_97; +x_89 = lean::cnstr_get(x_88, 1); +lean::inc(x_89); +x_91 = lean::cnstr_get(x_88, 2); +lean::inc(x_91); +lean::dec(x_88); +x_94 = l_lean_parser_monad__parsec_whitespace___at_lean_ir_symbol___spec__2(x_89); +x_95 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_91, x_94); +x_96 = l_lean_parser_parsec__t_try__mk__res___rarg(x_95); +x_97 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_96, x_9); +return x_97; } else { -obj* x_99; obj* x_101; obj* x_102; obj* x_104; obj* x_106; obj* x_109; uint8 x_110; obj* x_111; obj* x_112; -x_99 = lean::cnstr_get(x_89, 0); -lean::inc(x_99); -if (lean::is_shared(x_89)) { - lean::dec(x_89); - x_101 = lean::box(0); +obj* x_98; obj* x_100; obj* x_101; obj* x_103; obj* x_105; obj* x_108; uint8 x_109; obj* x_110; obj* x_111; +x_98 = lean::cnstr_get(x_88, 0); +lean::inc(x_98); +if (lean::is_shared(x_88)) { + lean::dec(x_88); + x_100 = lean::box(0); } else { - lean::cnstr_release(x_89, 0); - x_101 = x_89; + lean::cnstr_release(x_88, 0); + x_100 = x_88; } -x_102 = lean::cnstr_get(x_99, 0); -lean::inc(x_102); -x_104 = lean::cnstr_get(x_99, 1); -lean::inc(x_104); -x_106 = lean::cnstr_get(x_99, 3); -lean::inc(x_106); -lean::dec(x_99); -x_109 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_109, 0, x_102); -lean::cnstr_set(x_109, 1, x_104); -lean::cnstr_set(x_109, 2, x_9); -lean::cnstr_set(x_109, 3, x_106); -x_110 = 0; -if (lean::is_scalar(x_101)) { - x_111 = lean::alloc_cnstr(1, 1, 1); +x_101 = lean::cnstr_get(x_98, 0); +lean::inc(x_101); +x_103 = lean::cnstr_get(x_98, 1); +lean::inc(x_103); +x_105 = lean::cnstr_get(x_98, 3); +lean::inc(x_105); +lean::dec(x_98); +x_108 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_108, 0, x_101); +lean::cnstr_set(x_108, 1, x_103); +lean::cnstr_set(x_108, 2, x_9); +lean::cnstr_set(x_108, 3, x_105); +x_109 = 0; +if (lean::is_scalar(x_100)) { + x_110 = lean::alloc_cnstr(1, 1, 1); } else { - x_111 = x_101; + x_110 = x_100; } -lean::cnstr_set(x_111, 0, x_109); -lean::cnstr_set_scalar(x_111, sizeof(void*)*1, x_110); -x_112 = x_111; -return x_112; +lean::cnstr_set(x_110, 0, x_108); +lean::cnstr_set_scalar(x_110, sizeof(void*)*1, x_109); +x_111 = x_110; +return x_111; } } } } else { -obj* x_113; obj* x_115; obj* x_116; obj* x_118; obj* x_120; obj* x_123; uint8 x_124; obj* x_125; obj* x_126; -x_113 = lean::cnstr_get(x_10, 0); -lean::inc(x_113); +obj* x_112; obj* x_114; obj* x_115; obj* x_117; obj* x_119; obj* x_122; uint8 x_123; obj* x_124; obj* x_125; +x_112 = lean::cnstr_get(x_10, 0); +lean::inc(x_112); if (lean::is_shared(x_10)) { lean::dec(x_10); - x_115 = lean::box(0); + x_114 = lean::box(0); } else { lean::cnstr_release(x_10, 0); - x_115 = x_10; + x_114 = x_10; } -x_116 = lean::cnstr_get(x_113, 0); -lean::inc(x_116); -x_118 = lean::cnstr_get(x_113, 1); -lean::inc(x_118); -x_120 = lean::cnstr_get(x_113, 3); -lean::inc(x_120); -lean::dec(x_113); -x_123 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_123, 0, x_116); -lean::cnstr_set(x_123, 1, x_118); -lean::cnstr_set(x_123, 2, x_9); -lean::cnstr_set(x_123, 3, x_120); -x_124 = 0; -if (lean::is_scalar(x_115)) { - x_125 = lean::alloc_cnstr(1, 1, 1); +x_115 = lean::cnstr_get(x_112, 0); +lean::inc(x_115); +x_117 = lean::cnstr_get(x_112, 1); +lean::inc(x_117); +x_119 = lean::cnstr_get(x_112, 3); +lean::inc(x_119); +lean::dec(x_112); +x_122 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_122, 0, x_115); +lean::cnstr_set(x_122, 1, x_117); +lean::cnstr_set(x_122, 2, x_9); +lean::cnstr_set(x_122, 3, x_119); +x_123 = 0; +if (lean::is_scalar(x_114)) { + x_124 = lean::alloc_cnstr(1, 1, 1); } else { - x_125 = x_115; + x_124 = x_114; } -lean::cnstr_set(x_125, 0, x_123); -lean::cnstr_set_scalar(x_125, sizeof(void*)*1, x_124); -x_126 = x_125; -return x_126; +lean::cnstr_set(x_124, 0, x_122); +lean::cnstr_set_scalar(x_124, sizeof(void*)*1, x_123); +x_125 = x_124; +return x_125; } } } @@ -816,124 +815,123 @@ _start: { if (lean::obj_tag(x_1) == 0) { -obj* x_3; obj* x_4; obj* x_7; +obj* x_3; obj* x_4; obj* x_6; x_3 = lean::box(0); x_4 = l_mjoin___rarg___closed__1; -lean::inc(x_3); lean::inc(x_4); -x_7 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_0, x_4, x_3, x_3, x_2); -return x_7; +x_6 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_0, x_4, x_3, x_3, x_2); +return x_6; } else { -obj* x_8; obj* x_10; obj* x_13; obj* x_15; obj* x_19; -x_8 = lean::cnstr_get(x_1, 0); -lean::inc(x_8); -x_10 = lean::cnstr_get(x_1, 1); -lean::inc(x_10); +obj* x_7; obj* x_9; obj* x_12; obj* x_14; obj* x_18; +x_7 = lean::cnstr_get(x_1, 0); +lean::inc(x_7); +x_9 = lean::cnstr_get(x_1, 1); +lean::inc(x_9); lean::dec(x_1); -x_13 = lean::cnstr_get(x_8, 0); -lean::inc(x_13); -x_15 = lean::cnstr_get(x_8, 1); -lean::inc(x_15); -lean::dec(x_8); +x_12 = lean::cnstr_get(x_7, 0); +lean::inc(x_12); +x_14 = lean::cnstr_get(x_7, 1); +lean::inc(x_14); +lean::dec(x_7); lean::inc(x_2); -x_19 = l_lean_ir_keyword(x_13, x_2); -if (lean::obj_tag(x_19) == 0) +x_18 = l_lean_ir_keyword(x_12, x_2); +if (lean::obj_tag(x_18) == 0) { -obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_27; obj* x_28; -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -x_22 = lean::cnstr_get(x_19, 2); -lean::inc(x_22); -if (lean::is_shared(x_19)) { - lean::dec(x_19); - x_24 = lean::box(0); +obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_27; +x_19 = lean::cnstr_get(x_18, 1); +lean::inc(x_19); +x_21 = lean::cnstr_get(x_18, 2); +lean::inc(x_21); +if (lean::is_shared(x_18)) { + lean::dec(x_18); + x_23 = lean::box(0); } else { - lean::cnstr_release(x_19, 0); - lean::cnstr_release(x_19, 1); - lean::cnstr_release(x_19, 2); - x_24 = x_19; + lean::cnstr_release(x_18, 0); + lean::cnstr_release(x_18, 1); + lean::cnstr_release(x_18, 2); + x_23 = x_18; } -x_25 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_25); -if (lean::is_scalar(x_24)) { - x_27 = lean::alloc_cnstr(0, 3, 0); +x_24 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_24); +if (lean::is_scalar(x_23)) { + x_26 = lean::alloc_cnstr(0, 3, 0); } else { - x_27 = x_24; + x_26 = x_23; } -lean::cnstr_set(x_27, 0, x_15); -lean::cnstr_set(x_27, 1, x_20); -lean::cnstr_set(x_27, 2, x_25); -x_28 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_22, x_27); -if (lean::obj_tag(x_28) == 0) +lean::cnstr_set(x_26, 0, x_14); +lean::cnstr_set(x_26, 1, x_19); +lean::cnstr_set(x_26, 2, x_24); +x_27 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_26); +if (lean::obj_tag(x_27) == 0) { lean::dec(x_0); -lean::dec(x_10); +lean::dec(x_9); lean::dec(x_2); -return x_28; +return x_27; } else { -obj* x_32; uint8 x_34; -x_32 = lean::cnstr_get(x_28, 0); -lean::inc(x_32); -x_34 = lean::cnstr_get_scalar(x_28, sizeof(void*)*1); -if (x_34 == 0) +obj* x_31; uint8 x_33; +x_31 = lean::cnstr_get(x_27, 0); +lean::inc(x_31); +x_33 = lean::cnstr_get_scalar(x_27, sizeof(void*)*1); +if (x_33 == 0) { -obj* x_36; obj* x_37; -lean::dec(x_28); -x_36 = l_lean_ir_parse__key2val___main___rarg(x_0, x_10, x_2); -x_37 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_32, x_36); -return x_37; +obj* x_35; obj* x_36; +lean::dec(x_27); +x_35 = l_lean_ir_parse__key2val___main___rarg(x_0, x_9, x_2); +x_36 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_31, x_35); +return x_36; } else { lean::dec(x_0); -lean::dec(x_10); +lean::dec(x_9); lean::dec(x_2); -lean::dec(x_32); -return x_28; +lean::dec(x_31); +return x_27; } } } else { -obj* x_43; uint8 x_45; obj* x_46; -lean::dec(x_15); -x_43 = lean::cnstr_get(x_19, 0); -lean::inc(x_43); -x_45 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); -if (lean::is_shared(x_19)) { - lean::dec(x_19); - x_46 = lean::box(0); +obj* x_42; uint8 x_44; obj* x_45; +lean::dec(x_14); +x_42 = lean::cnstr_get(x_18, 0); +lean::inc(x_42); +x_44 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); +if (lean::is_shared(x_18)) { + lean::dec(x_18); + x_45 = lean::box(0); } else { - lean::cnstr_release(x_19, 0); - x_46 = x_19; + lean::cnstr_release(x_18, 0); + x_45 = x_18; } -if (x_45 == 0) +if (x_44 == 0) { -obj* x_48; obj* x_49; -lean::dec(x_46); -x_48 = l_lean_ir_parse__key2val___main___rarg(x_0, x_10, x_2); -x_49 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_43, x_48); -return x_49; +obj* x_47; obj* x_48; +lean::dec(x_45); +x_47 = l_lean_ir_parse__key2val___main___rarg(x_0, x_9, x_2); +x_48 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_42, x_47); +return x_48; } else { -obj* x_53; obj* x_54; +obj* x_52; obj* x_53; lean::dec(x_0); -lean::dec(x_10); +lean::dec(x_9); lean::dec(x_2); -if (lean::is_scalar(x_46)) { - x_53 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_45)) { + x_52 = lean::alloc_cnstr(1, 1, 1); } else { - x_53 = x_46; + x_52 = x_45; } -lean::cnstr_set(x_53, 0, x_43); -lean::cnstr_set_scalar(x_53, sizeof(void*)*1, x_45); -x_54 = x_53; -return x_54; +lean::cnstr_set(x_52, 0, x_42); +lean::cnstr_set_scalar(x_52, sizeof(void*)*1, x_44); +x_53 = x_52; +return x_53; } } } @@ -1642,54 +1640,52 @@ uint8 x_2; x_2 = lean::string_iterator_has_next(x_1); if (x_2 == 0) { -obj* x_3; obj* x_4; obj* x_5; obj* x_9; obj* x_10; obj* x_12; +obj* x_3; obj* x_4; obj* x_5; obj* x_8; obj* x_9; obj* x_11; x_3 = lean::box(0); x_4 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_5 = l_mjoin___rarg___closed__1; -lean::inc(x_3); lean::inc(x_5); lean::inc(x_4); -x_9 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_4, x_5, x_3, x_3, x_1); -x_10 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_10); -x_12 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_10, x_9); -return x_12; +x_8 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_4, x_5, x_3, x_3, x_1); +x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_9); +x_11 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_9, x_8); +return x_11; } else { -uint32 x_13; uint8 x_14; -x_13 = lean::string_iterator_curr(x_1); -x_14 = x_13 == x_0; -if (x_14 == 0) +uint32 x_12; uint8 x_13; +x_12 = lean::string_iterator_curr(x_1); +x_13 = x_12 == x_0; +if (x_13 == 0) { -obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_25; obj* x_26; obj* x_28; -x_15 = l_char_quote__core(x_13); -x_16 = l_char_has__repr___closed__1; -lean::inc(x_16); -x_18 = lean::string_append(x_16, x_15); -lean::dec(x_15); -x_20 = lean::string_append(x_18, x_16); -x_21 = lean::box(0); -x_22 = l_mjoin___rarg___closed__1; +obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_26; +x_14 = l_char_quote__core(x_12); +x_15 = l_char_has__repr___closed__1; +lean::inc(x_15); +x_17 = lean::string_append(x_15, x_14); +lean::dec(x_14); +x_19 = lean::string_append(x_17, x_15); +x_20 = lean::box(0); +x_21 = l_mjoin___rarg___closed__1; lean::inc(x_21); -lean::inc(x_22); -x_25 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_20, x_22, x_21, x_21, x_1); -x_26 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_26); -x_28 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_26, x_25); -return x_28; +x_23 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_19, x_21, x_20, x_20, x_1); +x_24 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_24); +x_26 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_24, x_23); +return x_26; } else { -obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_29 = lean::string_iterator_next(x_1); -x_30 = lean::box(0); -x_31 = lean::box_uint32(x_13); -x_32 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_29); -lean::cnstr_set(x_32, 2, x_30); -return x_32; +obj* x_27; obj* x_28; obj* x_29; obj* x_30; +x_27 = lean::string_iterator_next(x_1); +x_28 = lean::box(0); +x_29 = lean::box_uint32(x_12); +x_30 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_27); +lean::cnstr_set(x_30, 2, x_28); +return x_30; } } } @@ -1701,54 +1697,52 @@ uint8 x_1; x_1 = lean::string_iterator_has_next(x_0); if (x_1 == 0) { -obj* x_2; obj* x_3; obj* x_4; obj* x_8; obj* x_9; obj* x_11; +obj* x_2; obj* x_3; obj* x_4; obj* x_7; obj* x_8; obj* x_10; x_2 = lean::box(0); x_3 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_4 = l_mjoin___rarg___closed__1; -lean::inc(x_2); lean::inc(x_4); lean::inc(x_3); -x_8 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_3, x_4, x_2, x_2, x_0); -x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_9); -x_11 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_9, x_8); -return x_11; +x_7 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_3, x_4, x_2, x_2, x_0); +x_8 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_8); +x_10 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_8, x_7); +return x_10; } else { -uint32 x_12; uint8 x_13; -x_12 = lean::string_iterator_curr(x_0); -x_13 = l_true_decidable; -if (x_13 == 0) +uint32 x_11; uint8 x_12; +x_11 = lean::string_iterator_curr(x_0); +x_12 = l_true_decidable; +if (x_12 == 0) { -obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_24; obj* x_25; obj* x_27; -x_14 = l_char_quote__core(x_12); -x_15 = l_char_has__repr___closed__1; -lean::inc(x_15); -x_17 = lean::string_append(x_15, x_14); -lean::dec(x_14); -x_19 = lean::string_append(x_17, x_15); -x_20 = lean::box(0); -x_21 = l_mjoin___rarg___closed__1; +obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_25; +x_13 = l_char_quote__core(x_11); +x_14 = l_char_has__repr___closed__1; +lean::inc(x_14); +x_16 = lean::string_append(x_14, x_13); +lean::dec(x_13); +x_18 = lean::string_append(x_16, x_14); +x_19 = lean::box(0); +x_20 = l_mjoin___rarg___closed__1; lean::inc(x_20); -lean::inc(x_21); -x_24 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_19, x_21, x_20, x_20, x_0); -x_25 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_25); -x_27 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_25, x_24); -return x_27; +x_22 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_18, x_20, x_19, x_19, x_0); +x_23 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_23); +x_25 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_22); +return x_25; } else { -obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_28 = lean::string_iterator_next(x_0); -x_29 = lean::box(0); -x_30 = lean::box_uint32(x_12); -x_31 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_28); -lean::cnstr_set(x_31, 2, x_29); -return x_31; +obj* x_26; obj* x_27; obj* x_28; obj* x_29; +x_26 = lean::string_iterator_next(x_0); +x_27 = lean::box(0); +x_28 = lean::box_uint32(x_11); +x_29 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_26); +lean::cnstr_set(x_29, 2, x_27); +return x_29; } } } @@ -1782,54 +1776,52 @@ uint8 x_1; x_1 = lean::string_iterator_has_next(x_0); if (x_1 == 0) { -obj* x_2; obj* x_3; obj* x_4; obj* x_8; obj* x_9; obj* x_11; +obj* x_2; obj* x_3; obj* x_4; obj* x_7; obj* x_8; obj* x_10; x_2 = lean::box(0); x_3 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_4 = l_mjoin___rarg___closed__1; -lean::inc(x_2); lean::inc(x_4); lean::inc(x_3); -x_8 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_3, x_4, x_2, x_2, x_0); -x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_9); -x_11 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_9, x_8); -return x_11; +x_7 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_3, x_4, x_2, x_2, x_0); +x_8 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_8); +x_10 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_8, x_7); +return x_10; } else { -uint32 x_12; uint8 x_13; -x_12 = lean::string_iterator_curr(x_0); -x_13 = l_char_is__digit(x_12); -if (x_13 == 0) +uint32 x_11; uint8 x_12; +x_11 = lean::string_iterator_curr(x_0); +x_12 = l_char_is__digit(x_11); +if (x_12 == 0) { -obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_24; obj* x_25; obj* x_27; -x_14 = l_char_quote__core(x_12); -x_15 = l_char_has__repr___closed__1; -lean::inc(x_15); -x_17 = lean::string_append(x_15, x_14); -lean::dec(x_14); -x_19 = lean::string_append(x_17, x_15); -x_20 = lean::box(0); -x_21 = l_mjoin___rarg___closed__1; +obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_25; +x_13 = l_char_quote__core(x_11); +x_14 = l_char_has__repr___closed__1; +lean::inc(x_14); +x_16 = lean::string_append(x_14, x_13); +lean::dec(x_13); +x_18 = lean::string_append(x_16, x_14); +x_19 = lean::box(0); +x_20 = l_mjoin___rarg___closed__1; lean::inc(x_20); -lean::inc(x_21); -x_24 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_19, x_21, x_20, x_20, x_0); -x_25 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_25); -x_27 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_25, x_24); -return x_27; +x_22 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_18, x_20, x_19, x_19, x_0); +x_23 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_23); +x_25 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_22); +return x_25; } else { -obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_28 = lean::string_iterator_next(x_0); -x_29 = lean::box(0); -x_30 = lean::box_uint32(x_12); -x_31 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_28); -lean::cnstr_set(x_31, 2, x_29); -return x_31; +obj* x_26; obj* x_27; obj* x_28; obj* x_29; +x_26 = lean::string_iterator_next(x_0); +x_27 = lean::box(0); +x_28 = lean::box_uint32(x_11); +x_29 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_26); +lean::cnstr_set(x_29, 2, x_27); +return x_29; } } } @@ -1943,104 +1935,100 @@ lean::dec(x_1); x_45 = lean::string_iterator_has_next(x_0); if (x_45 == 0) { -obj* x_46; obj* x_47; obj* x_48; obj* x_53; +obj* x_46; obj* x_47; obj* x_48; obj* x_52; x_46 = lean::box(0); x_47 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_48 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_46); lean::inc(x_48); lean::inc(x_47); -x_53 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_47, x_48, x_46, x_46, x_0); -x_43 = x_53; +x_52 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_47, x_48, x_46, x_46, x_0); +x_43 = x_52; goto lbl_44; } else { -uint32 x_54; uint32 x_55; uint8 x_56; uint8 x_58; -x_54 = lean::string_iterator_curr(x_0); -x_55 = 97; -x_58 = x_55 <= x_54; -if (x_58 == 0) +uint32 x_53; uint32 x_54; uint8 x_55; uint8 x_57; +x_53 = lean::string_iterator_curr(x_0); +x_54 = 97; +x_57 = x_54 <= x_53; +if (x_57 == 0) { -obj* x_59; obj* x_60; obj* x_62; obj* x_64; obj* x_65; obj* x_66; obj* x_70; -x_59 = l_char_quote__core(x_54); -x_60 = l_char_has__repr___closed__1; -lean::inc(x_60); -x_62 = lean::string_append(x_60, x_59); -lean::dec(x_59); -x_64 = lean::string_append(x_62, x_60); -x_65 = lean::box(0); -x_66 = l_mjoin___rarg___closed__1; +obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_68; +x_58 = l_char_quote__core(x_53); +x_59 = l_char_has__repr___closed__1; +lean::inc(x_59); +x_61 = lean::string_append(x_59, x_58); +lean::dec(x_58); +x_63 = lean::string_append(x_61, x_59); +x_64 = lean::box(0); +x_65 = l_mjoin___rarg___closed__1; lean::inc(x_0); lean::inc(x_65); -lean::inc(x_66); -x_70 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_64, x_66, x_65, x_65, x_0); -x_43 = x_70; +x_68 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_63, x_65, x_64, x_64, x_0); +x_43 = x_68; goto lbl_44; } else { -uint8 x_71; -x_71 = 1; -x_56 = x_71; -goto lbl_57; +uint8 x_69; +x_69 = 1; +x_55 = x_69; +goto lbl_56; } -lbl_57: +lbl_56: { -uint32 x_72; uint8 x_73; -x_72 = 102; -x_73 = x_54 <= x_72; -if (x_73 == 0) +uint32 x_70; uint8 x_71; +x_70 = 102; +x_71 = x_53 <= x_70; +if (x_71 == 0) { -obj* x_74; obj* x_75; obj* x_77; obj* x_79; obj* x_80; obj* x_81; obj* x_85; -x_74 = l_char_quote__core(x_54); -x_75 = l_char_has__repr___closed__1; -lean::inc(x_75); -x_77 = lean::string_append(x_75, x_74); -lean::dec(x_74); -x_79 = lean::string_append(x_77, x_75); -x_80 = lean::box(0); -x_81 = l_mjoin___rarg___closed__1; +obj* x_72; obj* x_73; obj* x_75; obj* x_77; obj* x_78; obj* x_79; obj* x_82; +x_72 = l_char_quote__core(x_53); +x_73 = l_char_has__repr___closed__1; +lean::inc(x_73); +x_75 = lean::string_append(x_73, x_72); +lean::dec(x_72); +x_77 = lean::string_append(x_75, x_73); +x_78 = lean::box(0); +x_79 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_80); -lean::inc(x_81); -x_85 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_79, x_81, x_80, x_80, x_0); -x_43 = x_85; +lean::inc(x_79); +x_82 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_77, x_79, x_78, x_78, x_0); +x_43 = x_82; goto lbl_44; } else { -if (x_56 == 0) +if (x_55 == 0) { -obj* x_86; obj* x_87; obj* x_89; obj* x_91; obj* x_92; obj* x_93; obj* x_97; -x_86 = l_char_quote__core(x_54); -x_87 = l_char_has__repr___closed__1; -lean::inc(x_87); -x_89 = lean::string_append(x_87, x_86); -lean::dec(x_86); -x_91 = lean::string_append(x_89, x_87); -x_92 = lean::box(0); -x_93 = l_mjoin___rarg___closed__1; +obj* x_83; obj* x_84; obj* x_86; obj* x_88; obj* x_89; obj* x_90; obj* x_93; +x_83 = l_char_quote__core(x_53); +x_84 = l_char_has__repr___closed__1; +lean::inc(x_84); +x_86 = lean::string_append(x_84, x_83); +lean::dec(x_83); +x_88 = lean::string_append(x_86, x_84); +x_89 = lean::box(0); +x_90 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_92); -lean::inc(x_93); -x_97 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_91, x_93, x_92, x_92, x_0); -x_43 = x_97; +lean::inc(x_90); +x_93 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_88, x_90, x_89, x_89, x_0); +x_43 = x_93; goto lbl_44; } else { -obj* x_99; obj* x_100; obj* x_101; obj* x_102; +obj* x_95; obj* x_96; obj* x_97; obj* x_98; lean::inc(x_0); -x_99 = lean::string_iterator_next(x_0); -x_100 = lean::box(0); -x_101 = lean::box_uint32(x_54); -x_102 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_99); -lean::cnstr_set(x_102, 2, x_100); -x_43 = x_102; +x_95 = lean::string_iterator_next(x_0); +x_96 = lean::box(0); +x_97 = lean::box_uint32(x_53); +x_98 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_98, 0, x_97); +lean::cnstr_set(x_98, 1, x_95); +lean::cnstr_set(x_98, 2, x_96); +x_43 = x_98; goto lbl_44; } } @@ -2048,307 +2036,303 @@ goto lbl_44; } lbl_44: { -obj* x_103; obj* x_105; -x_103 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_103); -x_105 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_103, x_43); -if (lean::obj_tag(x_105) == 0) +obj* x_99; obj* x_101; +x_99 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_99); +x_101 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_99, x_43); +if (lean::obj_tag(x_101) == 0) { -obj* x_106; obj* x_108; obj* x_110; obj* x_112; uint32 x_113; obj* x_115; obj* x_116; obj* x_117; obj* x_119; obj* x_120; obj* x_124; obj* x_125; -x_106 = lean::cnstr_get(x_105, 0); +obj* x_102; obj* x_104; obj* x_106; obj* x_108; uint32 x_109; obj* x_111; obj* x_112; obj* x_113; obj* x_115; obj* x_116; obj* x_120; obj* x_121; +x_102 = lean::cnstr_get(x_101, 0); +lean::inc(x_102); +x_104 = lean::cnstr_get(x_101, 1); +lean::inc(x_104); +x_106 = lean::cnstr_get(x_101, 2); lean::inc(x_106); -x_108 = lean::cnstr_get(x_105, 1); -lean::inc(x_108); -x_110 = lean::cnstr_get(x_105, 2); -lean::inc(x_110); -if (lean::is_shared(x_105)) { - lean::dec(x_105); - x_112 = lean::box(0); +if (lean::is_shared(x_101)) { + lean::dec(x_101); + x_108 = lean::box(0); } else { - lean::cnstr_release(x_105, 0); - lean::cnstr_release(x_105, 1); - lean::cnstr_release(x_105, 2); - x_112 = x_105; + lean::cnstr_release(x_101, 0); + lean::cnstr_release(x_101, 1); + lean::cnstr_release(x_101, 2); + x_108 = x_101; } -x_113 = lean::unbox_uint32(x_106); -lean::dec(x_106); -x_115 = lean::uint32_to_nat(x_113); -x_116 = l_lean_parser_parse__hex__digit___rarg___lambda__3___closed__1; -x_117 = lean::nat_sub(x_115, x_116); +x_109 = lean::unbox_uint32(x_102); +lean::dec(x_102); +x_111 = lean::uint32_to_nat(x_109); +x_112 = l_lean_parser_parse__hex__digit___rarg___lambda__3___closed__1; +x_113 = lean::nat_sub(x_111, x_112); +lean::dec(x_111); +x_115 = lean::mk_nat_obj(10u); +x_116 = lean::nat_add(x_115, x_113); +lean::dec(x_113); lean::dec(x_115); -x_119 = lean::mk_nat_obj(10u); -x_120 = lean::nat_add(x_119, x_117); -lean::dec(x_117); -lean::dec(x_119); -lean::inc(x_103); -if (lean::is_scalar(x_112)) { - x_124 = lean::alloc_cnstr(0, 3, 0); +lean::inc(x_99); +if (lean::is_scalar(x_108)) { + x_120 = lean::alloc_cnstr(0, 3, 0); } else { - x_124 = x_112; + x_120 = x_108; } -lean::cnstr_set(x_124, 0, x_120); -lean::cnstr_set(x_124, 1, x_108); -lean::cnstr_set(x_124, 2, x_103); -x_125 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_110, x_124); -if (lean::obj_tag(x_125) == 0) +lean::cnstr_set(x_120, 0, x_116); +lean::cnstr_set(x_120, 1, x_104); +lean::cnstr_set(x_120, 2, x_99); +x_121 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_106, x_120); +if (lean::obj_tag(x_121) == 0) { -obj* x_127; obj* x_128; obj* x_130; +obj* x_123; obj* x_124; obj* x_126; lean::dec(x_0); -x_127 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_125); -x_128 = l_lean_parser_parse__hex__digit___at_lean_ir_parse__literal___spec__7___closed__1; -lean::inc(x_128); -x_130 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_127, x_128); -return x_130; +x_123 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_121); +x_124 = l_lean_parser_parse__hex__digit___at_lean_ir_parse__literal___spec__7___closed__1; +lean::inc(x_124); +x_126 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_123, x_124); +return x_126; } else { -obj* x_131; uint8 x_133; -x_131 = lean::cnstr_get(x_125, 0); -lean::inc(x_131); -x_133 = lean::cnstr_get_scalar(x_125, sizeof(void*)*1); -x_38 = x_125; -x_39 = x_131; -x_40 = x_133; +obj* x_127; uint8 x_129; +x_127 = lean::cnstr_get(x_121, 0); +lean::inc(x_127); +x_129 = lean::cnstr_get_scalar(x_121, sizeof(void*)*1); +x_38 = x_121; +x_39 = x_127; +x_40 = x_129; goto lbl_41; } } else { -obj* x_134; uint8 x_136; obj* x_137; obj* x_139; obj* x_140; -x_134 = lean::cnstr_get(x_105, 0); -lean::inc(x_134); -x_136 = lean::cnstr_get_scalar(x_105, sizeof(void*)*1); -if (lean::is_shared(x_105)) { - lean::dec(x_105); - x_137 = lean::box(0); +obj* x_130; uint8 x_132; obj* x_133; obj* x_135; obj* x_136; +x_130 = lean::cnstr_get(x_101, 0); +lean::inc(x_130); +x_132 = lean::cnstr_get_scalar(x_101, sizeof(void*)*1); +if (lean::is_shared(x_101)) { + lean::dec(x_101); + x_133 = lean::box(0); } else { - lean::cnstr_release(x_105, 0); - x_137 = x_105; + lean::cnstr_release(x_101, 0); + x_133 = x_101; } -lean::inc(x_134); -if (lean::is_scalar(x_137)) { - x_139 = lean::alloc_cnstr(1, 1, 1); +lean::inc(x_130); +if (lean::is_scalar(x_133)) { + x_135 = lean::alloc_cnstr(1, 1, 1); } else { - x_139 = x_137; + x_135 = x_133; } -lean::cnstr_set(x_139, 0, x_134); -lean::cnstr_set_scalar(x_139, sizeof(void*)*1, x_136); -x_140 = x_139; -x_38 = x_140; -x_39 = x_134; -x_40 = x_136; +lean::cnstr_set(x_135, 0, x_130); +lean::cnstr_set_scalar(x_135, sizeof(void*)*1, x_132); +x_136 = x_135; +x_38 = x_136; +x_39 = x_130; +x_40 = x_132; goto lbl_41; } } } else { -obj* x_143; obj* x_145; +obj* x_139; obj* x_141; lean::dec(x_0); lean::dec(x_2); -x_143 = l_lean_parser_parse__hex__digit___at_lean_ir_parse__literal___spec__7___closed__1; -lean::inc(x_143); -x_145 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_1, x_143); -return x_145; +x_139 = l_lean_parser_parse__hex__digit___at_lean_ir_parse__literal___spec__7___closed__1; +lean::inc(x_139); +x_141 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_1, x_139); +return x_141; } lbl_41: { if (x_40 == 0) { -obj* x_147; uint8 x_149; +obj* x_143; uint8 x_145; lean::dec(x_38); -x_149 = lean::string_iterator_has_next(x_0); -if (x_149 == 0) +x_145 = lean::string_iterator_has_next(x_0); +if (x_145 == 0) { -obj* x_150; obj* x_151; obj* x_152; obj* x_156; -x_150 = lean::box(0); -x_151 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; -x_152 = l_mjoin___rarg___closed__1; -lean::inc(x_150); -lean::inc(x_152); -lean::inc(x_151); -x_156 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_151, x_152, x_150, x_150, x_0); -x_147 = x_156; -goto lbl_148; +obj* x_146; obj* x_147; obj* x_148; obj* x_151; +x_146 = lean::box(0); +x_147 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; +x_148 = l_mjoin___rarg___closed__1; +lean::inc(x_148); +lean::inc(x_147); +x_151 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_147, x_148, x_146, x_146, x_0); +x_143 = x_151; +goto lbl_144; } else { -uint32 x_157; uint32 x_158; uint8 x_159; uint8 x_161; -x_157 = lean::string_iterator_curr(x_0); -x_158 = 65; -x_161 = x_158 <= x_157; -if (x_161 == 0) +uint32 x_152; uint32 x_153; uint8 x_154; uint8 x_156; +x_152 = lean::string_iterator_curr(x_0); +x_153 = 65; +x_156 = x_153 <= x_152; +if (x_156 == 0) { -obj* x_162; obj* x_163; obj* x_165; obj* x_167; obj* x_168; obj* x_169; obj* x_172; -x_162 = l_char_quote__core(x_157); -x_163 = l_char_has__repr___closed__1; -lean::inc(x_163); -x_165 = lean::string_append(x_163, x_162); -lean::dec(x_162); -x_167 = lean::string_append(x_165, x_163); -x_168 = lean::box(0); -x_169 = l_mjoin___rarg___closed__1; -lean::inc(x_168); -lean::inc(x_169); -x_172 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_167, x_169, x_168, x_168, x_0); -x_147 = x_172; -goto lbl_148; +obj* x_157; obj* x_158; obj* x_160; obj* x_162; obj* x_163; obj* x_164; obj* x_166; +x_157 = l_char_quote__core(x_152); +x_158 = l_char_has__repr___closed__1; +lean::inc(x_158); +x_160 = lean::string_append(x_158, x_157); +lean::dec(x_157); +x_162 = lean::string_append(x_160, x_158); +x_163 = lean::box(0); +x_164 = l_mjoin___rarg___closed__1; +lean::inc(x_164); +x_166 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_162, x_164, x_163, x_163, x_0); +x_143 = x_166; +goto lbl_144; } else { -uint8 x_173; -x_173 = 1; -x_159 = x_173; -goto lbl_160; +uint8 x_167; +x_167 = 1; +x_154 = x_167; +goto lbl_155; } -lbl_160: +lbl_155: { -uint32 x_174; uint8 x_175; -x_174 = 70; -x_175 = x_157 <= x_174; -if (x_175 == 0) +uint32 x_168; uint8 x_169; +x_168 = 70; +x_169 = x_152 <= x_168; +if (x_169 == 0) { -obj* x_176; obj* x_177; obj* x_179; obj* x_181; obj* x_182; obj* x_183; obj* x_186; -x_176 = l_char_quote__core(x_157); -x_177 = l_char_has__repr___closed__1; +obj* x_170; obj* x_171; obj* x_173; obj* x_175; obj* x_176; obj* x_177; obj* x_179; +x_170 = l_char_quote__core(x_152); +x_171 = l_char_has__repr___closed__1; +lean::inc(x_171); +x_173 = lean::string_append(x_171, x_170); +lean::dec(x_170); +x_175 = lean::string_append(x_173, x_171); +x_176 = lean::box(0); +x_177 = l_mjoin___rarg___closed__1; lean::inc(x_177); -x_179 = lean::string_append(x_177, x_176); -lean::dec(x_176); -x_181 = lean::string_append(x_179, x_177); -x_182 = lean::box(0); -x_183 = l_mjoin___rarg___closed__1; -lean::inc(x_182); -lean::inc(x_183); -x_186 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_181, x_183, x_182, x_182, x_0); -x_147 = x_186; -goto lbl_148; +x_179 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_175, x_177, x_176, x_176, x_0); +x_143 = x_179; +goto lbl_144; } else { -if (x_159 == 0) +if (x_154 == 0) { -obj* x_187; obj* x_188; obj* x_190; obj* x_192; obj* x_193; obj* x_194; obj* x_197; -x_187 = l_char_quote__core(x_157); -x_188 = l_char_has__repr___closed__1; -lean::inc(x_188); -x_190 = lean::string_append(x_188, x_187); -lean::dec(x_187); -x_192 = lean::string_append(x_190, x_188); -x_193 = lean::box(0); -x_194 = l_mjoin___rarg___closed__1; -lean::inc(x_193); +obj* x_180; obj* x_181; obj* x_183; obj* x_185; obj* x_186; obj* x_187; obj* x_189; +x_180 = l_char_quote__core(x_152); +x_181 = l_char_has__repr___closed__1; +lean::inc(x_181); +x_183 = lean::string_append(x_181, x_180); +lean::dec(x_180); +x_185 = lean::string_append(x_183, x_181); +x_186 = lean::box(0); +x_187 = l_mjoin___rarg___closed__1; +lean::inc(x_187); +x_189 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_185, x_187, x_186, x_186, x_0); +x_143 = x_189; +goto lbl_144; +} +else +{ +obj* x_190; obj* x_191; obj* x_192; obj* x_193; +x_190 = lean::string_iterator_next(x_0); +x_191 = lean::box(0); +x_192 = lean::box_uint32(x_152); +x_193 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_193, 0, x_192); +lean::cnstr_set(x_193, 1, x_190); +lean::cnstr_set(x_193, 2, x_191); +x_143 = x_193; +goto lbl_144; +} +} +} +} +lbl_144: +{ +obj* x_194; obj* x_196; +x_194 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_194); -x_197 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_192, x_194, x_193, x_193, x_0); -x_147 = x_197; -goto lbl_148; +x_196 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_194, x_143); +if (lean::obj_tag(x_196) == 0) +{ +obj* x_197; obj* x_199; obj* x_201; obj* x_203; uint32 x_204; obj* x_206; obj* x_207; obj* x_208; obj* x_210; obj* x_211; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_221; +x_197 = lean::cnstr_get(x_196, 0); +lean::inc(x_197); +x_199 = lean::cnstr_get(x_196, 1); +lean::inc(x_199); +x_201 = lean::cnstr_get(x_196, 2); +lean::inc(x_201); +if (lean::is_shared(x_196)) { + lean::dec(x_196); + x_203 = lean::box(0); +} else { + lean::cnstr_release(x_196, 0); + lean::cnstr_release(x_196, 1); + lean::cnstr_release(x_196, 2); + x_203 = x_196; +} +x_204 = lean::unbox_uint32(x_197); +lean::dec(x_197); +x_206 = lean::uint32_to_nat(x_204); +x_207 = l_lean_parser_parse__hex__digit___rarg___lambda__5___closed__1; +x_208 = lean::nat_sub(x_206, x_207); +lean::dec(x_206); +x_210 = lean::mk_nat_obj(10u); +x_211 = lean::nat_add(x_210, x_208); +lean::dec(x_208); +lean::dec(x_210); +lean::inc(x_194); +if (lean::is_scalar(x_203)) { + x_215 = lean::alloc_cnstr(0, 3, 0); +} else { + x_215 = x_203; +} +lean::cnstr_set(x_215, 0, x_211); +lean::cnstr_set(x_215, 1, x_199); +lean::cnstr_set(x_215, 2, x_194); +x_216 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_201, x_215); +x_217 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_216); +x_218 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_217); +x_219 = l_lean_parser_parse__hex__digit___at_lean_ir_parse__literal___spec__7___closed__1; +lean::inc(x_219); +x_221 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_218, x_219); +return x_221; } else { -obj* x_198; obj* x_199; obj* x_200; obj* x_201; -x_198 = lean::string_iterator_next(x_0); -x_199 = lean::box(0); -x_200 = lean::box_uint32(x_157); -x_201 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_201, 0, x_200); -lean::cnstr_set(x_201, 1, x_198); -lean::cnstr_set(x_201, 2, x_199); -x_147 = x_201; -goto lbl_148; -} -} -} -} -lbl_148: -{ -obj* x_202; obj* x_204; -x_202 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_202); -x_204 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_202, x_147); -if (lean::obj_tag(x_204) == 0) -{ -obj* x_205; obj* x_207; obj* x_209; obj* x_211; uint32 x_212; obj* x_214; obj* x_215; obj* x_216; obj* x_218; obj* x_219; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_229; -x_205 = lean::cnstr_get(x_204, 0); -lean::inc(x_205); -x_207 = lean::cnstr_get(x_204, 1); -lean::inc(x_207); -x_209 = lean::cnstr_get(x_204, 2); -lean::inc(x_209); -if (lean::is_shared(x_204)) { - lean::dec(x_204); - x_211 = lean::box(0); +obj* x_222; uint8 x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; obj* x_230; obj* x_232; +x_222 = lean::cnstr_get(x_196, 0); +lean::inc(x_222); +x_224 = lean::cnstr_get_scalar(x_196, sizeof(void*)*1); +if (lean::is_shared(x_196)) { + lean::dec(x_196); + x_225 = lean::box(0); } else { - lean::cnstr_release(x_204, 0); - lean::cnstr_release(x_204, 1); - lean::cnstr_release(x_204, 2); - x_211 = x_204; + lean::cnstr_release(x_196, 0); + x_225 = x_196; } -x_212 = lean::unbox_uint32(x_205); -lean::dec(x_205); -x_214 = lean::uint32_to_nat(x_212); -x_215 = l_lean_parser_parse__hex__digit___rarg___lambda__5___closed__1; -x_216 = lean::nat_sub(x_214, x_215); -lean::dec(x_214); -x_218 = lean::mk_nat_obj(10u); -x_219 = lean::nat_add(x_218, x_216); -lean::dec(x_216); -lean::dec(x_218); -lean::inc(x_202); -if (lean::is_scalar(x_211)) { - x_223 = lean::alloc_cnstr(0, 3, 0); +if (lean::is_scalar(x_225)) { + x_226 = lean::alloc_cnstr(1, 1, 1); } else { - x_223 = x_211; + x_226 = x_225; } -lean::cnstr_set(x_223, 0, x_219); -lean::cnstr_set(x_223, 1, x_207); -lean::cnstr_set(x_223, 2, x_202); -x_224 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_209, x_223); -x_225 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_224); -x_226 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_225); -x_227 = l_lean_parser_parse__hex__digit___at_lean_ir_parse__literal___spec__7___closed__1; -lean::inc(x_227); -x_229 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_226, x_227); -return x_229; -} -else -{ -obj* x_230; uint8 x_232; obj* x_233; obj* x_234; obj* x_235; obj* x_236; obj* x_237; obj* x_238; obj* x_240; -x_230 = lean::cnstr_get(x_204, 0); +lean::cnstr_set(x_226, 0, x_222); +lean::cnstr_set_scalar(x_226, sizeof(void*)*1, x_224); +x_227 = x_226; +x_228 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_227); +x_229 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_228); +x_230 = l_lean_parser_parse__hex__digit___at_lean_ir_parse__literal___spec__7___closed__1; lean::inc(x_230); -x_232 = lean::cnstr_get_scalar(x_204, sizeof(void*)*1); -if (lean::is_shared(x_204)) { - lean::dec(x_204); - x_233 = lean::box(0); -} else { - lean::cnstr_release(x_204, 0); - x_233 = x_204; -} -if (lean::is_scalar(x_233)) { - x_234 = lean::alloc_cnstr(1, 1, 1); -} else { - x_234 = x_233; -} -lean::cnstr_set(x_234, 0, x_230); -lean::cnstr_set_scalar(x_234, sizeof(void*)*1, x_232); -x_235 = x_234; -x_236 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_235); -x_237 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_236); -x_238 = l_lean_parser_parse__hex__digit___at_lean_ir_parse__literal___spec__7___closed__1; -lean::inc(x_238); -x_240 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_237, x_238); -return x_240; +x_232 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_229, x_230); +return x_232; } } } else { -obj* x_243; obj* x_244; obj* x_246; -lean::dec(x_39); +obj* x_235; obj* x_236; obj* x_238; lean::dec(x_0); -x_243 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_38); -x_244 = l_lean_parser_parse__hex__digit___at_lean_ir_parse__literal___spec__7___closed__1; -lean::inc(x_244); -x_246 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_243, x_244); -return x_246; +lean::dec(x_39); +x_235 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_38); +x_236 = l_lean_parser_parse__hex__digit___at_lean_ir_parse__literal___spec__7___closed__1; +lean::inc(x_236); +x_238 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_235, x_236); +return x_238; } } } @@ -3382,128 +3366,126 @@ uint8 x_1; x_1 = lean::string_iterator_has_next(x_0); if (x_1 == 0) { -obj* x_2; obj* x_3; obj* x_4; obj* x_8; obj* x_9; obj* x_11; +obj* x_2; obj* x_3; obj* x_4; obj* x_7; obj* x_8; obj* x_10; x_2 = lean::box(0); x_3 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_4 = l_mjoin___rarg___closed__1; -lean::inc(x_2); lean::inc(x_4); lean::inc(x_3); -x_8 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_3, x_4, x_2, x_2, x_0); -x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_9); -x_11 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_9, x_8); -if (lean::obj_tag(x_11) == 0) +x_7 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_3, x_4, x_2, x_2, x_0); +x_8 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_8); +x_10 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_8, x_7); +if (lean::obj_tag(x_10) == 0) { -obj* x_12; obj* x_14; obj* x_16; uint32 x_19; obj* x_21; obj* x_22; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -x_16 = lean::cnstr_get(x_11, 2); -lean::inc(x_16); +obj* x_11; obj* x_13; obj* x_15; uint32 x_18; obj* x_20; obj* x_21; +x_11 = lean::cnstr_get(x_10, 0); +lean::inc(x_11); +x_13 = lean::cnstr_get(x_10, 1); +lean::inc(x_13); +x_15 = lean::cnstr_get(x_10, 2); +lean::inc(x_15); +lean::dec(x_10); +x_18 = lean::unbox_uint32(x_11); lean::dec(x_11); -x_19 = lean::unbox_uint32(x_12); -lean::dec(x_12); -x_21 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_parse__literal___spec__11(x_19, x_14); -x_22 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_21); -return x_22; +x_20 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_parse__literal___spec__11(x_18, x_13); +x_21 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_20); +return x_21; } else { -obj* x_23; uint8 x_25; obj* x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_11, 0); -lean::inc(x_23); -x_25 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (lean::is_shared(x_11)) { - lean::dec(x_11); - x_26 = lean::box(0); +obj* x_22; uint8 x_24; obj* x_25; obj* x_26; obj* x_27; +x_22 = lean::cnstr_get(x_10, 0); +lean::inc(x_22); +x_24 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); +if (lean::is_shared(x_10)) { + lean::dec(x_10); + x_25 = lean::box(0); } else { - lean::cnstr_release(x_11, 0); - x_26 = x_11; + lean::cnstr_release(x_10, 0); + x_25 = x_10; } -if (lean::is_scalar(x_26)) { - x_27 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_25)) { + x_26 = lean::alloc_cnstr(1, 1, 1); } else { - x_27 = x_26; + x_26 = x_25; } -lean::cnstr_set(x_27, 0, x_23); -lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); -x_28 = x_27; -return x_28; +lean::cnstr_set(x_26, 0, x_22); +lean::cnstr_set_scalar(x_26, sizeof(void*)*1, x_24); +x_27 = x_26; +return x_27; } } else { -uint32 x_29; uint8 x_30; -x_29 = lean::string_iterator_curr(x_0); -x_30 = l_char_is__digit(x_29); -if (x_30 == 0) +uint32 x_28; uint8 x_29; +x_28 = lean::string_iterator_curr(x_0); +x_29 = l_char_is__digit(x_28); +if (x_29 == 0) { -obj* x_31; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_41; obj* x_42; obj* x_44; -x_31 = l_char_quote__core(x_29); -x_32 = l_char_has__repr___closed__1; -lean::inc(x_32); -x_34 = lean::string_append(x_32, x_31); -lean::dec(x_31); -x_36 = lean::string_append(x_34, x_32); -x_37 = lean::box(0); -x_38 = l_mjoin___rarg___closed__1; +obj* x_30; obj* x_31; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_42; +x_30 = l_char_quote__core(x_28); +x_31 = l_char_has__repr___closed__1; +lean::inc(x_31); +x_33 = lean::string_append(x_31, x_30); +lean::dec(x_30); +x_35 = lean::string_append(x_33, x_31); +x_36 = lean::box(0); +x_37 = l_mjoin___rarg___closed__1; lean::inc(x_37); -lean::inc(x_38); -x_41 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_36, x_38, x_37, x_37, x_0); -x_42 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_42); -x_44 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_42, x_41); -if (lean::obj_tag(x_44) == 0) +x_39 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_35, x_37, x_36, x_36, x_0); +x_40 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_40); +x_42 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_40, x_39); +if (lean::obj_tag(x_42) == 0) { -obj* x_45; obj* x_47; obj* x_49; uint32 x_52; obj* x_54; obj* x_55; -x_45 = lean::cnstr_get(x_44, 0); +obj* x_43; obj* x_45; obj* x_47; uint32 x_50; obj* x_52; obj* x_53; +x_43 = lean::cnstr_get(x_42, 0); +lean::inc(x_43); +x_45 = lean::cnstr_get(x_42, 1); lean::inc(x_45); -x_47 = lean::cnstr_get(x_44, 1); +x_47 = lean::cnstr_get(x_42, 2); lean::inc(x_47); -x_49 = lean::cnstr_get(x_44, 2); -lean::inc(x_49); -lean::dec(x_44); -x_52 = lean::unbox_uint32(x_45); -lean::dec(x_45); -x_54 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_parse__literal___spec__13(x_52, x_47); -x_55 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_49, x_54); -return x_55; +lean::dec(x_42); +x_50 = lean::unbox_uint32(x_43); +lean::dec(x_43); +x_52 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_parse__literal___spec__13(x_50, x_45); +x_53 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_47, x_52); +return x_53; } else { -obj* x_56; uint8 x_58; obj* x_59; obj* x_60; obj* x_61; -x_56 = lean::cnstr_get(x_44, 0); -lean::inc(x_56); -x_58 = lean::cnstr_get_scalar(x_44, sizeof(void*)*1); -if (lean::is_shared(x_44)) { - lean::dec(x_44); - x_59 = lean::box(0); +obj* x_54; uint8 x_56; obj* x_57; obj* x_58; obj* x_59; +x_54 = lean::cnstr_get(x_42, 0); +lean::inc(x_54); +x_56 = lean::cnstr_get_scalar(x_42, sizeof(void*)*1); +if (lean::is_shared(x_42)) { + lean::dec(x_42); + x_57 = lean::box(0); } else { - lean::cnstr_release(x_44, 0); - x_59 = x_44; + lean::cnstr_release(x_42, 0); + x_57 = x_42; } -if (lean::is_scalar(x_59)) { - x_60 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_57)) { + x_58 = lean::alloc_cnstr(1, 1, 1); } else { - x_60 = x_59; + x_58 = x_57; } -lean::cnstr_set(x_60, 0, x_56); -lean::cnstr_set_scalar(x_60, sizeof(void*)*1, x_58); -x_61 = x_60; -return x_61; +lean::cnstr_set(x_58, 0, x_54); +lean::cnstr_set_scalar(x_58, sizeof(void*)*1, x_56); +x_59 = x_58; +return x_59; } } else { -obj* x_63; obj* x_64; obj* x_65; obj* x_66; +obj* x_61; obj* x_62; obj* x_63; obj* x_64; lean::inc(x_0); -x_63 = lean::string_iterator_next(x_0); -x_64 = lean::box(0); -x_65 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_parse__literal___spec__15(x_0, x_63); -x_66 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_64, x_65); -return x_66; +x_61 = lean::string_iterator_next(x_0); +x_62 = lean::box(0); +x_63 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_parse__literal___spec__15(x_0, x_61); +x_64 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_62, x_63); +return x_64; } } } @@ -5420,128 +5402,126 @@ uint8 x_1; x_1 = lean::string_iterator_has_next(x_0); if (x_1 == 0) { -obj* x_2; obj* x_3; obj* x_4; obj* x_8; obj* x_9; obj* x_11; +obj* x_2; obj* x_3; obj* x_4; obj* x_7; obj* x_8; obj* x_10; x_2 = lean::box(0); x_3 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_4 = l_mjoin___rarg___closed__1; -lean::inc(x_2); lean::inc(x_4); lean::inc(x_3); -x_8 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_3, x_4, x_2, x_2, x_0); -x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_9); -x_11 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_9, x_8); -if (lean::obj_tag(x_11) == 0) +x_7 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_3, x_4, x_2, x_2, x_0); +x_8 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_8); +x_10 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_8, x_7); +if (lean::obj_tag(x_10) == 0) { -obj* x_12; obj* x_14; obj* x_16; uint32 x_19; obj* x_21; obj* x_22; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -x_16 = lean::cnstr_get(x_11, 2); -lean::inc(x_16); +obj* x_11; obj* x_13; obj* x_15; uint32 x_18; obj* x_20; obj* x_21; +x_11 = lean::cnstr_get(x_10, 0); +lean::inc(x_11); +x_13 = lean::cnstr_get(x_10, 1); +lean::inc(x_13); +x_15 = lean::cnstr_get(x_10, 2); +lean::inc(x_15); +lean::dec(x_10); +x_18 = lean::unbox_uint32(x_11); lean::dec(x_11); -x_19 = lean::unbox_uint32(x_12); -lean::dec(x_12); -x_21 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_identifier___spec__5(x_19, x_14); -x_22 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_21); -return x_22; +x_20 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_identifier___spec__5(x_18, x_13); +x_21 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_20); +return x_21; } else { -obj* x_23; uint8 x_25; obj* x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_11, 0); -lean::inc(x_23); -x_25 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (lean::is_shared(x_11)) { - lean::dec(x_11); - x_26 = lean::box(0); +obj* x_22; uint8 x_24; obj* x_25; obj* x_26; obj* x_27; +x_22 = lean::cnstr_get(x_10, 0); +lean::inc(x_22); +x_24 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); +if (lean::is_shared(x_10)) { + lean::dec(x_10); + x_25 = lean::box(0); } else { - lean::cnstr_release(x_11, 0); - x_26 = x_11; + lean::cnstr_release(x_10, 0); + x_25 = x_10; } -if (lean::is_scalar(x_26)) { - x_27 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_25)) { + x_26 = lean::alloc_cnstr(1, 1, 1); } else { - x_27 = x_26; + x_26 = x_25; } -lean::cnstr_set(x_27, 0, x_23); -lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); -x_28 = x_27; -return x_28; +lean::cnstr_set(x_26, 0, x_22); +lean::cnstr_set_scalar(x_26, sizeof(void*)*1, x_24); +x_27 = x_26; +return x_27; } } else { -uint32 x_29; uint8 x_30; -x_29 = lean::string_iterator_curr(x_0); -x_30 = l_lean_is__id__first(x_29); -if (x_30 == 0) +uint32 x_28; uint8 x_29; +x_28 = lean::string_iterator_curr(x_0); +x_29 = l_lean_is__id__first(x_28); +if (x_29 == 0) { -obj* x_31; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_41; obj* x_42; obj* x_44; -x_31 = l_char_quote__core(x_29); -x_32 = l_char_has__repr___closed__1; -lean::inc(x_32); -x_34 = lean::string_append(x_32, x_31); -lean::dec(x_31); -x_36 = lean::string_append(x_34, x_32); -x_37 = lean::box(0); -x_38 = l_mjoin___rarg___closed__1; +obj* x_30; obj* x_31; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_42; +x_30 = l_char_quote__core(x_28); +x_31 = l_char_has__repr___closed__1; +lean::inc(x_31); +x_33 = lean::string_append(x_31, x_30); +lean::dec(x_30); +x_35 = lean::string_append(x_33, x_31); +x_36 = lean::box(0); +x_37 = l_mjoin___rarg___closed__1; lean::inc(x_37); -lean::inc(x_38); -x_41 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_36, x_38, x_37, x_37, x_0); -x_42 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_42); -x_44 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_42, x_41); -if (lean::obj_tag(x_44) == 0) +x_39 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_35, x_37, x_36, x_36, x_0); +x_40 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_40); +x_42 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_40, x_39); +if (lean::obj_tag(x_42) == 0) { -obj* x_45; obj* x_47; obj* x_49; uint32 x_52; obj* x_54; obj* x_55; -x_45 = lean::cnstr_get(x_44, 0); +obj* x_43; obj* x_45; obj* x_47; uint32 x_50; obj* x_52; obj* x_53; +x_43 = lean::cnstr_get(x_42, 0); +lean::inc(x_43); +x_45 = lean::cnstr_get(x_42, 1); lean::inc(x_45); -x_47 = lean::cnstr_get(x_44, 1); +x_47 = lean::cnstr_get(x_42, 2); lean::inc(x_47); -x_49 = lean::cnstr_get(x_44, 2); -lean::inc(x_49); -lean::dec(x_44); -x_52 = lean::unbox_uint32(x_45); -lean::dec(x_45); -x_54 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_identifier___spec__7(x_52, x_47); -x_55 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_49, x_54); -return x_55; +lean::dec(x_42); +x_50 = lean::unbox_uint32(x_43); +lean::dec(x_43); +x_52 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_identifier___spec__7(x_50, x_45); +x_53 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_47, x_52); +return x_53; } else { -obj* x_56; uint8 x_58; obj* x_59; obj* x_60; obj* x_61; -x_56 = lean::cnstr_get(x_44, 0); -lean::inc(x_56); -x_58 = lean::cnstr_get_scalar(x_44, sizeof(void*)*1); -if (lean::is_shared(x_44)) { - lean::dec(x_44); - x_59 = lean::box(0); +obj* x_54; uint8 x_56; obj* x_57; obj* x_58; obj* x_59; +x_54 = lean::cnstr_get(x_42, 0); +lean::inc(x_54); +x_56 = lean::cnstr_get_scalar(x_42, sizeof(void*)*1); +if (lean::is_shared(x_42)) { + lean::dec(x_42); + x_57 = lean::box(0); } else { - lean::cnstr_release(x_44, 0); - x_59 = x_44; + lean::cnstr_release(x_42, 0); + x_57 = x_42; } -if (lean::is_scalar(x_59)) { - x_60 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_57)) { + x_58 = lean::alloc_cnstr(1, 1, 1); } else { - x_60 = x_59; + x_58 = x_57; } -lean::cnstr_set(x_60, 0, x_56); -lean::cnstr_set_scalar(x_60, sizeof(void*)*1, x_58); -x_61 = x_60; -return x_61; +lean::cnstr_set(x_58, 0, x_54); +lean::cnstr_set_scalar(x_58, sizeof(void*)*1, x_56); +x_59 = x_58; +return x_59; } } else { -obj* x_63; obj* x_64; obj* x_65; obj* x_66; +obj* x_61; obj* x_62; obj* x_63; obj* x_64; lean::inc(x_0); -x_63 = lean::string_iterator_next(x_0); -x_64 = lean::box(0); -x_65 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_identifier___spec__9(x_0, x_63); -x_66 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_64, x_65); -return x_66; +x_61 = lean::string_iterator_next(x_0); +x_62 = lean::box(0); +x_63 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_identifier___spec__9(x_0, x_61); +x_64 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_62, x_63); +return x_64; } } } @@ -5756,127 +5736,125 @@ uint8 x_1; x_1 = lean::string_iterator_has_next(x_0); if (x_1 == 0) { -obj* x_2; obj* x_3; obj* x_4; obj* x_8; obj* x_9; obj* x_11; +obj* x_2; obj* x_3; obj* x_4; obj* x_7; obj* x_8; obj* x_10; x_2 = lean::box(0); x_3 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_4 = l_mjoin___rarg___closed__1; -lean::inc(x_2); lean::inc(x_4); lean::inc(x_3); -x_8 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_3, x_4, x_2, x_2, x_0); -x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_9); -x_11 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_9, x_8); -if (lean::obj_tag(x_11) == 0) +x_7 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_3, x_4, x_2, x_2, x_0); +x_8 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_8); +x_10 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_8, x_7); +if (lean::obj_tag(x_10) == 0) { -obj* x_12; obj* x_14; obj* x_16; uint32 x_19; obj* x_21; obj* x_22; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -x_16 = lean::cnstr_get(x_11, 2); -lean::inc(x_16); +obj* x_11; obj* x_13; obj* x_15; uint32 x_18; obj* x_20; obj* x_21; +x_11 = lean::cnstr_get(x_10, 0); +lean::inc(x_11); +x_13 = lean::cnstr_get(x_10, 1); +lean::inc(x_13); +x_15 = lean::cnstr_get(x_10, 2); +lean::inc(x_15); +lean::dec(x_10); +x_18 = lean::unbox_uint32(x_11); lean::dec(x_11); -x_19 = lean::unbox_uint32(x_12); -lean::dec(x_12); -x_21 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_identifier___spec__13(x_19, x_14); -x_22 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_21); -return x_22; +x_20 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_identifier___spec__13(x_18, x_13); +x_21 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_20); +return x_21; } else { -obj* x_23; uint8 x_25; obj* x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_11, 0); -lean::inc(x_23); -x_25 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (lean::is_shared(x_11)) { - lean::dec(x_11); - x_26 = lean::box(0); +obj* x_22; uint8 x_24; obj* x_25; obj* x_26; obj* x_27; +x_22 = lean::cnstr_get(x_10, 0); +lean::inc(x_22); +x_24 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); +if (lean::is_shared(x_10)) { + lean::dec(x_10); + x_25 = lean::box(0); } else { - lean::cnstr_release(x_11, 0); - x_26 = x_11; + lean::cnstr_release(x_10, 0); + x_25 = x_10; } -if (lean::is_scalar(x_26)) { - x_27 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_25)) { + x_26 = lean::alloc_cnstr(1, 1, 1); } else { - x_27 = x_26; + x_26 = x_25; } -lean::cnstr_set(x_27, 0, x_23); -lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); -x_28 = x_27; -return x_28; +lean::cnstr_set(x_26, 0, x_22); +lean::cnstr_set_scalar(x_26, sizeof(void*)*1, x_24); +x_27 = x_26; +return x_27; } } else { -uint32 x_29; uint8 x_30; -x_29 = lean::string_iterator_curr(x_0); -x_30 = l_lean_is__id__end__escape(x_29); -if (x_30 == 0) +uint32 x_28; uint8 x_29; +x_28 = lean::string_iterator_curr(x_0); +x_29 = l_lean_is__id__end__escape(x_28); +if (x_29 == 0) { -obj* x_32; obj* x_33; obj* x_34; obj* x_35; +obj* x_31; obj* x_32; obj* x_33; obj* x_34; lean::inc(x_0); -x_32 = lean::string_iterator_next(x_0); -x_33 = lean::box(0); -x_34 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_identifier___spec__15(x_0, x_32); -x_35 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_33, x_34); -return x_35; +x_31 = lean::string_iterator_next(x_0); +x_32 = lean::box(0); +x_33 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_identifier___spec__15(x_0, x_31); +x_34 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_32, x_33); +return x_34; } else { -obj* x_36; obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_46; obj* x_47; obj* x_49; -x_36 = l_char_quote__core(x_29); -x_37 = l_char_has__repr___closed__1; -lean::inc(x_37); -x_39 = lean::string_append(x_37, x_36); -lean::dec(x_36); -x_41 = lean::string_append(x_39, x_37); -x_42 = lean::box(0); -x_43 = l_mjoin___rarg___closed__1; +obj* x_35; obj* x_36; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_44; obj* x_45; obj* x_47; +x_35 = l_char_quote__core(x_28); +x_36 = l_char_has__repr___closed__1; +lean::inc(x_36); +x_38 = lean::string_append(x_36, x_35); +lean::dec(x_35); +x_40 = lean::string_append(x_38, x_36); +x_41 = lean::box(0); +x_42 = l_mjoin___rarg___closed__1; lean::inc(x_42); -lean::inc(x_43); -x_46 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_41, x_43, x_42, x_42, x_0); -x_47 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_47); -x_49 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_47, x_46); -if (lean::obj_tag(x_49) == 0) +x_44 = l_lean_parser_monad__parsec_error___at_lean_ir_keyword___spec__1___rarg(x_40, x_42, x_41, x_41, x_0); +x_45 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_45); +x_47 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_45, x_44); +if (lean::obj_tag(x_47) == 0) { -obj* x_50; obj* x_52; obj* x_54; uint32 x_57; obj* x_59; obj* x_60; -x_50 = lean::cnstr_get(x_49, 0); +obj* x_48; obj* x_50; obj* x_52; uint32 x_55; obj* x_57; obj* x_58; +x_48 = lean::cnstr_get(x_47, 0); +lean::inc(x_48); +x_50 = lean::cnstr_get(x_47, 1); lean::inc(x_50); -x_52 = lean::cnstr_get(x_49, 1); +x_52 = lean::cnstr_get(x_47, 2); lean::inc(x_52); -x_54 = lean::cnstr_get(x_49, 2); -lean::inc(x_54); -lean::dec(x_49); -x_57 = lean::unbox_uint32(x_50); -lean::dec(x_50); -x_59 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_identifier___spec__17(x_57, x_52); -x_60 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_54, x_59); -return x_60; +lean::dec(x_47); +x_55 = lean::unbox_uint32(x_48); +lean::dec(x_48); +x_57 = l_lean_parser_monad__parsec_take__while__cont___at_lean_ir_identifier___spec__17(x_55, x_50); +x_58 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_52, x_57); +return x_58; } else { -obj* x_61; uint8 x_63; obj* x_64; obj* x_65; obj* x_66; -x_61 = lean::cnstr_get(x_49, 0); -lean::inc(x_61); -x_63 = lean::cnstr_get_scalar(x_49, sizeof(void*)*1); -if (lean::is_shared(x_49)) { - lean::dec(x_49); - x_64 = lean::box(0); +obj* x_59; uint8 x_61; obj* x_62; obj* x_63; obj* x_64; +x_59 = lean::cnstr_get(x_47, 0); +lean::inc(x_59); +x_61 = lean::cnstr_get_scalar(x_47, sizeof(void*)*1); +if (lean::is_shared(x_47)) { + lean::dec(x_47); + x_62 = lean::box(0); } else { - lean::cnstr_release(x_49, 0); - x_64 = x_49; + lean::cnstr_release(x_47, 0); + x_62 = x_47; } -if (lean::is_scalar(x_64)) { - x_65 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_62)) { + x_63 = lean::alloc_cnstr(1, 1, 1); } else { - x_65 = x_64; + x_63 = x_62; } -lean::cnstr_set(x_65, 0, x_61); -lean::cnstr_set_scalar(x_65, sizeof(void*)*1, x_63); -x_66 = x_65; -return x_66; +lean::cnstr_set(x_63, 0, x_59); +lean::cnstr_set_scalar(x_63, sizeof(void*)*1, x_61); +x_64 = x_63; +return x_64; } } } diff --git a/src/boot/init/lean/name.cpp b/src/boot/init/lean/name.cpp index 16281b04e2..71868c1c3e 100644 --- a/src/boot/init/lean/name.cpp +++ b/src/boot/init/lean/name.cpp @@ -705,17 +705,16 @@ lean::inc(x_7); lean::dec(x_1); x_10 = lean::box(0); x_11 = lean_name_dec_eq(x_5, x_10); -lean::dec(x_10); if (x_11 == 0) { -obj* x_14; obj* x_15; obj* x_17; +obj* x_13; obj* x_14; obj* x_16; lean::inc(x_0); -x_14 = l_lean_name_to__string__with__sep___main(x_0, x_5); -x_15 = lean::string_append(x_14, x_0); +x_13 = l_lean_name_to__string__with__sep___main(x_0, x_5); +x_14 = lean::string_append(x_13, x_0); lean::dec(x_0); -x_17 = lean::string_append(x_15, x_7); +x_16 = lean::string_append(x_14, x_7); lean::dec(x_7); -return x_17; +return x_16; } else { @@ -726,34 +725,33 @@ return x_7; } default: { -obj* x_21; obj* x_23; obj* x_26; uint8 x_27; -x_21 = lean::cnstr_get(x_1, 0); -lean::inc(x_21); -x_23 = lean::cnstr_get(x_1, 1); -lean::inc(x_23); +obj* x_20; obj* x_22; obj* x_25; uint8 x_26; +x_20 = lean::cnstr_get(x_1, 0); +lean::inc(x_20); +x_22 = lean::cnstr_get(x_1, 1); +lean::inc(x_22); lean::dec(x_1); -x_26 = lean::box(0); -x_27 = lean_name_dec_eq(x_21, x_26); -lean::dec(x_26); -if (x_27 == 0) +x_25 = lean::box(0); +x_26 = lean_name_dec_eq(x_20, x_25); +if (x_26 == 0) { -obj* x_30; obj* x_31; obj* x_33; obj* x_34; +obj* x_28; obj* x_29; obj* x_31; obj* x_32; lean::inc(x_0); -x_30 = l_lean_name_to__string__with__sep___main(x_0, x_21); -x_31 = lean::string_append(x_30, x_0); +x_28 = l_lean_name_to__string__with__sep___main(x_0, x_20); +x_29 = lean::string_append(x_28, x_0); lean::dec(x_0); -x_33 = l_nat_repr(x_23); -x_34 = lean::string_append(x_31, x_33); -lean::dec(x_33); -return x_34; +x_31 = l_nat_repr(x_22); +x_32 = lean::string_append(x_29, x_31); +lean::dec(x_31); +return x_32; } else { -obj* x_38; +obj* x_36; lean::dec(x_0); -lean::dec(x_21); -x_38 = l_nat_repr(x_23); -return x_38; +lean::dec(x_20); +x_36 = l_nat_repr(x_22); +return x_36; } } } diff --git a/src/boot/init/lean/name_mangling.cpp b/src/boot/init/lean/name_mangling.cpp index f3458c8e52..dee6c47df3 100644 --- a/src/boot/init/lean/name_mangling.cpp +++ b/src/boot/init/lean/name_mangling.cpp @@ -453,54 +453,52 @@ uint8 x_1; x_1 = lean::string_iterator_has_next(x_0); if (x_1 == 0) { -obj* x_2; obj* x_3; obj* x_4; obj* x_8; obj* x_9; obj* x_11; +obj* x_2; obj* x_3; obj* x_4; obj* x_7; obj* x_8; obj* x_10; x_2 = lean::box(0); x_3 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_4 = l_mjoin___rarg___closed__1; -lean::inc(x_2); lean::inc(x_4); lean::inc(x_3); -x_8 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_3, x_4, x_2, x_2, x_0); -x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_9); -x_11 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_9, x_8); -return x_11; +x_7 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_3, x_4, x_2, x_2, x_0); +x_8 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_8); +x_10 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_8, x_7); +return x_10; } else { -uint32 x_12; uint8 x_13; -x_12 = lean::string_iterator_curr(x_0); -x_13 = l_char_is__digit(x_12); -if (x_13 == 0) +uint32 x_11; uint8 x_12; +x_11 = lean::string_iterator_curr(x_0); +x_12 = l_char_is__digit(x_11); +if (x_12 == 0) { -obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_24; obj* x_25; obj* x_27; -x_14 = l_char_quote__core(x_12); -x_15 = l_char_has__repr___closed__1; -lean::inc(x_15); -x_17 = lean::string_append(x_15, x_14); -lean::dec(x_14); -x_19 = lean::string_append(x_17, x_15); -x_20 = lean::box(0); -x_21 = l_mjoin___rarg___closed__1; +obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_25; +x_13 = l_char_quote__core(x_11); +x_14 = l_char_has__repr___closed__1; +lean::inc(x_14); +x_16 = lean::string_append(x_14, x_13); +lean::dec(x_13); +x_18 = lean::string_append(x_16, x_14); +x_19 = lean::box(0); +x_20 = l_mjoin___rarg___closed__1; lean::inc(x_20); -lean::inc(x_21); -x_24 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_19, x_21, x_20, x_20, x_0); -x_25 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_25); -x_27 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_25, x_24); -return x_27; +x_22 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_18, x_20, x_19, x_19, x_0); +x_23 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_23); +x_25 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_22); +return x_25; } else { -obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_28 = lean::string_iterator_next(x_0); -x_29 = lean::box(0); -x_30 = lean::box_uint32(x_12); -x_31 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_28); -lean::cnstr_set(x_31, 2, x_29); -return x_31; +obj* x_26; obj* x_27; obj* x_28; obj* x_29; +x_26 = lean::string_iterator_next(x_0); +x_27 = lean::box(0); +x_28 = lean::box_uint32(x_11); +x_29 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_26); +lean::cnstr_set(x_29, 2, x_27); +return x_29; } } } @@ -614,104 +612,100 @@ lean::dec(x_1); x_45 = lean::string_iterator_has_next(x_0); if (x_45 == 0) { -obj* x_46; obj* x_47; obj* x_48; obj* x_53; +obj* x_46; obj* x_47; obj* x_48; obj* x_52; x_46 = lean::box(0); x_47 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_48 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_46); lean::inc(x_48); lean::inc(x_47); -x_53 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_47, x_48, x_46, x_46, x_0); -x_43 = x_53; +x_52 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_47, x_48, x_46, x_46, x_0); +x_43 = x_52; goto lbl_44; } else { -uint32 x_54; uint32 x_55; uint8 x_56; uint8 x_58; -x_54 = lean::string_iterator_curr(x_0); -x_55 = 97; -x_58 = x_55 <= x_54; -if (x_58 == 0) +uint32 x_53; uint32 x_54; uint8 x_55; uint8 x_57; +x_53 = lean::string_iterator_curr(x_0); +x_54 = 97; +x_57 = x_54 <= x_53; +if (x_57 == 0) { -obj* x_59; obj* x_60; obj* x_62; obj* x_64; obj* x_65; obj* x_66; obj* x_70; -x_59 = l_char_quote__core(x_54); -x_60 = l_char_has__repr___closed__1; -lean::inc(x_60); -x_62 = lean::string_append(x_60, x_59); -lean::dec(x_59); -x_64 = lean::string_append(x_62, x_60); -x_65 = lean::box(0); -x_66 = l_mjoin___rarg___closed__1; +obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_68; +x_58 = l_char_quote__core(x_53); +x_59 = l_char_has__repr___closed__1; +lean::inc(x_59); +x_61 = lean::string_append(x_59, x_58); +lean::dec(x_58); +x_63 = lean::string_append(x_61, x_59); +x_64 = lean::box(0); +x_65 = l_mjoin___rarg___closed__1; lean::inc(x_0); lean::inc(x_65); -lean::inc(x_66); -x_70 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_64, x_66, x_65, x_65, x_0); -x_43 = x_70; +x_68 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_63, x_65, x_64, x_64, x_0); +x_43 = x_68; goto lbl_44; } else { -uint8 x_71; -x_71 = 1; -x_56 = x_71; -goto lbl_57; +uint8 x_69; +x_69 = 1; +x_55 = x_69; +goto lbl_56; } -lbl_57: +lbl_56: { -uint32 x_72; uint8 x_73; -x_72 = 102; -x_73 = x_54 <= x_72; -if (x_73 == 0) +uint32 x_70; uint8 x_71; +x_70 = 102; +x_71 = x_53 <= x_70; +if (x_71 == 0) { -obj* x_74; obj* x_75; obj* x_77; obj* x_79; obj* x_80; obj* x_81; obj* x_85; -x_74 = l_char_quote__core(x_54); -x_75 = l_char_has__repr___closed__1; -lean::inc(x_75); -x_77 = lean::string_append(x_75, x_74); -lean::dec(x_74); -x_79 = lean::string_append(x_77, x_75); -x_80 = lean::box(0); -x_81 = l_mjoin___rarg___closed__1; +obj* x_72; obj* x_73; obj* x_75; obj* x_77; obj* x_78; obj* x_79; obj* x_82; +x_72 = l_char_quote__core(x_53); +x_73 = l_char_has__repr___closed__1; +lean::inc(x_73); +x_75 = lean::string_append(x_73, x_72); +lean::dec(x_72); +x_77 = lean::string_append(x_75, x_73); +x_78 = lean::box(0); +x_79 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_80); -lean::inc(x_81); -x_85 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_79, x_81, x_80, x_80, x_0); -x_43 = x_85; +lean::inc(x_79); +x_82 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_77, x_79, x_78, x_78, x_0); +x_43 = x_82; goto lbl_44; } else { -if (x_56 == 0) +if (x_55 == 0) { -obj* x_86; obj* x_87; obj* x_89; obj* x_91; obj* x_92; obj* x_93; obj* x_97; -x_86 = l_char_quote__core(x_54); -x_87 = l_char_has__repr___closed__1; -lean::inc(x_87); -x_89 = lean::string_append(x_87, x_86); -lean::dec(x_86); -x_91 = lean::string_append(x_89, x_87); -x_92 = lean::box(0); -x_93 = l_mjoin___rarg___closed__1; +obj* x_83; obj* x_84; obj* x_86; obj* x_88; obj* x_89; obj* x_90; obj* x_93; +x_83 = l_char_quote__core(x_53); +x_84 = l_char_has__repr___closed__1; +lean::inc(x_84); +x_86 = lean::string_append(x_84, x_83); +lean::dec(x_83); +x_88 = lean::string_append(x_86, x_84); +x_89 = lean::box(0); +x_90 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_92); -lean::inc(x_93); -x_97 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_91, x_93, x_92, x_92, x_0); -x_43 = x_97; +lean::inc(x_90); +x_93 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_88, x_90, x_89, x_89, x_0); +x_43 = x_93; goto lbl_44; } else { -obj* x_99; obj* x_100; obj* x_101; obj* x_102; +obj* x_95; obj* x_96; obj* x_97; obj* x_98; lean::inc(x_0); -x_99 = lean::string_iterator_next(x_0); -x_100 = lean::box(0); -x_101 = lean::box_uint32(x_54); -x_102 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_99); -lean::cnstr_set(x_102, 2, x_100); -x_43 = x_102; +x_95 = lean::string_iterator_next(x_0); +x_96 = lean::box(0); +x_97 = lean::box_uint32(x_53); +x_98 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_98, 0, x_97); +lean::cnstr_set(x_98, 1, x_95); +lean::cnstr_set(x_98, 2, x_96); +x_43 = x_98; goto lbl_44; } } @@ -719,307 +713,303 @@ goto lbl_44; } lbl_44: { -obj* x_103; obj* x_105; -x_103 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_103); -x_105 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_103, x_43); -if (lean::obj_tag(x_105) == 0) +obj* x_99; obj* x_101; +x_99 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_99); +x_101 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_99, x_43); +if (lean::obj_tag(x_101) == 0) { -obj* x_106; obj* x_108; obj* x_110; obj* x_112; uint32 x_113; obj* x_115; obj* x_116; obj* x_117; obj* x_119; obj* x_120; obj* x_124; obj* x_125; -x_106 = lean::cnstr_get(x_105, 0); +obj* x_102; obj* x_104; obj* x_106; obj* x_108; uint32 x_109; obj* x_111; obj* x_112; obj* x_113; obj* x_115; obj* x_116; obj* x_120; obj* x_121; +x_102 = lean::cnstr_get(x_101, 0); +lean::inc(x_102); +x_104 = lean::cnstr_get(x_101, 1); +lean::inc(x_104); +x_106 = lean::cnstr_get(x_101, 2); lean::inc(x_106); -x_108 = lean::cnstr_get(x_105, 1); -lean::inc(x_108); -x_110 = lean::cnstr_get(x_105, 2); -lean::inc(x_110); -if (lean::is_shared(x_105)) { - lean::dec(x_105); - x_112 = lean::box(0); +if (lean::is_shared(x_101)) { + lean::dec(x_101); + x_108 = lean::box(0); } else { - lean::cnstr_release(x_105, 0); - lean::cnstr_release(x_105, 1); - lean::cnstr_release(x_105, 2); - x_112 = x_105; + lean::cnstr_release(x_101, 0); + lean::cnstr_release(x_101, 1); + lean::cnstr_release(x_101, 2); + x_108 = x_101; } -x_113 = lean::unbox_uint32(x_106); -lean::dec(x_106); -x_115 = lean::uint32_to_nat(x_113); -x_116 = l_lean_parser_parse__hex__digit___rarg___lambda__3___closed__1; -x_117 = lean::nat_sub(x_115, x_116); +x_109 = lean::unbox_uint32(x_102); +lean::dec(x_102); +x_111 = lean::uint32_to_nat(x_109); +x_112 = l_lean_parser_parse__hex__digit___rarg___lambda__3___closed__1; +x_113 = lean::nat_sub(x_111, x_112); +lean::dec(x_111); +x_115 = lean::mk_nat_obj(10u); +x_116 = lean::nat_add(x_115, x_113); +lean::dec(x_113); lean::dec(x_115); -x_119 = lean::mk_nat_obj(10u); -x_120 = lean::nat_add(x_119, x_117); -lean::dec(x_117); -lean::dec(x_119); -lean::inc(x_103); -if (lean::is_scalar(x_112)) { - x_124 = lean::alloc_cnstr(0, 3, 0); +lean::inc(x_99); +if (lean::is_scalar(x_108)) { + x_120 = lean::alloc_cnstr(0, 3, 0); } else { - x_124 = x_112; + x_120 = x_108; } -lean::cnstr_set(x_124, 0, x_120); -lean::cnstr_set(x_124, 1, x_108); -lean::cnstr_set(x_124, 2, x_103); -x_125 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_110, x_124); -if (lean::obj_tag(x_125) == 0) +lean::cnstr_set(x_120, 0, x_116); +lean::cnstr_set(x_120, 1, x_104); +lean::cnstr_set(x_120, 2, x_99); +x_121 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_106, x_120); +if (lean::obj_tag(x_121) == 0) { -obj* x_127; obj* x_128; obj* x_130; +obj* x_123; obj* x_124; obj* x_126; lean::dec(x_0); -x_127 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_125); -x_128 = l_lean_parser_parse__hex__digit___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__2___closed__1; -lean::inc(x_128); -x_130 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_127, x_128); -return x_130; +x_123 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_121); +x_124 = l_lean_parser_parse__hex__digit___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__2___closed__1; +lean::inc(x_124); +x_126 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_123, x_124); +return x_126; } else { -obj* x_131; uint8 x_133; -x_131 = lean::cnstr_get(x_125, 0); -lean::inc(x_131); -x_133 = lean::cnstr_get_scalar(x_125, sizeof(void*)*1); -x_38 = x_125; -x_39 = x_131; -x_40 = x_133; +obj* x_127; uint8 x_129; +x_127 = lean::cnstr_get(x_121, 0); +lean::inc(x_127); +x_129 = lean::cnstr_get_scalar(x_121, sizeof(void*)*1); +x_38 = x_121; +x_39 = x_127; +x_40 = x_129; goto lbl_41; } } else { -obj* x_134; uint8 x_136; obj* x_137; obj* x_139; obj* x_140; -x_134 = lean::cnstr_get(x_105, 0); -lean::inc(x_134); -x_136 = lean::cnstr_get_scalar(x_105, sizeof(void*)*1); -if (lean::is_shared(x_105)) { - lean::dec(x_105); - x_137 = lean::box(0); +obj* x_130; uint8 x_132; obj* x_133; obj* x_135; obj* x_136; +x_130 = lean::cnstr_get(x_101, 0); +lean::inc(x_130); +x_132 = lean::cnstr_get_scalar(x_101, sizeof(void*)*1); +if (lean::is_shared(x_101)) { + lean::dec(x_101); + x_133 = lean::box(0); } else { - lean::cnstr_release(x_105, 0); - x_137 = x_105; + lean::cnstr_release(x_101, 0); + x_133 = x_101; } -lean::inc(x_134); -if (lean::is_scalar(x_137)) { - x_139 = lean::alloc_cnstr(1, 1, 1); +lean::inc(x_130); +if (lean::is_scalar(x_133)) { + x_135 = lean::alloc_cnstr(1, 1, 1); } else { - x_139 = x_137; + x_135 = x_133; } -lean::cnstr_set(x_139, 0, x_134); -lean::cnstr_set_scalar(x_139, sizeof(void*)*1, x_136); -x_140 = x_139; -x_38 = x_140; -x_39 = x_134; -x_40 = x_136; +lean::cnstr_set(x_135, 0, x_130); +lean::cnstr_set_scalar(x_135, sizeof(void*)*1, x_132); +x_136 = x_135; +x_38 = x_136; +x_39 = x_130; +x_40 = x_132; goto lbl_41; } } } else { -obj* x_143; obj* x_145; +obj* x_139; obj* x_141; lean::dec(x_0); lean::dec(x_2); -x_143 = l_lean_parser_parse__hex__digit___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__2___closed__1; -lean::inc(x_143); -x_145 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_1, x_143); -return x_145; +x_139 = l_lean_parser_parse__hex__digit___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__2___closed__1; +lean::inc(x_139); +x_141 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_1, x_139); +return x_141; } lbl_41: { if (x_40 == 0) { -obj* x_147; uint8 x_149; +obj* x_143; uint8 x_145; lean::dec(x_38); -x_149 = lean::string_iterator_has_next(x_0); -if (x_149 == 0) +x_145 = lean::string_iterator_has_next(x_0); +if (x_145 == 0) { -obj* x_150; obj* x_151; obj* x_152; obj* x_156; -x_150 = lean::box(0); -x_151 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; -x_152 = l_mjoin___rarg___closed__1; -lean::inc(x_150); -lean::inc(x_152); -lean::inc(x_151); -x_156 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_151, x_152, x_150, x_150, x_0); -x_147 = x_156; -goto lbl_148; +obj* x_146; obj* x_147; obj* x_148; obj* x_151; +x_146 = lean::box(0); +x_147 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; +x_148 = l_mjoin___rarg___closed__1; +lean::inc(x_148); +lean::inc(x_147); +x_151 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_147, x_148, x_146, x_146, x_0); +x_143 = x_151; +goto lbl_144; } else { -uint32 x_157; uint32 x_158; uint8 x_159; uint8 x_161; -x_157 = lean::string_iterator_curr(x_0); -x_158 = 65; -x_161 = x_158 <= x_157; -if (x_161 == 0) +uint32 x_152; uint32 x_153; uint8 x_154; uint8 x_156; +x_152 = lean::string_iterator_curr(x_0); +x_153 = 65; +x_156 = x_153 <= x_152; +if (x_156 == 0) { -obj* x_162; obj* x_163; obj* x_165; obj* x_167; obj* x_168; obj* x_169; obj* x_172; -x_162 = l_char_quote__core(x_157); -x_163 = l_char_has__repr___closed__1; -lean::inc(x_163); -x_165 = lean::string_append(x_163, x_162); -lean::dec(x_162); -x_167 = lean::string_append(x_165, x_163); -x_168 = lean::box(0); -x_169 = l_mjoin___rarg___closed__1; -lean::inc(x_168); -lean::inc(x_169); -x_172 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_167, x_169, x_168, x_168, x_0); -x_147 = x_172; -goto lbl_148; +obj* x_157; obj* x_158; obj* x_160; obj* x_162; obj* x_163; obj* x_164; obj* x_166; +x_157 = l_char_quote__core(x_152); +x_158 = l_char_has__repr___closed__1; +lean::inc(x_158); +x_160 = lean::string_append(x_158, x_157); +lean::dec(x_157); +x_162 = lean::string_append(x_160, x_158); +x_163 = lean::box(0); +x_164 = l_mjoin___rarg___closed__1; +lean::inc(x_164); +x_166 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_162, x_164, x_163, x_163, x_0); +x_143 = x_166; +goto lbl_144; } else { -uint8 x_173; -x_173 = 1; -x_159 = x_173; -goto lbl_160; +uint8 x_167; +x_167 = 1; +x_154 = x_167; +goto lbl_155; } -lbl_160: +lbl_155: { -uint32 x_174; uint8 x_175; -x_174 = 70; -x_175 = x_157 <= x_174; -if (x_175 == 0) +uint32 x_168; uint8 x_169; +x_168 = 70; +x_169 = x_152 <= x_168; +if (x_169 == 0) { -obj* x_176; obj* x_177; obj* x_179; obj* x_181; obj* x_182; obj* x_183; obj* x_186; -x_176 = l_char_quote__core(x_157); -x_177 = l_char_has__repr___closed__1; +obj* x_170; obj* x_171; obj* x_173; obj* x_175; obj* x_176; obj* x_177; obj* x_179; +x_170 = l_char_quote__core(x_152); +x_171 = l_char_has__repr___closed__1; +lean::inc(x_171); +x_173 = lean::string_append(x_171, x_170); +lean::dec(x_170); +x_175 = lean::string_append(x_173, x_171); +x_176 = lean::box(0); +x_177 = l_mjoin___rarg___closed__1; lean::inc(x_177); -x_179 = lean::string_append(x_177, x_176); -lean::dec(x_176); -x_181 = lean::string_append(x_179, x_177); -x_182 = lean::box(0); -x_183 = l_mjoin___rarg___closed__1; -lean::inc(x_182); -lean::inc(x_183); -x_186 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_181, x_183, x_182, x_182, x_0); -x_147 = x_186; -goto lbl_148; +x_179 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_175, x_177, x_176, x_176, x_0); +x_143 = x_179; +goto lbl_144; } else { -if (x_159 == 0) +if (x_154 == 0) { -obj* x_187; obj* x_188; obj* x_190; obj* x_192; obj* x_193; obj* x_194; obj* x_197; -x_187 = l_char_quote__core(x_157); -x_188 = l_char_has__repr___closed__1; -lean::inc(x_188); -x_190 = lean::string_append(x_188, x_187); -lean::dec(x_187); -x_192 = lean::string_append(x_190, x_188); -x_193 = lean::box(0); -x_194 = l_mjoin___rarg___closed__1; -lean::inc(x_193); +obj* x_180; obj* x_181; obj* x_183; obj* x_185; obj* x_186; obj* x_187; obj* x_189; +x_180 = l_char_quote__core(x_152); +x_181 = l_char_has__repr___closed__1; +lean::inc(x_181); +x_183 = lean::string_append(x_181, x_180); +lean::dec(x_180); +x_185 = lean::string_append(x_183, x_181); +x_186 = lean::box(0); +x_187 = l_mjoin___rarg___closed__1; +lean::inc(x_187); +x_189 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_185, x_187, x_186, x_186, x_0); +x_143 = x_189; +goto lbl_144; +} +else +{ +obj* x_190; obj* x_191; obj* x_192; obj* x_193; +x_190 = lean::string_iterator_next(x_0); +x_191 = lean::box(0); +x_192 = lean::box_uint32(x_152); +x_193 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_193, 0, x_192); +lean::cnstr_set(x_193, 1, x_190); +lean::cnstr_set(x_193, 2, x_191); +x_143 = x_193; +goto lbl_144; +} +} +} +} +lbl_144: +{ +obj* x_194; obj* x_196; +x_194 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_194); -x_197 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_192, x_194, x_193, x_193, x_0); -x_147 = x_197; -goto lbl_148; +x_196 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_194, x_143); +if (lean::obj_tag(x_196) == 0) +{ +obj* x_197; obj* x_199; obj* x_201; obj* x_203; uint32 x_204; obj* x_206; obj* x_207; obj* x_208; obj* x_210; obj* x_211; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_221; +x_197 = lean::cnstr_get(x_196, 0); +lean::inc(x_197); +x_199 = lean::cnstr_get(x_196, 1); +lean::inc(x_199); +x_201 = lean::cnstr_get(x_196, 2); +lean::inc(x_201); +if (lean::is_shared(x_196)) { + lean::dec(x_196); + x_203 = lean::box(0); +} else { + lean::cnstr_release(x_196, 0); + lean::cnstr_release(x_196, 1); + lean::cnstr_release(x_196, 2); + x_203 = x_196; +} +x_204 = lean::unbox_uint32(x_197); +lean::dec(x_197); +x_206 = lean::uint32_to_nat(x_204); +x_207 = l_lean_parser_parse__hex__digit___rarg___lambda__5___closed__1; +x_208 = lean::nat_sub(x_206, x_207); +lean::dec(x_206); +x_210 = lean::mk_nat_obj(10u); +x_211 = lean::nat_add(x_210, x_208); +lean::dec(x_208); +lean::dec(x_210); +lean::inc(x_194); +if (lean::is_scalar(x_203)) { + x_215 = lean::alloc_cnstr(0, 3, 0); +} else { + x_215 = x_203; +} +lean::cnstr_set(x_215, 0, x_211); +lean::cnstr_set(x_215, 1, x_199); +lean::cnstr_set(x_215, 2, x_194); +x_216 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_201, x_215); +x_217 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_216); +x_218 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_217); +x_219 = l_lean_parser_parse__hex__digit___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__2___closed__1; +lean::inc(x_219); +x_221 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_218, x_219); +return x_221; } else { -obj* x_198; obj* x_199; obj* x_200; obj* x_201; -x_198 = lean::string_iterator_next(x_0); -x_199 = lean::box(0); -x_200 = lean::box_uint32(x_157); -x_201 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_201, 0, x_200); -lean::cnstr_set(x_201, 1, x_198); -lean::cnstr_set(x_201, 2, x_199); -x_147 = x_201; -goto lbl_148; -} -} -} -} -lbl_148: -{ -obj* x_202; obj* x_204; -x_202 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_202); -x_204 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_202, x_147); -if (lean::obj_tag(x_204) == 0) -{ -obj* x_205; obj* x_207; obj* x_209; obj* x_211; uint32 x_212; obj* x_214; obj* x_215; obj* x_216; obj* x_218; obj* x_219; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_229; -x_205 = lean::cnstr_get(x_204, 0); -lean::inc(x_205); -x_207 = lean::cnstr_get(x_204, 1); -lean::inc(x_207); -x_209 = lean::cnstr_get(x_204, 2); -lean::inc(x_209); -if (lean::is_shared(x_204)) { - lean::dec(x_204); - x_211 = lean::box(0); +obj* x_222; uint8 x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; obj* x_230; obj* x_232; +x_222 = lean::cnstr_get(x_196, 0); +lean::inc(x_222); +x_224 = lean::cnstr_get_scalar(x_196, sizeof(void*)*1); +if (lean::is_shared(x_196)) { + lean::dec(x_196); + x_225 = lean::box(0); } else { - lean::cnstr_release(x_204, 0); - lean::cnstr_release(x_204, 1); - lean::cnstr_release(x_204, 2); - x_211 = x_204; + lean::cnstr_release(x_196, 0); + x_225 = x_196; } -x_212 = lean::unbox_uint32(x_205); -lean::dec(x_205); -x_214 = lean::uint32_to_nat(x_212); -x_215 = l_lean_parser_parse__hex__digit___rarg___lambda__5___closed__1; -x_216 = lean::nat_sub(x_214, x_215); -lean::dec(x_214); -x_218 = lean::mk_nat_obj(10u); -x_219 = lean::nat_add(x_218, x_216); -lean::dec(x_216); -lean::dec(x_218); -lean::inc(x_202); -if (lean::is_scalar(x_211)) { - x_223 = lean::alloc_cnstr(0, 3, 0); +if (lean::is_scalar(x_225)) { + x_226 = lean::alloc_cnstr(1, 1, 1); } else { - x_223 = x_211; + x_226 = x_225; } -lean::cnstr_set(x_223, 0, x_219); -lean::cnstr_set(x_223, 1, x_207); -lean::cnstr_set(x_223, 2, x_202); -x_224 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_209, x_223); -x_225 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_224); -x_226 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_225); -x_227 = l_lean_parser_parse__hex__digit___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__2___closed__1; -lean::inc(x_227); -x_229 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_226, x_227); -return x_229; -} -else -{ -obj* x_230; uint8 x_232; obj* x_233; obj* x_234; obj* x_235; obj* x_236; obj* x_237; obj* x_238; obj* x_240; -x_230 = lean::cnstr_get(x_204, 0); +lean::cnstr_set(x_226, 0, x_222); +lean::cnstr_set_scalar(x_226, sizeof(void*)*1, x_224); +x_227 = x_226; +x_228 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_227); +x_229 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_228); +x_230 = l_lean_parser_parse__hex__digit___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__2___closed__1; lean::inc(x_230); -x_232 = lean::cnstr_get_scalar(x_204, sizeof(void*)*1); -if (lean::is_shared(x_204)) { - lean::dec(x_204); - x_233 = lean::box(0); -} else { - lean::cnstr_release(x_204, 0); - x_233 = x_204; -} -if (lean::is_scalar(x_233)) { - x_234 = lean::alloc_cnstr(1, 1, 1); -} else { - x_234 = x_233; -} -lean::cnstr_set(x_234, 0, x_230); -lean::cnstr_set_scalar(x_234, sizeof(void*)*1, x_232); -x_235 = x_234; -x_236 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_235); -x_237 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_236); -x_238 = l_lean_parser_parse__hex__digit___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__2___closed__1; -lean::inc(x_238); -x_240 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_237, x_238); -return x_240; +x_232 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_229, x_230); +return x_232; } } } else { -obj* x_243; obj* x_244; obj* x_246; -lean::dec(x_39); +obj* x_235; obj* x_236; obj* x_238; lean::dec(x_0); -x_243 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_38); -x_244 = l_lean_parser_parse__hex__digit___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__2___closed__1; -lean::inc(x_244); -x_246 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_243, x_244); -return x_246; +lean::dec(x_39); +x_235 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_38); +x_236 = l_lean_parser_parse__hex__digit___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__2___closed__1; +lean::inc(x_236); +x_238 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_235, x_236); +return x_238; } } } @@ -1032,54 +1022,52 @@ uint8 x_1; x_1 = lean::string_iterator_has_next(x_0); if (x_1 == 0) { -obj* x_2; obj* x_3; obj* x_4; obj* x_8; obj* x_9; obj* x_11; +obj* x_2; obj* x_3; obj* x_4; obj* x_7; obj* x_8; obj* x_10; x_2 = lean::box(0); x_3 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_4 = l_mjoin___rarg___closed__1; -lean::inc(x_2); lean::inc(x_4); lean::inc(x_3); -x_8 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_3, x_4, x_2, x_2, x_0); -x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_9); -x_11 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_9, x_8); -return x_11; +x_7 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_3, x_4, x_2, x_2, x_0); +x_8 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_8); +x_10 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_8, x_7); +return x_10; } else { -uint32 x_12; uint8 x_13; -x_12 = lean::string_iterator_curr(x_0); -x_13 = l_char_is__alpha(x_12); -if (x_13 == 0) +uint32 x_11; uint8 x_12; +x_11 = lean::string_iterator_curr(x_0); +x_12 = l_char_is__alpha(x_11); +if (x_12 == 0) { -obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_24; obj* x_25; obj* x_27; -x_14 = l_char_quote__core(x_12); -x_15 = l_char_has__repr___closed__1; -lean::inc(x_15); -x_17 = lean::string_append(x_15, x_14); -lean::dec(x_14); -x_19 = lean::string_append(x_17, x_15); -x_20 = lean::box(0); -x_21 = l_mjoin___rarg___closed__1; +obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_25; +x_13 = l_char_quote__core(x_11); +x_14 = l_char_has__repr___closed__1; +lean::inc(x_14); +x_16 = lean::string_append(x_14, x_13); +lean::dec(x_13); +x_18 = lean::string_append(x_16, x_14); +x_19 = lean::box(0); +x_20 = l_mjoin___rarg___closed__1; lean::inc(x_20); -lean::inc(x_21); -x_24 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_19, x_21, x_20, x_20, x_0); -x_25 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_25); -x_27 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_25, x_24); -return x_27; +x_22 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_18, x_20, x_19, x_19, x_0); +x_23 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_23); +x_25 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_22); +return x_25; } else { -obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_28 = lean::string_iterator_next(x_0); -x_29 = lean::box(0); -x_30 = lean::box_uint32(x_12); -x_31 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_28); -lean::cnstr_set(x_31, 2, x_29); -return x_31; +obj* x_26; obj* x_27; obj* x_28; obj* x_29; +x_26 = lean::string_iterator_next(x_0); +x_27 = lean::box(0); +x_28 = lean::box_uint32(x_11); +x_29 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_26); +lean::cnstr_set(x_29, 2, x_27); +return x_29; } } } @@ -1109,7 +1097,7 @@ lean::dec(x_2); lean::dec(x_1); if (x_3 == 0) { -uint32 x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_17; obj* x_18; obj* x_20; +uint32 x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_19; x_6 = lean::string_iterator_curr(x_0); x_7 = l_char_quote__core(x_6); x_8 = l_char_has__repr___closed__1; @@ -1119,25 +1107,24 @@ lean::dec(x_7); x_12 = lean::string_append(x_10, x_8); x_13 = lean::box(0); x_14 = l_lean_parser_monad__parsec_eoi___rarg___lambda__1___closed__1; -lean::inc(x_13); lean::inc(x_14); -x_17 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_12, x_14, x_13, x_13, x_0); -x_18 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_18); -x_20 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_18, x_17); -return x_20; +x_16 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_12, x_14, x_13, x_13, x_0); +x_17 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_17); +x_19 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_16); +return x_19; } else { -obj* x_21; obj* x_22; obj* x_24; -x_21 = lean::box(0); -x_22 = l_lean_parser_monad__parsec_eoi___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__6___closed__1; -lean::inc(x_22); -x_24 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_0); -lean::cnstr_set(x_24, 2, x_22); -return x_24; +obj* x_20; obj* x_21; obj* x_23; +x_20 = lean::box(0); +x_21 = l_lean_parser_monad__parsec_eoi___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__6___closed__1; +lean::inc(x_21); +x_23 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_23, 0, x_20); +lean::cnstr_set(x_23, 1, x_0); +lean::cnstr_set(x_23, 2, x_21); +return x_23; } } } @@ -2184,54 +2171,52 @@ uint8 x_2; x_2 = lean::string_iterator_has_next(x_1); if (x_2 == 0) { -obj* x_3; obj* x_4; obj* x_5; obj* x_9; obj* x_10; obj* x_12; +obj* x_3; obj* x_4; obj* x_5; obj* x_8; obj* x_9; obj* x_11; x_3 = lean::box(0); x_4 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_5 = l_mjoin___rarg___closed__1; -lean::inc(x_3); lean::inc(x_5); lean::inc(x_4); -x_9 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_4, x_5, x_3, x_3, x_1); -x_10 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_10); -x_12 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_10, x_9); -return x_12; +x_8 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_4, x_5, x_3, x_3, x_1); +x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_9); +x_11 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_9, x_8); +return x_11; } else { -uint32 x_13; uint8 x_14; -x_13 = lean::string_iterator_curr(x_1); -x_14 = x_13 == x_0; -if (x_14 == 0) +uint32 x_12; uint8 x_13; +x_12 = lean::string_iterator_curr(x_1); +x_13 = x_12 == x_0; +if (x_13 == 0) { -obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_25; obj* x_26; obj* x_28; -x_15 = l_char_quote__core(x_13); -x_16 = l_char_has__repr___closed__1; -lean::inc(x_16); -x_18 = lean::string_append(x_16, x_15); -lean::dec(x_15); -x_20 = lean::string_append(x_18, x_16); -x_21 = lean::box(0); -x_22 = l_mjoin___rarg___closed__1; +obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_26; +x_14 = l_char_quote__core(x_12); +x_15 = l_char_has__repr___closed__1; +lean::inc(x_15); +x_17 = lean::string_append(x_15, x_14); +lean::dec(x_14); +x_19 = lean::string_append(x_17, x_15); +x_20 = lean::box(0); +x_21 = l_mjoin___rarg___closed__1; lean::inc(x_21); -lean::inc(x_22); -x_25 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_20, x_22, x_21, x_21, x_1); -x_26 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_26); -x_28 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_26, x_25); -return x_28; +x_23 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_19, x_21, x_20, x_20, x_1); +x_24 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_24); +x_26 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_24, x_23); +return x_26; } else { -obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_29 = lean::string_iterator_next(x_1); -x_30 = lean::box(0); -x_31 = lean::box_uint32(x_13); -x_32 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_29); -lean::cnstr_set(x_32, 2, x_30); -return x_32; +obj* x_27; obj* x_28; obj* x_29; obj* x_30; +x_27 = lean::string_iterator_next(x_1); +x_28 = lean::box(0); +x_29 = lean::box_uint32(x_12); +x_30 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_27); +lean::cnstr_set(x_30, 2, x_28); +return x_30; } } } @@ -2446,128 +2431,126 @@ uint8 x_1; x_1 = lean::string_iterator_has_next(x_0); if (x_1 == 0) { -obj* x_2; obj* x_3; obj* x_4; obj* x_8; obj* x_9; obj* x_11; +obj* x_2; obj* x_3; obj* x_4; obj* x_7; obj* x_8; obj* x_10; x_2 = lean::box(0); x_3 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_4 = l_mjoin___rarg___closed__1; -lean::inc(x_2); lean::inc(x_4); lean::inc(x_3); -x_8 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_3, x_4, x_2, x_2, x_0); -x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_9); -x_11 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_9, x_8); -if (lean::obj_tag(x_11) == 0) +x_7 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_3, x_4, x_2, x_2, x_0); +x_8 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_8); +x_10 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_8, x_7); +if (lean::obj_tag(x_10) == 0) { -obj* x_12; obj* x_14; obj* x_16; uint32 x_19; obj* x_21; obj* x_22; -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -x_16 = lean::cnstr_get(x_11, 2); -lean::inc(x_16); +obj* x_11; obj* x_13; obj* x_15; uint32 x_18; obj* x_20; obj* x_21; +x_11 = lean::cnstr_get(x_10, 0); +lean::inc(x_11); +x_13 = lean::cnstr_get(x_10, 1); +lean::inc(x_13); +x_15 = lean::cnstr_get(x_10, 2); +lean::inc(x_15); +lean::dec(x_10); +x_18 = lean::unbox_uint32(x_11); lean::dec(x_11); -x_19 = lean::unbox_uint32(x_12); -lean::dec(x_12); -x_21 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_name__mangling_5__parse__mangled__name__aux___main___spec__4(x_19, x_14); -x_22 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_21); -return x_22; +x_20 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_name__mangling_5__parse__mangled__name__aux___main___spec__4(x_18, x_13); +x_21 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_20); +return x_21; } else { -obj* x_23; uint8 x_25; obj* x_26; obj* x_27; obj* x_28; -x_23 = lean::cnstr_get(x_11, 0); -lean::inc(x_23); -x_25 = lean::cnstr_get_scalar(x_11, sizeof(void*)*1); -if (lean::is_shared(x_11)) { - lean::dec(x_11); - x_26 = lean::box(0); +obj* x_22; uint8 x_24; obj* x_25; obj* x_26; obj* x_27; +x_22 = lean::cnstr_get(x_10, 0); +lean::inc(x_22); +x_24 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); +if (lean::is_shared(x_10)) { + lean::dec(x_10); + x_25 = lean::box(0); } else { - lean::cnstr_release(x_11, 0); - x_26 = x_11; + lean::cnstr_release(x_10, 0); + x_25 = x_10; } -if (lean::is_scalar(x_26)) { - x_27 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_25)) { + x_26 = lean::alloc_cnstr(1, 1, 1); } else { - x_27 = x_26; + x_26 = x_25; } -lean::cnstr_set(x_27, 0, x_23); -lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); -x_28 = x_27; -return x_28; +lean::cnstr_set(x_26, 0, x_22); +lean::cnstr_set_scalar(x_26, sizeof(void*)*1, x_24); +x_27 = x_26; +return x_27; } } else { -uint32 x_29; uint8 x_30; -x_29 = lean::string_iterator_curr(x_0); -x_30 = l_char_is__digit(x_29); -if (x_30 == 0) +uint32 x_28; uint8 x_29; +x_28 = lean::string_iterator_curr(x_0); +x_29 = l_char_is__digit(x_28); +if (x_29 == 0) { -obj* x_31; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_41; obj* x_42; obj* x_44; -x_31 = l_char_quote__core(x_29); -x_32 = l_char_has__repr___closed__1; -lean::inc(x_32); -x_34 = lean::string_append(x_32, x_31); -lean::dec(x_31); -x_36 = lean::string_append(x_34, x_32); -x_37 = lean::box(0); -x_38 = l_mjoin___rarg___closed__1; +obj* x_30; obj* x_31; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_42; +x_30 = l_char_quote__core(x_28); +x_31 = l_char_has__repr___closed__1; +lean::inc(x_31); +x_33 = lean::string_append(x_31, x_30); +lean::dec(x_30); +x_35 = lean::string_append(x_33, x_31); +x_36 = lean::box(0); +x_37 = l_mjoin___rarg___closed__1; lean::inc(x_37); -lean::inc(x_38); -x_41 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_36, x_38, x_37, x_37, x_0); -x_42 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_42); -x_44 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_42, x_41); -if (lean::obj_tag(x_44) == 0) +x_39 = l_lean_parser_monad__parsec_error___at___private_init_lean_name__mangling_2__parse__mangled__string__aux___main___spec__3___rarg(x_35, x_37, x_36, x_36, x_0); +x_40 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_40); +x_42 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_40, x_39); +if (lean::obj_tag(x_42) == 0) { -obj* x_45; obj* x_47; obj* x_49; uint32 x_52; obj* x_54; obj* x_55; -x_45 = lean::cnstr_get(x_44, 0); +obj* x_43; obj* x_45; obj* x_47; uint32 x_50; obj* x_52; obj* x_53; +x_43 = lean::cnstr_get(x_42, 0); +lean::inc(x_43); +x_45 = lean::cnstr_get(x_42, 1); lean::inc(x_45); -x_47 = lean::cnstr_get(x_44, 1); +x_47 = lean::cnstr_get(x_42, 2); lean::inc(x_47); -x_49 = lean::cnstr_get(x_44, 2); -lean::inc(x_49); -lean::dec(x_44); -x_52 = lean::unbox_uint32(x_45); -lean::dec(x_45); -x_54 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_name__mangling_5__parse__mangled__name__aux___main___spec__6(x_52, x_47); -x_55 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_49, x_54); -return x_55; +lean::dec(x_42); +x_50 = lean::unbox_uint32(x_43); +lean::dec(x_43); +x_52 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_name__mangling_5__parse__mangled__name__aux___main___spec__6(x_50, x_45); +x_53 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_47, x_52); +return x_53; } else { -obj* x_56; uint8 x_58; obj* x_59; obj* x_60; obj* x_61; -x_56 = lean::cnstr_get(x_44, 0); -lean::inc(x_56); -x_58 = lean::cnstr_get_scalar(x_44, sizeof(void*)*1); -if (lean::is_shared(x_44)) { - lean::dec(x_44); - x_59 = lean::box(0); +obj* x_54; uint8 x_56; obj* x_57; obj* x_58; obj* x_59; +x_54 = lean::cnstr_get(x_42, 0); +lean::inc(x_54); +x_56 = lean::cnstr_get_scalar(x_42, sizeof(void*)*1); +if (lean::is_shared(x_42)) { + lean::dec(x_42); + x_57 = lean::box(0); } else { - lean::cnstr_release(x_44, 0); - x_59 = x_44; + lean::cnstr_release(x_42, 0); + x_57 = x_42; } -if (lean::is_scalar(x_59)) { - x_60 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_57)) { + x_58 = lean::alloc_cnstr(1, 1, 1); } else { - x_60 = x_59; + x_58 = x_57; } -lean::cnstr_set(x_60, 0, x_56); -lean::cnstr_set_scalar(x_60, sizeof(void*)*1, x_58); -x_61 = x_60; -return x_61; +lean::cnstr_set(x_58, 0, x_54); +lean::cnstr_set_scalar(x_58, sizeof(void*)*1, x_56); +x_59 = x_58; +return x_59; } } else { -obj* x_63; obj* x_64; obj* x_65; obj* x_66; +obj* x_61; obj* x_62; obj* x_63; obj* x_64; lean::inc(x_0); -x_63 = lean::string_iterator_next(x_0); -x_64 = lean::box(0); -x_65 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_name__mangling_5__parse__mangled__name__aux___main___spec__8(x_0, x_63); -x_66 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_64, x_65); -return x_66; +x_61 = lean::string_iterator_next(x_0); +x_62 = lean::box(0); +x_63 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_name__mangling_5__parse__mangled__name__aux___main___spec__8(x_0, x_61); +x_64 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_62, x_63); +return x_64; } } } diff --git a/src/boot/init/lean/parser/basic.cpp b/src/boot/init/lean/parser/basic.cpp index 73e3d8566a..5cdc18b1b2 100644 --- a/src/boot/init/lean/parser/basic.cpp +++ b/src/boot/init/lean/parser/basic.cpp @@ -1217,29 +1217,27 @@ goto _start; obj* _init_l_lean_parser_mk__token__trie___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; x_0 = lean::box(0); x_1 = lean::mk_string("/-"); x_2 = lean::mk_nat_obj(0u); -lean::inc(x_0); lean::inc(x_2); -x_5 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_5, 0, x_1); -lean::cnstr_set(x_5, 1, x_2); -lean::cnstr_set(x_5, 2, x_0); -x_6 = lean::mk_string("--"); -lean::inc(x_0); -x_8 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_2); -lean::cnstr_set(x_8, 2, x_0); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_0); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -return x_10; +x_4 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_4, 0, x_1); +lean::cnstr_set(x_4, 1, x_2); +lean::cnstr_set(x_4, 2, x_0); +x_5 = lean::mk_string("--"); +x_6 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_2); +lean::cnstr_set(x_6, 2, x_0); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_0); +x_8 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_8, 0, x_4); +lean::cnstr_set(x_8, 1, x_7); +return x_8; } } obj* l_lean_parser_mk__token__trie(obj* x_0) { diff --git a/src/boot/init/lean/parser/combinators.cpp b/src/boot/init/lean/parser/combinators.cpp index 2ef26abe6f..78ac55241c 100644 --- a/src/boot/init/lean/parser/combinators.cpp +++ b/src/boot/init/lean/parser/combinators.cpp @@ -615,7 +615,7 @@ return x_24; } else { -obj* x_31; obj* x_32; obj* x_33; obj* x_37; +obj* x_31; obj* x_32; obj* x_33; obj* x_36; lean::dec(x_5); lean::dec(x_4); lean::dec(x_1); @@ -625,11 +625,10 @@ lean::dec(x_0); x_31 = lean::box(0); x_32 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_33 = l_mjoin___rarg___closed__1; -lean::inc(x_31); lean::inc(x_33); lean::inc(x_32); -x_37 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_combinators_1__many1__aux___main___spec__1___rarg(x_2, lean::box(0), x_32, x_33, x_31, x_31); -return x_37; +x_36 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_combinators_1__many1__aux___main___spec__1___rarg(x_2, lean::box(0), x_32, x_33, x_31, x_31); +return x_36; } } } @@ -1137,7 +1136,7 @@ return x_63; } else { -obj* x_71; obj* x_72; obj* x_73; obj* x_77; +obj* x_71; obj* x_72; obj* x_73; obj* x_76; lean::dec(x_5); lean::dec(x_9); lean::dec(x_8); @@ -1148,11 +1147,10 @@ lean::dec(x_0); x_71 = lean::box(0); x_72 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_73 = l_mjoin___rarg___closed__1; -lean::inc(x_71); lean::inc(x_73); lean::inc(x_72); -x_77 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_combinators_2__sep__by__aux___main___spec__1___rarg(x_2, lean::box(0), x_72, x_73, x_71, x_71); -return x_77; +x_76 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_combinators_2__sep__by__aux___main___spec__1___rarg(x_2, lean::box(0), x_72, x_73, x_71, x_71); +return x_76; } } } @@ -1449,7 +1447,7 @@ return x_63; } else { -obj* x_71; obj* x_72; obj* x_73; obj* x_77; +obj* x_71; obj* x_72; obj* x_73; obj* x_76; lean::dec(x_5); lean::dec(x_9); lean::dec(x_8); @@ -1460,11 +1458,10 @@ lean::dec(x_0); x_71 = lean::box(0); x_72 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_73 = l_mjoin___rarg___closed__1; -lean::inc(x_71); lean::inc(x_73); lean::inc(x_72); -x_77 = l_lean_parser_monad__parsec_error___at_lean_parser_combinators_sep__by___spec__2___rarg(x_2, lean::box(0), x_72, x_73, x_71, x_71); -return x_77; +x_76 = l_lean_parser_monad__parsec_error___at_lean_parser_combinators_sep__by___spec__2___rarg(x_2, lean::box(0), x_72, x_73, x_71, x_71); +return x_76; } } } @@ -1810,7 +1807,7 @@ return x_63; } else { -obj* x_71; obj* x_72; obj* x_73; obj* x_77; +obj* x_71; obj* x_72; obj* x_73; obj* x_76; lean::dec(x_5); lean::dec(x_9); lean::dec(x_8); @@ -1821,11 +1818,10 @@ lean::dec(x_0); x_71 = lean::box(0); x_72 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_73 = l_mjoin___rarg___closed__1; -lean::inc(x_71); lean::inc(x_73); lean::inc(x_72); -x_77 = l_lean_parser_monad__parsec_error___at_lean_parser_combinators_sep__by1___spec__2___rarg(x_2, lean::box(0), x_72, x_73, x_71, x_71); -return x_77; +x_76 = l_lean_parser_monad__parsec_error___at_lean_parser_combinators_sep__by1___spec__2___rarg(x_2, lean::box(0), x_72, x_73, x_71, x_71); +return x_76; } } } @@ -2027,7 +2023,7 @@ if (lean::is_shared(x_4)) { } if (lean::obj_tag(x_12) == 0) { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_25; +obj* x_18; obj* x_21; obj* x_22; obj* x_23; obj* x_24; lean::dec(x_1); lean::dec(x_3); lean::dec(x_0); @@ -2036,47 +2032,46 @@ lean::inc(x_18); lean::dec(x_2); x_21 = lean::apply_1(x_18, x_10); x_22 = lean::box(0); -lean::inc(x_22); -x_24 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_22); +x_23 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_23, 0, x_21); +lean::cnstr_set(x_23, 1, x_22); if (lean::is_scalar(x_14)) { - x_25 = lean::alloc_cnstr(1, 2, 0); + x_24 = lean::alloc_cnstr(1, 2, 0); } else { - x_25 = x_14; + x_24 = x_14; } -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_22); -return x_25; +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_22); +return x_24; } else { -obj* x_26; obj* x_28; obj* x_31; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; -x_26 = lean::cnstr_get(x_12, 0); -lean::inc(x_26); -x_28 = lean::cnstr_get(x_12, 1); -lean::inc(x_28); +obj* x_25; obj* x_27; obj* x_30; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; +x_25 = lean::cnstr_get(x_12, 0); +lean::inc(x_25); +x_27 = lean::cnstr_get(x_12, 1); +lean::inc(x_27); lean::dec(x_12); -x_31 = lean::cnstr_get(x_2, 0); -lean::inc(x_31); -x_33 = lean::apply_1(x_31, x_10); -x_34 = lean::cnstr_get(x_3, 0); -lean::inc(x_34); -x_36 = lean::apply_1(x_34, x_26); -x_37 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_37, 0, x_36); -x_38 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_38, 0, x_33); -lean::cnstr_set(x_38, 1, x_37); -x_39 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___rarg(x_0, x_1, x_2, x_3, x_28); +x_30 = lean::cnstr_get(x_2, 0); +lean::inc(x_30); +x_32 = lean::apply_1(x_30, x_10); +x_33 = lean::cnstr_get(x_3, 0); +lean::inc(x_33); +x_35 = lean::apply_1(x_33, x_25); +x_36 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_36, 0, x_35); +x_37 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_37, 0, x_32); +lean::cnstr_set(x_37, 1, x_36); +x_38 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___rarg(x_0, x_1, x_2, x_3, x_27); if (lean::is_scalar(x_14)) { - x_40 = lean::alloc_cnstr(1, 2, 0); + x_39 = lean::alloc_cnstr(1, 2, 0); } else { - x_40 = x_14; + x_39 = x_14; } -lean::cnstr_set(x_40, 0, x_38); -lean::cnstr_set(x_40, 1, x_39); -return x_40; +lean::cnstr_set(x_39, 0, x_37); +lean::cnstr_set(x_39, 1, x_38); +return x_39; } } } @@ -2223,7 +2218,7 @@ obj* x_5; x_5 = l_lean_parser_syntax_as__node___main(x_4); if (lean::obj_tag(x_5) == 0) { -obj* x_9; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; +obj* x_9; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; lean::dec(x_1); lean::dec(x_3); lean::dec(x_2); @@ -2233,26 +2228,25 @@ lean::dec(x_0); x_12 = lean::box(3); x_13 = lean::apply_1(x_9, x_12); x_14 = lean::box(0); -lean::inc(x_14); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_13); +x_15 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_15, 0, x_13); +lean::cnstr_set(x_15, 1, x_14); +x_16 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_16, 0, x_15); lean::cnstr_set(x_16, 1, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_16); -lean::cnstr_set(x_17, 1, x_14); -return x_17; +return x_16; } else { -obj* x_18; obj* x_21; obj* x_24; -x_18 = lean::cnstr_get(x_5, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_23; +x_17 = lean::cnstr_get(x_5, 0); +lean::inc(x_17); lean::dec(x_5); -x_21 = lean::cnstr_get(x_18, 1); -lean::inc(x_21); -lean::dec(x_18); -x_24 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___rarg(x_1, x_2, x_0, x_3, x_21); -return x_24; +x_20 = lean::cnstr_get(x_17, 1); +lean::inc(x_20); +lean::dec(x_17); +x_23 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___rarg(x_1, x_2, x_0, x_3, x_20); +return x_23; } } } @@ -2857,32 +2851,31 @@ lean::dec(x_1); lean::dec(x_0); if (lean::obj_tag(x_4) == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_3); x_8 = lean::box(0); x_9 = l_lean_parser_combinators_any__of___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_combinators_any__of___spec__1___rarg(x_2, lean::box(0), x_9, x_10, x_8, x_8); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_combinators_any__of___spec__1___rarg(x_2, lean::box(0), x_9, x_10, x_8, x_8); +return x_13; } else { -obj* x_16; obj* x_18; obj* x_21; obj* x_24; obj* x_25; +obj* x_15; obj* x_17; obj* x_20; obj* x_23; obj* x_24; lean::dec(x_2); -x_16 = lean::cnstr_get(x_4, 0); -lean::inc(x_16); -x_18 = lean::cnstr_get(x_4, 1); -lean::inc(x_18); +x_15 = lean::cnstr_get(x_4, 0); +lean::inc(x_15); +x_17 = lean::cnstr_get(x_4, 1); +lean::inc(x_17); lean::dec(x_4); -x_21 = lean::cnstr_get(x_3, 1); -lean::inc(x_21); +x_20 = lean::cnstr_get(x_3, 1); +lean::inc(x_20); lean::dec(x_3); -x_24 = lean::apply_1(x_21, lean::box(0)); -x_25 = l_list_foldl___main___rarg(x_24, x_16, x_18); -return x_25; +x_23 = lean::apply_1(x_20, lean::box(0)); +x_24 = l_list_foldl___main___rarg(x_23, x_15, x_17); +return x_24; } } } @@ -3104,7 +3097,7 @@ return x_4; obj* l_lean_parser_combinators_choice__aux___main___rarg___lambda__1(obj* x_0, obj* x_1, obj* x_2) { _start: { -obj* x_3; obj* x_6; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; +obj* x_3; obj* x_6; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; x_3 = lean::cnstr_get(x_0, 0); lean::inc(x_3); lean::dec(x_0); @@ -3112,14 +3105,13 @@ x_6 = lean::cnstr_get(x_3, 1); lean::inc(x_6); lean::dec(x_3); x_9 = lean::box(0); -lean::inc(x_9); -x_11 = lean_name_mk_numeral(x_9, x_1); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_2); -lean::cnstr_set(x_12, 1, x_9); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_12); -x_14 = lean::apply_2(x_6, lean::box(0), x_13); -return x_14; +x_10 = lean_name_mk_numeral(x_9, x_1); +x_11 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_11, 0, x_2); +lean::cnstr_set(x_11, 1, x_9); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_11); +x_13 = lean::apply_2(x_6, lean::box(0), x_12); +return x_13; } } obj* _init_l_lean_parser_combinators_choice__aux___main___rarg___closed__1() { @@ -3135,44 +3127,43 @@ _start: { if (lean::obj_tag(x_3) == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_4); lean::dec(x_0); lean::dec(x_2); x_8 = lean::box(0); x_9 = l_lean_parser_combinators_choice__aux___main___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_combinators_choice__aux___main___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_combinators_choice__aux___main___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); +return x_13; } else { -obj* x_15; obj* x_17; obj* x_20; obj* x_22; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_32; obj* x_33; -x_15 = lean::cnstr_get(x_3, 0); -lean::inc(x_15); -x_17 = lean::cnstr_get(x_3, 1); -lean::inc(x_17); +obj* x_14; obj* x_16; obj* x_19; obj* x_21; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_31; obj* x_32; +x_14 = lean::cnstr_get(x_3, 0); +lean::inc(x_14); +x_16 = lean::cnstr_get(x_3, 1); +lean::inc(x_16); lean::dec(x_3); -x_20 = lean::cnstr_get(x_2, 1); -lean::inc(x_20); -x_22 = lean::cnstr_get(x_0, 1); -lean::inc(x_22); +x_19 = lean::cnstr_get(x_2, 1); +lean::inc(x_19); +x_21 = lean::cnstr_get(x_0, 1); +lean::inc(x_21); lean::inc(x_4); lean::inc(x_2); -x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___rarg___lambda__1), 3, 2); -lean::closure_set(x_26, 0, x_2); -lean::closure_set(x_26, 1, x_4); -x_27 = lean::apply_4(x_22, lean::box(0), lean::box(0), x_15, x_26); -x_28 = lean::mk_nat_obj(1u); -x_29 = lean::nat_add(x_4, x_28); -lean::dec(x_28); +x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___rarg___lambda__1), 3, 2); +lean::closure_set(x_25, 0, x_2); +lean::closure_set(x_25, 1, x_4); +x_26 = lean::apply_4(x_21, lean::box(0), lean::box(0), x_14, x_25); +x_27 = lean::mk_nat_obj(1u); +x_28 = lean::nat_add(x_4, x_27); +lean::dec(x_27); lean::dec(x_4); -x_32 = l_lean_parser_combinators_choice__aux___main___rarg(x_0, x_1, x_2, x_17, x_29); -x_33 = lean::apply_3(x_20, lean::box(0), x_27, x_32); -return x_33; +x_31 = l_lean_parser_combinators_choice__aux___main___rarg(x_0, x_1, x_2, x_16, x_28); +x_32 = lean::apply_3(x_19, lean::box(0), x_26, x_31); +return x_32; } } } @@ -3336,32 +3327,31 @@ _start: lean::dec(x_0); if (lean::obj_tag(x_3) == 0) { -obj* x_6; obj* x_7; obj* x_8; obj* x_12; +obj* x_6; obj* x_7; obj* x_8; obj* x_11; lean::dec(x_2); x_6 = lean::box(0); x_7 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_8 = l_mjoin___rarg___closed__1; -lean::inc(x_6); lean::inc(x_8); lean::inc(x_7); -x_12 = l_lean_parser_monad__parsec_error___at_lean_parser_combinators_longest__choice___spec__2___rarg(x_1, lean::box(0), x_7, x_8, x_6, x_6); -return x_12; +x_11 = l_lean_parser_monad__parsec_error___at_lean_parser_combinators_longest__choice___spec__2___rarg(x_1, lean::box(0), x_7, x_8, x_6, x_6); +return x_11; } else { -obj* x_14; obj* x_17; obj* x_20; obj* x_23; +obj* x_13; obj* x_16; obj* x_19; obj* x_22; lean::dec(x_1); -x_14 = lean::cnstr_get(x_3, 0); -lean::inc(x_14); +x_13 = lean::cnstr_get(x_3, 0); +lean::inc(x_13); lean::dec(x_3); -x_17 = lean::cnstr_get(x_2, 0); -lean::inc(x_17); +x_16 = lean::cnstr_get(x_2, 0); +lean::inc(x_16); lean::dec(x_2); -x_20 = lean::cnstr_get(x_17, 1); -lean::inc(x_20); -lean::dec(x_17); -x_23 = lean::apply_2(x_20, lean::box(0), x_14); -return x_23; +x_19 = lean::cnstr_get(x_16, 1); +lean::inc(x_19); +lean::dec(x_16); +x_22 = lean::apply_2(x_19, lean::box(0), x_13); +return x_22; } } } diff --git a/src/boot/init/lean/parser/command.cpp b/src/boot/init/lean/parser/command.cpp index 25afb52543..24759beeb8 100644 --- a/src/boot/init/lean/parser/command.cpp +++ b/src/boot/init/lean/parser/command.cpp @@ -401,23 +401,22 @@ return x_13; obj* _init_l_lean_parser_command_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_12; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_11; x_0 = lean::box(0); -lean::inc(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___at_lean_parser_command_parser_lean_parser_has__view___spec__1), 4, 1); -lean::closure_set(x_2, 0, x_0); -x_3 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__8___rarg), 5, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = l_lean_parser_command__parser__m_lean_parser_monad__rec___closed__1; -lean::inc(x_4); -x_6 = l_lean_parser_combinators_recurse_view___rarg(x_0, x_4); -x_7 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -x_8 = l_lean_parser_command__parser__m_alternative___closed__1; -x_9 = lean::mk_string("command"); -lean::inc(x_8); +x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___at_lean_parser_command_parser_lean_parser_has__view___spec__1), 4, 1); +lean::closure_set(x_1, 0, x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__8___rarg), 5, 1); +lean::closure_set(x_2, 0, x_1); +x_3 = l_lean_parser_command__parser__m_lean_parser_monad__rec___closed__1; +lean::inc(x_3); +x_5 = l_lean_parser_combinators_recurse_view___rarg(x_0, x_3); +x_6 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; +x_7 = l_lean_parser_command__parser__m_alternative___closed__1; +x_8 = lean::mk_string("command"); lean::inc(x_7); -x_12 = l_lean_parser_combinators_label_view___rarg(x_7, x_8, x_3, x_9, x_6); -return x_12; +lean::inc(x_6); +x_11 = l_lean_parser_combinators_label_view___rarg(x_6, x_7, x_2, x_8, x_5); +return x_11; } } obj* _init_l_lean_parser_command_parser_lean_parser_has__tokens() { @@ -1565,7 +1564,7 @@ return x_129; obj* l_lean_parser_command_open__spec_only_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_35; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_33; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -1579,40 +1578,38 @@ x_10 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_10); x_12 = l_option_map___rarg(x_10, x_1); x_13 = lean::box(3); -lean::inc(x_13); -x_15 = l_option_get__or__else___main___rarg(x_12, x_13); -x_16 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_16, 0, x_3); -x_17 = lean::box(0); -lean::inc(x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_15); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_lean_parser_no__kind; -lean::inc(x_21); -x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); -x_24 = l_list_map___main___at_lean_parser_command_open__spec_only_has__view_x_27___spec__2(x_5); -lean::inc(x_21); -x_26 = l_lean_parser_syntax_mk__node(x_21, x_24); +x_14 = l_option_get__or__else___main___rarg(x_12, x_13); +x_15 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_15, 0, x_3); +x_16 = lean::box(0); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_15); +lean::cnstr_set(x_17, 1, x_16); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_14); +lean::cnstr_set(x_18, 1, x_17); +x_19 = l_lean_parser_no__kind; +lean::inc(x_19); +x_21 = l_lean_parser_syntax_mk__node(x_19, x_18); +x_22 = l_list_map___main___at_lean_parser_command_open__spec_only_has__view_x_27___spec__2(x_5); +lean::inc(x_19); +x_24 = l_lean_parser_syntax_mk__node(x_19, x_22); lean::inc(x_10); -x_28 = l_option_map___rarg(x_10, x_7); -x_29 = l_option_get__or__else___main___rarg(x_28, x_13); +x_26 = l_option_map___rarg(x_10, x_7); +x_27 = l_option_get__or__else___main___rarg(x_26, x_13); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_16); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_24); +lean::cnstr_set(x_29, 1, x_28); x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_17); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_26); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_23); -lean::cnstr_set(x_32, 1, x_31); -x_33 = l_lean_parser_command_open__spec_only; -lean::inc(x_33); -x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); -return x_35; +lean::cnstr_set(x_30, 0, x_21); +lean::cnstr_set(x_30, 1, x_29); +x_31 = l_lean_parser_command_open__spec_only; +lean::inc(x_31); +x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); +return x_33; } } obj* _init_l_lean_parser_command_open__spec_only_has__view_x_27() { @@ -2779,7 +2776,7 @@ return x_1; obj* l_lean_parser_command_open__spec_renaming_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_29; 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_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_37; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -2793,44 +2790,41 @@ x_10 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_10); x_12 = l_option_map___rarg(x_10, x_1); x_13 = lean::box(3); -lean::inc(x_13); -x_15 = l_option_get__or__else___main___rarg(x_12, x_13); +x_14 = l_option_get__or__else___main___rarg(x_12, x_13); lean::inc(x_10); -x_17 = l_option_map___rarg(x_10, x_3); -lean::inc(x_13); -x_19 = l_option_get__or__else___main___rarg(x_17, x_13); -x_20 = lean::box(0); -lean::inc(x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_19); -lean::cnstr_set(x_22, 1, x_20); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_15); -lean::cnstr_set(x_23, 1, x_22); -x_24 = l_lean_parser_no__kind; +x_16 = l_option_map___rarg(x_10, x_3); +x_17 = l_option_get__or__else___main___rarg(x_16, x_13); +x_18 = lean::box(0); +x_19 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_19, 0, x_17); +lean::cnstr_set(x_19, 1, x_18); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_14); +lean::cnstr_set(x_20, 1, x_19); +x_21 = l_lean_parser_no__kind; +lean::inc(x_21); +x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); +x_24 = l_lean_parser_command_open__spec_renaming_has__view_x_27___lambda__2___closed__1; lean::inc(x_24); -x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); -x_27 = l_lean_parser_command_open__spec_renaming_has__view_x_27___lambda__2___closed__1; -lean::inc(x_27); -x_29 = l_list_map___main___rarg(x_27, x_5); -lean::inc(x_24); -x_31 = l_lean_parser_syntax_mk__node(x_24, x_29); +x_26 = l_list_map___main___rarg(x_24, x_5); +lean::inc(x_21); +x_28 = l_lean_parser_syntax_mk__node(x_21, x_26); lean::inc(x_10); -x_33 = l_option_map___rarg(x_10, x_7); -x_34 = l_option_get__or__else___main___rarg(x_33, x_13); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_20); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_31); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_26); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_lean_parser_command_open__spec_renaming; -lean::inc(x_38); -x_40 = l_lean_parser_syntax_mk__node(x_38, x_37); -return x_40; +x_30 = l_option_map___rarg(x_10, x_7); +x_31 = l_option_get__or__else___main___rarg(x_30, x_13); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_31); +lean::cnstr_set(x_32, 1, x_18); +x_33 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_33, 0, x_28); +lean::cnstr_set(x_33, 1, x_32); +x_34 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_34, 0, x_23); +lean::cnstr_set(x_34, 1, x_33); +x_35 = l_lean_parser_command_open__spec_renaming; +lean::inc(x_35); +x_37 = l_lean_parser_syntax_mk__node(x_35, x_34); +return x_37; } } obj* _init_l_lean_parser_command_open__spec_renaming_has__view_x_27() { @@ -3578,7 +3572,7 @@ return x_103; obj* l_lean_parser_command_open__spec_hiding_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; 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_30; obj* x_32; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -3592,36 +3586,34 @@ x_10 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_10); x_12 = l_option_map___rarg(x_10, x_1); x_13 = lean::box(3); -lean::inc(x_13); -x_15 = l_option_get__or__else___main___rarg(x_12, x_13); +x_14 = l_option_get__or__else___main___rarg(x_12, x_13); lean::inc(x_10); -x_17 = l_option_map___rarg(x_10, x_3); -lean::inc(x_13); -x_19 = l_option_get__or__else___main___rarg(x_17, x_13); -x_20 = l_list_map___main___at_lean_parser_command_open__spec_hiding_has__view_x_27___spec__2(x_5); -x_21 = l_lean_parser_no__kind; -lean::inc(x_21); -x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); +x_16 = l_option_map___rarg(x_10, x_3); +x_17 = l_option_get__or__else___main___rarg(x_16, x_13); +x_18 = l_list_map___main___at_lean_parser_command_open__spec_hiding_has__view_x_27___spec__2(x_5); +x_19 = l_lean_parser_no__kind; +lean::inc(x_19); +x_21 = l_lean_parser_syntax_mk__node(x_19, x_18); lean::inc(x_10); -x_25 = l_option_map___rarg(x_10, x_7); -x_26 = l_option_get__or__else___main___rarg(x_25, x_13); -x_27 = lean::box(0); +x_23 = l_option_map___rarg(x_10, x_7); +x_24 = l_option_get__or__else___main___rarg(x_23, x_13); +x_25 = lean::box(0); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_24); +lean::cnstr_set(x_26, 1, x_25); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_21); +lean::cnstr_set(x_27, 1, x_26); x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); +lean::cnstr_set(x_28, 0, x_17); lean::cnstr_set(x_28, 1, x_27); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_23); +lean::cnstr_set(x_29, 0, x_14); lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_19); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_15); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_lean_parser_command_open__spec_hiding; -lean::inc(x_32); -x_34 = l_lean_parser_syntax_mk__node(x_32, x_31); -return x_34; +x_30 = l_lean_parser_command_open__spec_hiding; +lean::inc(x_30); +x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); +return x_32; } } obj* _init_l_lean_parser_command_open__spec_hiding_has__view_x_27() { @@ -4932,7 +4924,7 @@ goto lbl_15; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; +obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; x_18 = lean::cnstr_get(x_3, 0); lean::inc(x_18); lean::dec(x_3); @@ -4940,209 +4932,202 @@ x_21 = l_lean_parser_command_open__spec_as_has__view; x_22 = lean::cnstr_get(x_21, 1); lean::inc(x_22); x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_13); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_13); -x_27 = l_lean_parser_no__kind; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_14 = x_29; +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_13); +x_26 = l_lean_parser_no__kind; +lean::inc(x_26); +x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); +x_14 = x_28; goto lbl_15; } lbl_15: { -obj* x_30; obj* x_32; obj* x_33; +obj* x_29; obj* x_31; obj* x_32; if (lean::obj_tag(x_5) == 0) { if (lean::obj_tag(x_7) == 0) { -obj* x_35; -x_35 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_35); -x_30 = x_35; -goto lbl_31; +obj* x_34; +x_34 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_34); +x_29 = x_34; +goto lbl_30; } else { -obj* x_37; obj* x_40; -x_37 = lean::cnstr_get(x_7, 0); -lean::inc(x_37); +obj* x_36; obj* x_39; +x_36 = lean::cnstr_get(x_7, 0); +lean::inc(x_36); lean::dec(x_7); -x_40 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_40); -x_32 = x_40; -x_33 = x_37; -goto lbl_34; +x_39 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_39); +x_31 = x_39; +x_32 = x_36; +goto lbl_33; } } else { -obj* x_42; obj* x_45; obj* x_46; obj* x_48; obj* x_50; obj* x_51; obj* x_53; -x_42 = lean::cnstr_get(x_5, 0); -lean::inc(x_42); +obj* x_41; obj* x_44; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_51; +x_41 = lean::cnstr_get(x_5, 0); +lean::inc(x_41); lean::dec(x_5); -x_45 = l_lean_parser_command_open__spec_only_has__view; -x_46 = lean::cnstr_get(x_45, 1); -lean::inc(x_46); -x_48 = lean::apply_1(x_46, x_42); -lean::inc(x_13); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_48); -lean::cnstr_set(x_50, 1, x_13); -x_51 = l_lean_parser_no__kind; -lean::inc(x_51); -x_53 = l_lean_parser_syntax_mk__node(x_51, x_50); +x_44 = l_lean_parser_command_open__spec_only_has__view; +x_45 = lean::cnstr_get(x_44, 1); +lean::inc(x_45); +x_47 = lean::apply_1(x_45, x_41); +x_48 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_48, 0, x_47); +lean::cnstr_set(x_48, 1, x_13); +x_49 = l_lean_parser_no__kind; +lean::inc(x_49); +x_51 = l_lean_parser_syntax_mk__node(x_49, x_48); if (lean::obj_tag(x_7) == 0) { -x_30 = x_53; -goto lbl_31; +x_29 = x_51; +goto lbl_30; } else { -obj* x_54; -x_54 = lean::cnstr_get(x_7, 0); -lean::inc(x_54); +obj* x_52; +x_52 = lean::cnstr_get(x_7, 0); +lean::inc(x_52); lean::dec(x_7); -x_32 = x_53; -x_33 = x_54; -goto lbl_34; +x_31 = x_51; +x_32 = x_52; +goto lbl_33; } } -lbl_31: +lbl_30: { if (lean::obj_tag(x_9) == 0) { -obj* x_58; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_65; -lean::dec(x_13); -x_58 = l_lean_parser_term_binder__content_has__view_x_27___lambda__2___closed__2; -lean::inc(x_58); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_30); -lean::cnstr_set(x_60, 1, x_58); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_14); -lean::cnstr_set(x_61, 1, x_60); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_12); -lean::cnstr_set(x_62, 1, x_61); -x_63 = l_lean_parser_command_open__spec; +obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_62; +x_55 = l_lean_parser_term_binder__content_has__view_x_27___lambda__2___closed__2; +lean::inc(x_55); +x_57 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_57, 0, x_29); +lean::cnstr_set(x_57, 1, x_55); +x_58 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_58, 0, x_14); +lean::cnstr_set(x_58, 1, x_57); +x_59 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_59, 0, x_12); +lean::cnstr_set(x_59, 1, x_58); +x_60 = l_lean_parser_command_open__spec; +lean::inc(x_60); +x_62 = l_lean_parser_syntax_mk__node(x_60, x_59); +return x_62; +} +else +{ +obj* x_63; obj* x_66; obj* x_67; obj* x_69; obj* x_70; obj* x_71; obj* x_73; obj* x_74; obj* x_75; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_83; +x_63 = lean::cnstr_get(x_9, 0); lean::inc(x_63); -x_65 = l_lean_parser_syntax_mk__node(x_63, x_62); -return x_65; -} -else -{ -obj* x_66; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; obj* x_78; obj* x_79; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_87; -x_66 = lean::cnstr_get(x_9, 0); -lean::inc(x_66); lean::dec(x_9); -x_69 = l_lean_parser_command_open__spec_hiding_has__view; -x_70 = lean::cnstr_get(x_69, 1); -lean::inc(x_70); -x_72 = lean::apply_1(x_70, x_66); -lean::inc(x_13); +x_66 = l_lean_parser_command_open__spec_hiding_has__view; +x_67 = lean::cnstr_get(x_66, 1); +lean::inc(x_67); +x_69 = lean::apply_1(x_67, x_63); +x_70 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_70, 0, x_69); +lean::cnstr_set(x_70, 1, x_13); +x_71 = l_lean_parser_no__kind; +lean::inc(x_71); +x_73 = l_lean_parser_syntax_mk__node(x_71, x_70); x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_72); +lean::cnstr_set(x_74, 0, x_73); lean::cnstr_set(x_74, 1, x_13); -x_75 = l_lean_parser_no__kind; +x_75 = l_lean_parser_combinators_many___rarg___closed__1; lean::inc(x_75); -x_77 = l_lean_parser_syntax_mk__node(x_75, x_74); +x_77 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_77, 0, x_75); +lean::cnstr_set(x_77, 1, x_74); x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_13); -x_79 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_79); -x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_79); -lean::cnstr_set(x_81, 1, x_78); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_30); -lean::cnstr_set(x_82, 1, x_81); -x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_14); -lean::cnstr_set(x_83, 1, x_82); -x_84 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_84, 0, x_12); -lean::cnstr_set(x_84, 1, x_83); -x_85 = l_lean_parser_command_open__spec; -lean::inc(x_85); -x_87 = l_lean_parser_syntax_mk__node(x_85, x_84); -return x_87; +lean::cnstr_set(x_78, 0, x_29); +lean::cnstr_set(x_78, 1, x_77); +x_79 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_79, 0, x_14); +lean::cnstr_set(x_79, 1, x_78); +x_80 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_80, 0, x_12); +lean::cnstr_set(x_80, 1, x_79); +x_81 = l_lean_parser_command_open__spec; +lean::inc(x_81); +x_83 = l_lean_parser_syntax_mk__node(x_81, x_80); +return x_83; } } -lbl_34: +lbl_33: { -obj* x_88; obj* x_89; obj* x_91; obj* x_93; obj* x_94; obj* x_96; -x_88 = l_lean_parser_command_open__spec_renaming_has__view; -x_89 = lean::cnstr_get(x_88, 1); +obj* x_84; obj* x_85; obj* x_87; obj* x_88; obj* x_89; obj* x_91; +x_84 = l_lean_parser_command_open__spec_renaming_has__view; +x_85 = lean::cnstr_get(x_84, 1); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_32); +x_88 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_88, 0, x_87); +lean::cnstr_set(x_88, 1, x_13); +x_89 = l_lean_parser_no__kind; lean::inc(x_89); -x_91 = lean::apply_1(x_89, x_33); -lean::inc(x_13); -x_93 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_93, 0, x_91); -lean::cnstr_set(x_93, 1, x_13); -x_94 = l_lean_parser_no__kind; -lean::inc(x_94); -x_96 = l_lean_parser_syntax_mk__node(x_94, x_93); +x_91 = l_lean_parser_syntax_mk__node(x_89, x_88); if (lean::obj_tag(x_9) == 0) { -obj* x_98; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_106; -lean::dec(x_13); -x_98 = l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; +obj* x_92; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_100; +x_92 = l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; +lean::inc(x_92); +x_94 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_94, 0, x_91); +lean::cnstr_set(x_94, 1, x_92); +x_95 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_95, 0, x_31); +lean::cnstr_set(x_95, 1, x_94); +x_96 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_96, 0, x_14); +lean::cnstr_set(x_96, 1, x_95); +x_97 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_97, 0, x_12); +lean::cnstr_set(x_97, 1, x_96); +x_98 = l_lean_parser_command_open__spec; lean::inc(x_98); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_96); -lean::cnstr_set(x_100, 1, x_98); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_32); -lean::cnstr_set(x_101, 1, x_100); -x_102 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_102, 0, x_14); -lean::cnstr_set(x_102, 1, x_101); -x_103 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_103, 0, x_12); -lean::cnstr_set(x_103, 1, x_102); -x_104 = l_lean_parser_command_open__spec; -lean::inc(x_104); -x_106 = l_lean_parser_syntax_mk__node(x_104, x_103); -return x_106; +x_100 = l_lean_parser_syntax_mk__node(x_98, x_97); +return x_100; } else { -obj* x_107; obj* x_110; obj* x_111; obj* x_113; obj* x_115; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_125; -x_107 = lean::cnstr_get(x_9, 0); -lean::inc(x_107); +obj* x_101; obj* x_104; obj* x_105; obj* x_107; obj* x_108; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_118; +x_101 = lean::cnstr_get(x_9, 0); +lean::inc(x_101); lean::dec(x_9); -x_110 = l_lean_parser_command_open__spec_hiding_has__view; -x_111 = lean::cnstr_get(x_110, 1); -lean::inc(x_111); -x_113 = lean::apply_1(x_111, x_107); -lean::inc(x_13); +x_104 = l_lean_parser_command_open__spec_hiding_has__view; +x_105 = lean::cnstr_get(x_104, 1); +lean::inc(x_105); +x_107 = lean::apply_1(x_105, x_101); +x_108 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_108, 0, x_107); +lean::cnstr_set(x_108, 1, x_13); +lean::inc(x_89); +x_110 = l_lean_parser_syntax_mk__node(x_89, x_108); +x_111 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_111, 0, x_110); +lean::cnstr_set(x_111, 1, x_13); +x_112 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_112, 0, x_91); +lean::cnstr_set(x_112, 1, x_111); +x_113 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_113, 0, x_31); +lean::cnstr_set(x_113, 1, x_112); +x_114 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_114, 0, x_14); +lean::cnstr_set(x_114, 1, x_113); x_115 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_115, 0, x_113); -lean::cnstr_set(x_115, 1, x_13); -lean::inc(x_94); -x_117 = l_lean_parser_syntax_mk__node(x_94, x_115); -x_118 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_118, 0, x_117); -lean::cnstr_set(x_118, 1, x_13); -x_119 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_119, 0, x_96); -lean::cnstr_set(x_119, 1, x_118); -x_120 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_120, 0, x_32); -lean::cnstr_set(x_120, 1, x_119); -x_121 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_121, 0, x_14); -lean::cnstr_set(x_121, 1, x_120); -x_122 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_122, 0, x_12); -lean::cnstr_set(x_122, 1, x_121); -x_123 = l_lean_parser_command_open__spec; -lean::inc(x_123); -x_125 = l_lean_parser_syntax_mk__node(x_123, x_122); -return x_125; +lean::cnstr_set(x_115, 0, x_12); +lean::cnstr_set(x_115, 1, x_114); +x_116 = l_lean_parser_command_open__spec; +lean::inc(x_116); +x_118 = l_lean_parser_syntax_mk__node(x_116, x_115); +return x_118; } } } @@ -5172,7 +5157,7 @@ return x_0; obj* _init_l_lean_parser_command_open__spec_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_11; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_48; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_59; obj* x_61; obj* x_62; obj* x_64; obj* x_65; obj* x_67; obj* x_68; obj* x_70; obj* x_71; obj* x_72; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_82; obj* x_83; obj* x_84; obj* 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_94; obj* x_95; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_110; obj* x_115; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_56; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_64; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_107; obj* x_112; x_0 = lean::mk_string("as"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -5186,276 +5171,266 @@ lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); x_7 = lean::box(0); x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1), 4, 0); -lean::inc(x_7); lean::inc(x_8); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_7); -lean::inc(x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_6); -lean::cnstr_set(x_13, 1, x_11); -x_14 = l_lean_parser_command_open__spec_as; -lean::inc(x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_13); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_17, 0, x_16); -x_18 = lean::mk_string("("); -x_19 = l_string_trim(x_18); -lean::inc(x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_21, 0, x_19); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_8); +lean::cnstr_set(x_10, 1, x_7); +lean::inc(x_10); +x_12 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_12, 0, x_6); +lean::cnstr_set(x_12, 1, x_10); +x_13 = l_lean_parser_command_open__spec_as; +lean::inc(x_13); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_15, 0, x_13); +lean::closure_set(x_15, 1, x_12); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_16, 0, x_15); +x_17 = lean::mk_string("("); +x_18 = l_string_trim(x_17); +lean::inc(x_18); +x_20 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_20, 0, x_18); lean::inc(x_4); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_23, 0, x_19); -lean::closure_set(x_23, 1, x_4); -lean::closure_set(x_23, 2, x_21); -lean::inc(x_11); -lean::inc(x_23); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_23); -lean::cnstr_set(x_26, 1, x_11); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); -lean::closure_set(x_27, 0, x_26); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_22, 0, x_18); +lean::closure_set(x_22, 1, x_4); +lean::closure_set(x_22, 2, x_20); +lean::inc(x_10); +lean::inc(x_22); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_22); +lean::cnstr_set(x_25, 1, x_10); +x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); +lean::closure_set(x_26, 0, x_25); lean::inc(x_8); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); -lean::closure_set(x_29, 0, x_8); -x_30 = lean::mk_string(")"); -x_31 = l_string_trim(x_30); -lean::inc(x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_33, 0, x_31); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); +lean::closure_set(x_28, 0, x_8); +x_29 = lean::mk_string(")"); +x_30 = l_string_trim(x_29); +lean::inc(x_30); +x_32 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_32, 0, x_30); lean::inc(x_4); -x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_35, 0, x_31); -lean::closure_set(x_35, 1, x_4); -lean::closure_set(x_35, 2, x_33); -lean::inc(x_7); +x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_34, 0, x_30); +lean::closure_set(x_34, 1, x_4); +lean::closure_set(x_34, 2, x_32); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_34); +lean::cnstr_set(x_35, 1, x_7); +lean::inc(x_35); x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set(x_37, 1, x_7); -lean::inc(x_37); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_29); -lean::cnstr_set(x_39, 1, x_37); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_27); -lean::cnstr_set(x_40, 1, x_39); -x_41 = l_lean_parser_command_open__spec_only; -lean::inc(x_41); -x_43 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_43, 0, x_41); -lean::closure_set(x_43, 1, x_40); -x_44 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_44, 0, x_43); -x_45 = lean::mk_string("renaming"); -x_46 = l_string_trim(x_45); -lean::inc(x_46); -x_48 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_48, 0, x_46); +lean::cnstr_set(x_37, 0, x_28); +lean::cnstr_set(x_37, 1, x_35); +x_38 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_38, 0, x_26); +lean::cnstr_set(x_38, 1, x_37); +x_39 = l_lean_parser_command_open__spec_only; +lean::inc(x_39); +x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_41, 0, x_39); +lean::closure_set(x_41, 1, x_38); +x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_42, 0, x_41); +x_43 = lean::mk_string("renaming"); +x_44 = l_string_trim(x_43); +lean::inc(x_44); +x_46 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_46, 0, x_44); lean::inc(x_4); -x_50 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_50, 0, x_46); -lean::closure_set(x_50, 1, x_4); -lean::closure_set(x_50, 2, x_48); -lean::inc(x_7); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_50); -lean::cnstr_set(x_52, 1, x_7); -lean::inc(x_23); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_23); -lean::cnstr_set(x_54, 1, x_52); -x_55 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); -lean::closure_set(x_55, 0, x_54); -x_56 = lean::mk_string("->"); -x_57 = l_string_trim(x_56); -lean::inc(x_57); -x_59 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_59, 0, x_57); +x_48 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_48, 0, x_44); +lean::closure_set(x_48, 1, x_4); +lean::closure_set(x_48, 2, x_46); +x_49 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_49, 0, x_48); +lean::cnstr_set(x_49, 1, x_7); +lean::inc(x_22); +x_51 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_51, 0, x_22); +lean::cnstr_set(x_51, 1, x_49); +x_52 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); +lean::closure_set(x_52, 0, x_51); +x_53 = lean::mk_string("->"); +x_54 = l_string_trim(x_53); +lean::inc(x_54); +x_56 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_56, 0, x_54); lean::inc(x_4); -x_61 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_61, 0, x_57); -lean::closure_set(x_61, 1, x_4); -lean::closure_set(x_61, 2, x_59); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_11); +x_58 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_58, 0, x_54); +lean::closure_set(x_58, 1, x_4); +lean::closure_set(x_58, 2, x_56); +x_59 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_59, 0, x_58); +lean::cnstr_set(x_59, 1, x_10); lean::inc(x_8); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_8); -lean::cnstr_set(x_64, 1, x_62); -x_65 = l_lean_parser_command_open__spec_renaming_item; -lean::inc(x_65); -x_67 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_67, 0, x_65); -lean::closure_set(x_67, 1, x_64); -x_68 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3), 5, 1); -lean::closure_set(x_68, 0, x_67); -lean::inc(x_37); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_68); -lean::cnstr_set(x_70, 1, x_37); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_55); -lean::cnstr_set(x_71, 1, x_70); -x_72 = l_lean_parser_command_open__spec_renaming; -lean::inc(x_72); -x_74 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_74, 0, x_72); -lean::closure_set(x_74, 1, x_71); -x_75 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_75, 0, x_74); -x_76 = lean::mk_string("hiding"); -x_77 = l_string_trim(x_76); -lean::inc(x_77); -x_79 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_79, 0, x_77); -x_80 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_80, 0, x_77); -lean::closure_set(x_80, 1, x_4); -lean::closure_set(x_80, 2, x_79); +x_61 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_61, 0, x_8); +lean::cnstr_set(x_61, 1, x_59); +x_62 = l_lean_parser_command_open__spec_renaming_item; +lean::inc(x_62); +x_64 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_64, 0, x_62); +lean::closure_set(x_64, 1, x_61); +x_65 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3), 5, 1); +lean::closure_set(x_65, 0, x_64); +lean::inc(x_35); +x_67 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_67, 0, x_65); +lean::cnstr_set(x_67, 1, x_35); +x_68 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_68, 0, x_52); +lean::cnstr_set(x_68, 1, x_67); +x_69 = l_lean_parser_command_open__spec_renaming; +lean::inc(x_69); +x_71 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_71, 0, x_69); +lean::closure_set(x_71, 1, x_68); +x_72 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_72, 0, x_71); +x_73 = lean::mk_string("hiding"); +x_74 = l_string_trim(x_73); +lean::inc(x_74); +x_76 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_76, 0, x_74); +x_77 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_77, 0, x_74); +lean::closure_set(x_77, 1, x_4); +lean::closure_set(x_77, 2, x_76); lean::inc(x_8); -x_82 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3), 5, 1); -lean::closure_set(x_82, 0, x_8); -x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_82); -lean::cnstr_set(x_83, 1, x_37); -x_84 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_84, 0, x_80); -lean::cnstr_set(x_84, 1, x_83); -x_85 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_85, 0, x_23); -lean::cnstr_set(x_85, 1, x_84); -x_86 = l_lean_parser_command_open__spec_hiding; -lean::inc(x_86); -x_88 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_88, 0, x_86); -lean::closure_set(x_88, 1, x_85); -x_89 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_89, 0, x_88); +x_79 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3), 5, 1); +lean::closure_set(x_79, 0, x_8); +x_80 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_80, 0, x_79); +lean::cnstr_set(x_80, 1, x_35); +x_81 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_81, 0, x_77); +lean::cnstr_set(x_81, 1, x_80); +x_82 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_82, 0, x_22); +lean::cnstr_set(x_82, 1, x_81); +x_83 = l_lean_parser_command_open__spec_hiding; +lean::inc(x_83); +x_85 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_85, 0, x_83); +lean::closure_set(x_85, 1, x_82); +x_86 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_86, 0, x_85); +x_87 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_87, 0, x_86); +lean::cnstr_set(x_87, 1, x_7); +x_88 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_88, 0, x_72); +lean::cnstr_set(x_88, 1, x_87); +x_89 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_89, 0, x_42); +lean::cnstr_set(x_89, 1, x_88); x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_7); +lean::cnstr_set(x_90, 0, x_16); +lean::cnstr_set(x_90, 1, x_89); x_91 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_91, 0, x_75); +lean::cnstr_set(x_91, 0, x_8); lean::cnstr_set(x_91, 1, x_90); -x_92 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_92, 0, x_44); -lean::cnstr_set(x_92, 1, x_91); -x_93 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_93, 0, x_17); -lean::cnstr_set(x_93, 1, x_92); -x_94 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_94, 0, x_8); -lean::cnstr_set(x_94, 1, x_93); -x_95 = l_lean_parser_command_open__spec; -lean::inc(x_94); -lean::inc(x_95); -x_98 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_98, 0, x_95); -lean::closure_set(x_98, 1, x_94); -x_99 = l_lean_parser_command__parser__m_monad___closed__1; -x_100 = l_lean_parser_command__parser__m_monad__except___closed__1; -x_101 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -x_102 = l_lean_parser_command__parser__m_alternative___closed__1; -x_103 = l_lean_parser_command_open__spec_has__view; -lean::inc(x_103); -lean::inc(x_95); -lean::inc(x_102); -lean::inc(x_101); +x_92 = l_lean_parser_command_open__spec; +lean::inc(x_91); +lean::inc(x_92); +x_95 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_95, 0, x_92); +lean::closure_set(x_95, 1, x_91); +x_96 = l_lean_parser_command__parser__m_monad___closed__1; +x_97 = l_lean_parser_command__parser__m_monad__except___closed__1; +x_98 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; +x_99 = l_lean_parser_command__parser__m_alternative___closed__1; +x_100 = l_lean_parser_command_open__spec_has__view; lean::inc(x_100); +lean::inc(x_92); lean::inc(x_99); -x_110 = l_lean_parser_combinators_node_view___rarg(x_99, x_100, x_101, x_102, x_95, x_94, x_103); -lean::inc(x_102); -lean::inc(x_101); -lean::inc(x_100); +lean::inc(x_98); +lean::inc(x_97); +lean::inc(x_96); +x_107 = l_lean_parser_combinators_node_view___rarg(x_96, x_97, x_98, x_99, x_92, x_91, x_100); lean::inc(x_99); -x_115 = l_lean_parser_combinators_many1_view___rarg(x_99, x_100, x_101, x_102, x_98, x_110); -return x_115; +lean::inc(x_98); +lean::inc(x_97); +lean::inc(x_96); +x_112 = l_lean_parser_combinators_many1_view___rarg(x_96, x_97, x_98, x_99, x_95, x_107); +return x_112; } } obj* _init_l_lean_parser_command_open__spec_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_44; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; x_0 = lean::box(0); x_1 = lean::mk_string("as"); x_2 = lean::mk_nat_obj(0u); lean::inc(x_2); x_4 = l_lean_parser_symbol_tokens___rarg(x_1, x_2); -lean::inc(x_0); -lean::inc(x_0); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_0, x_0); -lean::inc(x_7); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_4, x_7); -x_10 = l_lean_parser_tokens___rarg(x_9); -x_11 = l_lean_parser_tokens___rarg(x_10); -x_12 = lean::mk_string("("); +x_5 = l_lean_parser_list_cons_tokens___rarg(x_0, x_0); +lean::inc(x_5); +x_7 = l_lean_parser_list_cons_tokens___rarg(x_4, x_5); +x_8 = l_lean_parser_tokens___rarg(x_7); +x_9 = l_lean_parser_tokens___rarg(x_8); +x_10 = lean::mk_string("("); lean::inc(x_2); -x_14 = l_lean_parser_symbol_tokens___rarg(x_12, x_2); -lean::inc(x_7); -lean::inc(x_14); -x_17 = l_lean_parser_list_cons_tokens___rarg(x_14, x_7); -x_18 = l_lean_parser_tokens___rarg(x_17); -x_19 = l_lean_parser_tokens___rarg(x_18); -lean::inc(x_0); -x_21 = l_lean_parser_tokens___rarg(x_0); -x_22 = lean::mk_string(")"); +x_12 = l_lean_parser_symbol_tokens___rarg(x_10, x_2); +lean::inc(x_5); +lean::inc(x_12); +x_15 = l_lean_parser_list_cons_tokens___rarg(x_12, x_5); +x_16 = l_lean_parser_tokens___rarg(x_15); +x_17 = l_lean_parser_tokens___rarg(x_16); +x_18 = l_lean_parser_tokens___rarg(x_0); +x_19 = lean::mk_string(")"); lean::inc(x_2); -x_24 = l_lean_parser_symbol_tokens___rarg(x_22, x_2); -lean::inc(x_0); -x_26 = l_lean_parser_list_cons_tokens___rarg(x_24, x_0); -lean::inc(x_26); -x_28 = l_lean_parser_list_cons_tokens___rarg(x_21, x_26); -lean::inc(x_28); -x_30 = l_lean_parser_list_cons_tokens___rarg(x_19, x_28); -x_31 = l_lean_parser_tokens___rarg(x_30); -x_32 = l_lean_parser_tokens___rarg(x_31); -x_33 = lean::mk_string("renaming"); +x_21 = l_lean_parser_symbol_tokens___rarg(x_19, x_2); +x_22 = l_lean_parser_list_cons_tokens___rarg(x_21, x_0); +lean::inc(x_22); +x_24 = l_lean_parser_list_cons_tokens___rarg(x_18, x_22); +lean::inc(x_24); +x_26 = l_lean_parser_list_cons_tokens___rarg(x_17, x_24); +x_27 = l_lean_parser_tokens___rarg(x_26); +x_28 = l_lean_parser_tokens___rarg(x_27); +x_29 = lean::mk_string("renaming"); lean::inc(x_2); -x_35 = l_lean_parser_symbol_tokens___rarg(x_33, x_2); -lean::inc(x_0); -x_37 = l_lean_parser_list_cons_tokens___rarg(x_35, x_0); -lean::inc(x_14); -x_39 = l_lean_parser_list_cons_tokens___rarg(x_14, x_37); -x_40 = l_lean_parser_tokens___rarg(x_39); -x_41 = l_lean_parser_tokens___rarg(x_40); -x_42 = lean::mk_string("->"); +x_31 = l_lean_parser_symbol_tokens___rarg(x_29, x_2); +x_32 = l_lean_parser_list_cons_tokens___rarg(x_31, x_0); +lean::inc(x_12); +x_34 = l_lean_parser_list_cons_tokens___rarg(x_12, x_32); +x_35 = l_lean_parser_tokens___rarg(x_34); +x_36 = l_lean_parser_tokens___rarg(x_35); +x_37 = lean::mk_string("->"); lean::inc(x_2); -x_44 = l_lean_parser_symbol_tokens___rarg(x_42, x_2); -x_45 = l_lean_parser_list_cons_tokens___rarg(x_44, x_7); -lean::inc(x_0); -x_47 = l_lean_parser_list_cons_tokens___rarg(x_0, x_45); -x_48 = l_lean_parser_tokens___rarg(x_47); -x_49 = l_lean_parser_tokens___rarg(x_48); -x_50 = l_lean_parser_list_cons_tokens___rarg(x_49, x_26); -x_51 = l_lean_parser_list_cons_tokens___rarg(x_41, x_50); +x_39 = l_lean_parser_symbol_tokens___rarg(x_37, x_2); +x_40 = l_lean_parser_list_cons_tokens___rarg(x_39, x_5); +x_41 = l_lean_parser_list_cons_tokens___rarg(x_0, x_40); +x_42 = l_lean_parser_tokens___rarg(x_41); +x_43 = l_lean_parser_tokens___rarg(x_42); +x_44 = l_lean_parser_list_cons_tokens___rarg(x_43, x_22); +x_45 = l_lean_parser_list_cons_tokens___rarg(x_36, x_44); +x_46 = l_lean_parser_tokens___rarg(x_45); +x_47 = l_lean_parser_tokens___rarg(x_46); +x_48 = lean::mk_string("hiding"); +x_49 = l_lean_parser_symbol_tokens___rarg(x_48, x_2); +x_50 = l_lean_parser_list_cons_tokens___rarg(x_49, x_24); +x_51 = l_lean_parser_list_cons_tokens___rarg(x_12, x_50); x_52 = l_lean_parser_tokens___rarg(x_51); x_53 = l_lean_parser_tokens___rarg(x_52); -x_54 = lean::mk_string("hiding"); -x_55 = l_lean_parser_symbol_tokens___rarg(x_54, x_2); -x_56 = l_lean_parser_list_cons_tokens___rarg(x_55, x_28); -x_57 = l_lean_parser_list_cons_tokens___rarg(x_14, x_56); -x_58 = l_lean_parser_tokens___rarg(x_57); +x_54 = l_lean_parser_list_cons_tokens___rarg(x_53, x_0); +x_55 = l_lean_parser_list_cons_tokens___rarg(x_47, x_54); +x_56 = l_lean_parser_list_cons_tokens___rarg(x_28, x_55); +x_57 = l_lean_parser_list_cons_tokens___rarg(x_9, x_56); +x_58 = l_lean_parser_list_cons_tokens___rarg(x_0, x_57); x_59 = l_lean_parser_tokens___rarg(x_58); -lean::inc(x_0); -x_61 = l_lean_parser_list_cons_tokens___rarg(x_59, x_0); -x_62 = l_lean_parser_list_cons_tokens___rarg(x_53, x_61); -x_63 = l_lean_parser_list_cons_tokens___rarg(x_32, x_62); -x_64 = l_lean_parser_list_cons_tokens___rarg(x_11, x_63); -x_65 = l_lean_parser_list_cons_tokens___rarg(x_0, x_64); -x_66 = l_lean_parser_tokens___rarg(x_65); -x_67 = l_lean_parser_tokens___rarg(x_66); -return x_67; +x_60 = l_lean_parser_tokens___rarg(x_59); +return x_60; } } obj* _init_l_lean_parser_command_open__spec_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_11; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_48; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_59; obj* x_61; obj* x_62; obj* x_64; obj* x_65; obj* x_67; obj* x_68; obj* x_70; obj* x_71; obj* x_72; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_82; obj* x_83; obj* x_84; obj* 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_94; obj* x_95; obj* x_97; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_56; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_64; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_94; x_0 = lean::mk_string("as"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -5469,177 +5444,174 @@ lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); x_7 = lean::box(0); x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1), 4, 0); -lean::inc(x_7); lean::inc(x_8); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_7); -lean::inc(x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_6); -lean::cnstr_set(x_13, 1, x_11); -x_14 = l_lean_parser_command_open__spec_as; -lean::inc(x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_13); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_17, 0, x_16); -x_18 = lean::mk_string("("); -x_19 = l_string_trim(x_18); -lean::inc(x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_21, 0, x_19); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_8); +lean::cnstr_set(x_10, 1, x_7); +lean::inc(x_10); +x_12 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_12, 0, x_6); +lean::cnstr_set(x_12, 1, x_10); +x_13 = l_lean_parser_command_open__spec_as; +lean::inc(x_13); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_15, 0, x_13); +lean::closure_set(x_15, 1, x_12); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_16, 0, x_15); +x_17 = lean::mk_string("("); +x_18 = l_string_trim(x_17); +lean::inc(x_18); +x_20 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_20, 0, x_18); lean::inc(x_4); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_23, 0, x_19); -lean::closure_set(x_23, 1, x_4); -lean::closure_set(x_23, 2, x_21); -lean::inc(x_11); -lean::inc(x_23); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_23); -lean::cnstr_set(x_26, 1, x_11); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); -lean::closure_set(x_27, 0, x_26); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_22, 0, x_18); +lean::closure_set(x_22, 1, x_4); +lean::closure_set(x_22, 2, x_20); +lean::inc(x_10); +lean::inc(x_22); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_22); +lean::cnstr_set(x_25, 1, x_10); +x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); +lean::closure_set(x_26, 0, x_25); lean::inc(x_8); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); -lean::closure_set(x_29, 0, x_8); -x_30 = lean::mk_string(")"); -x_31 = l_string_trim(x_30); -lean::inc(x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_33, 0, x_31); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); +lean::closure_set(x_28, 0, x_8); +x_29 = lean::mk_string(")"); +x_30 = l_string_trim(x_29); +lean::inc(x_30); +x_32 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_32, 0, x_30); lean::inc(x_4); -x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_35, 0, x_31); -lean::closure_set(x_35, 1, x_4); -lean::closure_set(x_35, 2, x_33); -lean::inc(x_7); +x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_34, 0, x_30); +lean::closure_set(x_34, 1, x_4); +lean::closure_set(x_34, 2, x_32); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_34); +lean::cnstr_set(x_35, 1, x_7); +lean::inc(x_35); x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set(x_37, 1, x_7); -lean::inc(x_37); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_29); -lean::cnstr_set(x_39, 1, x_37); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_27); -lean::cnstr_set(x_40, 1, x_39); -x_41 = l_lean_parser_command_open__spec_only; -lean::inc(x_41); -x_43 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_43, 0, x_41); -lean::closure_set(x_43, 1, x_40); -x_44 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_44, 0, x_43); -x_45 = lean::mk_string("renaming"); -x_46 = l_string_trim(x_45); -lean::inc(x_46); -x_48 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_48, 0, x_46); +lean::cnstr_set(x_37, 0, x_28); +lean::cnstr_set(x_37, 1, x_35); +x_38 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_38, 0, x_26); +lean::cnstr_set(x_38, 1, x_37); +x_39 = l_lean_parser_command_open__spec_only; +lean::inc(x_39); +x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_41, 0, x_39); +lean::closure_set(x_41, 1, x_38); +x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_42, 0, x_41); +x_43 = lean::mk_string("renaming"); +x_44 = l_string_trim(x_43); +lean::inc(x_44); +x_46 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_46, 0, x_44); lean::inc(x_4); -x_50 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_50, 0, x_46); -lean::closure_set(x_50, 1, x_4); -lean::closure_set(x_50, 2, x_48); -lean::inc(x_7); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_50); -lean::cnstr_set(x_52, 1, x_7); -lean::inc(x_23); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_23); -lean::cnstr_set(x_54, 1, x_52); -x_55 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); -lean::closure_set(x_55, 0, x_54); -x_56 = lean::mk_string("->"); -x_57 = l_string_trim(x_56); -lean::inc(x_57); -x_59 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_59, 0, x_57); +x_48 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_48, 0, x_44); +lean::closure_set(x_48, 1, x_4); +lean::closure_set(x_48, 2, x_46); +x_49 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_49, 0, x_48); +lean::cnstr_set(x_49, 1, x_7); +lean::inc(x_22); +x_51 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_51, 0, x_22); +lean::cnstr_set(x_51, 1, x_49); +x_52 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); +lean::closure_set(x_52, 0, x_51); +x_53 = lean::mk_string("->"); +x_54 = l_string_trim(x_53); +lean::inc(x_54); +x_56 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_56, 0, x_54); lean::inc(x_4); -x_61 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_61, 0, x_57); -lean::closure_set(x_61, 1, x_4); -lean::closure_set(x_61, 2, x_59); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_11); +x_58 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_58, 0, x_54); +lean::closure_set(x_58, 1, x_4); +lean::closure_set(x_58, 2, x_56); +x_59 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_59, 0, x_58); +lean::cnstr_set(x_59, 1, x_10); lean::inc(x_8); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_8); -lean::cnstr_set(x_64, 1, x_62); -x_65 = l_lean_parser_command_open__spec_renaming_item; -lean::inc(x_65); -x_67 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_67, 0, x_65); -lean::closure_set(x_67, 1, x_64); -x_68 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3), 5, 1); -lean::closure_set(x_68, 0, x_67); -lean::inc(x_37); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_68); -lean::cnstr_set(x_70, 1, x_37); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_55); -lean::cnstr_set(x_71, 1, x_70); -x_72 = l_lean_parser_command_open__spec_renaming; -lean::inc(x_72); -x_74 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_74, 0, x_72); -lean::closure_set(x_74, 1, x_71); -x_75 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_75, 0, x_74); -x_76 = lean::mk_string("hiding"); -x_77 = l_string_trim(x_76); -lean::inc(x_77); -x_79 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_79, 0, x_77); -x_80 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_80, 0, x_77); -lean::closure_set(x_80, 1, x_4); -lean::closure_set(x_80, 2, x_79); +x_61 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_61, 0, x_8); +lean::cnstr_set(x_61, 1, x_59); +x_62 = l_lean_parser_command_open__spec_renaming_item; +lean::inc(x_62); +x_64 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_64, 0, x_62); +lean::closure_set(x_64, 1, x_61); +x_65 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3), 5, 1); +lean::closure_set(x_65, 0, x_64); +lean::inc(x_35); +x_67 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_67, 0, x_65); +lean::cnstr_set(x_67, 1, x_35); +x_68 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_68, 0, x_52); +lean::cnstr_set(x_68, 1, x_67); +x_69 = l_lean_parser_command_open__spec_renaming; +lean::inc(x_69); +x_71 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_71, 0, x_69); +lean::closure_set(x_71, 1, x_68); +x_72 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_72, 0, x_71); +x_73 = lean::mk_string("hiding"); +x_74 = l_string_trim(x_73); +lean::inc(x_74); +x_76 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_76, 0, x_74); +x_77 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_77, 0, x_74); +lean::closure_set(x_77, 1, x_4); +lean::closure_set(x_77, 2, x_76); lean::inc(x_8); -x_82 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3), 5, 1); -lean::closure_set(x_82, 0, x_8); -x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_82); -lean::cnstr_set(x_83, 1, x_37); -x_84 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_84, 0, x_80); -lean::cnstr_set(x_84, 1, x_83); -x_85 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_85, 0, x_23); -lean::cnstr_set(x_85, 1, x_84); -x_86 = l_lean_parser_command_open__spec_hiding; -lean::inc(x_86); -x_88 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_88, 0, x_86); -lean::closure_set(x_88, 1, x_85); -x_89 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_89, 0, x_88); +x_79 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3), 5, 1); +lean::closure_set(x_79, 0, x_8); +x_80 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_80, 0, x_79); +lean::cnstr_set(x_80, 1, x_35); +x_81 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_81, 0, x_77); +lean::cnstr_set(x_81, 1, x_80); +x_82 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_82, 0, x_22); +lean::cnstr_set(x_82, 1, x_81); +x_83 = l_lean_parser_command_open__spec_hiding; +lean::inc(x_83); +x_85 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_85, 0, x_83); +lean::closure_set(x_85, 1, x_82); +x_86 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_86, 0, x_85); +x_87 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_87, 0, x_86); +lean::cnstr_set(x_87, 1, x_7); +x_88 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_88, 0, x_72); +lean::cnstr_set(x_88, 1, x_87); +x_89 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_89, 0, x_42); +lean::cnstr_set(x_89, 1, x_88); x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_7); +lean::cnstr_set(x_90, 0, x_16); +lean::cnstr_set(x_90, 1, x_89); x_91 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_91, 0, x_75); +lean::cnstr_set(x_91, 0, x_8); lean::cnstr_set(x_91, 1, x_90); -x_92 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_92, 0, x_44); -lean::cnstr_set(x_92, 1, x_91); -x_93 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_93, 0, x_17); -lean::cnstr_set(x_93, 1, x_92); -x_94 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_94, 0, x_8); -lean::cnstr_set(x_94, 1, x_93); -x_95 = l_lean_parser_command_open__spec; -lean::inc(x_95); -x_97 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_97, 0, x_95); -lean::closure_set(x_97, 1, x_94); -return x_97; +x_92 = l_lean_parser_command_open__spec; +lean::inc(x_92); +x_94 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_94, 0, x_92); +lean::closure_set(x_94, 1, x_91); +return x_94; } } obj* l_lean_parser_command_open__spec_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -6840,30 +6812,29 @@ return x_16; } else { -obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +obj* x_17; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; x_17 = lean::cnstr_get(x_3, 0); lean::inc(x_17); lean::dec(x_3); x_20 = lean::box(0); x_21 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_21, 0, x_17); -lean::inc(x_20); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_20); -x_24 = l_lean_parser_no__kind; -lean::inc(x_24); -x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_21); +lean::cnstr_set(x_22, 1, x_20); +x_23 = l_lean_parser_no__kind; +lean::inc(x_23); +x_25 = l_lean_parser_syntax_mk__node(x_23, x_22); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_20); x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_20); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_10); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_lean_parser_command_section; -lean::inc(x_29); -x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); -return x_31; +lean::cnstr_set(x_27, 0, x_10); +lean::cnstr_set(x_27, 1, x_26); +x_28 = l_lean_parser_command_section; +lean::inc(x_28); +x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); +return x_30; } } } @@ -6891,17 +6862,16 @@ return x_0; obj* _init_l_lean_parser_command_section_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::mk_string("section"); x_1 = lean::mk_nat_obj(0u); x_2 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_3 = lean::box(0); -lean::inc(x_3); -x_5 = l_lean_parser_tokens___rarg(x_3); -x_6 = l_lean_parser_list_cons_tokens___rarg(x_5, x_3); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_2, x_6); -x_8 = l_lean_parser_tokens___rarg(x_7); -return x_8; +x_4 = l_lean_parser_tokens___rarg(x_3); +x_5 = l_lean_parser_list_cons_tokens___rarg(x_4, x_3); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_2, x_5); +x_7 = l_lean_parser_tokens___rarg(x_6); +return x_7; } } obj* _init_l_lean_parser_command_section_parser___closed__1() { @@ -7239,16 +7209,15 @@ return x_0; obj* _init_l_lean_parser_command_namespace_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::mk_string("namespace"); x_1 = lean::mk_nat_obj(0u); x_2 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_3 = lean::box(0); -lean::inc(x_3); -x_5 = l_lean_parser_list_cons_tokens___rarg(x_3, x_3); -x_6 = l_lean_parser_list_cons_tokens___rarg(x_2, x_5); -x_7 = l_lean_parser_tokens___rarg(x_6); -return x_7; +x_4 = l_lean_parser_list_cons_tokens___rarg(x_3, x_3); +x_5 = l_lean_parser_list_cons_tokens___rarg(x_2, x_4); +x_6 = l_lean_parser_tokens___rarg(x_5); +return x_6; } } obj* _init_l_lean_parser_command_namespace_parser___closed__1() { @@ -8460,17 +8429,16 @@ return x_0; obj* _init_l_lean_parser_command_include_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::mk_string("include "); x_1 = lean::mk_nat_obj(0u); x_2 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_3 = lean::box(0); -lean::inc(x_3); -x_5 = l_lean_parser_tokens___rarg(x_3); -x_6 = l_lean_parser_list_cons_tokens___rarg(x_5, x_3); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_2, x_6); -x_8 = l_lean_parser_tokens___rarg(x_7); -return x_8; +x_4 = l_lean_parser_tokens___rarg(x_3); +x_5 = l_lean_parser_list_cons_tokens___rarg(x_4, x_3); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_2, x_5); +x_7 = l_lean_parser_tokens___rarg(x_6); +return x_7; } } obj* _init_l_lean_parser_command_include_parser___closed__1() { @@ -8914,17 +8882,16 @@ return x_0; obj* _init_l_lean_parser_command_omit_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::mk_string("omit "); x_1 = lean::mk_nat_obj(0u); x_2 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_3 = lean::box(0); -lean::inc(x_3); -x_5 = l_lean_parser_tokens___rarg(x_3); -x_6 = l_lean_parser_list_cons_tokens___rarg(x_5, x_3); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_2, x_6); -x_8 = l_lean_parser_tokens___rarg(x_7); -return x_8; +x_4 = l_lean_parser_tokens___rarg(x_3); +x_5 = l_lean_parser_list_cons_tokens___rarg(x_4, x_3); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_2, x_5); +x_7 = l_lean_parser_tokens___rarg(x_6); +return x_7; } } obj* _init_l_lean_parser_command_omit_parser___closed__1() { @@ -9386,30 +9353,29 @@ return x_16; } else { -obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +obj* x_17; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; x_17 = lean::cnstr_get(x_3, 0); lean::inc(x_17); lean::dec(x_3); x_20 = lean::box(0); x_21 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_21, 0, x_17); -lean::inc(x_20); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_20); -x_24 = l_lean_parser_no__kind; -lean::inc(x_24); -x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_21); +lean::cnstr_set(x_22, 1, x_20); +x_23 = l_lean_parser_no__kind; +lean::inc(x_23); +x_25 = l_lean_parser_syntax_mk__node(x_23, x_22); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_20); x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_20); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_10); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_lean_parser_command_end; -lean::inc(x_29); -x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); -return x_31; +lean::cnstr_set(x_27, 0, x_10); +lean::cnstr_set(x_27, 1, x_26); +x_28 = l_lean_parser_command_end; +lean::inc(x_28); +x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); +return x_30; } } } @@ -9437,17 +9403,16 @@ return x_0; obj* _init_l_lean_parser_command_end_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::mk_string("end"); x_1 = lean::mk_nat_obj(0u); x_2 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_3 = lean::box(0); -lean::inc(x_3); -x_5 = l_lean_parser_tokens___rarg(x_3); -x_6 = l_lean_parser_list_cons_tokens___rarg(x_5, x_3); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_2, x_6); -x_8 = l_lean_parser_tokens___rarg(x_7); -return x_8; +x_4 = l_lean_parser_tokens___rarg(x_3); +x_5 = l_lean_parser_list_cons_tokens___rarg(x_4, x_3); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_2, x_5); +x_7 = l_lean_parser_tokens___rarg(x_6); +return x_7; } } obj* _init_l_lean_parser_command_end_parser___closed__1() { @@ -10184,29 +10149,25 @@ return x_0; obj* _init_l_lean_parser_command_universe_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; x_0 = lean::mk_string("universes"); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_4 = lean::box(0); -lean::inc(x_4); -x_6 = l_lean_parser_tokens___rarg(x_4); -lean::inc(x_4); -x_8 = l_lean_parser_list_cons_tokens___rarg(x_6, x_4); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_3, x_8); -x_10 = l_lean_parser_tokens___rarg(x_9); -x_11 = lean::mk_string("universe"); -x_12 = l_lean_parser_symbol_tokens___rarg(x_11, x_1); -lean::inc(x_4); -lean::inc(x_4); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_4, x_4); -x_16 = l_lean_parser_list_cons_tokens___rarg(x_12, x_15); -x_17 = l_lean_parser_tokens___rarg(x_16); -x_18 = l_lean_parser_list_cons_tokens___rarg(x_17, x_4); -x_19 = l_lean_parser_list_cons_tokens___rarg(x_10, x_18); -x_20 = l_lean_parser_tokens___rarg(x_19); -return x_20; +x_5 = l_lean_parser_tokens___rarg(x_4); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_5, x_4); +x_7 = l_lean_parser_list_cons_tokens___rarg(x_3, x_6); +x_8 = l_lean_parser_tokens___rarg(x_7); +x_9 = lean::mk_string("universe"); +x_10 = l_lean_parser_symbol_tokens___rarg(x_9, x_1); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_4, x_4); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_10, x_11); +x_13 = l_lean_parser_tokens___rarg(x_12); +x_14 = l_lean_parser_list_cons_tokens___rarg(x_13, x_4); +x_15 = l_lean_parser_list_cons_tokens___rarg(x_8, x_14); +x_16 = l_lean_parser_tokens___rarg(x_15); +return x_16; } } obj* l_reader__t_orelse___at_lean_parser_command_universe_parser___spec__2___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { @@ -10331,33 +10292,32 @@ _start: { if (lean::obj_tag(x_0) == 0) { -obj* x_5; obj* x_6; obj* x_7; obj* x_11; +obj* x_5; obj* x_6; obj* x_7; obj* x_10; x_5 = lean::box(0); x_6 = l_lean_parser_combinators_any__of___rarg___closed__1; x_7 = l_mjoin___rarg___closed__1; -lean::inc(x_5); lean::inc(x_7); lean::inc(x_6); -x_11 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_6, x_7, x_5, x_5, x_1, x_2, x_3, x_4); -return x_11; +x_10 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_6, x_7, x_5, x_5, x_1, x_2, x_3, x_4); +return x_10; } else { -obj* x_12; obj* x_14; obj* x_17; -x_12 = lean::cnstr_get(x_0, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_0, 1); -lean::inc(x_14); +obj* x_11; obj* x_13; obj* x_16; +x_11 = lean::cnstr_get(x_0, 0); +lean::inc(x_11); +x_13 = lean::cnstr_get(x_0, 1); +lean::inc(x_13); lean::dec(x_0); -x_17 = l_list_foldl___main___at_lean_parser_command_universe_parser___spec__3(x_12, x_14, x_1, x_2, x_3, x_4); -return x_17; +x_16 = l_list_foldl___main___at_lean_parser_command_universe_parser___spec__3(x_11, x_13, x_1, x_2, x_3, x_4); +return x_16; } } } obj* _init_l_lean_parser_command_universe_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; x_0 = lean::mk_string("universes"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -10374,46 +10334,44 @@ lean::inc(x_7); x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3), 5, 1); lean::closure_set(x_9, 0, x_7); x_10 = lean::box(0); -lean::inc(x_10); +x_11 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_11, 0, x_9); +lean::cnstr_set(x_11, 1, x_10); x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_9); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_6); -lean::cnstr_set(x_13, 1, x_12); -x_14 = l_lean_parser_command_universes; -lean::inc(x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_13); -x_17 = lean::mk_string("universe"); -x_18 = l_string_trim(x_17); -lean::inc(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_20, 0, x_18); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_21, 0, x_18); -lean::closure_set(x_21, 1, x_4); -lean::closure_set(x_21, 2, x_20); -lean::inc(x_10); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_7); -lean::cnstr_set(x_23, 1, x_10); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_command_universe; -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_24); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_10); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_16); -lean::cnstr_set(x_29, 1, x_28); -return x_29; +lean::cnstr_set(x_12, 0, x_6); +lean::cnstr_set(x_12, 1, x_11); +x_13 = l_lean_parser_command_universes; +lean::inc(x_13); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_15, 0, x_13); +lean::closure_set(x_15, 1, x_12); +x_16 = lean::mk_string("universe"); +x_17 = l_string_trim(x_16); +lean::inc(x_17); +x_19 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_19, 0, x_17); +x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_20, 0, x_17); +lean::closure_set(x_20, 1, x_4); +lean::closure_set(x_20, 2, x_19); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_7); +lean::cnstr_set(x_21, 1, x_10); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 1, x_21); +x_23 = l_lean_parser_command_universe; +lean::inc(x_23); +x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_25, 0, x_23); +lean::closure_set(x_25, 1, x_22); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_10); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_15); +lean::cnstr_set(x_27, 1, x_26); +return x_27; } } obj* l_lean_parser_command_universe_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -10862,95 +10820,94 @@ if (lean::is_shared(x_0)) { } if (lean::obj_tag(x_4) == 0) { -obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; +obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; x_7 = l_lean_parser_command_attr__instance_has__view; x_8 = lean::cnstr_get(x_7, 0); lean::inc(x_8); x_10 = lean::apply_1(x_8, x_2); x_11 = lean::box(0); -lean::inc(x_11); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_11); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_10); +lean::cnstr_set(x_12, 1, x_11); if (lean::is_scalar(x_6)) { - x_14 = lean::alloc_cnstr(1, 2, 0); + x_13 = lean::alloc_cnstr(1, 2, 0); } else { - x_14 = x_6; + x_13 = x_6; } -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_11); -return x_14; +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_11); +return x_13; } else { -obj* x_15; obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; -x_15 = lean::cnstr_get(x_4, 0); -lean::inc(x_15); -x_17 = lean::cnstr_get(x_4, 1); -lean::inc(x_17); +obj* x_14; obj* x_16; obj* x_19; obj* x_20; obj* x_22; obj* x_23; +x_14 = lean::cnstr_get(x_4, 0); +lean::inc(x_14); +x_16 = lean::cnstr_get(x_4, 1); +lean::inc(x_16); lean::dec(x_4); -x_20 = l_lean_parser_command_attr__instance_has__view; -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_23 = lean::apply_1(x_21, x_2); -x_24 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_command_attribute_has__view_x_27___spec__2(x_17); -switch (lean::obj_tag(x_15)) { +x_19 = l_lean_parser_command_attr__instance_has__view; +x_20 = lean::cnstr_get(x_19, 0); +lean::inc(x_20); +x_22 = lean::apply_1(x_20, x_2); +x_23 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_command_attribute_has__view_x_27___spec__2(x_16); +switch (lean::obj_tag(x_14)) { case 0: { -obj* x_25; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_25 = lean::cnstr_get(x_15, 0); -lean::inc(x_25); -lean::dec(x_15); +obj* x_24; obj* x_27; obj* x_28; obj* x_29; obj* x_30; +x_24 = lean::cnstr_get(x_14, 0); +lean::inc(x_24); +lean::dec(x_14); +x_27 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_27, 0, x_24); x_28 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_28, 0, x_25); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_23); -lean::cnstr_set(x_30, 1, x_29); +lean::cnstr_set(x_28, 0, x_27); +x_29 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_29, 0, x_22); +lean::cnstr_set(x_29, 1, x_28); if (lean::is_scalar(x_6)) { - x_31 = lean::alloc_cnstr(1, 2, 0); + x_30 = lean::alloc_cnstr(1, 2, 0); } else { - x_31 = x_6; + x_30 = x_6; } -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_24); -return x_31; +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_23); +return x_30; } case 3: { -obj* x_32; obj* x_34; obj* x_35; -x_32 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_23); -lean::cnstr_set(x_34, 1, x_32); +obj* x_31; obj* x_33; obj* x_34; +x_31 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_31); +x_33 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_33, 0, x_22); +lean::cnstr_set(x_33, 1, x_31); if (lean::is_scalar(x_6)) { - x_35 = lean::alloc_cnstr(1, 2, 0); + x_34 = lean::alloc_cnstr(1, 2, 0); } else { - x_35 = x_6; + x_34 = x_6; } -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_24); -return x_35; +lean::cnstr_set(x_34, 0, x_33); +lean::cnstr_set(x_34, 1, x_23); +return x_34; } default: { -obj* x_37; obj* x_39; obj* x_40; -lean::dec(x_15); -x_37 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_37); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_23); -lean::cnstr_set(x_39, 1, x_37); +obj* x_36; obj* x_38; obj* x_39; +lean::dec(x_14); +x_36 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_36); +x_38 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_38, 0, x_22); +lean::cnstr_set(x_38, 1, x_36); if (lean::is_scalar(x_6)) { - x_40 = lean::alloc_cnstr(1, 2, 0); + x_39 = lean::alloc_cnstr(1, 2, 0); } else { - x_40 = x_6; + x_39 = x_6; } -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_24); -return x_40; +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_23); +return x_39; } } } @@ -11951,7 +11908,7 @@ return x_171; obj* l_lean_parser_command_attribute_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_33; obj* x_35; obj* x_36; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -11969,88 +11926,81 @@ x_14 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_14); x_16 = l_option_map___rarg(x_14, x_3); x_17 = lean::box(3); -lean::inc(x_17); -x_19 = l_option_get__or__else___main___rarg(x_16, x_17); -x_20 = lean::box(0); -lean::inc(x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_19); -lean::cnstr_set(x_22, 1, x_20); +x_18 = l_option_get__or__else___main___rarg(x_16, x_17); +x_19 = lean::box(0); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_18); +lean::cnstr_set(x_20, 1, x_19); lean::inc(x_14); -x_24 = l_option_map___rarg(x_14, x_5); -lean::inc(x_17); -x_26 = l_option_get__or__else___main___rarg(x_24, x_17); -x_27 = l_list_map___main___at_lean_parser_command_attribute_has__view_x_27___spec__3(x_7); -x_28 = l_list_join___main___rarg(x_27); -x_29 = l_lean_parser_no__kind; -lean::inc(x_29); -x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +x_22 = l_option_map___rarg(x_14, x_5); +x_23 = l_option_get__or__else___main___rarg(x_22, x_17); +x_24 = l_list_map___main___at_lean_parser_command_attribute_has__view_x_27___spec__3(x_7); +x_25 = l_list_join___main___rarg(x_24); +x_26 = l_lean_parser_no__kind; +lean::inc(x_26); +x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); lean::inc(x_14); -x_33 = l_option_map___rarg(x_14, x_9); -lean::inc(x_17); -x_35 = l_option_get__or__else___main___rarg(x_33, x_17); -x_36 = l_list_map___main___at_lean_parser_command_attribute_has__view_x_27___spec__4(x_11); -lean::inc(x_29); -x_38 = l_lean_parser_syntax_mk__node(x_29, x_36); -lean::inc(x_20); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_38); -lean::cnstr_set(x_40, 1, x_20); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_35); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_31); -lean::cnstr_set(x_42, 1, x_41); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_26); -lean::cnstr_set(x_43, 1, x_42); +x_30 = l_option_map___rarg(x_14, x_9); +x_31 = l_option_get__or__else___main___rarg(x_30, x_17); +x_32 = l_list_map___main___at_lean_parser_command_attribute_has__view_x_27___spec__4(x_11); +lean::inc(x_26); +x_34 = l_lean_parser_syntax_mk__node(x_26, x_32); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_34); +lean::cnstr_set(x_35, 1, x_19); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_31); +lean::cnstr_set(x_36, 1, x_35); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_28); +lean::cnstr_set(x_37, 1, x_36); +x_38 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_38, 0, x_23); +lean::cnstr_set(x_38, 1, x_37); if (lean::obj_tag(x_1) == 0) { -obj* x_46; obj* x_48; obj* x_50; obj* x_51; obj* x_52; obj* x_54; -lean::dec(x_17); -lean::dec(x_20); -x_46 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_46); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_46); -lean::cnstr_set(x_48, 1, x_22); -lean::inc(x_29); -x_50 = l_lean_parser_syntax_mk__node(x_29, x_48); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_43); -x_52 = l_lean_parser_command_attribute; -lean::inc(x_52); -x_54 = l_lean_parser_syntax_mk__node(x_52, x_51); -return x_54; +obj* x_39; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_47; +x_39 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_39); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_39); +lean::cnstr_set(x_41, 1, x_20); +lean::inc(x_26); +x_43 = l_lean_parser_syntax_mk__node(x_26, x_41); +x_44 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_44, 0, x_43); +lean::cnstr_set(x_44, 1, x_38); +x_45 = l_lean_parser_command_attribute; +lean::inc(x_45); +x_47 = l_lean_parser_syntax_mk__node(x_45, x_44); +return x_47; } else { -obj* x_55; obj* x_59; obj* x_60; obj* x_61; obj* x_63; obj* x_64; obj* x_66; obj* x_67; obj* x_68; obj* x_70; -x_55 = lean::cnstr_get(x_1, 0); -lean::inc(x_55); +obj* x_48; obj* x_52; obj* x_53; obj* x_54; obj* x_56; obj* x_57; obj* x_59; obj* x_60; obj* x_61; obj* x_63; +x_48 = lean::cnstr_get(x_1, 0); +lean::inc(x_48); lean::dec(x_1); lean::inc(x_14); -x_59 = l_option_map___rarg(x_14, x_55); -x_60 = l_option_get__or__else___main___rarg(x_59, x_17); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_20); -lean::inc(x_29); -x_63 = l_lean_parser_syntax_mk__node(x_29, x_61); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_22); -lean::inc(x_29); -x_66 = l_lean_parser_syntax_mk__node(x_29, x_64); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_66); -lean::cnstr_set(x_67, 1, x_43); -x_68 = l_lean_parser_command_attribute; -lean::inc(x_68); -x_70 = l_lean_parser_syntax_mk__node(x_68, x_67); -return x_70; +x_52 = l_option_map___rarg(x_14, x_48); +x_53 = l_option_get__or__else___main___rarg(x_52, x_17); +x_54 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_54, 0, x_53); +lean::cnstr_set(x_54, 1, x_19); +lean::inc(x_26); +x_56 = l_lean_parser_syntax_mk__node(x_26, x_54); +x_57 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_57, 0, x_56); +lean::cnstr_set(x_57, 1, x_20); +lean::inc(x_26); +x_59 = l_lean_parser_syntax_mk__node(x_26, x_57); +x_60 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_60, 0, x_59); +lean::cnstr_set(x_60, 1, x_38); +x_61 = l_lean_parser_command_attribute; +lean::inc(x_61); +x_63 = l_lean_parser_syntax_mk__node(x_61, x_60); +return x_63; } } } @@ -12078,7 +12028,7 @@ return x_0; obj* _init_l_lean_parser_command_attribute_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; x_0 = lean::mk_string("local "); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -12088,37 +12038,35 @@ x_5 = lean::mk_string("attribute "); lean::inc(x_1); x_7 = l_lean_parser_symbol_tokens___rarg(x_5, x_1); x_8 = lean::box(0); -lean::inc(x_8); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_7, x_8); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_4, x_10); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_7, x_8); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_4, x_9); +x_11 = l_lean_parser_tokens___rarg(x_10); x_12 = l_lean_parser_tokens___rarg(x_11); -x_13 = l_lean_parser_tokens___rarg(x_12); -x_14 = lean::mk_string("["); +x_13 = lean::mk_string("["); lean::inc(x_1); -x_16 = l_lean_parser_symbol_tokens___rarg(x_14, x_1); -x_17 = lean::mk_string(", "); +x_15 = l_lean_parser_symbol_tokens___rarg(x_13, x_1); +x_16 = lean::mk_string(", "); lean::inc(x_1); -x_19 = l_lean_parser_symbol_tokens___rarg(x_17, x_1); -x_20 = l_lean_parser_command_attr__instance_parser_lean_parser_has__tokens; -lean::inc(x_20); -x_22 = l_lean_parser_combinators_sep__by1_tokens___rarg(x_20, x_19); -x_23 = lean::mk_string("] "); -x_24 = l_lean_parser_symbol_tokens___rarg(x_23, x_1); -lean::inc(x_8); -x_26 = l_lean_parser_tokens___rarg(x_8); -x_27 = l_lean_parser_list_cons_tokens___rarg(x_26, x_8); -x_28 = l_lean_parser_list_cons_tokens___rarg(x_24, x_27); -x_29 = l_lean_parser_list_cons_tokens___rarg(x_22, x_28); -x_30 = l_lean_parser_list_cons_tokens___rarg(x_16, x_29); -x_31 = l_lean_parser_list_cons_tokens___rarg(x_13, x_30); -x_32 = l_lean_parser_tokens___rarg(x_31); -return x_32; +x_18 = l_lean_parser_symbol_tokens___rarg(x_16, x_1); +x_19 = l_lean_parser_command_attr__instance_parser_lean_parser_has__tokens; +lean::inc(x_19); +x_21 = l_lean_parser_combinators_sep__by1_tokens___rarg(x_19, x_18); +x_22 = lean::mk_string("] "); +x_23 = l_lean_parser_symbol_tokens___rarg(x_22, x_1); +x_24 = l_lean_parser_tokens___rarg(x_8); +x_25 = l_lean_parser_list_cons_tokens___rarg(x_24, x_8); +x_26 = l_lean_parser_list_cons_tokens___rarg(x_23, x_25); +x_27 = l_lean_parser_list_cons_tokens___rarg(x_21, x_26); +x_28 = l_lean_parser_list_cons_tokens___rarg(x_15, x_27); +x_29 = l_lean_parser_list_cons_tokens___rarg(x_12, x_28); +x_30 = l_lean_parser_tokens___rarg(x_29); +return x_30; } } obj* _init_l_lean_parser_command_attribute_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; uint8 x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_59; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_30; uint8 x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_58; x_0 = lean::mk_string("local "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -12143,89 +12091,88 @@ lean::closure_set(x_13, 0, x_9); lean::closure_set(x_13, 1, x_4); lean::closure_set(x_13, 2, x_11); x_14 = lean::box(0); -lean::inc(x_14); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_13); +lean::cnstr_set(x_15, 1, x_14); x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_13); -lean::cnstr_set(x_16, 1, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_7); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); -lean::closure_set(x_18, 0, x_17); -x_19 = lean::mk_string("["); -x_20 = l_string_trim(x_19); -lean::inc(x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_22, 0, x_20); +lean::cnstr_set(x_16, 0, x_7); +lean::cnstr_set(x_16, 1, x_15); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); +lean::closure_set(x_17, 0, x_16); +x_18 = lean::mk_string("["); +x_19 = l_string_trim(x_18); +lean::inc(x_19); +x_21 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_21, 0, x_19); lean::inc(x_4); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_24, 0, x_20); -lean::closure_set(x_24, 1, x_4); -lean::closure_set(x_24, 2, x_22); -x_25 = lean::mk_string(", "); -x_26 = l_string_trim(x_25); -lean::inc(x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_28, 0, x_26); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_23, 0, x_19); +lean::closure_set(x_23, 1, x_4); +lean::closure_set(x_23, 2, x_21); +x_24 = lean::mk_string(", "); +x_25 = l_string_trim(x_24); +lean::inc(x_25); +x_27 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_27, 0, x_25); lean::inc(x_4); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_30, 0, x_26); -lean::closure_set(x_30, 1, x_4); -lean::closure_set(x_30, 2, x_28); -x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_attr__instance_parser), 4, 0); -x_32 = 1; -x_33 = lean::box(x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__1___boxed), 7, 3); -lean::closure_set(x_34, 0, x_31); -lean::closure_set(x_34, 1, x_30); -lean::closure_set(x_34, 2, x_33); -x_35 = lean::mk_string("] "); -x_36 = l_string_trim(x_35); -lean::inc(x_36); -x_38 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_38, 0, x_36); -x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_39, 0, x_36); -lean::closure_set(x_39, 1, x_4); -lean::closure_set(x_39, 2, x_38); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1), 4, 0); -x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); -lean::closure_set(x_41, 0, x_40); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_29, 0, x_25); +lean::closure_set(x_29, 1, x_4); +lean::closure_set(x_29, 2, x_27); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_attr__instance_parser), 4, 0); +x_31 = 1; +x_32 = lean::box(x_31); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__1___boxed), 7, 3); +lean::closure_set(x_33, 0, x_30); +lean::closure_set(x_33, 1, x_29); +lean::closure_set(x_33, 2, x_32); +x_34 = lean::mk_string("] "); +x_35 = l_string_trim(x_34); +lean::inc(x_35); +x_37 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_37, 0, x_35); +x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_38, 0, x_35); +lean::closure_set(x_38, 1, x_4); +lean::closure_set(x_38, 2, x_37); +x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1), 4, 0); +x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); +lean::closure_set(x_40, 0, x_39); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_40); +lean::cnstr_set(x_41, 1, x_14); x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_14); +lean::cnstr_set(x_42, 0, x_38); +lean::cnstr_set(x_42, 1, x_41); x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_39); +lean::cnstr_set(x_43, 0, x_33); lean::cnstr_set(x_43, 1, x_42); x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_34); +lean::cnstr_set(x_44, 0, x_23); lean::cnstr_set(x_44, 1, x_43); x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_24); +lean::cnstr_set(x_45, 0, x_17); lean::cnstr_set(x_45, 1, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_18); -lean::cnstr_set(x_46, 1, x_45); -x_47 = l_lean_parser_command__parser__m_monad___closed__1; -x_48 = l_lean_parser_command__parser__m_monad__except___closed__1; -x_49 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -x_50 = l_lean_parser_command__parser__m_alternative___closed__1; -x_51 = l_lean_parser_command_attribute; -x_52 = l_lean_parser_command_attribute_has__view; -lean::inc(x_52); +x_46 = l_lean_parser_command__parser__m_monad___closed__1; +x_47 = l_lean_parser_command__parser__m_monad__except___closed__1; +x_48 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; +x_49 = l_lean_parser_command__parser__m_alternative___closed__1; +x_50 = l_lean_parser_command_attribute; +x_51 = l_lean_parser_command_attribute_has__view; lean::inc(x_51); lean::inc(x_50); lean::inc(x_49); lean::inc(x_48); lean::inc(x_47); -x_59 = l_lean_parser_combinators_node_view___rarg(x_47, x_48, x_49, x_50, x_51, x_46, x_52); -return x_59; +lean::inc(x_46); +x_58 = l_lean_parser_combinators_node_view___rarg(x_46, x_47, x_48, x_49, x_50, x_45, x_51); +return x_58; } } obj* _init_l_lean_parser_command_attribute_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; uint8 x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_30; uint8 x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; x_0 = lean::mk_string("local "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -12250,70 +12197,69 @@ lean::closure_set(x_13, 0, x_9); lean::closure_set(x_13, 1, x_4); lean::closure_set(x_13, 2, x_11); x_14 = lean::box(0); -lean::inc(x_14); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_13); +lean::cnstr_set(x_15, 1, x_14); x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_13); -lean::cnstr_set(x_16, 1, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_7); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); -lean::closure_set(x_18, 0, x_17); -x_19 = lean::mk_string("["); -x_20 = l_string_trim(x_19); -lean::inc(x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_22, 0, x_20); +lean::cnstr_set(x_16, 0, x_7); +lean::cnstr_set(x_16, 1, x_15); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); +lean::closure_set(x_17, 0, x_16); +x_18 = lean::mk_string("["); +x_19 = l_string_trim(x_18); +lean::inc(x_19); +x_21 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_21, 0, x_19); lean::inc(x_4); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_24, 0, x_20); -lean::closure_set(x_24, 1, x_4); -lean::closure_set(x_24, 2, x_22); -x_25 = lean::mk_string(", "); -x_26 = l_string_trim(x_25); -lean::inc(x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_28, 0, x_26); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_23, 0, x_19); +lean::closure_set(x_23, 1, x_4); +lean::closure_set(x_23, 2, x_21); +x_24 = lean::mk_string(", "); +x_25 = l_string_trim(x_24); +lean::inc(x_25); +x_27 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_27, 0, x_25); lean::inc(x_4); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_30, 0, x_26); -lean::closure_set(x_30, 1, x_4); -lean::closure_set(x_30, 2, x_28); -x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_attr__instance_parser), 4, 0); -x_32 = 1; -x_33 = lean::box(x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__1___boxed), 7, 3); -lean::closure_set(x_34, 0, x_31); -lean::closure_set(x_34, 1, x_30); -lean::closure_set(x_34, 2, x_33); -x_35 = lean::mk_string("] "); -x_36 = l_string_trim(x_35); -lean::inc(x_36); -x_38 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_38, 0, x_36); -x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_39, 0, x_36); -lean::closure_set(x_39, 1, x_4); -lean::closure_set(x_39, 2, x_38); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1), 4, 0); -x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); -lean::closure_set(x_41, 0, x_40); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_29, 0, x_25); +lean::closure_set(x_29, 1, x_4); +lean::closure_set(x_29, 2, x_27); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_attr__instance_parser), 4, 0); +x_31 = 1; +x_32 = lean::box(x_31); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__1___boxed), 7, 3); +lean::closure_set(x_33, 0, x_30); +lean::closure_set(x_33, 1, x_29); +lean::closure_set(x_33, 2, x_32); +x_34 = lean::mk_string("] "); +x_35 = l_string_trim(x_34); +lean::inc(x_35); +x_37 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_37, 0, x_35); +x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_38, 0, x_35); +lean::closure_set(x_38, 1, x_4); +lean::closure_set(x_38, 2, x_37); +x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1), 4, 0); +x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); +lean::closure_set(x_40, 0, x_39); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_40); +lean::cnstr_set(x_41, 1, x_14); x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_14); +lean::cnstr_set(x_42, 0, x_38); +lean::cnstr_set(x_42, 1, x_41); x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_39); +lean::cnstr_set(x_43, 0, x_33); lean::cnstr_set(x_43, 1, x_42); x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_34); +lean::cnstr_set(x_44, 0, x_23); lean::cnstr_set(x_44, 1, x_43); x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_24); +lean::cnstr_set(x_45, 0, x_17); lean::cnstr_set(x_45, 1, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_18); -lean::cnstr_set(x_46, 1, x_45); -return x_46; +return x_45; } } obj* l_lean_parser_command_attribute_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -12630,50 +12576,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_bool__option__value_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_bool__option__value_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_bool__option__value_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_bool__option__value_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_bool__option__value_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_bool__option__value_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -12683,36 +12628,36 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_bool__option__value_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_bool__option__value_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; -x_80 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_80, 0, x_1); -return x_80; +obj* x_79; +x_79 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_79, 0, x_1); +return x_79; } else { -obj* x_81; -x_81 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_81, 0, x_1); -return x_81; +obj* x_80; +x_80 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_80, 0, x_1); +return x_80; } } } @@ -12724,45 +12669,43 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); -lean::inc(x_1); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_7); -x_9 = l_lean_parser_syntax_mk__node(x_7, x_6); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_command_bool__option__value; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -return x_13; +x_5 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_5, 0, x_2); +lean::cnstr_set(x_5, 1, x_1); +x_6 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_6); +x_8 = l_lean_parser_syntax_mk__node(x_6, x_5); +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_command_bool__option__value; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +return x_12; } else { -obj* x_14; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; -x_14 = lean::cnstr_get(x_0, 0); -lean::inc(x_14); +obj* x_13; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; +x_13 = lean::cnstr_get(x_0, 0); +lean::inc(x_13); lean::dec(x_0); -lean::inc(x_1); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_14); -lean::cnstr_set(x_18, 1, x_1); -x_19 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_19); -x_21 = l_lean_parser_syntax_mk__node(x_19, x_18); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_1); -x_23 = l_lean_parser_command_bool__option__value; -lean::inc(x_23); -x_25 = l_lean_parser_syntax_mk__node(x_23, x_22); -return x_25; +x_16 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_16, 0, x_13); +lean::cnstr_set(x_16, 1, x_1); +x_17 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_17); +x_19 = l_lean_parser_syntax_mk__node(x_17, x_16); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_19); +lean::cnstr_set(x_20, 1, x_1); +x_21 = l_lean_parser_command_bool__option__value; +lean::inc(x_21); +x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); +return x_23; } } } @@ -12980,50 +12923,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_option__value_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_option__value_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_option__value_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_option__value_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_option__value_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_option__value_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -13033,63 +12975,63 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_option__value_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_option__value_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); -if (x_77 == 0) +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); +if (x_76 == 0) { -obj* x_79; uint8 x_80; -x_79 = lean::mk_nat_obj(1u); -x_80 = lean::nat_dec_eq(x_2, x_79); -lean::dec(x_79); +obj* x_78; uint8 x_79; +x_78 = lean::mk_nat_obj(1u); +x_79 = lean::nat_dec_eq(x_2, x_78); +lean::dec(x_78); lean::dec(x_2); -if (x_80 == 0) +if (x_79 == 0) { -obj* x_83; obj* x_84; obj* x_86; obj* x_87; -x_83 = l_lean_parser_number_has__view; -x_84 = lean::cnstr_get(x_83, 0); -lean::inc(x_84); -x_86 = lean::apply_1(x_84, x_1); -x_87 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_87, 0, x_86); -return x_87; +obj* x_82; obj* x_83; obj* x_85; obj* x_86; +x_82 = l_lean_parser_number_has__view; +x_83 = lean::cnstr_get(x_82, 0); +lean::inc(x_83); +x_85 = lean::apply_1(x_83, x_1); +x_86 = lean::alloc_cnstr(2, 1, 0); +lean::cnstr_set(x_86, 0, x_85); +return x_86; } else { -obj* x_88; obj* x_89; obj* x_91; obj* x_92; -x_88 = l_lean_parser_string__lit_has__view; -x_89 = lean::cnstr_get(x_88, 0); -lean::inc(x_89); -x_91 = lean::apply_1(x_89, x_1); -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -return x_92; +obj* x_87; obj* x_88; obj* x_90; obj* x_91; +x_87 = l_lean_parser_string__lit_has__view; +x_88 = lean::cnstr_get(x_87, 0); +lean::inc(x_88); +x_90 = lean::apply_1(x_88, x_1); +x_91 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_91, 0, x_90); +return x_91; } } else { -obj* x_94; obj* x_95; obj* x_97; obj* x_98; +obj* x_93; obj* x_94; obj* x_96; obj* x_97; lean::dec(x_2); -x_94 = l_lean_parser_command_bool__option__value_has__view; -x_95 = lean::cnstr_get(x_94, 0); -lean::inc(x_95); -x_97 = lean::apply_1(x_95, x_1); -x_98 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_98, 0, x_97); -return x_98; +x_93 = l_lean_parser_command_bool__option__value_has__view; +x_94 = lean::cnstr_get(x_93, 0); +lean::inc(x_94); +x_96 = lean::apply_1(x_94, x_1); +x_97 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_97, 0, x_96); +return x_97; } } } @@ -13102,7 +13044,7 @@ x_1 = lean::box(0); switch (lean::obj_tag(x_0)) { case 0: { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -13110,70 +13052,67 @@ x_5 = l_lean_parser_command_bool__option__value_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_command_option__value; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_command_option__value; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } case 1: { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_string__lit_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_command_option__value; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_string__lit_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_command_option__value; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } default: { -obj* x_34; obj* x_37; obj* x_38; obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; -x_34 = lean::cnstr_get(x_0, 0); -lean::inc(x_34); +obj* x_32; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_46; +x_32 = lean::cnstr_get(x_0, 0); +lean::inc(x_32); lean::dec(x_0); -x_37 = l_lean_parser_number_has__view; -x_38 = lean::cnstr_get(x_37, 1); -lean::inc(x_38); -x_40 = lean::apply_1(x_38, x_34); -lean::inc(x_1); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_1); -x_43 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; -lean::inc(x_43); -x_45 = l_lean_parser_syntax_mk__node(x_43, x_42); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_1); -x_47 = l_lean_parser_command_option__value; -lean::inc(x_47); -x_49 = l_lean_parser_syntax_mk__node(x_47, x_46); -return x_49; +x_35 = l_lean_parser_number_has__view; +x_36 = lean::cnstr_get(x_35, 1); +lean::inc(x_36); +x_38 = lean::apply_1(x_36, x_32); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_1); +x_40 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; +lean::inc(x_40); +x_42 = l_lean_parser_syntax_mk__node(x_40, x_39); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_1); +x_44 = l_lean_parser_command_option__value; +lean::inc(x_44); +x_46 = l_lean_parser_syntax_mk__node(x_44, x_43); +return x_46; } } } @@ -14215,38 +14154,32 @@ return x_79; obj* _init_l_lean_parser_command_set__option_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_6; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; x_0 = lean::mk_string("set_option"); x_1 = lean::mk_nat_obj(0u); x_2 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_3 = lean::box(0); -lean::inc(x_3); -lean::inc(x_3); -x_6 = l_lean_parser_list_cons_tokens___rarg(x_3, x_3); -lean::inc(x_3); -x_8 = l_lean_parser_list_cons_tokens___rarg(x_3, x_6); -lean::inc(x_8); -x_10 = l_lean_parser_tokens___rarg(x_8); -lean::inc(x_3); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_10, x_3); +x_4 = l_lean_parser_list_cons_tokens___rarg(x_3, x_3); +x_5 = l_lean_parser_list_cons_tokens___rarg(x_3, x_4); +lean::inc(x_5); +x_7 = l_lean_parser_tokens___rarg(x_5); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_7, x_3); +x_9 = l_lean_parser_tokens___rarg(x_8); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_9, x_5); +x_11 = l_lean_parser_tokens___rarg(x_10); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_11, x_3); x_13 = l_lean_parser_tokens___rarg(x_12); -x_14 = l_lean_parser_list_cons_tokens___rarg(x_13, x_8); -x_15 = l_lean_parser_tokens___rarg(x_14); -lean::inc(x_3); -x_17 = l_lean_parser_list_cons_tokens___rarg(x_15, x_3); -x_18 = l_lean_parser_tokens___rarg(x_17); -lean::inc(x_3); -x_20 = l_lean_parser_list_cons_tokens___rarg(x_18, x_3); -x_21 = l_lean_parser_list_cons_tokens___rarg(x_3, x_20); -x_22 = l_lean_parser_list_cons_tokens___rarg(x_2, x_21); -x_23 = l_lean_parser_tokens___rarg(x_22); -return x_23; +x_14 = l_lean_parser_list_cons_tokens___rarg(x_13, x_3); +x_15 = l_lean_parser_list_cons_tokens___rarg(x_3, x_14); +x_16 = l_lean_parser_list_cons_tokens___rarg(x_2, x_15); +x_17 = l_lean_parser_tokens___rarg(x_16); +return x_17; } } obj* _init_l_lean_parser_command_set__option_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_49; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_45; x_0 = lean::mk_string("set_option"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -14262,81 +14195,77 @@ x_7 = lean::mk_string("true"); x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__1), 5, 1); lean::closure_set(x_8, 0, x_7); x_9 = lean::box(0); -lean::inc(x_9); lean::inc(x_8); +x_11 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_11, 0, x_8); +lean::cnstr_set(x_11, 1, x_9); x_12 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_12, 0, x_8); -lean::cnstr_set(x_12, 1, x_9); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_8); -lean::cnstr_set(x_13, 1, x_12); +lean::cnstr_set(x_12, 1, x_11); lean::inc(x_4); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_15, 0, x_13); -lean::closure_set(x_15, 1, x_4); -lean::inc(x_9); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_9); -x_18 = l_lean_parser_command_bool__option__value; -lean::inc(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_20, 0, x_18); -lean::closure_set(x_20, 1, x_17); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__3), 4, 0); -lean::inc(x_9); +x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_14, 0, x_12); +lean::closure_set(x_14, 1, x_4); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_14); +lean::cnstr_set(x_15, 1, x_9); +x_16 = l_lean_parser_command_bool__option__value; +lean::inc(x_16); +x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_18, 0, x_16); +lean::closure_set(x_18, 1, x_15); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__3), 4, 0); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_19); +lean::cnstr_set(x_20, 1, x_9); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_string__lit_parser___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__2), 4, 0); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_21); +lean::cnstr_set(x_22, 1, x_20); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_9); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_string__lit_parser___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__2), 4, 0); +lean::cnstr_set(x_23, 0, x_18); +lean::cnstr_set(x_23, 1, x_22); +x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_24, 0, x_23); +lean::closure_set(x_24, 1, x_4); x_25 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_23); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_20); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_27, 0, x_26); -lean::closure_set(x_27, 1, x_4); -lean::inc(x_9); +lean::cnstr_set(x_25, 1, x_9); +x_26 = l_lean_parser_command_option__value; +lean::inc(x_26); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_28, 0, x_26); +lean::closure_set(x_28, 1, x_25); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_27); +lean::cnstr_set(x_29, 0, x_28); lean::cnstr_set(x_29, 1, x_9); -x_30 = l_lean_parser_command_option__value; -lean::inc(x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_32, 0, x_30); -lean::closure_set(x_32, 1, x_29); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_9); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1), 4, 0); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_33); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_6); -lean::cnstr_set(x_36, 1, x_35); -x_37 = l_lean_parser_command__parser__m_monad___closed__1; -x_38 = l_lean_parser_command__parser__m_monad__except___closed__1; -x_39 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -x_40 = l_lean_parser_command__parser__m_alternative___closed__1; -x_41 = l_lean_parser_command_set__option; -x_42 = l_lean_parser_command_set__option_has__view; -lean::inc(x_42); -lean::inc(x_41); -lean::inc(x_40); -lean::inc(x_39); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1), 4, 0); +x_31 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_31, 0, x_30); +lean::cnstr_set(x_31, 1, x_29); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_6); +lean::cnstr_set(x_32, 1, x_31); +x_33 = l_lean_parser_command__parser__m_monad___closed__1; +x_34 = l_lean_parser_command__parser__m_monad__except___closed__1; +x_35 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; +x_36 = l_lean_parser_command__parser__m_alternative___closed__1; +x_37 = l_lean_parser_command_set__option; +x_38 = l_lean_parser_command_set__option_has__view; lean::inc(x_38); lean::inc(x_37); -x_49 = l_lean_parser_combinators_node_view___rarg(x_37, x_38, x_39, x_40, x_41, x_36, x_42); -return x_49; +lean::inc(x_36); +lean::inc(x_35); +lean::inc(x_34); +lean::inc(x_33); +x_45 = l_lean_parser_combinators_node_view___rarg(x_33, x_34, x_35, x_36, x_37, x_32, x_38); +return x_45; } } obj* _init_l_lean_parser_command_set__option_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; x_0 = lean::mk_string("set_option"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -14352,62 +14281,58 @@ x_7 = lean::mk_string("true"); x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__1), 5, 1); lean::closure_set(x_8, 0, x_7); x_9 = lean::box(0); -lean::inc(x_9); lean::inc(x_8); +x_11 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_11, 0, x_8); +lean::cnstr_set(x_11, 1, x_9); x_12 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_12, 0, x_8); -lean::cnstr_set(x_12, 1, x_9); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_8); -lean::cnstr_set(x_13, 1, x_12); +lean::cnstr_set(x_12, 1, x_11); lean::inc(x_4); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_15, 0, x_13); -lean::closure_set(x_15, 1, x_4); -lean::inc(x_9); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_9); -x_18 = l_lean_parser_command_bool__option__value; -lean::inc(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_20, 0, x_18); -lean::closure_set(x_20, 1, x_17); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__3), 4, 0); -lean::inc(x_9); +x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_14, 0, x_12); +lean::closure_set(x_14, 1, x_4); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_14); +lean::cnstr_set(x_15, 1, x_9); +x_16 = l_lean_parser_command_bool__option__value; +lean::inc(x_16); +x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_18, 0, x_16); +lean::closure_set(x_18, 1, x_15); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__3), 4, 0); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_19); +lean::cnstr_set(x_20, 1, x_9); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_string__lit_parser___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__2), 4, 0); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_21); +lean::cnstr_set(x_22, 1, x_20); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_9); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_string__lit_parser___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__2), 4, 0); +lean::cnstr_set(x_23, 0, x_18); +lean::cnstr_set(x_23, 1, x_22); +x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_24, 0, x_23); +lean::closure_set(x_24, 1, x_4); x_25 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_23); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_20); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_27, 0, x_26); -lean::closure_set(x_27, 1, x_4); -lean::inc(x_9); +lean::cnstr_set(x_25, 1, x_9); +x_26 = l_lean_parser_command_option__value; +lean::inc(x_26); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_28, 0, x_26); +lean::closure_set(x_28, 1, x_25); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_27); +lean::cnstr_set(x_29, 0, x_28); lean::cnstr_set(x_29, 1, x_9); -x_30 = l_lean_parser_command_option__value; -lean::inc(x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_32, 0, x_30); -lean::closure_set(x_32, 1, x_29); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_9); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1), 4, 0); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_33); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_6); -lean::cnstr_set(x_36, 1, x_35); -return x_36; +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1), 4, 0); +x_31 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_31, 0, x_30); +lean::cnstr_set(x_31, 1, x_29); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_6); +lean::cnstr_set(x_32, 1, x_31); +return x_32; } } obj* l_lean_parser_command_set__option_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -14772,26 +14697,25 @@ _start: { if (lean::obj_tag(x_0) == 0) { -obj* x_4; obj* x_5; obj* x_6; obj* x_10; +obj* x_4; obj* x_5; obj* x_6; obj* x_9; x_4 = lean::box(0); x_5 = l_lean_parser_combinators_any__of___rarg___closed__1; x_6 = l_mjoin___rarg___closed__1; -lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); -x_10 = l_lean_parser_monad__parsec_error___at_lean_parser_command__parser_run___spec__3___rarg(x_5, x_6, x_4, x_4, x_1, x_2, x_3); -return x_10; +x_9 = l_lean_parser_monad__parsec_error___at_lean_parser_command__parser_run___spec__3___rarg(x_5, x_6, x_4, x_4, x_1, x_2, x_3); +return x_9; } else { -obj* x_11; obj* x_13; obj* x_16; -x_11 = lean::cnstr_get(x_0, 0); -lean::inc(x_11); -x_13 = lean::cnstr_get(x_0, 1); -lean::inc(x_13); +obj* x_10; obj* x_12; obj* x_15; +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_16 = l_list_foldl___main___at_lean_parser_command__parser_run___spec__5(x_11, x_13, x_1, x_2, x_3); -return x_16; +x_15 = l_list_foldl___main___at_lean_parser_command__parser_run___spec__5(x_10, x_12, x_1, x_2, x_3); +return x_15; } } } @@ -14857,16 +14781,15 @@ return x_5; obj* l_lean_parser_rec__t_run__parsec___at_lean_parser_command__parser_run___spec__6___lambda__1(obj* x_0, obj* x_1, obj* x_2) { _start: { -obj* x_4; obj* x_5; obj* x_6; obj* x_10; +obj* x_4; obj* x_5; obj* x_6; obj* x_9; lean::dec(x_0); x_4 = lean::box(0); x_5 = l_lean_parser_rec__t_run__parsec___rarg___lambda__1___closed__1; x_6 = l_mjoin___rarg___closed__1; -lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); -x_10 = l_lean_parser_monad__parsec_error___at_lean_parser_command__parser_run___spec__8___rarg(x_5, x_6, x_4, x_4, x_1, x_2); -return x_10; +x_9 = l_lean_parser_monad__parsec_error___at_lean_parser_command__parser_run___spec__8___rarg(x_5, x_6, x_4, x_4, x_1, x_2); +return x_9; } } obj* _init_l_lean_parser_rec__t_run__parsec___at_lean_parser_command__parser_run___spec__6___closed__1() { diff --git a/src/boot/init/lean/parser/declaration.cpp b/src/boot/init/lean/parser/declaration.cpp index 2b3311c053..0ccc3784c9 100644 --- a/src/boot/init/lean/parser/declaration.cpp +++ b/src/boot/init/lean/parser/declaration.cpp @@ -699,48 +699,46 @@ obj* x_45; x_45 = lean::box(0); if (lean::obj_tag(x_17) == 0) { -obj* x_47; -lean::inc(x_45); -x_47 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_47, 0, x_5); -lean::cnstr_set(x_47, 1, x_45); -lean::cnstr_set(x_47, 2, x_45); -return x_47; +obj* x_46; +x_46 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_46, 0, x_5); +lean::cnstr_set(x_46, 1, x_45); +lean::cnstr_set(x_46, 2, x_45); +return x_46; } else { -obj* x_48; -x_48 = lean::cnstr_get(x_17, 0); -lean::inc(x_48); +obj* x_47; +x_47 = lean::cnstr_get(x_17, 0); +lean::inc(x_47); lean::dec(x_17); x_14 = x_45; -x_15 = x_48; +x_15 = x_47; goto lbl_16; } } default: { -obj* x_52; +obj* x_51; lean::dec(x_18); -x_52 = lean::box(0); +x_51 = lean::box(0); if (lean::obj_tag(x_17) == 0) { -obj* x_54; -lean::inc(x_52); -x_54 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_54, 0, x_5); -lean::cnstr_set(x_54, 1, x_52); -lean::cnstr_set(x_54, 2, x_52); -return x_54; +obj* x_52; +x_52 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_52, 0, x_5); +lean::cnstr_set(x_52, 1, x_51); +lean::cnstr_set(x_52, 2, x_51); +return x_52; } else { -obj* x_55; -x_55 = lean::cnstr_get(x_17, 0); -lean::inc(x_55); +obj* x_53; +x_53 = lean::cnstr_get(x_17, 0); +lean::inc(x_53); lean::dec(x_17); -x_14 = x_52; -x_15 = x_55; +x_14 = x_51; +x_15 = x_53; goto lbl_16; } } @@ -924,48 +922,46 @@ obj* x_59; x_59 = lean::box(0); if (lean::obj_tag(x_31) == 0) { -obj* x_61; -lean::inc(x_59); -x_61 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_61, 0, x_19); -lean::cnstr_set(x_61, 1, x_59); -lean::cnstr_set(x_61, 2, x_59); -return x_61; +obj* x_60; +x_60 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_60, 0, x_19); +lean::cnstr_set(x_60, 1, x_59); +lean::cnstr_set(x_60, 2, x_59); +return x_60; } else { -obj* x_62; -x_62 = lean::cnstr_get(x_31, 0); -lean::inc(x_62); +obj* x_61; +x_61 = lean::cnstr_get(x_31, 0); +lean::inc(x_61); lean::dec(x_31); x_28 = x_59; -x_29 = x_62; +x_29 = x_61; goto lbl_30; } } default: { -obj* x_66; +obj* x_65; lean::dec(x_32); -x_66 = lean::box(0); +x_65 = lean::box(0); if (lean::obj_tag(x_31) == 0) { -obj* x_68; -lean::inc(x_66); -x_68 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_68, 0, x_19); -lean::cnstr_set(x_68, 1, x_66); -lean::cnstr_set(x_68, 2, x_66); -return x_68; +obj* x_66; +x_66 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_66, 0, x_19); +lean::cnstr_set(x_66, 1, x_65); +lean::cnstr_set(x_66, 2, x_65); +return x_66; } else { -obj* x_69; -x_69 = lean::cnstr_get(x_31, 0); -lean::inc(x_69); +obj* x_67; +x_67 = lean::cnstr_get(x_31, 0); +lean::inc(x_67); lean::dec(x_31); -x_28 = x_66; -x_29 = x_69; +x_28 = x_65; +x_29 = x_67; goto lbl_30; } } @@ -978,7 +974,7 @@ goto lbl_30; obj* l_lean_parser_command_doc__comment_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; 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_25; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -990,29 +986,27 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); lean::inc(x_8); -x_15 = l_option_map___rarg(x_8, x_3); -lean::inc(x_11); -x_17 = l_option_get__or__else___main___rarg(x_15, x_11); +x_14 = l_option_map___rarg(x_8, x_3); +x_15 = l_option_get__or__else___main___rarg(x_14, x_11); lean::inc(x_8); -x_19 = l_option_map___rarg(x_8, x_5); -x_20 = l_option_get__or__else___main___rarg(x_19, x_11); -x_21 = lean::box(0); +x_17 = l_option_map___rarg(x_8, x_5); +x_18 = l_option_get__or__else___main___rarg(x_17, x_11); +x_19 = lean::box(0); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_18); +lean::cnstr_set(x_20, 1, x_19); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_15); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 0, x_12); lean::cnstr_set(x_22, 1, x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_17); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_13); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_command_doc__comment; -lean::inc(x_25); -x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); -return x_27; +x_23 = l_lean_parser_command_doc__comment; +lean::inc(x_23); +x_25 = l_lean_parser_syntax_mk__node(x_23, x_22); +return x_25; } } obj* _init_l_lean_parser_command_doc__comment_has__view_x_27() { @@ -1564,97 +1558,95 @@ uint8 x_4; x_4 = lean::string_iterator_has_next(x_2); if (x_4 == 0) { -obj* x_5; obj* x_6; obj* x_7; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; +obj* x_5; obj* x_6; obj* x_7; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_19; x_5 = lean::box(0); x_6 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_7 = l_mjoin___rarg___closed__1; -lean::inc(x_5); lean::inc(x_7); lean::inc(x_6); -x_11 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_6, x_7, x_5, x_5, x_0, x_1, x_2, x_3); -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -if (lean::is_shared(x_11)) { - lean::dec(x_11); - x_16 = lean::box(0); +x_10 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_6, x_7, x_5, x_5, x_0, x_1, x_2, x_3); +x_11 = lean::cnstr_get(x_10, 0); +lean::inc(x_11); +x_13 = lean::cnstr_get(x_10, 1); +lean::inc(x_13); +if (lean::is_shared(x_10)) { + lean::dec(x_10); + x_15 = lean::box(0); } else { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - x_16 = x_11; + lean::cnstr_release(x_10, 0); + lean::cnstr_release(x_10, 1); + x_15 = x_10; } -x_17 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_17); -x_19 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_12); -if (lean::is_scalar(x_16)) { - x_20 = lean::alloc_cnstr(0, 2, 0); +x_16 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_16); +x_18 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_11); +if (lean::is_scalar(x_15)) { + x_19 = lean::alloc_cnstr(0, 2, 0); } else { - x_20 = x_16; + x_19 = x_15; } -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_14); -return x_20; +lean::cnstr_set(x_19, 0, x_18); +lean::cnstr_set(x_19, 1, x_13); +return x_19; } else { -uint32 x_21; uint8 x_22; -x_21 = lean::string_iterator_curr(x_2); -x_22 = l_true_decidable; -if (x_22 == 0) +uint32 x_20; uint8 x_21; +x_20 = lean::string_iterator_curr(x_2); +x_21 = l_true_decidable; +if (x_21 == 0) { -obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_33; obj* x_34; obj* x_36; obj* x_38; obj* x_39; obj* x_41; obj* x_42; -x_23 = l_char_quote__core(x_21); -x_24 = l_char_has__repr___closed__1; -lean::inc(x_24); -x_26 = lean::string_append(x_24, x_23); -lean::dec(x_23); -x_28 = lean::string_append(x_26, x_24); -x_29 = lean::box(0); -x_30 = l_mjoin___rarg___closed__1; +obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_39; obj* x_40; +x_22 = l_char_quote__core(x_20); +x_23 = l_char_has__repr___closed__1; +lean::inc(x_23); +x_25 = lean::string_append(x_23, x_22); +lean::dec(x_22); +x_27 = lean::string_append(x_25, x_23); +x_28 = lean::box(0); +x_29 = l_mjoin___rarg___closed__1; lean::inc(x_29); -lean::inc(x_30); -x_33 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_28, x_30, x_29, x_29, x_0, x_1, x_2, x_3); -x_34 = lean::cnstr_get(x_33, 0); +x_31 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_27, x_29, x_28, x_28, x_0, x_1, x_2, x_3); +x_32 = lean::cnstr_get(x_31, 0); +lean::inc(x_32); +x_34 = lean::cnstr_get(x_31, 1); lean::inc(x_34); -x_36 = lean::cnstr_get(x_33, 1); -lean::inc(x_36); -if (lean::is_shared(x_33)) { - lean::dec(x_33); - x_38 = lean::box(0); +if (lean::is_shared(x_31)) { + lean::dec(x_31); + x_36 = lean::box(0); } else { - lean::cnstr_release(x_33, 0); - lean::cnstr_release(x_33, 1); - x_38 = x_33; + lean::cnstr_release(x_31, 0); + lean::cnstr_release(x_31, 1); + x_36 = x_31; } -x_39 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_39); -x_41 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_39, x_34); -if (lean::is_scalar(x_38)) { - x_42 = lean::alloc_cnstr(0, 2, 0); +x_37 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_37); +x_39 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_37, x_32); +if (lean::is_scalar(x_36)) { + x_40 = lean::alloc_cnstr(0, 2, 0); } else { - x_42 = x_38; + x_40 = x_36; } -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_36); -return x_42; +lean::cnstr_set(x_40, 0, x_39); +lean::cnstr_set(x_40, 1, x_34); +return x_40; } else { -obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; +obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; lean::dec(x_1); lean::dec(x_0); -x_45 = lean::string_iterator_next(x_2); -x_46 = lean::box(0); -x_47 = lean::box_uint32(x_21); -x_48 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_45); -lean::cnstr_set(x_48, 2, x_46); -x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_3); -return x_49; +x_43 = lean::string_iterator_next(x_2); +x_44 = lean::box(0); +x_45 = lean::box_uint32(x_20); +x_46 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_46, 0, x_45); +lean::cnstr_set(x_46, 1, x_43); +lean::cnstr_set(x_46, 2, x_44); +x_47 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_47, 0, x_46); +lean::cnstr_set(x_47, 1, x_3); +return x_47; } } } @@ -3326,7 +3318,7 @@ return x_4; obj* _init_l_lean_parser_command_doc__comment_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; x_0 = lean::mk_string("/--"); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -3334,12 +3326,11 @@ x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_4 = lean::box(0); x_5 = lean::mk_string("-/"); x_6 = l_lean_parser_symbol_tokens___rarg(x_5, x_1); -lean::inc(x_4); -x_8 = l_lean_parser_list_cons_tokens___rarg(x_6, x_4); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_4, x_8); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_3, x_9); -x_11 = l_lean_parser_tokens___rarg(x_10); -return x_11; +x_7 = l_lean_parser_list_cons_tokens___rarg(x_6, x_4); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_4, x_7); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_3, x_8); +x_10 = l_lean_parser_tokens___rarg(x_9); +return x_10; } } obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -6062,30 +6053,26 @@ return x_8; obj* _init_l_lean_parser_command_attr__instance_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_9; obj* x_10; obj* x_11; obj* x_12; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_0); -lean::cnstr_set(x_9, 1, x_3); -lean::cnstr_set(x_9, 2, x_5); -lean::cnstr_set(x_9, 3, x_0); -lean::cnstr_set(x_9, 4, x_0); -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_0); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_9); -lean::cnstr_set(x_12, 1, x_11); -return x_12; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = lean::box(3); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_0); +x_8 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_8, 0, x_5); +lean::cnstr_set(x_8, 1, x_7); +return x_8; } } obj* _init_l_lean_parser_command_attr__instance_has__view_x_27___lambda__1___closed__2() { @@ -6828,18 +6815,17 @@ return x_111; } else { -obj* x_115; obj* x_116; obj* x_117; obj* x_121; +obj* x_115; obj* x_116; obj* x_117; obj* x_120; lean::dec(x_1); lean::dec(x_0); lean::dec(x_2); x_115 = lean::box(0); x_116 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_117 = l_mjoin___rarg___closed__1; -lean::inc(x_115); lean::inc(x_117); lean::inc(x_116); -x_121 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_116, x_117, x_115, x_115, x_3, x_4, x_5, x_6); -return x_121; +x_120 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_116, x_117, x_115, x_115, x_3, x_4, x_5, x_6); +return x_120; } } } @@ -6965,17 +6951,16 @@ return x_31; obj* _init_l_lean_parser_command_attr__instance_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; lean::inc(x_1); x_3 = l_lean_parser_tokens___rarg(x_1); x_4 = l_lean_parser_tokens___rarg(x_3); -lean::inc(x_0); -x_6 = l_lean_parser_list_cons_tokens___rarg(x_4, x_0); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_0, x_6); -x_8 = l_lean_parser_tokens___rarg(x_7); -return x_8; +x_5 = l_lean_parser_list_cons_tokens___rarg(x_4, x_0); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_0, x_5); +x_7 = l_lean_parser_tokens___rarg(x_6); +return x_7; } } obj* _init_l_lean_parser_command_attr__instance_parser_lean_parser_has__view() { @@ -7091,95 +7076,94 @@ if (lean::is_shared(x_0)) { } if (lean::obj_tag(x_4) == 0) { -obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; +obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; x_7 = l_lean_parser_command_attr__instance_has__view; x_8 = lean::cnstr_get(x_7, 0); lean::inc(x_8); x_10 = lean::apply_1(x_8, x_2); x_11 = lean::box(0); -lean::inc(x_11); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_11); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_10); +lean::cnstr_set(x_12, 1, x_11); if (lean::is_scalar(x_6)) { - x_14 = lean::alloc_cnstr(1, 2, 0); + x_13 = lean::alloc_cnstr(1, 2, 0); } else { - x_14 = x_6; + x_13 = x_6; } -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_11); -return x_14; +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_11); +return x_13; } else { -obj* x_15; obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; -x_15 = lean::cnstr_get(x_4, 0); -lean::inc(x_15); -x_17 = lean::cnstr_get(x_4, 1); -lean::inc(x_17); +obj* x_14; obj* x_16; obj* x_19; obj* x_20; obj* x_22; obj* x_23; +x_14 = lean::cnstr_get(x_4, 0); +lean::inc(x_14); +x_16 = lean::cnstr_get(x_4, 1); +lean::inc(x_16); lean::dec(x_4); -x_20 = l_lean_parser_command_attr__instance_has__view; -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_23 = lean::apply_1(x_21, x_2); -x_24 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_command_decl__attributes_has__view_x_27___spec__1(x_17); -switch (lean::obj_tag(x_15)) { +x_19 = l_lean_parser_command_attr__instance_has__view; +x_20 = lean::cnstr_get(x_19, 0); +lean::inc(x_20); +x_22 = lean::apply_1(x_20, x_2); +x_23 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_command_decl__attributes_has__view_x_27___spec__1(x_16); +switch (lean::obj_tag(x_14)) { case 0: { -obj* x_25; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_25 = lean::cnstr_get(x_15, 0); -lean::inc(x_25); -lean::dec(x_15); +obj* x_24; obj* x_27; obj* x_28; obj* x_29; obj* x_30; +x_24 = lean::cnstr_get(x_14, 0); +lean::inc(x_24); +lean::dec(x_14); +x_27 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_27, 0, x_24); x_28 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_28, 0, x_25); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_23); -lean::cnstr_set(x_30, 1, x_29); +lean::cnstr_set(x_28, 0, x_27); +x_29 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_29, 0, x_22); +lean::cnstr_set(x_29, 1, x_28); if (lean::is_scalar(x_6)) { - x_31 = lean::alloc_cnstr(1, 2, 0); + x_30 = lean::alloc_cnstr(1, 2, 0); } else { - x_31 = x_6; + x_30 = x_6; } -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_24); -return x_31; +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_23); +return x_30; } case 3: { -obj* x_32; obj* x_34; obj* x_35; -x_32 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_23); -lean::cnstr_set(x_34, 1, x_32); +obj* x_31; obj* x_33; obj* x_34; +x_31 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_31); +x_33 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_33, 0, x_22); +lean::cnstr_set(x_33, 1, x_31); if (lean::is_scalar(x_6)) { - x_35 = lean::alloc_cnstr(1, 2, 0); + x_34 = lean::alloc_cnstr(1, 2, 0); } else { - x_35 = x_6; + x_34 = x_6; } -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_24); -return x_35; +lean::cnstr_set(x_34, 0, x_33); +lean::cnstr_set(x_34, 1, x_23); +return x_34; } default: { -obj* x_37; obj* x_39; obj* x_40; -lean::dec(x_15); -x_37 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_37); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_23); -lean::cnstr_set(x_39, 1, x_37); +obj* x_36; obj* x_38; obj* x_39; +lean::dec(x_14); +x_36 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_36); +x_38 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_38, 0, x_22); +lean::cnstr_set(x_38, 1, x_36); if (lean::is_scalar(x_6)) { - x_40 = lean::alloc_cnstr(1, 2, 0); + x_39 = lean::alloc_cnstr(1, 2, 0); } else { - x_40 = x_6; + x_39 = x_6; } -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_24); -return x_40; +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_23); +return x_39; } } } @@ -7273,21 +7257,20 @@ return x_35; obj* _init_l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = l_lean_parser_command_attr__instance_has__view; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::box(3); x_4 = lean::apply_1(x_1, x_3); x_5 = lean::box(0); -lean::inc(x_5); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_4); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_4); +lean::cnstr_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_5); -return x_8; +return x_7; } } obj* _init_l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__2() { @@ -7381,121 +7364,120 @@ lean::dec(x_14); switch (lean::obj_tag(x_28)) { case 0: { -obj* x_32; obj* x_35; obj* x_36; obj* x_38; -lean::dec(x_24); -x_32 = lean::cnstr_get(x_28, 0); -lean::inc(x_32); +obj* x_31; obj* x_34; obj* x_35; obj* x_37; +x_31 = lean::cnstr_get(x_28, 0); +lean::inc(x_31); lean::dec(x_28); -x_35 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_35, 0, x_32); -x_36 = l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1; -lean::inc(x_36); -x_38 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_38, 0, x_5); -lean::cnstr_set(x_38, 1, x_36); -lean::cnstr_set(x_38, 2, x_35); -return x_38; +x_34 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_34, 0, x_31); +x_35 = l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1; +lean::inc(x_35); +x_37 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_37, 0, x_5); +lean::cnstr_set(x_37, 1, x_35); +lean::cnstr_set(x_37, 2, x_34); +return x_37; } case 3: { -obj* x_39; obj* x_41; -x_39 = l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1; -lean::inc(x_39); -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_5); -lean::cnstr_set(x_41, 1, x_39); -lean::cnstr_set(x_41, 2, x_24); -return x_41; +obj* x_38; obj* x_40; +x_38 = l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1; +lean::inc(x_38); +x_40 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_40, 0, x_5); +lean::cnstr_set(x_40, 1, x_38); +lean::cnstr_set(x_40, 2, x_24); +return x_40; } default: { -obj* x_43; obj* x_45; +obj* x_42; obj* x_44; lean::dec(x_28); -x_43 = l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1; -lean::inc(x_43); -x_45 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_45, 0, x_5); -lean::cnstr_set(x_45, 1, x_43); -lean::cnstr_set(x_45, 2, x_24); -return x_45; +x_42 = l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1; +lean::inc(x_42); +x_44 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_44, 0, x_5); +lean::cnstr_set(x_44, 1, x_42); +lean::cnstr_set(x_44, 2, x_24); +return x_44; } } } } else { -obj* x_46; obj* x_48; obj* x_49; obj* x_52; -x_46 = lean::cnstr_get(x_23, 0); -lean::inc(x_46); +obj* x_45; obj* x_47; obj* x_48; obj* x_51; +x_45 = lean::cnstr_get(x_23, 0); +lean::inc(x_45); if (lean::is_shared(x_23)) { lean::dec(x_23); - x_48 = lean::box(0); + x_47 = lean::box(0); } else { lean::cnstr_release(x_23, 0); - x_48 = x_23; + x_47 = x_23; } -x_49 = lean::cnstr_get(x_46, 1); -lean::inc(x_49); -lean::dec(x_46); -x_52 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_command_decl__attributes_has__view_x_27___spec__1(x_49); +x_48 = lean::cnstr_get(x_45, 1); +lean::inc(x_48); +lean::dec(x_45); +x_51 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_command_decl__attributes_has__view_x_27___spec__1(x_48); if (lean::obj_tag(x_14) == 0) { -obj* x_54; obj* x_55; -lean::dec(x_48); -x_54 = lean::box(0); -x_55 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_55, 0, x_5); -lean::cnstr_set(x_55, 1, x_52); -lean::cnstr_set(x_55, 2, x_54); -return x_55; +obj* x_53; obj* x_54; +lean::dec(x_47); +x_53 = lean::box(0); +x_54 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_54, 0, x_5); +lean::cnstr_set(x_54, 1, x_51); +lean::cnstr_set(x_54, 2, x_53); +return x_54; } else { -obj* x_56; -x_56 = lean::cnstr_get(x_14, 0); -lean::inc(x_56); +obj* x_55; +x_55 = lean::cnstr_get(x_14, 0); +lean::inc(x_55); lean::dec(x_14); -switch (lean::obj_tag(x_56)) { +switch (lean::obj_tag(x_55)) { case 0: { -obj* x_59; obj* x_62; obj* x_63; -x_59 = lean::cnstr_get(x_56, 0); -lean::inc(x_59); -lean::dec(x_56); -if (lean::is_scalar(x_48)) { - x_62 = lean::alloc_cnstr(1, 1, 0); +obj* x_58; obj* x_61; obj* x_62; +x_58 = lean::cnstr_get(x_55, 0); +lean::inc(x_58); +lean::dec(x_55); +if (lean::is_scalar(x_47)) { + x_61 = lean::alloc_cnstr(1, 1, 0); } else { - x_62 = x_48; + x_61 = x_47; } -lean::cnstr_set(x_62, 0, x_59); -x_63 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_63, 0, x_5); -lean::cnstr_set(x_63, 1, x_52); -lean::cnstr_set(x_63, 2, x_62); -return x_63; +lean::cnstr_set(x_61, 0, x_58); +x_62 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_62, 0, x_5); +lean::cnstr_set(x_62, 1, x_51); +lean::cnstr_set(x_62, 2, x_61); +return x_62; } case 3: { -obj* x_65; obj* x_66; -lean::dec(x_48); -x_65 = lean::box(0); -x_66 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_66, 0, x_5); -lean::cnstr_set(x_66, 1, x_52); -lean::cnstr_set(x_66, 2, x_65); -return x_66; +obj* x_64; obj* x_65; +lean::dec(x_47); +x_64 = lean::box(0); +x_65 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_65, 0, x_5); +lean::cnstr_set(x_65, 1, x_51); +lean::cnstr_set(x_65, 2, x_64); +return x_65; } default: { -obj* x_69; obj* x_70; -lean::dec(x_56); -lean::dec(x_48); -x_69 = lean::box(0); -x_70 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_70, 0, x_5); -lean::cnstr_set(x_70, 1, x_52); -lean::cnstr_set(x_70, 2, x_69); -return x_70; +obj* x_68; obj* x_69; +lean::dec(x_55); +lean::dec(x_47); +x_68 = lean::box(0); +x_69 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_69, 0, x_5); +lean::cnstr_set(x_69, 1, x_51); +lean::cnstr_set(x_69, 2, x_68); +return x_69; } } } @@ -7629,121 +7611,120 @@ lean::dec(x_28); switch (lean::obj_tag(x_42)) { case 0: { -obj* x_46; obj* x_49; obj* x_50; obj* x_52; -lean::dec(x_38); -x_46 = lean::cnstr_get(x_42, 0); -lean::inc(x_46); +obj* x_45; obj* x_48; obj* x_49; obj* x_51; +x_45 = lean::cnstr_get(x_42, 0); +lean::inc(x_45); lean::dec(x_42); -x_49 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_49, 0, x_46); -x_50 = l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1; -lean::inc(x_50); -x_52 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_52, 0, x_19); -lean::cnstr_set(x_52, 1, x_50); -lean::cnstr_set(x_52, 2, x_49); -return x_52; +x_48 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_48, 0, x_45); +x_49 = l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1; +lean::inc(x_49); +x_51 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_51, 0, x_19); +lean::cnstr_set(x_51, 1, x_49); +lean::cnstr_set(x_51, 2, x_48); +return x_51; } case 3: { -obj* x_53; obj* x_55; -x_53 = l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1; -lean::inc(x_53); -x_55 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_55, 0, x_19); -lean::cnstr_set(x_55, 1, x_53); -lean::cnstr_set(x_55, 2, x_38); -return x_55; +obj* x_52; obj* x_54; +x_52 = l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1; +lean::inc(x_52); +x_54 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_54, 0, x_19); +lean::cnstr_set(x_54, 1, x_52); +lean::cnstr_set(x_54, 2, x_38); +return x_54; } default: { -obj* x_57; obj* x_59; +obj* x_56; obj* x_58; lean::dec(x_42); -x_57 = l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -x_59 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_59, 0, x_19); -lean::cnstr_set(x_59, 1, x_57); -lean::cnstr_set(x_59, 2, x_38); -return x_59; +x_56 = l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +x_58 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_58, 0, x_19); +lean::cnstr_set(x_58, 1, x_56); +lean::cnstr_set(x_58, 2, x_38); +return x_58; } } } } else { -obj* x_60; obj* x_62; obj* x_63; obj* x_66; -x_60 = lean::cnstr_get(x_37, 0); -lean::inc(x_60); +obj* x_59; obj* x_61; obj* x_62; obj* x_65; +x_59 = lean::cnstr_get(x_37, 0); +lean::inc(x_59); if (lean::is_shared(x_37)) { lean::dec(x_37); - x_62 = lean::box(0); + x_61 = lean::box(0); } else { lean::cnstr_release(x_37, 0); - x_62 = x_37; + x_61 = x_37; } -x_63 = lean::cnstr_get(x_60, 1); -lean::inc(x_63); -lean::dec(x_60); -x_66 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_command_decl__attributes_has__view_x_27___spec__1(x_63); +x_62 = lean::cnstr_get(x_59, 1); +lean::inc(x_62); +lean::dec(x_59); +x_65 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_command_decl__attributes_has__view_x_27___spec__1(x_62); if (lean::obj_tag(x_28) == 0) { -obj* x_68; obj* x_69; -lean::dec(x_62); -x_68 = lean::box(0); -x_69 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_69, 0, x_19); -lean::cnstr_set(x_69, 1, x_66); -lean::cnstr_set(x_69, 2, x_68); -return x_69; +obj* x_67; obj* x_68; +lean::dec(x_61); +x_67 = lean::box(0); +x_68 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_68, 0, x_19); +lean::cnstr_set(x_68, 1, x_65); +lean::cnstr_set(x_68, 2, x_67); +return x_68; } else { -obj* x_70; -x_70 = lean::cnstr_get(x_28, 0); -lean::inc(x_70); +obj* x_69; +x_69 = lean::cnstr_get(x_28, 0); +lean::inc(x_69); lean::dec(x_28); -switch (lean::obj_tag(x_70)) { +switch (lean::obj_tag(x_69)) { case 0: { -obj* x_73; obj* x_76; obj* x_77; -x_73 = lean::cnstr_get(x_70, 0); -lean::inc(x_73); -lean::dec(x_70); -if (lean::is_scalar(x_62)) { - x_76 = lean::alloc_cnstr(1, 1, 0); +obj* x_72; obj* x_75; obj* x_76; +x_72 = lean::cnstr_get(x_69, 0); +lean::inc(x_72); +lean::dec(x_69); +if (lean::is_scalar(x_61)) { + x_75 = lean::alloc_cnstr(1, 1, 0); } else { - x_76 = x_62; + x_75 = x_61; } -lean::cnstr_set(x_76, 0, x_73); -x_77 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_77, 0, x_19); -lean::cnstr_set(x_77, 1, x_66); -lean::cnstr_set(x_77, 2, x_76); -return x_77; +lean::cnstr_set(x_75, 0, x_72); +x_76 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_76, 0, x_19); +lean::cnstr_set(x_76, 1, x_65); +lean::cnstr_set(x_76, 2, x_75); +return x_76; } case 3: { -obj* x_79; obj* x_80; -lean::dec(x_62); -x_79 = lean::box(0); -x_80 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_80, 0, x_19); -lean::cnstr_set(x_80, 1, x_66); -lean::cnstr_set(x_80, 2, x_79); -return x_80; +obj* x_78; obj* x_79; +lean::dec(x_61); +x_78 = lean::box(0); +x_79 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_79, 0, x_19); +lean::cnstr_set(x_79, 1, x_65); +lean::cnstr_set(x_79, 2, x_78); +return x_79; } default: { -obj* x_83; obj* x_84; -lean::dec(x_62); -lean::dec(x_70); -x_83 = lean::box(0); -x_84 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_84, 0, x_19); -lean::cnstr_set(x_84, 1, x_66); -lean::cnstr_set(x_84, 2, x_83); -return x_84; +obj* x_82; obj* x_83; +lean::dec(x_61); +lean::dec(x_69); +x_82 = lean::box(0); +x_83 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_83, 0, x_19); +lean::cnstr_set(x_83, 1, x_65); +lean::cnstr_set(x_83, 2, x_82); +return x_83; } } } @@ -7756,7 +7737,7 @@ return x_84; obj* l_lean_parser_command_decl__attributes_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_28; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -7768,30 +7749,29 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); -x_14 = l_list_map___main___at_lean_parser_command_decl__attributes_has__view_x_27___spec__2(x_3); -x_15 = l_list_join___main___rarg(x_14); -x_16 = l_lean_parser_no__kind; -lean::inc(x_16); -x_18 = l_lean_parser_syntax_mk__node(x_16, x_15); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); +x_13 = l_list_map___main___at_lean_parser_command_decl__attributes_has__view_x_27___spec__2(x_3); +x_14 = l_list_join___main___rarg(x_13); +x_15 = l_lean_parser_no__kind; +lean::inc(x_15); +x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); lean::inc(x_8); -x_20 = l_option_map___rarg(x_8, x_5); -x_21 = l_option_get__or__else___main___rarg(x_20, x_11); -x_22 = lean::box(0); +x_19 = l_option_map___rarg(x_8, x_5); +x_20 = l_option_get__or__else___main___rarg(x_19, x_11); +x_21 = lean::box(0); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); +lean::cnstr_set(x_23, 0, x_17); lean::cnstr_set(x_23, 1, x_22); x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_18); +lean::cnstr_set(x_24, 0, x_12); lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_13); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_lean_parser_command_decl__attributes; -lean::inc(x_26); -x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); -return x_28; +x_25 = l_lean_parser_command_decl__attributes; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +return x_27; } } obj* _init_l_lean_parser_command_decl__attributes_has__view_x_27() { @@ -8076,44 +8056,42 @@ x_124 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_117, x_123); if (lean::obj_tag(x_124) == 0) { lean::dec(x_8); -lean::dec(x_112); x_20 = x_124; x_21 = x_109; goto lbl_22; } else { -obj* x_127; uint8 x_129; -x_127 = lean::cnstr_get(x_124, 0); -lean::inc(x_127); -x_129 = lean::cnstr_get_scalar(x_124, sizeof(void*)*1); -if (x_129 == 0) +obj* x_126; uint8 x_128; +x_126 = lean::cnstr_get(x_124, 0); +lean::inc(x_126); +x_128 = lean::cnstr_get_scalar(x_124, sizeof(void*)*1); +if (x_128 == 0) { -obj* x_131; obj* x_134; obj* x_136; obj* x_137; obj* x_138; +obj* x_130; obj* x_133; obj* x_135; obj* x_136; obj* x_137; lean::dec(x_124); -x_131 = lean::cnstr_get(x_127, 2); -lean::inc(x_131); -lean::dec(x_127); -x_134 = l_mjoin___rarg___closed__1; -lean::inc(x_134); -x_136 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_136, 0, x_131); -lean::closure_set(x_136, 1, x_134); -x_137 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_137, 0, x_136); -x_138 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_138, 0, x_112); -lean::cnstr_set(x_138, 1, x_8); -lean::cnstr_set(x_138, 2, x_137); -x_20 = x_138; +x_130 = lean::cnstr_get(x_126, 2); +lean::inc(x_130); +lean::dec(x_126); +x_133 = l_mjoin___rarg___closed__1; +lean::inc(x_133); +x_135 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_135, 0, x_130); +lean::closure_set(x_135, 1, x_133); +x_136 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_136, 0, x_135); +x_137 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_137, 0, x_112); +lean::cnstr_set(x_137, 1, x_8); +lean::cnstr_set(x_137, 2, x_136); +x_20 = x_137; x_21 = x_109; goto lbl_22; } else { lean::dec(x_8); -lean::dec(x_112); -lean::dec(x_127); +lean::dec(x_126); x_20 = x_124; x_21 = x_109; goto lbl_22; @@ -8122,53 +8100,52 @@ goto lbl_22; } else { -obj* x_142; uint8 x_144; obj* x_145; -x_142 = lean::cnstr_get(x_107, 0); -lean::inc(x_142); -x_144 = lean::cnstr_get_scalar(x_107, sizeof(void*)*1); +obj* x_140; uint8 x_142; obj* x_143; +x_140 = lean::cnstr_get(x_107, 0); +lean::inc(x_140); +x_142 = lean::cnstr_get_scalar(x_107, sizeof(void*)*1); if (lean::is_shared(x_107)) { lean::dec(x_107); - x_145 = lean::box(0); + x_143 = lean::box(0); } else { lean::cnstr_release(x_107, 0); - x_145 = x_107; + x_143 = x_107; } -if (x_144 == 0) +if (x_142 == 0) { -obj* x_147; obj* x_150; obj* x_152; obj* x_153; obj* x_154; -lean::dec(x_145); -x_147 = lean::cnstr_get(x_142, 2); -lean::inc(x_147); -lean::dec(x_142); -x_150 = l_mjoin___rarg___closed__1; -lean::inc(x_150); -x_152 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_152, 0, x_147); -lean::closure_set(x_152, 1, x_150); -x_153 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_153, 0, x_152); -x_154 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_154, 0, x_112); -lean::cnstr_set(x_154, 1, x_8); -lean::cnstr_set(x_154, 2, x_153); -x_20 = x_154; +obj* x_145; obj* x_148; obj* x_150; obj* x_151; obj* x_152; +lean::dec(x_143); +x_145 = lean::cnstr_get(x_140, 2); +lean::inc(x_145); +lean::dec(x_140); +x_148 = l_mjoin___rarg___closed__1; +lean::inc(x_148); +x_150 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_150, 0, x_145); +lean::closure_set(x_150, 1, x_148); +x_151 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_151, 0, x_150); +x_152 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_152, 0, x_112); +lean::cnstr_set(x_152, 1, x_8); +lean::cnstr_set(x_152, 2, x_151); +x_20 = x_152; x_21 = x_109; goto lbl_22; } else { -obj* x_157; obj* x_158; +obj* x_154; obj* x_155; lean::dec(x_8); -lean::dec(x_112); -if (lean::is_scalar(x_145)) { - x_157 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_143)) { + x_154 = lean::alloc_cnstr(1, 1, 1); } else { - x_157 = x_145; + x_154 = x_143; } -lean::cnstr_set(x_157, 0, x_142); -lean::cnstr_set_scalar(x_157, sizeof(void*)*1, x_144); -x_158 = x_157; -x_20 = x_158; +lean::cnstr_set(x_154, 0, x_140); +lean::cnstr_set_scalar(x_154, sizeof(void*)*1, x_142); +x_155 = x_154; +x_20 = x_155; x_21 = x_109; goto lbl_22; } @@ -8178,365 +8155,362 @@ lbl_19: { if (lean::obj_tag(x_17) == 0) { -obj* x_159; obj* x_161; obj* x_163; obj* x_165; -x_159 = lean::cnstr_get(x_17, 0); -lean::inc(x_159); -x_161 = lean::cnstr_get(x_17, 1); -lean::inc(x_161); -x_163 = lean::cnstr_get(x_17, 2); -lean::inc(x_163); +obj* x_156; obj* x_158; obj* x_160; obj* x_162; +x_156 = lean::cnstr_get(x_17, 0); +lean::inc(x_156); +x_158 = lean::cnstr_get(x_17, 1); +lean::inc(x_158); +x_160 = lean::cnstr_get(x_17, 2); +lean::inc(x_160); if (lean::is_shared(x_17)) { lean::dec(x_17); - x_165 = lean::box(0); + x_162 = lean::box(0); } else { lean::cnstr_release(x_17, 0); lean::cnstr_release(x_17, 1); lean::cnstr_release(x_17, 2); - x_165 = x_17; + x_162 = x_17; } -if (lean::obj_tag(x_159) == 0) +if (lean::obj_tag(x_156) == 0) { -obj* x_171; obj* x_172; obj* x_174; obj* x_175; obj* x_177; obj* x_178; obj* x_179; +obj* x_168; obj* x_169; obj* x_171; obj* x_172; obj* x_174; obj* x_175; obj* x_176; lean::dec(x_14); lean::dec(x_7); lean::dec(x_1); lean::dec(x_6); lean::dec(x_0); -x_171 = l_list_reverse___rarg(x_4); -x_172 = l_lean_parser_no__kind; +x_168 = l_list_reverse___rarg(x_4); +x_169 = l_lean_parser_no__kind; +lean::inc(x_169); +x_171 = l_lean_parser_syntax_mk__node(x_169, x_168); +x_172 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_172); -x_174 = l_lean_parser_syntax_mk__node(x_172, x_171); -x_175 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_175); -if (lean::is_scalar(x_165)) { - x_177 = lean::alloc_cnstr(0, 3, 0); +if (lean::is_scalar(x_162)) { + x_174 = lean::alloc_cnstr(0, 3, 0); } else { - x_177 = x_165; + x_174 = x_162; } -lean::cnstr_set(x_177, 0, x_174); -lean::cnstr_set(x_177, 1, x_161); -lean::cnstr_set(x_177, 2, x_175); -x_178 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_163, x_177); -x_179 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_179, 0, x_178); -lean::cnstr_set(x_179, 1, x_18); -return x_179; +lean::cnstr_set(x_174, 0, x_171); +lean::cnstr_set(x_174, 1, x_158); +lean::cnstr_set(x_174, 2, x_172); +x_175 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_160, x_174); +x_176 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_176, 0, x_175); +lean::cnstr_set(x_176, 1, x_18); +return x_176; } else { -obj* x_180; obj* x_182; obj* x_183; obj* x_184; obj* x_190; obj* x_191; obj* x_193; obj* x_196; obj* x_197; -x_180 = lean::cnstr_get(x_159, 0); -lean::inc(x_180); -if (lean::is_shared(x_159)) { - lean::dec(x_159); - x_182 = lean::box(0); +obj* x_177; obj* x_179; obj* x_180; obj* x_181; obj* x_187; obj* x_188; obj* x_190; obj* x_193; obj* x_194; +x_177 = lean::cnstr_get(x_156, 0); +lean::inc(x_177); +if (lean::is_shared(x_156)) { + lean::dec(x_156); + x_179 = lean::box(0); } else { - lean::cnstr_release(x_159, 0); - x_182 = x_159; + lean::cnstr_release(x_156, 0); + x_179 = x_156; } -lean::inc(x_161); +lean::inc(x_158); lean::inc(x_7); lean::inc(x_6); lean::inc(x_1); -x_190 = lean::apply_4(x_1, x_6, x_7, x_161, x_18); -x_191 = lean::cnstr_get(x_190, 0); -lean::inc(x_191); -x_193 = lean::cnstr_get(x_190, 1); -lean::inc(x_193); -lean::dec(x_190); -x_196 = lean::box(0); -x_197 = l_lean_parser_parsec__t_try__mk__res___rarg(x_191); -if (lean::obj_tag(x_197) == 0) +x_187 = lean::apply_4(x_1, x_6, x_7, x_158, x_18); +x_188 = lean::cnstr_get(x_187, 0); +lean::inc(x_188); +x_190 = lean::cnstr_get(x_187, 1); +lean::inc(x_190); +lean::dec(x_187); +x_193 = lean::box(0); +x_194 = l_lean_parser_parsec__t_try__mk__res___rarg(x_188); +if (lean::obj_tag(x_194) == 0) { -obj* x_198; obj* x_200; obj* x_202; obj* x_204; obj* x_205; obj* x_206; obj* x_208; obj* x_209; -x_198 = lean::cnstr_get(x_197, 0); -lean::inc(x_198); -x_200 = lean::cnstr_get(x_197, 1); -lean::inc(x_200); -x_202 = lean::cnstr_get(x_197, 2); -lean::inc(x_202); -if (lean::is_shared(x_197)) { - lean::dec(x_197); - x_204 = lean::box(0); +obj* x_195; obj* x_197; obj* x_199; obj* x_201; obj* x_202; obj* x_203; obj* x_205; obj* x_206; +x_195 = lean::cnstr_get(x_194, 0); +lean::inc(x_195); +x_197 = lean::cnstr_get(x_194, 1); +lean::inc(x_197); +x_199 = lean::cnstr_get(x_194, 2); +lean::inc(x_199); +if (lean::is_shared(x_194)) { + lean::dec(x_194); + x_201 = lean::box(0); } else { - lean::cnstr_release(x_197, 0); - lean::cnstr_release(x_197, 1); - lean::cnstr_release(x_197, 2); - x_204 = x_197; + lean::cnstr_release(x_194, 0); + lean::cnstr_release(x_194, 1); + lean::cnstr_release(x_194, 2); + x_201 = x_194; } -if (lean::is_scalar(x_182)) { - x_205 = lean::alloc_cnstr(1, 1, 0); +if (lean::is_scalar(x_179)) { + x_202 = lean::alloc_cnstr(1, 1, 0); } else { - x_205 = x_182; + x_202 = x_179; } -lean::cnstr_set(x_205, 0, x_198); -x_206 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_206); -if (lean::is_scalar(x_204)) { - x_208 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_202, 0, x_195); +x_203 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_203); +if (lean::is_scalar(x_201)) { + x_205 = lean::alloc_cnstr(0, 3, 0); } else { - x_208 = x_204; + x_205 = x_201; } -lean::cnstr_set(x_208, 0, x_205); -lean::cnstr_set(x_208, 1, x_200); -lean::cnstr_set(x_208, 2, x_206); -x_209 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_202, x_208); -if (lean::obj_tag(x_209) == 0) +lean::cnstr_set(x_205, 0, x_202); +lean::cnstr_set(x_205, 1, x_197); +lean::cnstr_set(x_205, 2, x_203); +x_206 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_199, x_205); +if (lean::obj_tag(x_206) == 0) { -lean::dec(x_196); -lean::dec(x_161); -x_183 = x_209; -x_184 = x_193; -goto lbl_185; +lean::dec(x_158); +x_180 = x_206; +x_181 = x_190; +goto lbl_182; } else { -obj* x_212; uint8 x_214; -x_212 = lean::cnstr_get(x_209, 0); +obj* x_208; uint8 x_210; +x_208 = lean::cnstr_get(x_206, 0); +lean::inc(x_208); +x_210 = lean::cnstr_get_scalar(x_206, sizeof(void*)*1); +if (x_210 == 0) +{ +obj* x_212; obj* x_215; obj* x_217; obj* x_218; obj* x_219; +lean::dec(x_206); +x_212 = lean::cnstr_get(x_208, 2); lean::inc(x_212); -x_214 = lean::cnstr_get_scalar(x_209, sizeof(void*)*1); -if (x_214 == 0) -{ -obj* x_216; obj* x_219; obj* x_221; obj* x_222; obj* x_223; -lean::dec(x_209); -x_216 = lean::cnstr_get(x_212, 2); -lean::inc(x_216); -lean::dec(x_212); -x_219 = l_mjoin___rarg___closed__1; -lean::inc(x_219); -x_221 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_221, 0, x_216); -lean::closure_set(x_221, 1, x_219); -x_222 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_222, 0, x_221); -x_223 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_223, 0, x_196); -lean::cnstr_set(x_223, 1, x_161); -lean::cnstr_set(x_223, 2, x_222); -x_183 = x_223; -x_184 = x_193; -goto lbl_185; +lean::dec(x_208); +x_215 = l_mjoin___rarg___closed__1; +lean::inc(x_215); +x_217 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_217, 0, x_212); +lean::closure_set(x_217, 1, x_215); +x_218 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_218, 0, x_217); +x_219 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_219, 0, x_193); +lean::cnstr_set(x_219, 1, x_158); +lean::cnstr_set(x_219, 2, x_218); +x_180 = x_219; +x_181 = x_190; +goto lbl_182; } else { -lean::dec(x_196); -lean::dec(x_212); -lean::dec(x_161); -x_183 = x_209; -x_184 = x_193; -goto lbl_185; +lean::dec(x_208); +lean::dec(x_158); +x_180 = x_206; +x_181 = x_190; +goto lbl_182; } } } else { -obj* x_227; uint8 x_229; obj* x_230; -x_227 = lean::cnstr_get(x_197, 0); +obj* x_222; uint8 x_224; obj* x_225; +x_222 = lean::cnstr_get(x_194, 0); +lean::inc(x_222); +x_224 = lean::cnstr_get_scalar(x_194, sizeof(void*)*1); +if (lean::is_shared(x_194)) { + lean::dec(x_194); + x_225 = lean::box(0); +} else { + lean::cnstr_release(x_194, 0); + x_225 = x_194; +} +if (x_224 == 0) +{ +obj* x_227; obj* x_230; obj* x_232; obj* x_233; obj* x_234; +lean::dec(x_225); +x_227 = lean::cnstr_get(x_222, 2); lean::inc(x_227); -x_229 = lean::cnstr_get_scalar(x_197, sizeof(void*)*1); -if (lean::is_shared(x_197)) { - lean::dec(x_197); - x_230 = lean::box(0); +lean::dec(x_222); +x_230 = l_mjoin___rarg___closed__1; +lean::inc(x_230); +x_232 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_232, 0, x_227); +lean::closure_set(x_232, 1, x_230); +if (lean::is_scalar(x_179)) { + x_233 = lean::alloc_cnstr(1, 1, 0); } else { - lean::cnstr_release(x_197, 0); - x_230 = x_197; + x_233 = x_179; } -if (x_229 == 0) -{ -obj* x_232; obj* x_235; obj* x_237; obj* x_238; obj* x_239; -lean::dec(x_230); -x_232 = lean::cnstr_get(x_227, 2); -lean::inc(x_232); -lean::dec(x_227); -x_235 = l_mjoin___rarg___closed__1; -lean::inc(x_235); -x_237 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_237, 0, x_232); -lean::closure_set(x_237, 1, x_235); -if (lean::is_scalar(x_182)) { - x_238 = lean::alloc_cnstr(1, 1, 0); -} else { - x_238 = x_182; -} -lean::cnstr_set(x_238, 0, x_237); -x_239 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_239, 0, x_196); -lean::cnstr_set(x_239, 1, x_161); -lean::cnstr_set(x_239, 2, x_238); -x_183 = x_239; -x_184 = x_193; -goto lbl_185; +lean::cnstr_set(x_233, 0, x_232); +x_234 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_234, 0, x_193); +lean::cnstr_set(x_234, 1, x_158); +lean::cnstr_set(x_234, 2, x_233); +x_180 = x_234; +x_181 = x_190; +goto lbl_182; } else { -obj* x_243; obj* x_244; -lean::dec(x_196); -lean::dec(x_182); -lean::dec(x_161); -if (lean::is_scalar(x_230)) { - x_243 = lean::alloc_cnstr(1, 1, 1); +obj* x_237; obj* x_238; +lean::dec(x_179); +lean::dec(x_158); +if (lean::is_scalar(x_225)) { + x_237 = lean::alloc_cnstr(1, 1, 1); } else { - x_243 = x_230; + x_237 = x_225; } -lean::cnstr_set(x_243, 0, x_227); -lean::cnstr_set_scalar(x_243, sizeof(void*)*1, x_229); -x_244 = x_243; -x_183 = x_244; -x_184 = x_193; -goto lbl_185; +lean::cnstr_set(x_237, 0, x_222); +lean::cnstr_set_scalar(x_237, sizeof(void*)*1, x_224); +x_238 = x_237; +x_180 = x_238; +x_181 = x_190; +goto lbl_182; } } -lbl_185: +lbl_182: { -if (lean::obj_tag(x_183) == 0) +if (lean::obj_tag(x_180) == 0) { -obj* x_245; obj* x_247; obj* x_249; -x_245 = lean::cnstr_get(x_183, 0); -lean::inc(x_245); -x_247 = lean::cnstr_get(x_183, 1); -lean::inc(x_247); -x_249 = lean::cnstr_get(x_183, 2); -lean::inc(x_249); -lean::dec(x_183); -if (lean::obj_tag(x_245) == 0) -{ -obj* x_257; obj* x_258; obj* x_259; obj* x_261; obj* x_262; obj* x_264; obj* x_265; obj* x_266; obj* x_267; -lean::dec(x_14); -lean::dec(x_7); -lean::dec(x_1); -lean::dec(x_6); -lean::dec(x_0); -x_257 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_257, 0, x_180); -lean::cnstr_set(x_257, 1, x_4); -x_258 = l_list_reverse___rarg(x_257); -x_259 = l_lean_parser_no__kind; -lean::inc(x_259); -x_261 = l_lean_parser_syntax_mk__node(x_259, x_258); -x_262 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_262); -if (lean::is_scalar(x_165)) { - x_264 = lean::alloc_cnstr(0, 3, 0); -} else { - x_264 = x_165; -} -lean::cnstr_set(x_264, 0, x_261); -lean::cnstr_set(x_264, 1, x_247); -lean::cnstr_set(x_264, 2, x_262); -x_265 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_249, x_264); -x_266 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_163, x_265); -x_267 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_267, 0, x_266); -lean::cnstr_set(x_267, 1, x_184); -return x_267; -} -else -{ -obj* x_269; obj* x_272; obj* x_273; obj* x_274; obj* x_275; obj* x_277; obj* x_279; obj* x_280; obj* x_281; obj* x_282; -lean::dec(x_165); -x_269 = lean::cnstr_get(x_245, 0); -lean::inc(x_269); -lean::dec(x_245); -x_272 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_272, 0, x_180); -lean::cnstr_set(x_272, 1, x_4); -x_273 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_273, 0, x_269); -lean::cnstr_set(x_273, 1, x_272); -x_274 = l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__2(x_0, x_1, x_2, x_2, x_273, x_14, x_6, x_7, x_247, x_184); -x_275 = lean::cnstr_get(x_274, 0); -lean::inc(x_275); -x_277 = lean::cnstr_get(x_274, 1); -lean::inc(x_277); -if (lean::is_shared(x_274)) { - lean::dec(x_274); - x_279 = lean::box(0); -} else { - lean::cnstr_release(x_274, 0); - lean::cnstr_release(x_274, 1); - x_279 = x_274; -} -x_280 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_249, x_275); -x_281 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_163, x_280); -if (lean::is_scalar(x_279)) { - x_282 = lean::alloc_cnstr(0, 2, 0); -} else { - x_282 = x_279; -} -lean::cnstr_set(x_282, 0, x_281); -lean::cnstr_set(x_282, 1, x_277); -return x_282; -} -} -else -{ -obj* x_291; uint8 x_293; obj* x_294; obj* x_295; obj* x_296; obj* x_297; obj* x_298; +obj* x_239; obj* x_241; obj* x_243; +x_239 = lean::cnstr_get(x_180, 0); +lean::inc(x_239); +x_241 = lean::cnstr_get(x_180, 1); +lean::inc(x_241); +x_243 = lean::cnstr_get(x_180, 2); +lean::inc(x_243); lean::dec(x_180); +if (lean::obj_tag(x_239) == 0) +{ +obj* x_251; obj* x_252; obj* x_253; obj* x_255; obj* x_256; obj* x_258; obj* x_259; obj* x_260; obj* x_261; +lean::dec(x_14); +lean::dec(x_7); +lean::dec(x_1); +lean::dec(x_6); +lean::dec(x_0); +x_251 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_251, 0, x_177); +lean::cnstr_set(x_251, 1, x_4); +x_252 = l_list_reverse___rarg(x_251); +x_253 = l_lean_parser_no__kind; +lean::inc(x_253); +x_255 = l_lean_parser_syntax_mk__node(x_253, x_252); +x_256 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_256); +if (lean::is_scalar(x_162)) { + x_258 = lean::alloc_cnstr(0, 3, 0); +} else { + x_258 = x_162; +} +lean::cnstr_set(x_258, 0, x_255); +lean::cnstr_set(x_258, 1, x_241); +lean::cnstr_set(x_258, 2, x_256); +x_259 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_243, x_258); +x_260 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_160, x_259); +x_261 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_261, 0, x_260); +lean::cnstr_set(x_261, 1, x_181); +return x_261; +} +else +{ +obj* x_263; obj* x_266; obj* x_267; obj* x_268; obj* x_269; obj* x_271; obj* x_273; obj* x_274; obj* x_275; obj* x_276; +lean::dec(x_162); +x_263 = lean::cnstr_get(x_239, 0); +lean::inc(x_263); +lean::dec(x_239); +x_266 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_266, 0, x_177); +lean::cnstr_set(x_266, 1, x_4); +x_267 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_267, 0, x_263); +lean::cnstr_set(x_267, 1, x_266); +x_268 = l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__2(x_0, x_1, x_2, x_2, x_267, x_14, x_6, x_7, x_241, x_181); +x_269 = lean::cnstr_get(x_268, 0); +lean::inc(x_269); +x_271 = lean::cnstr_get(x_268, 1); +lean::inc(x_271); +if (lean::is_shared(x_268)) { + lean::dec(x_268); + x_273 = lean::box(0); +} else { + lean::cnstr_release(x_268, 0); + lean::cnstr_release(x_268, 1); + x_273 = x_268; +} +x_274 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_243, x_269); +x_275 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_160, x_274); +if (lean::is_scalar(x_273)) { + x_276 = lean::alloc_cnstr(0, 2, 0); +} else { + x_276 = x_273; +} +lean::cnstr_set(x_276, 0, x_275); +lean::cnstr_set(x_276, 1, x_271); +return x_276; +} +} +else +{ +obj* x_285; uint8 x_287; obj* x_288; obj* x_289; obj* x_290; obj* x_291; obj* x_292; +lean::dec(x_177); lean::dec(x_14); lean::dec(x_7); lean::dec(x_4); lean::dec(x_1); lean::dec(x_6); lean::dec(x_0); -lean::dec(x_165); -x_291 = lean::cnstr_get(x_183, 0); -lean::inc(x_291); -x_293 = lean::cnstr_get_scalar(x_183, sizeof(void*)*1); -if (lean::is_shared(x_183)) { - lean::dec(x_183); - x_294 = lean::box(0); +lean::dec(x_162); +x_285 = lean::cnstr_get(x_180, 0); +lean::inc(x_285); +x_287 = lean::cnstr_get_scalar(x_180, sizeof(void*)*1); +if (lean::is_shared(x_180)) { + lean::dec(x_180); + x_288 = lean::box(0); } else { - lean::cnstr_release(x_183, 0); - x_294 = x_183; + lean::cnstr_release(x_180, 0); + x_288 = x_180; } -if (lean::is_scalar(x_294)) { - x_295 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_288)) { + x_289 = lean::alloc_cnstr(1, 1, 1); } else { - x_295 = x_294; + x_289 = x_288; } -lean::cnstr_set(x_295, 0, x_291); -lean::cnstr_set_scalar(x_295, sizeof(void*)*1, x_293); -x_296 = x_295; -x_297 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_163, x_296); -x_298 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_298, 0, x_297); -lean::cnstr_set(x_298, 1, x_184); -return x_298; +lean::cnstr_set(x_289, 0, x_285); +lean::cnstr_set_scalar(x_289, sizeof(void*)*1, x_287); +x_290 = x_289; +x_291 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_160, x_290); +x_292 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_292, 0, x_291); +lean::cnstr_set(x_292, 1, x_181); +return x_292; } } } } else { -obj* x_305; uint8 x_307; obj* x_308; obj* x_309; obj* x_310; obj* x_311; +obj* x_299; uint8 x_301; obj* x_302; obj* x_303; obj* x_304; obj* x_305; lean::dec(x_14); lean::dec(x_7); lean::dec(x_4); lean::dec(x_1); lean::dec(x_6); lean::dec(x_0); -x_305 = lean::cnstr_get(x_17, 0); -lean::inc(x_305); -x_307 = lean::cnstr_get_scalar(x_17, sizeof(void*)*1); +x_299 = lean::cnstr_get(x_17, 0); +lean::inc(x_299); +x_301 = lean::cnstr_get_scalar(x_17, sizeof(void*)*1); if (lean::is_shared(x_17)) { lean::dec(x_17); - x_308 = lean::box(0); + x_302 = lean::box(0); } else { lean::cnstr_release(x_17, 0); - x_308 = x_17; + x_302 = x_17; } -if (lean::is_scalar(x_308)) { - x_309 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_302)) { + x_303 = lean::alloc_cnstr(1, 1, 1); } else { - x_309 = x_308; + x_303 = x_302; } -lean::cnstr_set(x_309, 0, x_305); -lean::cnstr_set_scalar(x_309, sizeof(void*)*1, x_307); -x_310 = x_309; -x_311 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_311, 0, x_310); -lean::cnstr_set(x_311, 1, x_18); -return x_311; +lean::cnstr_set(x_303, 0, x_299); +lean::cnstr_set_scalar(x_303, sizeof(void*)*1, x_301); +x_304 = x_303; +x_305 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_305, 0, x_304); +lean::cnstr_set(x_305, 1, x_18); +return x_305; } } lbl_22: @@ -8549,74 +8523,74 @@ goto lbl_19; } else { -obj* x_312; uint8 x_314; obj* x_315; obj* x_316; obj* x_318; obj* x_320; obj* x_322; obj* x_325; obj* x_327; obj* x_328; obj* x_329; obj* x_330; obj* x_331; obj* x_333; obj* x_334; obj* x_335; -x_312 = lean::cnstr_get(x_20, 0); -lean::inc(x_312); -x_314 = lean::cnstr_get_scalar(x_20, sizeof(void*)*1); +obj* x_306; uint8 x_308; obj* x_309; obj* x_310; obj* x_312; obj* x_314; obj* x_316; obj* x_319; obj* x_321; obj* x_322; obj* x_323; obj* x_324; obj* x_325; obj* x_327; obj* x_328; obj* x_329; +x_306 = lean::cnstr_get(x_20, 0); +lean::inc(x_306); +x_308 = lean::cnstr_get_scalar(x_20, sizeof(void*)*1); if (lean::is_shared(x_20)) { lean::dec(x_20); - x_315 = lean::box(0); + x_309 = lean::box(0); } else { lean::cnstr_release(x_20, 0); - x_315 = x_20; + x_309 = x_20; } -x_316 = lean::cnstr_get(x_312, 0); +x_310 = lean::cnstr_get(x_306, 0); +lean::inc(x_310); +x_312 = lean::cnstr_get(x_306, 1); +lean::inc(x_312); +x_314 = lean::cnstr_get(x_306, 2); +lean::inc(x_314); +x_316 = lean::cnstr_get(x_306, 3); lean::inc(x_316); -x_318 = lean::cnstr_get(x_312, 1); -lean::inc(x_318); -x_320 = lean::cnstr_get(x_312, 2); -lean::inc(x_320); -x_322 = lean::cnstr_get(x_312, 3); -lean::inc(x_322); -lean::dec(x_312); -x_325 = l_option_get___main___at_lean_parser_run___spec__2(x_322); +lean::dec(x_306); +x_319 = l_option_get___main___at_lean_parser_run___spec__2(x_316); lean::inc(x_4); -x_327 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_327, 0, x_325); -lean::cnstr_set(x_327, 1, x_4); -x_328 = lean::box(3); -x_329 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_329, 0, x_328); -lean::cnstr_set(x_329, 1, x_327); -x_330 = l_list_reverse___rarg(x_329); -x_331 = l_lean_parser_no__kind; -lean::inc(x_331); -x_333 = l_lean_parser_syntax_mk__node(x_331, x_330); -x_334 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_334, 0, x_333); -x_335 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_335, 0, x_316); -lean::cnstr_set(x_335, 1, x_318); -lean::cnstr_set(x_335, 2, x_320); -lean::cnstr_set(x_335, 3, x_334); -if (x_314 == 0) +x_321 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_321, 0, x_319); +lean::cnstr_set(x_321, 1, x_4); +x_322 = lean::box(3); +x_323 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_323, 0, x_322); +lean::cnstr_set(x_323, 1, x_321); +x_324 = l_list_reverse___rarg(x_323); +x_325 = l_lean_parser_no__kind; +lean::inc(x_325); +x_327 = l_lean_parser_syntax_mk__node(x_325, x_324); +x_328 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_328, 0, x_327); +x_329 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_329, 0, x_310); +lean::cnstr_set(x_329, 1, x_312); +lean::cnstr_set(x_329, 2, x_314); +lean::cnstr_set(x_329, 3, x_328); +if (x_308 == 0) { -uint8 x_336; obj* x_337; obj* x_338; -x_336 = 0; -if (lean::is_scalar(x_315)) { - x_337 = lean::alloc_cnstr(1, 1, 1); +uint8 x_330; obj* x_331; obj* x_332; +x_330 = 0; +if (lean::is_scalar(x_309)) { + x_331 = lean::alloc_cnstr(1, 1, 1); } else { - x_337 = x_315; + x_331 = x_309; } -lean::cnstr_set(x_337, 0, x_335); -lean::cnstr_set_scalar(x_337, sizeof(void*)*1, x_336); -x_338 = x_337; -x_17 = x_338; +lean::cnstr_set(x_331, 0, x_329); +lean::cnstr_set_scalar(x_331, sizeof(void*)*1, x_330); +x_332 = x_331; +x_17 = x_332; x_18 = x_21; goto lbl_19; } else { -obj* x_339; obj* x_340; -if (lean::is_scalar(x_315)) { - x_339 = lean::alloc_cnstr(1, 1, 1); +obj* x_333; obj* x_334; +if (lean::is_scalar(x_309)) { + x_333 = lean::alloc_cnstr(1, 1, 1); } else { - x_339 = x_315; + x_333 = x_309; } -lean::cnstr_set(x_339, 0, x_335); -lean::cnstr_set_scalar(x_339, sizeof(void*)*1, x_314); -x_340 = x_339; -x_17 = x_340; +lean::cnstr_set(x_333, 0, x_329); +lean::cnstr_set_scalar(x_333, sizeof(void*)*1, x_308); +x_334 = x_333; +x_17 = x_334; x_18 = x_21; goto lbl_19; } @@ -8625,19 +8599,18 @@ goto lbl_19; } else { -obj* x_345; obj* x_346; obj* x_347; obj* x_351; +obj* x_339; obj* x_340; obj* x_341; obj* x_344; lean::dec(x_5); lean::dec(x_4); lean::dec(x_1); lean::dec(x_0); -x_345 = lean::box(0); -x_346 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; -x_347 = l_mjoin___rarg___closed__1; -lean::inc(x_345); -lean::inc(x_347); -lean::inc(x_346); -x_351 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_346, x_347, x_345, x_345, x_6, x_7, x_8, x_9); -return x_351; +x_339 = lean::box(0); +x_340 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; +x_341 = l_mjoin___rarg___closed__1; +lean::inc(x_341); +lean::inc(x_340); +x_344 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_340, x_341, x_339, x_339, x_6, x_7, x_8, x_9); +return x_344; } } } @@ -9090,50 +9063,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__3; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__3; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__3; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__3; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__3; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__3; +lean::inc(x_69); +return x_69; } } } @@ -9143,52 +9115,52 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__3; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__3; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { switch (lean::obj_tag(x_1)) { case 0: { -obj* x_80; obj* x_83; obj* x_84; -x_80 = lean::cnstr_get(x_1, 0); -lean::inc(x_80); +obj* x_79; obj* x_82; obj* x_83; +x_79 = lean::cnstr_get(x_1, 0); +lean::inc(x_79); lean::dec(x_1); +x_82 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_82, 0, x_79); x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_80); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +lean::cnstr_set(x_83, 0, x_82); +return x_83; } case 3: { -obj* x_85; -x_85 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__1; -lean::inc(x_85); -return x_85; +obj* x_84; +x_84 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__1; +lean::inc(x_84); +return x_84; } default: { -obj* x_88; +obj* x_87; lean::dec(x_1); -x_88 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__1; -lean::inc(x_88); -return x_88; +x_87 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__1; +lean::inc(x_87); +return x_87; } } } @@ -9197,30 +9169,30 @@ else switch (lean::obj_tag(x_1)) { case 0: { -obj* x_90; obj* x_93; obj* x_94; -x_90 = lean::cnstr_get(x_1, 0); -lean::inc(x_90); +obj* x_89; obj* x_92; obj* x_93; +x_89 = lean::cnstr_get(x_1, 0); +lean::inc(x_89); lean::dec(x_1); -x_93 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_93, 0, x_90); -x_94 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_94, 0, x_93); -return x_94; +x_92 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_92, 0, x_89); +x_93 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_93, 0, x_92); +return x_93; } case 3: { -obj* x_95; -x_95 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__2; -lean::inc(x_95); -return x_95; +obj* x_94; +x_94 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__2; +lean::inc(x_94); +return x_94; } default: { -obj* x_98; +obj* x_97; lean::dec(x_1); -x_98 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__2; -lean::inc(x_98); -return x_98; +x_97 = l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__2; +lean::inc(x_97); +return x_97; } } } @@ -9234,7 +9206,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; +obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -9243,46 +9215,44 @@ lean::inc(x_5); x_7 = l_option_map___rarg(x_5, x_2); x_8 = lean::box(3); x_9 = l_option_get__or__else___main___rarg(x_7, x_8); -lean::inc(x_1); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_1); -x_12 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_12); -x_14 = l_lean_parser_syntax_mk__node(x_12, x_11); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_1); -x_16 = l_lean_parser_command_visibility; -lean::inc(x_16); -x_18 = l_lean_parser_syntax_mk__node(x_16, x_15); -return x_18; +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_1); +x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_11); +x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_1); +x_15 = l_lean_parser_command_visibility; +lean::inc(x_15); +x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); +return x_17; } else { -obj* x_19; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; -x_19 = lean::cnstr_get(x_0, 0); -lean::inc(x_19); +obj* x_18; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; +x_18 = lean::cnstr_get(x_0, 0); +lean::inc(x_18); lean::dec(x_0); -x_22 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_22); -x_24 = l_option_map___rarg(x_22, x_19); -x_25 = lean::box(3); -x_26 = l_option_get__or__else___main___rarg(x_24, x_25); -lean::inc(x_1); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_1); -x_29 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_29); -x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_1); -x_33 = l_lean_parser_command_visibility; -lean::inc(x_33); -x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); -return x_35; +x_21 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_21); +x_23 = l_option_map___rarg(x_21, x_18); +x_24 = lean::box(3); +x_25 = l_option_get__or__else___main___rarg(x_23, x_24); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_1); +x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_1); +x_31 = l_lean_parser_command_visibility; +lean::inc(x_31); +x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); +return x_33; } } } @@ -10520,7 +10490,7 @@ goto lbl_14; } else { -obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_28; +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; x_17 = lean::cnstr_get(x_1, 0); lean::inc(x_17); lean::dec(x_1); @@ -10528,243 +10498,233 @@ x_20 = l_lean_parser_command_doc__comment_has__view; x_21 = lean::cnstr_get(x_20, 1); lean::inc(x_21); x_23 = lean::apply_1(x_21, x_17); -lean::inc(x_12); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_12); -x_26 = l_lean_parser_no__kind; -lean::inc(x_26); -x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); -x_13 = x_28; +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_12); +x_25 = l_lean_parser_no__kind; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_13 = x_27; goto lbl_14; } lbl_14: { -obj* x_29; +obj* x_28; if (lean::obj_tag(x_3) == 0) { -obj* x_31; -x_31 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_31); -x_29 = x_31; -goto lbl_30; +obj* x_30; +x_30 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_30); +x_28 = x_30; +goto lbl_29; } else { -obj* x_33; obj* x_36; obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_44; -x_33 = lean::cnstr_get(x_3, 0); -lean::inc(x_33); +obj* x_32; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; +x_32 = lean::cnstr_get(x_3, 0); +lean::inc(x_32); lean::dec(x_3); -x_36 = l_lean_parser_command_decl__attributes_has__view; -x_37 = lean::cnstr_get(x_36, 1); -lean::inc(x_37); -x_39 = lean::apply_1(x_37, x_33); -lean::inc(x_12); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_39); -lean::cnstr_set(x_41, 1, x_12); -x_42 = l_lean_parser_no__kind; -lean::inc(x_42); -x_44 = l_lean_parser_syntax_mk__node(x_42, x_41); -x_29 = x_44; -goto lbl_30; +x_35 = l_lean_parser_command_decl__attributes_has__view; +x_36 = lean::cnstr_get(x_35, 1); +lean::inc(x_36); +x_38 = lean::apply_1(x_36, x_32); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_12); +x_40 = l_lean_parser_no__kind; +lean::inc(x_40); +x_42 = l_lean_parser_syntax_mk__node(x_40, x_39); +x_28 = x_42; +goto lbl_29; } -lbl_30: +lbl_29: { -obj* x_45; obj* x_47; obj* x_48; +obj* x_43; obj* x_45; obj* x_46; if (lean::obj_tag(x_5) == 0) { if (lean::obj_tag(x_7) == 0) { -obj* x_50; -x_50 = l_lean_parser_combinators_many___rarg___closed__1; +obj* x_48; +x_48 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_48); +x_43 = x_48; +goto lbl_44; +} +else +{ +obj* x_50; obj* x_53; +x_50 = lean::cnstr_get(x_7, 0); lean::inc(x_50); -x_45 = x_50; -goto lbl_46; -} -else -{ -obj* x_52; obj* x_55; -x_52 = lean::cnstr_get(x_7, 0); -lean::inc(x_52); lean::dec(x_7); -x_55 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_55); -x_47 = x_55; -x_48 = x_52; -goto lbl_49; +x_53 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_53); +x_45 = x_53; +x_46 = x_50; +goto lbl_47; } } else { -obj* x_57; obj* x_60; obj* x_61; obj* x_63; obj* x_65; obj* x_66; obj* x_68; -x_57 = lean::cnstr_get(x_5, 0); -lean::inc(x_57); +obj* x_55; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_65; +x_55 = lean::cnstr_get(x_5, 0); +lean::inc(x_55); lean::dec(x_5); -x_60 = l_lean_parser_command_visibility_has__view; -x_61 = lean::cnstr_get(x_60, 1); -lean::inc(x_61); -x_63 = lean::apply_1(x_61, x_57); -lean::inc(x_12); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_63); -lean::cnstr_set(x_65, 1, x_12); -x_66 = l_lean_parser_no__kind; -lean::inc(x_66); -x_68 = l_lean_parser_syntax_mk__node(x_66, x_65); +x_58 = l_lean_parser_command_visibility_has__view; +x_59 = lean::cnstr_get(x_58, 1); +lean::inc(x_59); +x_61 = lean::apply_1(x_59, x_55); +x_62 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_62, 0, x_61); +lean::cnstr_set(x_62, 1, x_12); +x_63 = l_lean_parser_no__kind; +lean::inc(x_63); +x_65 = l_lean_parser_syntax_mk__node(x_63, x_62); if (lean::obj_tag(x_7) == 0) { -x_45 = x_68; -goto lbl_46; +x_43 = x_65; +goto lbl_44; } else { -obj* x_69; -x_69 = lean::cnstr_get(x_7, 0); -lean::inc(x_69); +obj* x_66; +x_66 = lean::cnstr_get(x_7, 0); +lean::inc(x_66); lean::dec(x_7); -x_47 = x_68; -x_48 = x_69; -goto lbl_49; +x_45 = x_65; +x_46 = x_66; +goto lbl_47; } } -lbl_46: +lbl_44: { if (lean::obj_tag(x_9) == 0) { -obj* x_73; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_80; -lean::dec(x_12); -x_73 = l_lean_parser_term_binder__content_has__view_x_27___lambda__2___closed__2; -lean::inc(x_73); -x_75 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_75, 0, x_45); -lean::cnstr_set(x_75, 1, x_73); -x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_29); -lean::cnstr_set(x_76, 1, x_75); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_13); -lean::cnstr_set(x_77, 1, x_76); -x_78 = l_lean_parser_command_decl__modifiers; -lean::inc(x_78); -x_80 = l_lean_parser_syntax_mk__node(x_78, x_77); -return x_80; +obj* x_69; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_76; +x_69 = l_lean_parser_term_binder__content_has__view_x_27___lambda__2___closed__2; +lean::inc(x_69); +x_71 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_71, 0, x_43); +lean::cnstr_set(x_71, 1, x_69); +x_72 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_72, 0, x_28); +lean::cnstr_set(x_72, 1, x_71); +x_73 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_73, 0, x_13); +lean::cnstr_set(x_73, 1, x_72); +x_74 = l_lean_parser_command_decl__modifiers; +lean::inc(x_74); +x_76 = l_lean_parser_syntax_mk__node(x_74, x_73); +return x_76; } else { -obj* x_81; obj* x_84; obj* x_86; obj* x_87; obj* x_88; obj* x_90; obj* x_91; obj* x_93; obj* x_94; obj* x_95; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_103; -x_81 = lean::cnstr_get(x_9, 0); -lean::inc(x_81); +obj* x_77; obj* x_80; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_88; obj* x_89; obj* x_90; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_98; +x_77 = lean::cnstr_get(x_9, 0); +lean::inc(x_77); lean::dec(x_9); -x_84 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_84); -x_86 = l_option_map___rarg(x_84, x_81); -x_87 = lean::box(3); -x_88 = l_option_get__or__else___main___rarg(x_86, x_87); -lean::inc(x_12); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_88); -lean::cnstr_set(x_90, 1, x_12); -x_91 = l_lean_parser_no__kind; -lean::inc(x_91); -x_93 = l_lean_parser_syntax_mk__node(x_91, x_90); +x_80 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_80); +x_82 = l_option_map___rarg(x_80, x_77); +x_83 = lean::box(3); +x_84 = l_option_get__or__else___main___rarg(x_82, x_83); +x_85 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_85, 0, x_84); +lean::cnstr_set(x_85, 1, x_12); +x_86 = l_lean_parser_no__kind; +lean::inc(x_86); +x_88 = l_lean_parser_syntax_mk__node(x_86, x_85); +x_89 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_89, 0, x_88); +lean::cnstr_set(x_89, 1, x_12); +x_90 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_90); +x_92 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_92, 0, x_90); +lean::cnstr_set(x_92, 1, x_89); +x_93 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_93, 0, x_43); +lean::cnstr_set(x_93, 1, x_92); x_94 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_12); -x_95 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_95); -x_97 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_97, 0, x_95); -lean::cnstr_set(x_97, 1, x_94); -x_98 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_98, 0, x_45); -lean::cnstr_set(x_98, 1, x_97); -x_99 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_99, 0, x_29); -lean::cnstr_set(x_99, 1, x_98); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_13); -lean::cnstr_set(x_100, 1, x_99); -x_101 = l_lean_parser_command_decl__modifiers; -lean::inc(x_101); -x_103 = l_lean_parser_syntax_mk__node(x_101, x_100); -return x_103; +lean::cnstr_set(x_94, 0, x_28); +lean::cnstr_set(x_94, 1, x_93); +x_95 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_95, 0, x_13); +lean::cnstr_set(x_95, 1, x_94); +x_96 = l_lean_parser_command_decl__modifiers; +lean::inc(x_96); +x_98 = l_lean_parser_syntax_mk__node(x_96, x_95); +return x_98; } } -lbl_49: +lbl_47: { -obj* x_104; obj* x_106; obj* x_107; obj* x_109; obj* x_111; obj* x_112; obj* x_114; -x_104 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_104); -x_106 = l_option_map___rarg(x_104, x_48); -x_107 = lean::box(3); -lean::inc(x_107); -x_109 = l_option_get__or__else___main___rarg(x_106, x_107); -lean::inc(x_12); -x_111 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_111, 0, x_109); -lean::cnstr_set(x_111, 1, x_12); -x_112 = l_lean_parser_no__kind; -lean::inc(x_112); -x_114 = l_lean_parser_syntax_mk__node(x_112, x_111); +obj* x_99; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_107; +x_99 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_99); +x_101 = l_option_map___rarg(x_99, x_46); +x_102 = lean::box(3); +x_103 = l_option_get__or__else___main___rarg(x_101, x_102); +x_104 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_104, 0, x_103); +lean::cnstr_set(x_104, 1, x_12); +x_105 = l_lean_parser_no__kind; +lean::inc(x_105); +x_107 = l_lean_parser_syntax_mk__node(x_105, x_104); if (lean::obj_tag(x_9) == 0) { -obj* x_117; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_125; -lean::dec(x_12); -lean::dec(x_107); -x_117 = l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; -lean::inc(x_117); -x_119 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_119, 0, x_114); -lean::cnstr_set(x_119, 1, x_117); -x_120 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_120, 0, x_47); -lean::cnstr_set(x_120, 1, x_119); -x_121 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_121, 0, x_29); -lean::cnstr_set(x_121, 1, x_120); -x_122 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_122, 0, x_13); -lean::cnstr_set(x_122, 1, x_121); -x_123 = l_lean_parser_command_decl__modifiers; -lean::inc(x_123); -x_125 = l_lean_parser_syntax_mk__node(x_123, x_122); -return x_125; +obj* x_108; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_116; +x_108 = l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; +lean::inc(x_108); +x_110 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_110, 0, x_107); +lean::cnstr_set(x_110, 1, x_108); +x_111 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_111, 0, x_45); +lean::cnstr_set(x_111, 1, x_110); +x_112 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_112, 0, x_28); +lean::cnstr_set(x_112, 1, x_111); +x_113 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_113, 0, x_13); +lean::cnstr_set(x_113, 1, x_112); +x_114 = l_lean_parser_command_decl__modifiers; +lean::inc(x_114); +x_116 = l_lean_parser_syntax_mk__node(x_114, x_113); +return x_116; } else { -obj* x_126; obj* x_130; obj* x_131; obj* x_133; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_143; -x_126 = lean::cnstr_get(x_9, 0); -lean::inc(x_126); +obj* x_117; obj* x_121; obj* x_122; obj* x_123; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_133; +x_117 = lean::cnstr_get(x_9, 0); +lean::inc(x_117); lean::dec(x_9); -lean::inc(x_104); -x_130 = l_option_map___rarg(x_104, x_126); -x_131 = l_option_get__or__else___main___rarg(x_130, x_107); -lean::inc(x_12); -x_133 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_133, 0, x_131); -lean::cnstr_set(x_133, 1, x_12); -lean::inc(x_112); -x_135 = l_lean_parser_syntax_mk__node(x_112, x_133); -x_136 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_136, 0, x_135); -lean::cnstr_set(x_136, 1, x_12); -x_137 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_137, 0, x_114); -lean::cnstr_set(x_137, 1, x_136); -x_138 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_138, 0, x_47); -lean::cnstr_set(x_138, 1, x_137); -x_139 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_139, 0, x_29); -lean::cnstr_set(x_139, 1, x_138); -x_140 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_140, 0, x_13); -lean::cnstr_set(x_140, 1, x_139); -x_141 = l_lean_parser_command_decl__modifiers; -lean::inc(x_141); -x_143 = l_lean_parser_syntax_mk__node(x_141, x_140); -return x_143; +lean::inc(x_99); +x_121 = l_option_map___rarg(x_99, x_117); +x_122 = l_option_get__or__else___main___rarg(x_121, x_102); +x_123 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_123, 0, x_122); +lean::cnstr_set(x_123, 1, x_12); +lean::inc(x_105); +x_125 = l_lean_parser_syntax_mk__node(x_105, x_123); +x_126 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_126, 0, x_125); +lean::cnstr_set(x_126, 1, x_12); +x_127 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_127, 0, x_107); +lean::cnstr_set(x_127, 1, x_126); +x_128 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_128, 0, x_45); +lean::cnstr_set(x_128, 1, x_127); +x_129 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_129, 0, x_28); +lean::cnstr_set(x_129, 1, x_128); +x_130 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_130, 0, x_13); +lean::cnstr_set(x_130, 1, x_129); +x_131 = l_lean_parser_command_decl__modifiers; +lean::inc(x_131); +x_133 = l_lean_parser_syntax_mk__node(x_131, x_130); +return x_133; } } } @@ -10869,7 +10829,7 @@ goto lbl_11; } else { -obj* x_37; uint8 x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_47; obj* x_50; obj* x_52; obj* x_53; obj* x_55; obj* x_56; obj* x_57; +obj* x_37; uint8 x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_47; obj* x_50; obj* x_51; obj* x_52; obj* x_54; obj* x_55; obj* x_56; x_37 = lean::cnstr_get(x_14, 0); lean::inc(x_37); x_39 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); @@ -10890,48 +10850,47 @@ x_47 = lean::cnstr_get(x_37, 3); lean::inc(x_47); lean::dec(x_37); x_50 = l_option_get___main___at_lean_parser_run___spec__2(x_47); -lean::inc(x_8); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_50); -lean::cnstr_set(x_52, 1, x_8); -x_53 = l_lean_parser_no__kind; -lean::inc(x_53); -x_55 = l_lean_parser_syntax_mk__node(x_53, x_52); -x_56 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_56, 0, x_55); -x_57 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_57, 0, x_41); -lean::cnstr_set(x_57, 1, x_43); -lean::cnstr_set(x_57, 2, x_45); -lean::cnstr_set(x_57, 3, x_56); +x_51 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_51, 0, x_50); +lean::cnstr_set(x_51, 1, x_8); +x_52 = l_lean_parser_no__kind; +lean::inc(x_52); +x_54 = l_lean_parser_syntax_mk__node(x_52, x_51); +x_55 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_55, 0, x_54); +x_56 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_56, 0, x_41); +lean::cnstr_set(x_56, 1, x_43); +lean::cnstr_set(x_56, 2, x_45); +lean::cnstr_set(x_56, 3, x_55); if (x_39 == 0) { -uint8 x_58; obj* x_59; obj* x_60; -x_58 = 0; +uint8 x_57; obj* x_58; obj* x_59; +x_57 = 0; if (lean::is_scalar(x_40)) { - x_59 = lean::alloc_cnstr(1, 1, 1); + x_58 = lean::alloc_cnstr(1, 1, 1); } else { - x_59 = x_40; + x_58 = x_40; } -lean::cnstr_set(x_59, 0, x_57); -lean::cnstr_set_scalar(x_59, sizeof(void*)*1, x_58); -x_60 = x_59; -x_9 = x_60; +lean::cnstr_set(x_58, 0, x_56); +lean::cnstr_set_scalar(x_58, sizeof(void*)*1, x_57); +x_59 = x_58; +x_9 = x_59; x_10 = x_16; goto lbl_11; } else { -obj* x_61; obj* x_62; +obj* x_60; obj* x_61; if (lean::is_scalar(x_40)) { - x_61 = lean::alloc_cnstr(1, 1, 1); + x_60 = lean::alloc_cnstr(1, 1, 1); } else { - x_61 = x_40; + x_60 = x_40; } -lean::cnstr_set(x_61, 0, x_57); -lean::cnstr_set_scalar(x_61, sizeof(void*)*1, x_39); -x_62 = x_61; -x_9 = x_62; +lean::cnstr_set(x_60, 0, x_56); +lean::cnstr_set_scalar(x_60, sizeof(void*)*1, x_39); +x_61 = x_60; +x_9 = x_61; x_10 = x_16; goto lbl_11; } @@ -10940,105 +10899,104 @@ lbl_7: { if (lean::obj_tag(x_5) == 0) { -obj* x_63; obj* x_65; obj* x_67; obj* x_69; -x_63 = lean::cnstr_get(x_5, 0); -lean::inc(x_63); -x_65 = lean::cnstr_get(x_5, 1); -lean::inc(x_65); -x_67 = lean::cnstr_get(x_5, 2); -lean::inc(x_67); +obj* x_62; obj* x_64; obj* x_66; obj* x_68; +x_62 = lean::cnstr_get(x_5, 0); +lean::inc(x_62); +x_64 = lean::cnstr_get(x_5, 1); +lean::inc(x_64); +x_66 = lean::cnstr_get(x_5, 2); +lean::inc(x_66); if (lean::is_shared(x_5)) { lean::dec(x_5); - x_69 = lean::box(0); + x_68 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); - x_69 = x_5; + x_68 = x_5; } -if (lean::obj_tag(x_63) == 0) +if (lean::obj_tag(x_62) == 0) { -obj* x_70; obj* x_71; obj* x_74; obj* x_75; obj* x_76; -x_70 = l_lean_parser_combinators_many___rarg___closed__1; -x_71 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_71); +obj* x_69; obj* x_70; obj* x_73; obj* x_74; obj* x_75; +x_69 = l_lean_parser_combinators_many___rarg___closed__1; +x_70 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_70); -if (lean::is_scalar(x_69)) { - x_74 = lean::alloc_cnstr(0, 3, 0); +lean::inc(x_69); +if (lean::is_scalar(x_68)) { + x_73 = lean::alloc_cnstr(0, 3, 0); } else { - x_74 = x_69; + x_73 = x_68; } -lean::cnstr_set(x_74, 0, x_70); -lean::cnstr_set(x_74, 1, x_65); -lean::cnstr_set(x_74, 2, x_71); -x_75 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_67, x_74); -x_76 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_76, 0, x_75); -lean::cnstr_set(x_76, 1, x_6); -return x_76; +lean::cnstr_set(x_73, 0, x_69); +lean::cnstr_set(x_73, 1, x_64); +lean::cnstr_set(x_73, 2, x_70); +x_74 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_66, x_73); +x_75 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_75, 0, x_74); +lean::cnstr_set(x_75, 1, x_6); +return x_75; } else { -obj* x_77; obj* x_80; obj* x_81; obj* x_82; obj* x_84; obj* x_85; obj* x_87; obj* x_88; obj* x_89; -x_77 = lean::cnstr_get(x_63, 0); -lean::inc(x_77); -lean::dec(x_63); -x_80 = lean::box(0); -x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_77); -lean::cnstr_set(x_81, 1, x_80); -x_82 = l_lean_parser_no__kind; -lean::inc(x_82); -x_84 = l_lean_parser_syntax_mk__node(x_82, x_81); -x_85 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_85); -if (lean::is_scalar(x_69)) { - x_87 = lean::alloc_cnstr(0, 3, 0); +obj* x_76; obj* x_79; obj* x_80; obj* x_81; obj* x_83; obj* x_84; obj* x_86; obj* x_87; obj* x_88; +x_76 = lean::cnstr_get(x_62, 0); +lean::inc(x_76); +lean::dec(x_62); +x_79 = lean::box(0); +x_80 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_80, 0, x_76); +lean::cnstr_set(x_80, 1, x_79); +x_81 = l_lean_parser_no__kind; +lean::inc(x_81); +x_83 = l_lean_parser_syntax_mk__node(x_81, x_80); +x_84 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_84); +if (lean::is_scalar(x_68)) { + x_86 = lean::alloc_cnstr(0, 3, 0); } else { - x_87 = x_69; + x_86 = x_68; } -lean::cnstr_set(x_87, 0, x_84); -lean::cnstr_set(x_87, 1, x_65); -lean::cnstr_set(x_87, 2, x_85); -x_88 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_67, x_87); -x_89 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_6); -return x_89; +lean::cnstr_set(x_86, 0, x_83); +lean::cnstr_set(x_86, 1, x_64); +lean::cnstr_set(x_86, 2, x_84); +x_87 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_66, x_86); +x_88 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_88, 0, x_87); +lean::cnstr_set(x_88, 1, x_6); +return x_88; } } else { -obj* x_90; uint8 x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; -x_90 = lean::cnstr_get(x_5, 0); -lean::inc(x_90); -x_92 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); +obj* x_89; uint8 x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; +x_89 = lean::cnstr_get(x_5, 0); +lean::inc(x_89); +x_91 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); if (lean::is_shared(x_5)) { lean::dec(x_5); - x_93 = lean::box(0); + x_92 = lean::box(0); } else { lean::cnstr_release(x_5, 0); - x_93 = x_5; + x_92 = x_5; } -if (lean::is_scalar(x_93)) { - x_94 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_92)) { + x_93 = lean::alloc_cnstr(1, 1, 1); } else { - x_94 = x_93; + x_93 = x_92; } -lean::cnstr_set(x_94, 0, x_90); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_92); -x_95 = x_94; -x_96 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_96, 0, x_95); -lean::cnstr_set(x_96, 1, x_6); -return x_96; +lean::cnstr_set(x_93, 0, x_89); +lean::cnstr_set_scalar(x_93, sizeof(void*)*1, x_91); +x_94 = x_93; +x_95 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_95, 0, x_94); +lean::cnstr_set(x_95, 1, x_6); +return x_95; } } lbl_11: { if (lean::obj_tag(x_9) == 0) { -lean::dec(x_8); lean::dec(x_3); x_5 = x_9; x_6 = x_10; @@ -11046,37 +11004,36 @@ goto lbl_7; } else { -obj* x_99; uint8 x_101; -x_99 = lean::cnstr_get(x_9, 0); -lean::inc(x_99); -x_101 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (x_101 == 0) +obj* x_97; uint8 x_99; +x_97 = lean::cnstr_get(x_9, 0); +lean::inc(x_97); +x_99 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); +if (x_99 == 0) { -obj* x_103; obj* x_106; obj* x_108; obj* x_109; obj* x_110; +obj* x_101; obj* x_104; obj* x_106; obj* x_107; obj* x_108; lean::dec(x_9); -x_103 = lean::cnstr_get(x_99, 2); -lean::inc(x_103); -lean::dec(x_99); -x_106 = l_mjoin___rarg___closed__1; -lean::inc(x_106); -x_108 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_108, 0, x_103); -lean::closure_set(x_108, 1, x_106); -x_109 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_109, 0, x_108); -x_110 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_110, 0, x_8); -lean::cnstr_set(x_110, 1, x_3); -lean::cnstr_set(x_110, 2, x_109); -x_5 = x_110; +x_101 = lean::cnstr_get(x_97, 2); +lean::inc(x_101); +lean::dec(x_97); +x_104 = l_mjoin___rarg___closed__1; +lean::inc(x_104); +x_106 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_106, 0, x_101); +lean::closure_set(x_106, 1, x_104); +x_107 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_107, 0, x_106); +x_108 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_108, 0, x_8); +lean::cnstr_set(x_108, 1, x_3); +lean::cnstr_set(x_108, 2, x_107); +x_5 = x_108; x_6 = x_10; goto lbl_7; } else { -lean::dec(x_8); lean::dec(x_3); -lean::dec(x_99); +lean::dec(x_97); x_5 = x_9; x_6 = x_10; goto lbl_7; @@ -11090,213 +11047,211 @@ _start: { if (lean::obj_tag(x_0) == 0) { -obj* x_7; obj* x_8; obj* x_9; obj* x_13; +obj* x_7; obj* x_8; obj* x_9; obj* x_12; lean::dec(x_1); x_7 = lean::box(0); x_8 = l_lean_parser_combinators_choice__aux___main___rarg___closed__1; x_9 = l_mjoin___rarg___closed__1; -lean::inc(x_7); lean::inc(x_9); lean::inc(x_8); -x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_8, x_9, x_7, x_7, x_2, x_3, x_4, x_5); -return x_13; +x_12 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_8, x_9, x_7, x_7, x_2, x_3, x_4, x_5); +return x_12; } else { -obj* x_14; obj* x_16; obj* x_18; obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; -x_14 = lean::cnstr_get(x_0, 0); -lean::inc(x_14); -x_16 = lean::cnstr_get(x_0, 1); -lean::inc(x_16); +obj* x_13; obj* x_15; obj* x_17; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_28; +x_13 = lean::cnstr_get(x_0, 0); +lean::inc(x_13); +x_15 = lean::cnstr_get(x_0, 1); +lean::inc(x_15); if (lean::is_shared(x_0)) { lean::dec(x_0); - x_18 = lean::box(0); + x_17 = lean::box(0); } else { lean::cnstr_release(x_0, 0); lean::cnstr_release(x_0, 1); - x_18 = x_0; + x_17 = x_0; } lean::inc(x_4); lean::inc(x_3); lean::inc(x_2); -x_22 = lean::apply_4(x_14, x_2, x_3, x_4, x_5); -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -x_25 = lean::cnstr_get(x_22, 1); -lean::inc(x_25); +x_21 = lean::apply_4(x_13, x_2, x_3, x_4, x_5); +x_22 = lean::cnstr_get(x_21, 0); +lean::inc(x_22); +x_24 = lean::cnstr_get(x_21, 1); +lean::inc(x_24); +if (lean::is_shared(x_21)) { + lean::dec(x_21); + x_26 = lean::box(0); +} else { + lean::cnstr_release(x_21, 0); + lean::cnstr_release(x_21, 1); + x_26 = x_21; +} +x_27 = lean::mk_nat_obj(1u); +x_28 = lean::nat_add(x_1, x_27); +lean::dec(x_27); +if (lean::obj_tag(x_22) == 0) +{ +obj* x_30; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; +x_30 = lean::cnstr_get(x_22, 0); +lean::inc(x_30); +x_32 = lean::cnstr_get(x_22, 1); +lean::inc(x_32); +x_34 = lean::cnstr_get(x_22, 2); +lean::inc(x_34); if (lean::is_shared(x_22)) { lean::dec(x_22); - x_27 = lean::box(0); + x_36 = lean::box(0); } else { lean::cnstr_release(x_22, 0); lean::cnstr_release(x_22, 1); - x_27 = x_22; + lean::cnstr_release(x_22, 2); + x_36 = x_22; } -x_28 = lean::mk_nat_obj(1u); -x_29 = lean::nat_add(x_1, x_28); +x_37 = lean::box(0); +x_38 = lean_name_mk_numeral(x_37, x_1); +if (lean::is_scalar(x_17)) { + x_39 = lean::alloc_cnstr(1, 2, 0); +} else { + x_39 = x_17; +} +lean::cnstr_set(x_39, 0, x_30); +lean::cnstr_set(x_39, 1, x_37); +x_40 = l_lean_parser_syntax_mk__node(x_38, x_39); +x_41 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_41); +if (lean::is_scalar(x_36)) { + x_43 = lean::alloc_cnstr(0, 3, 0); +} else { + x_43 = x_36; +} +lean::cnstr_set(x_43, 0, x_40); +lean::cnstr_set(x_43, 1, x_32); +lean::cnstr_set(x_43, 2, x_41); +x_44 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_34, x_43); +if (lean::obj_tag(x_44) == 0) +{ +obj* x_50; +lean::dec(x_4); +lean::dec(x_3); +lean::dec(x_2); lean::dec(x_28); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_31; obj* x_33; obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; -x_31 = lean::cnstr_get(x_23, 0); -lean::inc(x_31); -x_33 = lean::cnstr_get(x_23, 1); -lean::inc(x_33); -x_35 = lean::cnstr_get(x_23, 2); -lean::inc(x_35); -if (lean::is_shared(x_23)) { - lean::dec(x_23); - x_37 = lean::box(0); +lean::dec(x_15); +if (lean::is_scalar(x_26)) { + x_50 = lean::alloc_cnstr(0, 2, 0); } else { - lean::cnstr_release(x_23, 0); - lean::cnstr_release(x_23, 1); - lean::cnstr_release(x_23, 2); - x_37 = x_23; + x_50 = x_26; } -x_38 = lean::box(0); -lean::inc(x_38); -x_40 = lean_name_mk_numeral(x_38, x_1); -if (lean::is_scalar(x_18)) { - x_41 = lean::alloc_cnstr(1, 2, 0); -} else { - x_41 = x_18; -} -lean::cnstr_set(x_41, 0, x_31); -lean::cnstr_set(x_41, 1, x_38); -x_42 = l_lean_parser_syntax_mk__node(x_40, x_41); -x_43 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_43); -if (lean::is_scalar(x_37)) { - x_45 = lean::alloc_cnstr(0, 3, 0); -} else { - x_45 = x_37; -} -lean::cnstr_set(x_45, 0, x_42); -lean::cnstr_set(x_45, 1, x_33); -lean::cnstr_set(x_45, 2, x_43); -x_46 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_35, x_45); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_52; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_29); -lean::dec(x_16); -if (lean::is_scalar(x_27)) { - x_52 = lean::alloc_cnstr(0, 2, 0); -} else { - x_52 = x_27; -} -lean::cnstr_set(x_52, 0, x_46); -lean::cnstr_set(x_52, 1, x_25); -return x_52; +lean::cnstr_set(x_50, 0, x_44); +lean::cnstr_set(x_50, 1, x_24); +return x_50; } else { -obj* x_53; uint8 x_55; -x_53 = lean::cnstr_get(x_46, 0); -lean::inc(x_53); -x_55 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); -if (x_55 == 0) +obj* x_51; uint8 x_53; +x_51 = lean::cnstr_get(x_44, 0); +lean::inc(x_51); +x_53 = lean::cnstr_get_scalar(x_44, sizeof(void*)*1); +if (x_53 == 0) { -obj* x_57; obj* x_58; obj* x_60; obj* x_63; obj* x_64; -lean::dec(x_46); -x_57 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2(x_16, x_29, x_2, x_3, x_4, x_25); -x_58 = lean::cnstr_get(x_57, 0); +obj* x_55; obj* x_56; obj* x_58; obj* x_61; obj* x_62; +lean::dec(x_44); +x_55 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2(x_15, x_28, x_2, x_3, x_4, x_24); +x_56 = lean::cnstr_get(x_55, 0); +lean::inc(x_56); +x_58 = lean::cnstr_get(x_55, 1); lean::inc(x_58); -x_60 = lean::cnstr_get(x_57, 1); -lean::inc(x_60); -lean::dec(x_57); -x_63 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_53, x_58); -if (lean::is_scalar(x_27)) { - x_64 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_55); +x_61 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_51, x_56); +if (lean::is_scalar(x_26)) { + x_62 = lean::alloc_cnstr(0, 2, 0); } else { - x_64 = x_27; + x_62 = x_26; } -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_60); -return x_64; +lean::cnstr_set(x_62, 0, x_61); +lean::cnstr_set(x_62, 1, x_58); +return x_62; } else { -obj* x_71; -lean::dec(x_53); +obj* x_69; lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); -lean::dec(x_29); -lean::dec(x_16); -if (lean::is_scalar(x_27)) { - x_71 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_51); +lean::dec(x_28); +lean::dec(x_15); +if (lean::is_scalar(x_26)) { + x_69 = lean::alloc_cnstr(0, 2, 0); } else { - x_71 = x_27; + x_69 = x_26; } -lean::cnstr_set(x_71, 0, x_46); -lean::cnstr_set(x_71, 1, x_25); -return x_71; +lean::cnstr_set(x_69, 0, x_44); +lean::cnstr_set(x_69, 1, x_24); +return x_69; } } } else { -obj* x_74; uint8 x_76; obj* x_77; +obj* x_72; uint8 x_74; obj* x_75; lean::dec(x_1); -lean::dec(x_18); -x_74 = lean::cnstr_get(x_23, 0); -lean::inc(x_74); -x_76 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); -if (lean::is_shared(x_23)) { - lean::dec(x_23); - x_77 = lean::box(0); +lean::dec(x_17); +x_72 = lean::cnstr_get(x_22, 0); +lean::inc(x_72); +x_74 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); +if (lean::is_shared(x_22)) { + lean::dec(x_22); + x_75 = lean::box(0); } else { - lean::cnstr_release(x_23, 0); - x_77 = x_23; + lean::cnstr_release(x_22, 0); + x_75 = x_22; } -if (x_76 == 0) +if (x_74 == 0) { -obj* x_79; obj* x_80; obj* x_82; obj* x_85; obj* x_86; -lean::dec(x_77); -x_79 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2(x_16, x_29, x_2, x_3, x_4, x_25); -x_80 = lean::cnstr_get(x_79, 0); +obj* x_77; obj* x_78; obj* x_80; obj* x_83; obj* x_84; +lean::dec(x_75); +x_77 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2(x_15, x_28, x_2, x_3, x_4, x_24); +x_78 = lean::cnstr_get(x_77, 0); +lean::inc(x_78); +x_80 = lean::cnstr_get(x_77, 1); lean::inc(x_80); -x_82 = lean::cnstr_get(x_79, 1); -lean::inc(x_82); -lean::dec(x_79); -x_85 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_74, x_80); -if (lean::is_scalar(x_27)) { - x_86 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_77); +x_83 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_72, x_78); +if (lean::is_scalar(x_26)) { + x_84 = lean::alloc_cnstr(0, 2, 0); } else { - x_86 = x_27; + x_84 = x_26; } -lean::cnstr_set(x_86, 0, x_85); -lean::cnstr_set(x_86, 1, x_82); -return x_86; +lean::cnstr_set(x_84, 0, x_83); +lean::cnstr_set(x_84, 1, x_80); +return x_84; } else { -obj* x_92; obj* x_93; obj* x_94; +obj* x_90; obj* x_91; obj* x_92; lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); -lean::dec(x_29); -lean::dec(x_16); -if (lean::is_scalar(x_77)) { - x_92 = lean::alloc_cnstr(1, 1, 1); +lean::dec(x_28); +lean::dec(x_15); +if (lean::is_scalar(x_75)) { + x_90 = lean::alloc_cnstr(1, 1, 1); } else { - x_92 = x_77; + x_90 = x_75; } -lean::cnstr_set(x_92, 0, x_74); -lean::cnstr_set_scalar(x_92, sizeof(void*)*1, x_76); -x_93 = x_92; -if (lean::is_scalar(x_27)) { - x_94 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_90, 0, x_72); +lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_74); +x_91 = x_90; +if (lean::is_scalar(x_26)) { + x_92 = lean::alloc_cnstr(0, 2, 0); } else { - x_94 = x_27; + x_92 = x_26; } -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_25); -return x_94; +lean::cnstr_set(x_92, 0, x_91); +lean::cnstr_set(x_92, 1, x_24); +return x_92; } } } @@ -11305,7 +11260,7 @@ return x_94; obj* _init_l_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; +obj* x_0; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; x_0 = l_lean_parser_command_doc__comment_parser_lean_parser_has__tokens; lean::inc(x_0); x_2 = l_lean_parser_tokens___rarg(x_0); @@ -11320,34 +11275,32 @@ x_10 = lean::mk_string("protected"); lean::inc(x_7); x_12 = l_lean_parser_symbol_tokens___rarg(x_10, x_7); x_13 = lean::box(0); -lean::inc(x_13); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_12, x_13); -x_16 = l_lean_parser_list_cons_tokens___rarg(x_9, x_15); -x_17 = l_lean_parser_tokens___rarg(x_16); -lean::inc(x_13); -x_19 = l_lean_parser_list_cons_tokens___rarg(x_17, x_13); -x_20 = l_lean_parser_tokens___rarg(x_19); -x_21 = l_lean_parser_tokens___rarg(x_20); -x_22 = lean::mk_string("noncomputable"); +x_14 = l_lean_parser_list_cons_tokens___rarg(x_12, x_13); +x_15 = l_lean_parser_list_cons_tokens___rarg(x_9, x_14); +x_16 = l_lean_parser_tokens___rarg(x_15); +x_17 = l_lean_parser_list_cons_tokens___rarg(x_16, x_13); +x_18 = l_lean_parser_tokens___rarg(x_17); +x_19 = l_lean_parser_tokens___rarg(x_18); +x_20 = lean::mk_string("noncomputable"); lean::inc(x_7); -x_24 = l_lean_parser_symbol_tokens___rarg(x_22, x_7); -x_25 = l_lean_parser_tokens___rarg(x_24); -x_26 = lean::mk_string("meta"); -x_27 = l_lean_parser_symbol_tokens___rarg(x_26, x_7); -x_28 = l_lean_parser_tokens___rarg(x_27); -x_29 = l_lean_parser_list_cons_tokens___rarg(x_28, x_13); -x_30 = l_lean_parser_list_cons_tokens___rarg(x_25, x_29); -x_31 = l_lean_parser_list_cons_tokens___rarg(x_21, x_30); -x_32 = l_lean_parser_list_cons_tokens___rarg(x_5, x_31); -x_33 = l_lean_parser_list_cons_tokens___rarg(x_2, x_32); -x_34 = l_lean_parser_tokens___rarg(x_33); -return x_34; +x_22 = l_lean_parser_symbol_tokens___rarg(x_20, x_7); +x_23 = l_lean_parser_tokens___rarg(x_22); +x_24 = lean::mk_string("meta"); +x_25 = l_lean_parser_symbol_tokens___rarg(x_24, x_7); +x_26 = l_lean_parser_tokens___rarg(x_25); +x_27 = l_lean_parser_list_cons_tokens___rarg(x_26, x_13); +x_28 = l_lean_parser_list_cons_tokens___rarg(x_23, x_27); +x_29 = l_lean_parser_list_cons_tokens___rarg(x_19, x_28); +x_30 = l_lean_parser_list_cons_tokens___rarg(x_5, x_29); +x_31 = l_lean_parser_list_cons_tokens___rarg(x_2, x_30); +x_32 = l_lean_parser_tokens___rarg(x_31); +return x_32; } } obj* _init_l_lean_parser_command_decl__modifiers_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_59; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_57; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_doc__comment_parser), 4, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); lean::closure_set(x_1, 0, x_0); @@ -11376,86 +11329,84 @@ lean::closure_set(x_16, 0, x_12); lean::closure_set(x_16, 1, x_8); lean::closure_set(x_16, 2, x_14); x_17 = lean::box(0); -lean::inc(x_17); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_16); +lean::cnstr_set(x_18, 1, x_17); x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_10); -lean::cnstr_set(x_20, 1, x_19); +lean::cnstr_set(x_19, 0, x_10); +lean::cnstr_set(x_19, 1, x_18); lean::inc(x_8); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_22, 0, x_20); -lean::closure_set(x_22, 1, x_8); -lean::inc(x_17); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_17); -x_25 = l_lean_parser_command_visibility; -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_24); -x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_28, 0, x_27); -x_29 = lean::mk_string("noncomputable"); -x_30 = l_string_trim(x_29); -lean::inc(x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_32, 0, x_30); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_21, 0, x_19); +lean::closure_set(x_21, 1, x_8); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_21); +lean::cnstr_set(x_22, 1, x_17); +x_23 = l_lean_parser_command_visibility; +lean::inc(x_23); +x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_25, 0, x_23); +lean::closure_set(x_25, 1, x_22); +x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_26, 0, x_25); +x_27 = lean::mk_string("noncomputable"); +x_28 = l_string_trim(x_27); +lean::inc(x_28); +x_30 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_30, 0, x_28); lean::inc(x_8); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_34, 0, x_30); -lean::closure_set(x_34, 1, x_8); -lean::closure_set(x_34, 2, x_32); -x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_35, 0, x_34); -x_36 = lean::mk_string("meta"); -x_37 = l_string_trim(x_36); -lean::inc(x_37); -x_39 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_39, 0, x_37); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_40, 0, x_37); -lean::closure_set(x_40, 1, x_8); -lean::closure_set(x_40, 2, x_39); -x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_41, 0, x_40); +x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_32, 0, x_28); +lean::closure_set(x_32, 1, x_8); +lean::closure_set(x_32, 2, x_30); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_33, 0, x_32); +x_34 = lean::mk_string("meta"); +x_35 = l_string_trim(x_34); +lean::inc(x_35); +x_37 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_37, 0, x_35); +x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_38, 0, x_35); +lean::closure_set(x_38, 1, x_8); +lean::closure_set(x_38, 2, x_37); +x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_39, 0, x_38); +x_40 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_40, 0, x_39); +lean::cnstr_set(x_40, 1, x_17); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_33); +lean::cnstr_set(x_41, 1, x_40); x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_17); +lean::cnstr_set(x_42, 0, x_26); +lean::cnstr_set(x_42, 1, x_41); x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_35); +lean::cnstr_set(x_43, 0, x_3); lean::cnstr_set(x_43, 1, x_42); x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_28); +lean::cnstr_set(x_44, 0, x_1); lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_3); -lean::cnstr_set(x_45, 1, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_1); -lean::cnstr_set(x_46, 1, x_45); -x_47 = l_lean_parser_command__parser__m_monad___closed__1; -x_48 = l_lean_parser_command__parser__m_monad__except___closed__1; -x_49 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -x_50 = l_lean_parser_command__parser__m_alternative___closed__1; -x_51 = l_lean_parser_command_decl__modifiers; -x_52 = l_lean_parser_command_decl__modifiers_has__view; -lean::inc(x_52); -lean::inc(x_51); +x_45 = l_lean_parser_command__parser__m_monad___closed__1; +x_46 = l_lean_parser_command__parser__m_monad__except___closed__1; +x_47 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; +x_48 = l_lean_parser_command__parser__m_alternative___closed__1; +x_49 = l_lean_parser_command_decl__modifiers; +x_50 = l_lean_parser_command_decl__modifiers_has__view; lean::inc(x_50); lean::inc(x_49); lean::inc(x_48); lean::inc(x_47); -x_59 = l_lean_parser_combinators_node_view___rarg(x_47, x_48, x_49, x_50, x_51, x_46, x_52); -return x_59; +lean::inc(x_46); +lean::inc(x_45); +x_57 = l_lean_parser_combinators_node_view___rarg(x_45, x_46, x_47, x_48, x_49, x_44, x_50); +return x_57; } } obj* _init_l_lean_parser_command_decl__modifiers_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_doc__comment_parser), 4, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); lean::closure_set(x_1, 0, x_0); @@ -11484,67 +11435,65 @@ lean::closure_set(x_16, 0, x_12); lean::closure_set(x_16, 1, x_8); lean::closure_set(x_16, 2, x_14); x_17 = lean::box(0); -lean::inc(x_17); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_16); +lean::cnstr_set(x_18, 1, x_17); x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_10); -lean::cnstr_set(x_20, 1, x_19); +lean::cnstr_set(x_19, 0, x_10); +lean::cnstr_set(x_19, 1, x_18); lean::inc(x_8); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_22, 0, x_20); -lean::closure_set(x_22, 1, x_8); -lean::inc(x_17); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_17); -x_25 = l_lean_parser_command_visibility; -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_24); -x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_28, 0, x_27); -x_29 = lean::mk_string("noncomputable"); -x_30 = l_string_trim(x_29); -lean::inc(x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_32, 0, x_30); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_21, 0, x_19); +lean::closure_set(x_21, 1, x_8); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_21); +lean::cnstr_set(x_22, 1, x_17); +x_23 = l_lean_parser_command_visibility; +lean::inc(x_23); +x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_25, 0, x_23); +lean::closure_set(x_25, 1, x_22); +x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_26, 0, x_25); +x_27 = lean::mk_string("noncomputable"); +x_28 = l_string_trim(x_27); +lean::inc(x_28); +x_30 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_30, 0, x_28); lean::inc(x_8); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_34, 0, x_30); -lean::closure_set(x_34, 1, x_8); -lean::closure_set(x_34, 2, x_32); -x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_35, 0, x_34); -x_36 = lean::mk_string("meta"); -x_37 = l_string_trim(x_36); -lean::inc(x_37); -x_39 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_39, 0, x_37); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_40, 0, x_37); -lean::closure_set(x_40, 1, x_8); -lean::closure_set(x_40, 2, x_39); -x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_41, 0, x_40); +x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_32, 0, x_28); +lean::closure_set(x_32, 1, x_8); +lean::closure_set(x_32, 2, x_30); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_33, 0, x_32); +x_34 = lean::mk_string("meta"); +x_35 = l_string_trim(x_34); +lean::inc(x_35); +x_37 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_37, 0, x_35); +x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_38, 0, x_35); +lean::closure_set(x_38, 1, x_8); +lean::closure_set(x_38, 2, x_37); +x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_39, 0, x_38); +x_40 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_40, 0, x_39); +lean::cnstr_set(x_40, 1, x_17); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_33); +lean::cnstr_set(x_41, 1, x_40); x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_17); +lean::cnstr_set(x_42, 0, x_26); +lean::cnstr_set(x_42, 1, x_41); x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_35); +lean::cnstr_set(x_43, 0, x_3); lean::cnstr_set(x_43, 1, x_42); x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_28); +lean::cnstr_set(x_44, 0, x_1); lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_3); -lean::cnstr_set(x_45, 1, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_1); -lean::cnstr_set(x_46, 1, x_45); -return x_46; +return x_44; } } obj* l_lean_parser_command_decl__modifiers_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -11578,21 +11527,20 @@ return x_8; obj* _init_l_lean_parser_command_decl__sig_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; x_0 = l_lean_parser_term_bracketed__binders_has__view; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::box(3); -lean::inc(x_3); -x_5 = lean::apply_1(x_1, x_3); -x_6 = l_lean_parser_term_type__spec_has__view; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_9 = lean::apply_1(x_7, x_3); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -return x_10; +x_4 = lean::apply_1(x_1, x_3); +x_5 = l_lean_parser_term_type__spec_has__view; +x_6 = lean::cnstr_get(x_5, 0); +lean::inc(x_6); +x_8 = lean::apply_1(x_6, x_3); +x_9 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_9, 0, x_4); +lean::cnstr_set(x_9, 1, x_8); +return x_9; } } obj* _init_l_lean_parser_command_decl__sig_has__view_x_27___lambda__1___closed__2() { @@ -12288,7 +12236,7 @@ return x_15; } else { -obj* x_16; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_33; +obj* x_16; 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_29; obj* x_30; obj* x_32; x_16 = lean::cnstr_get(x_3, 0); lean::inc(x_16); lean::dec(x_3); @@ -12297,23 +12245,22 @@ x_20 = l_lean_parser_term_type__spec_has__view; x_21 = lean::cnstr_get(x_20, 1); lean::inc(x_21); x_23 = lean::apply_1(x_21, x_16); -lean::inc(x_19); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_19); -x_26 = l_lean_parser_no__kind; -lean::inc(x_26); -x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_19); +x_25 = l_lean_parser_no__kind; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_19); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_19); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_9); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_lean_parser_command_opt__decl__sig; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +lean::cnstr_set(x_29, 0, x_9); +lean::cnstr_set(x_29, 1, x_28); +x_30 = l_lean_parser_command_opt__decl__sig; +lean::inc(x_30); +x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); +return x_32; } } } @@ -13302,7 +13249,7 @@ return x_137; obj* l_lean_parser_command_equation_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -13316,32 +13263,31 @@ x_10 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_10); x_12 = l_option_map___rarg(x_10, x_1); x_13 = lean::box(3); -lean::inc(x_13); -x_15 = l_option_get__or__else___main___rarg(x_12, x_13); -x_16 = l_list_map___main___at_lean_parser_command_equation_has__view_x_27___spec__2(x_3); -x_17 = l_lean_parser_no__kind; -lean::inc(x_17); -x_19 = l_lean_parser_syntax_mk__node(x_17, x_16); +x_14 = l_option_get__or__else___main___rarg(x_12, x_13); +x_15 = l_list_map___main___at_lean_parser_command_equation_has__view_x_27___spec__2(x_3); +x_16 = l_lean_parser_no__kind; +lean::inc(x_16); +x_18 = l_lean_parser_syntax_mk__node(x_16, x_15); lean::inc(x_10); -x_21 = l_option_map___rarg(x_10, x_5); -x_22 = l_option_get__or__else___main___rarg(x_21, x_13); -x_23 = lean::box(0); +x_20 = l_option_map___rarg(x_10, x_5); +x_21 = l_option_get__or__else___main___rarg(x_20, x_13); +x_22 = lean::box(0); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_7); +lean::cnstr_set(x_23, 1, x_22); x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_7); +lean::cnstr_set(x_24, 0, x_21); lean::cnstr_set(x_24, 1, x_23); x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_22); +lean::cnstr_set(x_25, 0, x_18); lean::cnstr_set(x_25, 1, x_24); x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_19); +lean::cnstr_set(x_26, 0, x_14); lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_15); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_lean_parser_command_equation; -lean::inc(x_28); -x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); -return x_30; +x_27 = l_lean_parser_command_equation; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +return x_29; } } obj* _init_l_lean_parser_command_equation_has__view_x_27() { @@ -14009,50 +13955,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__4; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__4; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__4; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__4; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__4; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__4; +lean::inc(x_69); +return x_69; } } } @@ -14062,55 +14007,55 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__4; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__4; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); -if (x_77 == 0) +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); +if (x_76 == 0) { -obj* x_79; uint8 x_80; -x_79 = lean::mk_nat_obj(1u); -x_80 = lean::nat_dec_eq(x_2, x_79); -lean::dec(x_79); +obj* x_78; uint8 x_79; +x_78 = lean::mk_nat_obj(1u); +x_79 = lean::nat_dec_eq(x_2, x_78); +lean::dec(x_78); lean::dec(x_2); -if (x_80 == 0) +if (x_79 == 0) +{ +obj* x_82; +x_82 = l_lean_parser_syntax_as__node___main(x_1); +if (lean::obj_tag(x_82) == 0) { obj* x_83; -x_83 = l_lean_parser_syntax_as__node___main(x_1); -if (lean::obj_tag(x_83) == 0) -{ -obj* x_84; -x_84 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__1; -lean::inc(x_84); -return x_84; +x_83 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__1; +lean::inc(x_83); +return x_83; } else { -obj* x_86; obj* x_89; obj* x_92; obj* x_94; obj* x_95; -x_86 = lean::cnstr_get(x_83, 0); -lean::inc(x_86); -lean::dec(x_83); -x_89 = lean::cnstr_get(x_86, 1); -lean::inc(x_89); -lean::dec(x_86); -x_92 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__2; -lean::inc(x_92); -x_94 = l_list_map___main___rarg(x_92, x_89); -x_95 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_95, 0, x_94); -return x_95; +obj* x_85; obj* x_88; obj* x_91; obj* x_93; obj* x_94; +x_85 = lean::cnstr_get(x_82, 0); +lean::inc(x_85); +lean::dec(x_82); +x_88 = lean::cnstr_get(x_85, 1); +lean::inc(x_88); +lean::dec(x_85); +x_91 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__2; +lean::inc(x_91); +x_93 = l_list_map___main___rarg(x_91, x_88); +x_94 = lean::alloc_cnstr(2, 1, 0); +lean::cnstr_set(x_94, 0, x_93); +return x_94; } } else @@ -14118,45 +14063,45 @@ else switch (lean::obj_tag(x_1)) { case 0: { -obj* x_96; obj* x_99; obj* x_100; -x_96 = lean::cnstr_get(x_1, 0); -lean::inc(x_96); +obj* x_95; obj* x_98; obj* x_99; +x_95 = lean::cnstr_get(x_1, 0); +lean::inc(x_95); lean::dec(x_1); +x_98 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_98, 0, x_95); x_99 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_99, 0, x_96); -x_100 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_100, 0, x_99); -return x_100; +lean::cnstr_set(x_99, 0, x_98); +return x_99; } case 3: { -obj* x_101; -x_101 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__3; -lean::inc(x_101); -return x_101; +obj* x_100; +x_100 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__3; +lean::inc(x_100); +return x_100; } default: { -obj* x_104; +obj* x_103; lean::dec(x_1); -x_104 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__3; -lean::inc(x_104); -return x_104; +x_103 = l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__3; +lean::inc(x_103); +return x_103; } } } } else { -obj* x_107; obj* x_108; obj* x_110; obj* x_111; +obj* x_106; obj* x_107; obj* x_109; obj* x_110; lean::dec(x_2); -x_107 = l_lean_parser_command_simple__decl__val_has__view; -x_108 = lean::cnstr_get(x_107, 0); -lean::inc(x_108); -x_110 = lean::apply_1(x_108, x_1); -x_111 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_111, 0, x_110); -return x_111; +x_106 = l_lean_parser_command_simple__decl__val_has__view; +x_107 = lean::cnstr_get(x_106, 0); +lean::inc(x_107); +x_109 = lean::apply_1(x_107, x_1); +x_110 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_110, 0, x_109); +return x_110; } } } @@ -14179,7 +14124,7 @@ x_1 = lean::box(0); switch (lean::obj_tag(x_0)) { case 0: { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -14187,73 +14132,70 @@ x_5 = l_lean_parser_command_simple__decl__val_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_command_decl__val; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_command_decl__val; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } case 1: { -obj* x_18; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_32; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_21); -x_23 = l_option_map___rarg(x_21, x_18); -x_24 = lean::box(3); -x_25 = l_option_get__or__else___main___rarg(x_23, x_24); -lean::inc(x_1); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_1); -x_28 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_28); -x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_1); -x_32 = l_lean_parser_command_decl__val; -lean::inc(x_32); -x_34 = l_lean_parser_syntax_mk__node(x_32, x_31); -return x_34; +x_20 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_20); +x_22 = l_option_map___rarg(x_20, x_17); +x_23 = lean::box(3); +x_24 = l_option_get__or__else___main___rarg(x_22, x_23); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_1); +x_26 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_26); +x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_1); +x_30 = l_lean_parser_command_decl__val; +lean::inc(x_30); +x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); +return x_32; } default: { -obj* x_35; obj* x_38; obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_52; -x_35 = lean::cnstr_get(x_0, 0); -lean::inc(x_35); +obj* x_33; obj* x_36; obj* x_38; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; +x_33 = lean::cnstr_get(x_0, 0); +lean::inc(x_33); lean::dec(x_0); -x_38 = l_lean_parser_command_decl__val_has__view_x_27___lambda__2___closed__1; -lean::inc(x_38); -x_40 = l_list_map___main___rarg(x_38, x_35); -x_41 = l_lean_parser_no__kind; -lean::inc(x_41); -x_43 = l_lean_parser_syntax_mk__node(x_41, x_40); -lean::inc(x_1); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_1); -x_46 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; -lean::inc(x_46); -x_48 = l_lean_parser_syntax_mk__node(x_46, x_45); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_1); -x_50 = l_lean_parser_command_decl__val; -lean::inc(x_50); -x_52 = l_lean_parser_syntax_mk__node(x_50, x_49); -return x_52; +x_36 = l_lean_parser_command_decl__val_has__view_x_27___lambda__2___closed__1; +lean::inc(x_36); +x_38 = l_list_map___main___rarg(x_36, x_33); +x_39 = l_lean_parser_no__kind; +lean::inc(x_39); +x_41 = l_lean_parser_syntax_mk__node(x_39, x_38); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_41); +lean::cnstr_set(x_42, 1, x_1); +x_43 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; +lean::inc(x_43); +x_45 = l_lean_parser_syntax_mk__node(x_43, x_42); +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_45); +lean::cnstr_set(x_46, 1, x_1); +x_47 = l_lean_parser_command_decl__val; +lean::inc(x_47); +x_49 = l_lean_parser_syntax_mk__node(x_47, x_46); +return x_49; } } } @@ -14282,7 +14224,7 @@ return x_0; obj* _init_l_lean_parser_command_decl__val_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; x_0 = lean::mk_string(":="); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -14291,29 +14233,27 @@ x_4 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; lean::inc(x_4); x_6 = l_lean_parser_tokens___rarg(x_4); x_7 = lean::box(0); -lean::inc(x_7); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_6, x_7); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_3, x_9); -x_11 = l_lean_parser_tokens___rarg(x_10); -x_12 = lean::mk_string("."); -x_13 = l_lean_parser_symbol_tokens___rarg(x_12, x_1); -x_14 = l_lean_parser_command_equation_parser_lean_parser_has__tokens; -lean::inc(x_14); -x_16 = l_lean_parser_tokens___rarg(x_14); -lean::inc(x_7); -x_18 = l_lean_parser_list_cons_tokens___rarg(x_16, x_7); -x_19 = l_lean_parser_list_cons_tokens___rarg(x_13, x_18); -x_20 = l_lean_parser_list_cons_tokens___rarg(x_11, x_19); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_6, x_7); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_3, x_8); +x_10 = l_lean_parser_tokens___rarg(x_9); +x_11 = lean::mk_string("."); +x_12 = l_lean_parser_symbol_tokens___rarg(x_11, x_1); +x_13 = l_lean_parser_command_equation_parser_lean_parser_has__tokens; +lean::inc(x_13); +x_15 = l_lean_parser_tokens___rarg(x_13); +x_16 = l_lean_parser_list_cons_tokens___rarg(x_15, x_7); +x_17 = l_lean_parser_list_cons_tokens___rarg(x_12, x_16); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_10, x_17); +x_19 = l_lean_parser_tokens___rarg(x_18); +x_20 = l_lean_parser_list_cons_tokens___rarg(x_19, x_7); x_21 = l_lean_parser_tokens___rarg(x_20); -x_22 = l_lean_parser_list_cons_tokens___rarg(x_21, x_7); -x_23 = l_lean_parser_tokens___rarg(x_22); -return x_23; +return x_21; } } obj* _init_l_lean_parser_command_decl__val_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_43; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_41; x_0 = lean::mk_string(":="); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -14331,67 +14271,65 @@ lean::closure_set(x_8, 0, x_4); x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); lean::closure_set(x_9, 0, x_8); x_10 = lean::box(0); -lean::inc(x_10); +x_11 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_11, 0, x_9); +lean::cnstr_set(x_11, 1, x_10); x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_9); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_6); -lean::cnstr_set(x_13, 1, x_12); -x_14 = l_lean_parser_command_simple__decl__val; -lean::inc(x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_13); -x_17 = lean::mk_string("."); -x_18 = l_string_trim(x_17); -lean::inc(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_20, 0, x_18); +lean::cnstr_set(x_12, 0, x_6); +lean::cnstr_set(x_12, 1, x_11); +x_13 = l_lean_parser_command_simple__decl__val; +lean::inc(x_13); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_15, 0, x_13); +lean::closure_set(x_15, 1, x_12); +x_16 = lean::mk_string("."); +x_17 = l_string_trim(x_16); +lean::inc(x_17); +x_19 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_19, 0, x_17); lean::inc(x_4); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_22, 0, x_18); -lean::closure_set(x_22, 1, x_4); -lean::closure_set(x_22, 2, x_20); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_equation_parser), 4, 0); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3), 5, 1); -lean::closure_set(x_24, 0, x_23); -lean::inc(x_10); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_21, 0, x_17); +lean::closure_set(x_21, 1, x_4); +lean::closure_set(x_21, 2, x_19); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_equation_parser), 4, 0); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3), 5, 1); +lean::closure_set(x_23, 0, x_22); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_10); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_21); +lean::cnstr_set(x_25, 1, x_24); x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_10); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_22); -lean::cnstr_set(x_27, 1, x_26); +lean::cnstr_set(x_26, 0, x_15); +lean::cnstr_set(x_26, 1, x_25); +x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_27, 0, x_26); +lean::closure_set(x_27, 1, x_4); x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_16); -lean::cnstr_set(x_28, 1, x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_29, 0, x_28); -lean::closure_set(x_29, 1, x_4); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_10); -x_31 = l_lean_parser_command__parser__m_monad___closed__1; -x_32 = l_lean_parser_command__parser__m_monad__except___closed__1; -x_33 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -x_34 = l_lean_parser_command__parser__m_alternative___closed__1; -x_35 = l_lean_parser_command_decl__val; -x_36 = l_lean_parser_command_decl__val_has__view; -lean::inc(x_36); -lean::inc(x_35); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_10); +x_29 = l_lean_parser_command__parser__m_monad___closed__1; +x_30 = l_lean_parser_command__parser__m_monad__except___closed__1; +x_31 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; +x_32 = l_lean_parser_command__parser__m_alternative___closed__1; +x_33 = l_lean_parser_command_decl__val; +x_34 = l_lean_parser_command_decl__val_has__view; lean::inc(x_34); lean::inc(x_33); lean::inc(x_32); lean::inc(x_31); -x_43 = l_lean_parser_combinators_node_view___rarg(x_31, x_32, x_33, x_34, x_35, x_30, x_36); -return x_43; +lean::inc(x_30); +lean::inc(x_29); +x_41 = l_lean_parser_combinators_node_view___rarg(x_29, x_30, x_31, x_32, x_33, x_28, x_34); +return x_41; } } obj* _init_l_lean_parser_command_decl__val_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; x_0 = lean::mk_string(":="); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -14409,48 +14347,46 @@ lean::closure_set(x_8, 0, x_4); x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); lean::closure_set(x_9, 0, x_8); x_10 = lean::box(0); -lean::inc(x_10); +x_11 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_11, 0, x_9); +lean::cnstr_set(x_11, 1, x_10); x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_9); -lean::cnstr_set(x_12, 1, x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_6); -lean::cnstr_set(x_13, 1, x_12); -x_14 = l_lean_parser_command_simple__decl__val; -lean::inc(x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_13); -x_17 = lean::mk_string("."); -x_18 = l_string_trim(x_17); -lean::inc(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_20, 0, x_18); +lean::cnstr_set(x_12, 0, x_6); +lean::cnstr_set(x_12, 1, x_11); +x_13 = l_lean_parser_command_simple__decl__val; +lean::inc(x_13); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_15, 0, x_13); +lean::closure_set(x_15, 1, x_12); +x_16 = lean::mk_string("."); +x_17 = l_string_trim(x_16); +lean::inc(x_17); +x_19 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_19, 0, x_17); lean::inc(x_4); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_22, 0, x_18); -lean::closure_set(x_22, 1, x_4); -lean::closure_set(x_22, 2, x_20); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_equation_parser), 4, 0); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3), 5, 1); -lean::closure_set(x_24, 0, x_23); -lean::inc(x_10); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_21, 0, x_17); +lean::closure_set(x_21, 1, x_4); +lean::closure_set(x_21, 2, x_19); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_equation_parser), 4, 0); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3), 5, 1); +lean::closure_set(x_23, 0, x_22); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_10); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_21); +lean::cnstr_set(x_25, 1, x_24); x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_10); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_22); -lean::cnstr_set(x_27, 1, x_26); +lean::cnstr_set(x_26, 0, x_15); +lean::cnstr_set(x_26, 1, x_25); +x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_27, 0, x_26); +lean::closure_set(x_27, 1, x_4); x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_16); -lean::cnstr_set(x_28, 1, x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_29, 0, x_28); -lean::closure_set(x_29, 1, x_4); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_10); -return x_30; +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_10); +return x_28; } } obj* l_lean_parser_command_decl__val_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -14484,13 +14420,12 @@ return x_8; obj* _init_l_lean_parser_command_relaxed__infer__modifier_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_2; +obj* x_0; obj* x_1; x_0 = lean::box(0); -lean::inc(x_0); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_0); -lean::cnstr_set(x_2, 1, x_0); -return x_2; +x_1 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1, 0, x_0); +lean::cnstr_set(x_1, 1, x_0); +return x_1; } } obj* _init_l_lean_parser_command_relaxed__infer__modifier_has__view_x_27___lambda__1___closed__2() { @@ -14777,7 +14712,7 @@ goto lbl_3; obj* l_lean_parser_command_relaxed__infer__modifier_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_6; obj* x_8; obj* x_9; 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_1; obj* x_3; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -14787,22 +14722,21 @@ x_6 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_6); x_8 = l_option_map___rarg(x_6, x_1); x_9 = lean::box(3); -lean::inc(x_9); -x_11 = l_option_get__or__else___main___rarg(x_8, x_9); +x_10 = l_option_get__or__else___main___rarg(x_8, x_9); lean::inc(x_6); -x_13 = l_option_map___rarg(x_6, x_3); -x_14 = l_option_get__or__else___main___rarg(x_13, x_9); -x_15 = lean::box(0); +x_12 = l_option_map___rarg(x_6, x_3); +x_13 = l_option_get__or__else___main___rarg(x_12, x_9); +x_14 = lean::box(0); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_13); +lean::cnstr_set(x_15, 1, x_14); x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); +lean::cnstr_set(x_16, 0, x_10); lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_11); -lean::cnstr_set(x_17, 1, x_16); -x_18 = l_lean_parser_command_relaxed__infer__modifier; -lean::inc(x_18); -x_20 = l_lean_parser_syntax_mk__node(x_18, x_17); -return x_20; +x_17 = l_lean_parser_command_relaxed__infer__modifier; +lean::inc(x_17); +x_19 = l_lean_parser_syntax_mk__node(x_17, x_16); +return x_19; } } obj* _init_l_lean_parser_command_relaxed__infer__modifier_has__view_x_27() { @@ -14845,13 +14779,12 @@ return x_8; obj* _init_l_lean_parser_command_strict__infer__modifier_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_2; +obj* x_0; obj* x_1; x_0 = lean::box(0); -lean::inc(x_0); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_0); -lean::cnstr_set(x_2, 1, x_0); -return x_2; +x_1 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1, 0, x_0); +lean::cnstr_set(x_1, 1, x_0); +return x_1; } } obj* _init_l_lean_parser_command_strict__infer__modifier_has__view_x_27___lambda__1___closed__2() { @@ -15138,7 +15071,7 @@ goto lbl_3; obj* l_lean_parser_command_strict__infer__modifier_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_6; obj* x_8; obj* x_9; 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_1; obj* x_3; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -15148,22 +15081,21 @@ x_6 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_6); x_8 = l_option_map___rarg(x_6, x_1); x_9 = lean::box(3); -lean::inc(x_9); -x_11 = l_option_get__or__else___main___rarg(x_8, x_9); +x_10 = l_option_get__or__else___main___rarg(x_8, x_9); lean::inc(x_6); -x_13 = l_option_map___rarg(x_6, x_3); -x_14 = l_option_get__or__else___main___rarg(x_13, x_9); -x_15 = lean::box(0); +x_12 = l_option_map___rarg(x_6, x_3); +x_13 = l_option_get__or__else___main___rarg(x_12, x_9); +x_14 = lean::box(0); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_13); +lean::cnstr_set(x_15, 1, x_14); x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_14); +lean::cnstr_set(x_16, 0, x_10); lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_11); -lean::cnstr_set(x_17, 1, x_16); -x_18 = l_lean_parser_command_strict__infer__modifier; -lean::inc(x_18); -x_20 = l_lean_parser_syntax_mk__node(x_18, x_17); -return x_20; +x_17 = l_lean_parser_command_strict__infer__modifier; +lean::inc(x_17); +x_19 = l_lean_parser_syntax_mk__node(x_17, x_16); +return x_19; } } obj* _init_l_lean_parser_command_strict__infer__modifier_has__view_x_27() { @@ -15361,50 +15293,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_infer__modifier_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_infer__modifier_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_infer__modifier_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_infer__modifier_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_infer__modifier_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_infer__modifier_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -15414,44 +15345,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_infer__modifier_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_infer__modifier_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_command_strict__infer__modifier_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_command_strict__infer__modifier_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_command_relaxed__infer__modifier_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_command_relaxed__infer__modifier_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -15463,7 +15394,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -15471,45 +15402,43 @@ x_5 = l_lean_parser_command_relaxed__infer__modifier_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_command_infer__modifier; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_command_infer__modifier; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_command_strict__infer__modifier_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_command_infer__modifier; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_command_strict__infer__modifier_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_command_infer__modifier; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -15537,7 +15466,7 @@ return x_0; obj* _init_l_lean_parser_command_infer__modifier_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; 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; obj* x_22; obj* x_23; obj* x_24; obj* x_25; x_0 = lean::mk_string("{"); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -15546,28 +15475,25 @@ x_4 = lean::mk_string("}"); lean::inc(x_1); x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_1); x_7 = lean::box(0); -lean::inc(x_7); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_6, x_7); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_3, x_9); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_6, x_7); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_3, x_8); +x_10 = l_lean_parser_tokens___rarg(x_9); x_11 = l_lean_parser_tokens___rarg(x_10); -x_12 = l_lean_parser_tokens___rarg(x_11); -x_13 = lean::mk_string("("); +x_12 = lean::mk_string("("); lean::inc(x_1); -x_15 = l_lean_parser_symbol_tokens___rarg(x_13, x_1); -x_16 = lean::mk_string(")"); -x_17 = l_lean_parser_symbol_tokens___rarg(x_16, x_1); -lean::inc(x_7); -x_19 = l_lean_parser_list_cons_tokens___rarg(x_17, x_7); -x_20 = l_lean_parser_list_cons_tokens___rarg(x_15, x_19); -x_21 = l_lean_parser_tokens___rarg(x_20); -x_22 = l_lean_parser_tokens___rarg(x_21); -lean::inc(x_7); -x_24 = l_lean_parser_list_cons_tokens___rarg(x_22, x_7); -x_25 = l_lean_parser_list_cons_tokens___rarg(x_12, x_24); -x_26 = l_lean_parser_tokens___rarg(x_25); -x_27 = l_lean_parser_list_cons_tokens___rarg(x_26, x_7); -x_28 = l_lean_parser_tokens___rarg(x_27); -return x_28; +x_14 = l_lean_parser_symbol_tokens___rarg(x_12, x_1); +x_15 = lean::mk_string(")"); +x_16 = l_lean_parser_symbol_tokens___rarg(x_15, x_1); +x_17 = l_lean_parser_list_cons_tokens___rarg(x_16, x_7); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_14, x_17); +x_19 = l_lean_parser_tokens___rarg(x_18); +x_20 = l_lean_parser_tokens___rarg(x_19); +x_21 = l_lean_parser_list_cons_tokens___rarg(x_20, x_7); +x_22 = l_lean_parser_list_cons_tokens___rarg(x_11, x_21); +x_23 = l_lean_parser_tokens___rarg(x_22); +x_24 = l_lean_parser_list_cons_tokens___rarg(x_23, x_7); +x_25 = l_lean_parser_tokens___rarg(x_24); +return x_25; } } obj* l_lean_parser_command_infer__modifier_parser_lean_parser_has__view___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -15633,7 +15559,7 @@ return x_14; obj* _init_l_lean_parser_command_infer__modifier_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_51; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_48; x_0 = lean::mk_string("{"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -15656,77 +15582,74 @@ lean::closure_set(x_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); x_13 = lean::box(0); -lean::inc(x_13); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_12); +lean::cnstr_set(x_14, 1, x_13); x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_12); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_6); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser_lean_parser_has__view___lambda__1), 5, 1); -lean::closure_set(x_17, 0, x_16); -x_18 = lean::mk_string("("); -x_19 = l_string_trim(x_18); -lean::inc(x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_21, 0, x_19); +lean::cnstr_set(x_15, 0, x_6); +lean::cnstr_set(x_15, 1, x_14); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser_lean_parser_has__view___lambda__1), 5, 1); +lean::closure_set(x_16, 0, x_15); +x_17 = lean::mk_string("("); +x_18 = l_string_trim(x_17); +lean::inc(x_18); +x_20 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_20, 0, x_18); lean::inc(x_4); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_23, 0, x_19); -lean::closure_set(x_23, 1, x_4); -lean::closure_set(x_23, 2, x_21); -x_24 = lean::mk_string(")"); -x_25 = l_string_trim(x_24); -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_27, 0, x_25); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_22, 0, x_18); +lean::closure_set(x_22, 1, x_4); +lean::closure_set(x_22, 2, x_20); +x_23 = lean::mk_string(")"); +x_24 = l_string_trim(x_23); +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_26, 0, x_24); lean::inc(x_4); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_29, 0, x_25); -lean::closure_set(x_29, 1, x_4); -lean::closure_set(x_29, 2, x_27); -lean::inc(x_13); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_29); -lean::cnstr_set(x_31, 1, x_13); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_28, 0, x_24); +lean::closure_set(x_28, 1, x_4); +lean::closure_set(x_28, 2, x_26); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_13); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_22); +lean::cnstr_set(x_30, 1, x_29); +x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser_lean_parser_has__view___lambda__2), 5, 1); +lean::closure_set(x_31, 0, x_30); x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_23); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser_lean_parser_has__view___lambda__2), 5, 1); -lean::closure_set(x_33, 0, x_32); -lean::inc(x_13); +lean::cnstr_set(x_32, 0, x_31); +lean::cnstr_set(x_32, 1, x_13); +x_33 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_33, 0, x_16); +lean::cnstr_set(x_33, 1, x_32); +x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_34, 0, x_33); +lean::closure_set(x_34, 1, x_4); x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_33); +lean::cnstr_set(x_35, 0, x_34); lean::cnstr_set(x_35, 1, x_13); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_17); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_37, 0, x_36); -lean::closure_set(x_37, 1, x_4); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_13); -x_39 = l_lean_parser_command__parser__m_monad___closed__1; -x_40 = l_lean_parser_command__parser__m_monad__except___closed__1; -x_41 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -x_42 = l_lean_parser_command__parser__m_alternative___closed__1; -x_43 = l_lean_parser_command_infer__modifier; -x_44 = l_lean_parser_command_infer__modifier_has__view; -lean::inc(x_44); -lean::inc(x_43); -lean::inc(x_42); +x_36 = l_lean_parser_command__parser__m_monad___closed__1; +x_37 = l_lean_parser_command__parser__m_monad__except___closed__1; +x_38 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; +x_39 = l_lean_parser_command__parser__m_alternative___closed__1; +x_40 = l_lean_parser_command_infer__modifier; +x_41 = l_lean_parser_command_infer__modifier_has__view; lean::inc(x_41); lean::inc(x_40); lean::inc(x_39); -x_51 = l_lean_parser_combinators_node_view___rarg(x_39, x_40, x_41, x_42, x_43, x_38, x_44); -return x_51; +lean::inc(x_38); +lean::inc(x_37); +lean::inc(x_36); +x_48 = l_lean_parser_combinators_node_view___rarg(x_36, x_37, x_38, x_39, x_40, x_35, x_41); +return x_48; } } obj* _init_l_lean_parser_command_infer__modifier_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_38; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; x_0 = lean::mk_string("{"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -15749,58 +15672,55 @@ lean::closure_set(x_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); x_13 = lean::box(0); -lean::inc(x_13); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_12); +lean::cnstr_set(x_14, 1, x_13); x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_12); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_6); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser_lean_parser_has__view___lambda__1), 5, 1); -lean::closure_set(x_17, 0, x_16); -x_18 = lean::mk_string("("); -x_19 = l_string_trim(x_18); -lean::inc(x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_21, 0, x_19); +lean::cnstr_set(x_15, 0, x_6); +lean::cnstr_set(x_15, 1, x_14); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser_lean_parser_has__view___lambda__1), 5, 1); +lean::closure_set(x_16, 0, x_15); +x_17 = lean::mk_string("("); +x_18 = l_string_trim(x_17); +lean::inc(x_18); +x_20 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_20, 0, x_18); lean::inc(x_4); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_23, 0, x_19); -lean::closure_set(x_23, 1, x_4); -lean::closure_set(x_23, 2, x_21); -x_24 = lean::mk_string(")"); -x_25 = l_string_trim(x_24); -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_27, 0, x_25); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_22, 0, x_18); +lean::closure_set(x_22, 1, x_4); +lean::closure_set(x_22, 2, x_20); +x_23 = lean::mk_string(")"); +x_24 = l_string_trim(x_23); +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_26, 0, x_24); lean::inc(x_4); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_29, 0, x_25); -lean::closure_set(x_29, 1, x_4); -lean::closure_set(x_29, 2, x_27); -lean::inc(x_13); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_29); -lean::cnstr_set(x_31, 1, x_13); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_28, 0, x_24); +lean::closure_set(x_28, 1, x_4); +lean::closure_set(x_28, 2, x_26); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_13); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_22); +lean::cnstr_set(x_30, 1, x_29); +x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser_lean_parser_has__view___lambda__2), 5, 1); +lean::closure_set(x_31, 0, x_30); x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_23); -lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser_lean_parser_has__view___lambda__2), 5, 1); -lean::closure_set(x_33, 0, x_32); -lean::inc(x_13); +lean::cnstr_set(x_32, 0, x_31); +lean::cnstr_set(x_32, 1, x_13); +x_33 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_33, 0, x_16); +lean::cnstr_set(x_33, 1, x_32); +x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_34, 0, x_33); +lean::closure_set(x_34, 1, x_4); x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_33); +lean::cnstr_set(x_35, 0, x_34); lean::cnstr_set(x_35, 1, x_13); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_17); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_37, 0, x_36); -lean::closure_set(x_37, 1, x_4); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_13); -return x_38; +return x_35; } } obj* l_lean_parser_command_infer__modifier_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -16505,7 +16425,7 @@ return x_129; obj* l_lean_parser_command_intro__rule_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -16527,59 +16447,57 @@ x_17 = lean::cnstr_get(x_16, 1); lean::inc(x_17); x_19 = lean::apply_1(x_17, x_7); x_20 = lean::box(0); -lean::inc(x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_19); -lean::cnstr_set(x_22, 1, x_20); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_19); +lean::cnstr_set(x_21, 1, x_20); if (lean::obj_tag(x_5) == 0) { -obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_31; -lean::dec(x_20); -x_24 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_24); +obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; +x_22 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_22); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_22); +lean::cnstr_set(x_24, 1, x_21); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_15); +lean::cnstr_set(x_25, 1, x_24); x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_22); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_15); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_14); -lean::cnstr_set(x_28, 1, x_27); -x_29 = l_lean_parser_command_intro__rule; -lean::inc(x_29); -x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); -return x_31; +lean::cnstr_set(x_26, 0, x_14); +lean::cnstr_set(x_26, 1, x_25); +x_27 = l_lean_parser_command_intro__rule; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +return x_29; } else { -obj* x_32; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_48; -x_32 = lean::cnstr_get(x_5, 0); -lean::inc(x_32); +obj* x_30; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_46; +x_30 = lean::cnstr_get(x_5, 0); +lean::inc(x_30); lean::dec(x_5); -x_35 = l_lean_parser_command_infer__modifier_has__view; -x_36 = lean::cnstr_get(x_35, 1); -lean::inc(x_36); -x_38 = lean::apply_1(x_36, x_32); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_20); -x_40 = l_lean_parser_no__kind; -lean::inc(x_40); -x_42 = l_lean_parser_syntax_mk__node(x_40, x_39); +x_33 = l_lean_parser_command_infer__modifier_has__view; +x_34 = lean::cnstr_get(x_33, 1); +lean::inc(x_34); +x_36 = lean::apply_1(x_34, x_30); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_36); +lean::cnstr_set(x_37, 1, x_20); +x_38 = l_lean_parser_no__kind; +lean::inc(x_38); +x_40 = l_lean_parser_syntax_mk__node(x_38, x_37); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_40); +lean::cnstr_set(x_41, 1, x_21); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_15); +lean::cnstr_set(x_42, 1, x_41); x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_22); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_15); -lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_14); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_lean_parser_command_intro__rule; -lean::inc(x_46); -x_48 = l_lean_parser_syntax_mk__node(x_46, x_45); -return x_48; +lean::cnstr_set(x_43, 0, x_14); +lean::cnstr_set(x_43, 1, x_42); +x_44 = l_lean_parser_command_intro__rule; +lean::inc(x_44); +x_46 = l_lean_parser_syntax_mk__node(x_44, x_43); +return x_46; } } } @@ -16770,7 +16688,7 @@ return x_80; obj* _init_l_lean_parser_command_intro__rule_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; x_0 = lean::mk_string("|"); x_1 = lean::mk_nat_obj(0u); x_2 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); @@ -16779,14 +16697,13 @@ x_4 = l_lean_parser_command_infer__modifier_parser_lean_parser_has__tokens; lean::inc(x_4); x_6 = l_lean_parser_tokens___rarg(x_4); x_7 = l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__tokens; -lean::inc(x_3); lean::inc(x_7); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_7, x_3); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_6, x_10); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_3, x_11); -x_13 = l_lean_parser_list_cons_tokens___rarg(x_2, x_12); -x_14 = l_lean_parser_tokens___rarg(x_13); -return x_14; +x_9 = l_lean_parser_list_cons_tokens___rarg(x_7, x_3); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_6, x_9); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_3, x_10); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_2, x_11); +x_13 = l_lean_parser_tokens___rarg(x_12); +return x_13; } } obj* _init_l_lean_parser_command_intro__rule_parser_lean_parser_has__view() { @@ -17780,130 +17697,125 @@ if (lean::obj_tag(x_3) == 0) { if (lean::obj_tag(x_7) == 0) { -obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; -lean::dec(x_18); -x_20 = l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; -lean::inc(x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_17); -lean::cnstr_set(x_22, 1, x_20); -x_23 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_23); +obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; +x_19 = l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; +lean::inc(x_19); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_17); +lean::cnstr_set(x_21, 1, x_19); +x_22 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_22); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_22); +lean::cnstr_set(x_24, 1, x_21); x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_22); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_13); -lean::cnstr_set(x_26, 1, x_25); -x_27 = l_lean_parser_command_struct__binder__content; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -return x_29; +lean::cnstr_set(x_25, 0, x_13); +lean::cnstr_set(x_25, 1, x_24); +x_26 = l_lean_parser_command_struct__binder__content; +lean::inc(x_26); +x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); +return x_28; } else { -obj* x_30; obj* x_33; obj* x_34; obj* x_36; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; -x_30 = lean::cnstr_get(x_7, 0); -lean::inc(x_30); +obj* x_29; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_47; +x_29 = lean::cnstr_get(x_7, 0); +lean::inc(x_29); lean::dec(x_7); -x_33 = l_lean_parser_term_binder__default_has__view; -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -x_36 = lean::apply_1(x_34, x_30); -lean::inc(x_18); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set(x_38, 1, x_18); +x_32 = l_lean_parser_term_binder__default_has__view; +x_33 = lean::cnstr_get(x_32, 1); +lean::inc(x_33); +x_35 = lean::apply_1(x_33, x_29); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_35); +lean::cnstr_set(x_36, 1, x_18); lean::inc(x_11); -x_40 = l_lean_parser_syntax_mk__node(x_11, x_38); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_18); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_17); -lean::cnstr_set(x_42, 1, x_41); -x_43 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_42); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_13); -lean::cnstr_set(x_46, 1, x_45); -x_47 = l_lean_parser_command_struct__binder__content; -lean::inc(x_47); -x_49 = l_lean_parser_syntax_mk__node(x_47, x_46); -return x_49; +x_38 = l_lean_parser_syntax_mk__node(x_11, x_36); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_18); +x_40 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_40, 0, x_17); +lean::cnstr_set(x_40, 1, x_39); +x_41 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_41); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_41); +lean::cnstr_set(x_43, 1, x_40); +x_44 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_44, 0, x_13); +lean::cnstr_set(x_44, 1, x_43); +x_45 = l_lean_parser_command_struct__binder__content; +lean::inc(x_45); +x_47 = l_lean_parser_syntax_mk__node(x_45, x_44); +return x_47; } } else { -obj* x_50; obj* x_53; obj* x_54; obj* x_56; obj* x_58; obj* x_60; -x_50 = lean::cnstr_get(x_3, 0); -lean::inc(x_50); +obj* x_48; obj* x_51; obj* x_52; obj* x_54; obj* x_55; obj* x_57; +x_48 = lean::cnstr_get(x_3, 0); +lean::inc(x_48); lean::dec(x_3); -x_53 = l_lean_parser_command_infer__modifier_has__view; -x_54 = lean::cnstr_get(x_53, 1); -lean::inc(x_54); -x_56 = lean::apply_1(x_54, x_50); -lean::inc(x_18); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_56); -lean::cnstr_set(x_58, 1, x_18); +x_51 = l_lean_parser_command_infer__modifier_has__view; +x_52 = lean::cnstr_get(x_51, 1); +lean::inc(x_52); +x_54 = lean::apply_1(x_52, x_48); +x_55 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_55, 0, x_54); +lean::cnstr_set(x_55, 1, x_18); lean::inc(x_11); -x_60 = l_lean_parser_syntax_mk__node(x_11, x_58); +x_57 = l_lean_parser_syntax_mk__node(x_11, x_55); if (lean::obj_tag(x_7) == 0) { -obj* x_62; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_69; -lean::dec(x_18); -x_62 = l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; -lean::inc(x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_17); -lean::cnstr_set(x_64, 1, x_62); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_60); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_13); -lean::cnstr_set(x_66, 1, x_65); -x_67 = l_lean_parser_command_struct__binder__content; -lean::inc(x_67); -x_69 = l_lean_parser_syntax_mk__node(x_67, x_66); -return x_69; +obj* x_58; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_65; +x_58 = l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; +lean::inc(x_58); +x_60 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_60, 0, x_17); +lean::cnstr_set(x_60, 1, x_58); +x_61 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_61, 0, x_57); +lean::cnstr_set(x_61, 1, x_60); +x_62 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_62, 0, x_13); +lean::cnstr_set(x_62, 1, x_61); +x_63 = l_lean_parser_command_struct__binder__content; +lean::inc(x_63); +x_65 = l_lean_parser_syntax_mk__node(x_63, x_62); +return x_65; } else { -obj* x_70; obj* x_73; obj* x_74; obj* x_76; obj* x_78; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_87; -x_70 = lean::cnstr_get(x_7, 0); -lean::inc(x_70); +obj* x_66; obj* x_69; obj* x_70; obj* x_72; obj* x_73; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_82; +x_66 = lean::cnstr_get(x_7, 0); +lean::inc(x_66); lean::dec(x_7); -x_73 = l_lean_parser_term_binder__default_has__view; -x_74 = lean::cnstr_get(x_73, 1); -lean::inc(x_74); -x_76 = lean::apply_1(x_74, x_70); -lean::inc(x_18); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_76); -lean::cnstr_set(x_78, 1, x_18); +x_69 = l_lean_parser_term_binder__default_has__view; +x_70 = lean::cnstr_get(x_69, 1); +lean::inc(x_70); +x_72 = lean::apply_1(x_70, x_66); +x_73 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_73, 0, x_72); +lean::cnstr_set(x_73, 1, x_18); lean::inc(x_11); -x_80 = l_lean_parser_syntax_mk__node(x_11, x_78); -x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_18); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_17); -lean::cnstr_set(x_82, 1, x_81); -x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_60); -lean::cnstr_set(x_83, 1, x_82); -x_84 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_84, 0, x_13); -lean::cnstr_set(x_84, 1, x_83); -x_85 = l_lean_parser_command_struct__binder__content; -lean::inc(x_85); -x_87 = l_lean_parser_syntax_mk__node(x_85, x_84); -return x_87; +x_75 = l_lean_parser_syntax_mk__node(x_11, x_73); +x_76 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_76, 0, x_75); +lean::cnstr_set(x_76, 1, x_18); +x_77 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_77, 0, x_17); +lean::cnstr_set(x_77, 1, x_76); +x_78 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_78, 0, x_57); +lean::cnstr_set(x_78, 1, x_77); +x_79 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_79, 0, x_13); +lean::cnstr_set(x_79, 1, x_78); +x_80 = l_lean_parser_command_struct__binder__content; +lean::inc(x_80); +x_82 = l_lean_parser_syntax_mk__node(x_80, x_79); +return x_82; } } } @@ -17932,25 +17844,24 @@ return x_0; obj* _init_l_lean_parser_command_struct__binder__content_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; x_0 = lean::box(0); -lean::inc(x_0); -x_2 = l_lean_parser_tokens___rarg(x_0); -x_3 = l_lean_parser_command_infer__modifier_parser_lean_parser_has__tokens; -lean::inc(x_3); -x_5 = l_lean_parser_tokens___rarg(x_3); -x_6 = l_lean_parser_term_binder__default_parser_lean_parser_has__tokens; -lean::inc(x_6); -x_8 = l_lean_parser_tokens___rarg(x_6); -x_9 = l_lean_parser_tokens___rarg(x_8); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_9, x_0); -x_11 = l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__tokens; -lean::inc(x_11); -x_13 = l_lean_parser_list_cons_tokens___rarg(x_11, x_10); -x_14 = l_lean_parser_list_cons_tokens___rarg(x_5, x_13); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_2, x_14); -x_16 = l_lean_parser_tokens___rarg(x_15); -return x_16; +x_1 = l_lean_parser_tokens___rarg(x_0); +x_2 = l_lean_parser_command_infer__modifier_parser_lean_parser_has__tokens; +lean::inc(x_2); +x_4 = l_lean_parser_tokens___rarg(x_2); +x_5 = l_lean_parser_term_binder__default_parser_lean_parser_has__tokens; +lean::inc(x_5); +x_7 = l_lean_parser_tokens___rarg(x_5); +x_8 = l_lean_parser_tokens___rarg(x_7); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_8, x_0); +x_10 = l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__tokens; +lean::inc(x_10); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_10, x_9); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_4, x_12); +x_14 = l_lean_parser_list_cons_tokens___rarg(x_1, x_13); +x_15 = l_lean_parser_tokens___rarg(x_14); +return x_15; } } obj* _init_l_lean_parser_command_struct__binder__content_parser_lean_parser_has__view() { @@ -18216,50 +18127,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_struct__explicit__binder__content_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_struct__explicit__binder__content_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_struct__explicit__binder__content_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_struct__explicit__binder__content_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_struct__explicit__binder__content_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_struct__explicit__binder__content_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -18269,44 +18179,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_struct__explicit__binder__content_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_struct__explicit__binder__content_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_command_struct__binder__content_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_command_struct__binder__content_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_command_notation__like_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_command_notation__like_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -18318,7 +18228,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -18326,45 +18236,43 @@ x_5 = l_lean_parser_command_notation__like_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_command_struct__explicit__binder__content; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_command_struct__explicit__binder__content; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_command_struct__binder__content_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_command_struct__explicit__binder__content; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_command_struct__binder__content_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_command_struct__explicit__binder__content; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -18889,7 +18797,7 @@ return x_88; obj* l_lean_parser_command_struct__explicit__binder_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -18901,29 +18809,28 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); -x_14 = l_lean_parser_command_struct__explicit__binder__content_has__view; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_17 = lean::apply_1(x_15, x_3); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); +x_13 = l_lean_parser_command_struct__explicit__binder__content_has__view; +x_14 = lean::cnstr_get(x_13, 1); +lean::inc(x_14); +x_16 = lean::apply_1(x_14, x_3); lean::inc(x_8); -x_19 = l_option_map___rarg(x_8, x_5); -x_20 = l_option_get__or__else___main___rarg(x_19, x_11); -x_21 = lean::box(0); +x_18 = l_option_map___rarg(x_8, x_5); +x_19 = l_option_get__or__else___main___rarg(x_18, x_11); +x_20 = lean::box(0); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_19); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 0, x_16); lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_17); +lean::cnstr_set(x_23, 0, x_12); lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_13); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_command_struct__explicit__binder; -lean::inc(x_25); -x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); -return x_27; +x_24 = l_lean_parser_command_struct__explicit__binder; +lean::inc(x_24); +x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); +return x_26; } } obj* _init_l_lean_parser_command_struct__explicit__binder_has__view_x_27() { @@ -19447,7 +19354,7 @@ return x_88; obj* l_lean_parser_command_struct__implicit__binder_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -19459,29 +19366,28 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); -x_14 = l_lean_parser_command_struct__binder__content_has__view; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_17 = lean::apply_1(x_15, x_3); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); +x_13 = l_lean_parser_command_struct__binder__content_has__view; +x_14 = lean::cnstr_get(x_13, 1); +lean::inc(x_14); +x_16 = lean::apply_1(x_14, x_3); lean::inc(x_8); -x_19 = l_option_map___rarg(x_8, x_5); -x_20 = l_option_get__or__else___main___rarg(x_19, x_11); -x_21 = lean::box(0); +x_18 = l_option_map___rarg(x_8, x_5); +x_19 = l_option_get__or__else___main___rarg(x_18, x_11); +x_20 = lean::box(0); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_19); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 0, x_16); lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_17); +lean::cnstr_set(x_23, 0, x_12); lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_13); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_command_struct__implicit__binder; -lean::inc(x_25); -x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); -return x_27; +x_24 = l_lean_parser_command_struct__implicit__binder; +lean::inc(x_24); +x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); +return x_26; } } obj* _init_l_lean_parser_command_struct__implicit__binder_has__view_x_27() { @@ -19993,7 +19899,7 @@ return x_88; obj* l_lean_parser_command_strict__implicit__binder_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -20005,29 +19911,28 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); -x_14 = l_lean_parser_command_struct__binder__content_has__view; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_17 = lean::apply_1(x_15, x_3); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); +x_13 = l_lean_parser_command_struct__binder__content_has__view; +x_14 = lean::cnstr_get(x_13, 1); +lean::inc(x_14); +x_16 = lean::apply_1(x_14, x_3); lean::inc(x_8); -x_19 = l_option_map___rarg(x_8, x_5); -x_20 = l_option_get__or__else___main___rarg(x_19, x_11); -x_21 = lean::box(0); +x_18 = l_option_map___rarg(x_8, x_5); +x_19 = l_option_get__or__else___main___rarg(x_18, x_11); +x_20 = lean::box(0); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_19); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 0, x_16); lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_17); +lean::cnstr_set(x_23, 0, x_12); lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_13); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_command_strict__implicit__binder; -lean::inc(x_25); -x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); -return x_27; +x_24 = l_lean_parser_command_strict__implicit__binder; +lean::inc(x_24); +x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); +return x_26; } } obj* _init_l_lean_parser_command_strict__implicit__binder_has__view_x_27() { @@ -20539,7 +20444,7 @@ return x_88; obj* l_lean_parser_command_inst__implicit__binder_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -20551,29 +20456,28 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); -x_14 = l_lean_parser_command_struct__binder__content_has__view; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_17 = lean::apply_1(x_15, x_3); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); +x_13 = l_lean_parser_command_struct__binder__content_has__view; +x_14 = lean::cnstr_get(x_13, 1); +lean::inc(x_14); +x_16 = lean::apply_1(x_14, x_3); lean::inc(x_8); -x_19 = l_option_map___rarg(x_8, x_5); -x_20 = l_option_get__or__else___main___rarg(x_19, x_11); -x_21 = lean::box(0); +x_18 = l_option_map___rarg(x_8, x_5); +x_19 = l_option_get__or__else___main___rarg(x_18, x_11); +x_20 = lean::box(0); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_19); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 0, x_16); lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_17); +lean::cnstr_set(x_23, 0, x_12); lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_13); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_command_inst__implicit__binder; -lean::inc(x_25); -x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); -return x_27; +x_24 = l_lean_parser_command_inst__implicit__binder; +lean::inc(x_24); +x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); +return x_26; } } obj* _init_l_lean_parser_command_inst__implicit__binder_has__view_x_27() { @@ -20809,50 +20713,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_structure__field__block_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_structure__field__block_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_structure__field__block_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_structure__field__block_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_structure__field__block_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_structure__field__block_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -20862,82 +20765,82 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_structure__field__block_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_structure__field__block_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); -if (x_77 == 0) +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); +if (x_76 == 0) { -obj* x_79; uint8 x_80; -x_79 = lean::mk_nat_obj(1u); -x_80 = lean::nat_dec_eq(x_2, x_79); -lean::dec(x_79); -if (x_80 == 0) +obj* x_78; uint8 x_79; +x_78 = lean::mk_nat_obj(1u); +x_79 = lean::nat_dec_eq(x_2, x_78); +lean::dec(x_78); +if (x_79 == 0) { -obj* x_82; uint8 x_83; -x_82 = lean::mk_nat_obj(2u); -x_83 = lean::nat_dec_eq(x_2, x_82); -lean::dec(x_82); +obj* x_81; uint8 x_82; +x_81 = lean::mk_nat_obj(2u); +x_82 = lean::nat_dec_eq(x_2, x_81); +lean::dec(x_81); lean::dec(x_2); -if (x_83 == 0) +if (x_82 == 0) { -obj* x_86; obj* x_87; obj* x_89; obj* x_90; -x_86 = l_lean_parser_command_inst__implicit__binder_has__view; -x_87 = lean::cnstr_get(x_86, 0); -lean::inc(x_87); -x_89 = lean::apply_1(x_87, x_1); -x_90 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_90, 0, x_89); -return x_90; +obj* x_85; obj* x_86; obj* x_88; obj* x_89; +x_85 = l_lean_parser_command_inst__implicit__binder_has__view; +x_86 = lean::cnstr_get(x_85, 0); +lean::inc(x_86); +x_88 = lean::apply_1(x_86, x_1); +x_89 = lean::alloc_cnstr(3, 1, 0); +lean::cnstr_set(x_89, 0, x_88); +return x_89; } else { -obj* x_91; obj* x_92; obj* x_94; obj* x_95; -x_91 = l_lean_parser_command_strict__implicit__binder_has__view; -x_92 = lean::cnstr_get(x_91, 0); -lean::inc(x_92); -x_94 = lean::apply_1(x_92, x_1); -x_95 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_95, 0, x_94); -return x_95; +obj* x_90; obj* x_91; obj* x_93; obj* x_94; +x_90 = l_lean_parser_command_strict__implicit__binder_has__view; +x_91 = lean::cnstr_get(x_90, 0); +lean::inc(x_91); +x_93 = lean::apply_1(x_91, x_1); +x_94 = lean::alloc_cnstr(2, 1, 0); +lean::cnstr_set(x_94, 0, x_93); +return x_94; } } else { -obj* x_97; obj* x_98; obj* x_100; obj* x_101; +obj* x_96; obj* x_97; obj* x_99; obj* x_100; lean::dec(x_2); -x_97 = l_lean_parser_command_struct__implicit__binder_has__view; -x_98 = lean::cnstr_get(x_97, 0); -lean::inc(x_98); -x_100 = lean::apply_1(x_98, x_1); -x_101 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_101, 0, x_100); -return x_101; +x_96 = l_lean_parser_command_struct__implicit__binder_has__view; +x_97 = lean::cnstr_get(x_96, 0); +lean::inc(x_97); +x_99 = lean::apply_1(x_97, x_1); +x_100 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_100, 0, x_99); +return x_100; } } else { -obj* x_103; obj* x_104; obj* x_106; obj* x_107; +obj* x_102; obj* x_103; obj* x_105; obj* x_106; lean::dec(x_2); -x_103 = l_lean_parser_command_struct__explicit__binder_has__view; -x_104 = lean::cnstr_get(x_103, 0); -lean::inc(x_104); -x_106 = lean::apply_1(x_104, x_1); -x_107 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_107, 0, x_106); -return x_107; +x_102 = l_lean_parser_command_struct__explicit__binder_has__view; +x_103 = lean::cnstr_get(x_102, 0); +lean::inc(x_103); +x_105 = lean::apply_1(x_103, x_1); +x_106 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_106, 0, x_105); +return x_106; } } } @@ -20950,7 +20853,7 @@ x_1 = lean::box(0); switch (lean::obj_tag(x_0)) { case 0: { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -20958,95 +20861,91 @@ x_5 = l_lean_parser_command_struct__explicit__binder_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_command_structure__field__block; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_command_structure__field__block; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } case 1: { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_command_struct__implicit__binder_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_command_structure__field__block; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_command_struct__implicit__binder_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_command_structure__field__block; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } case 2: { -obj* x_34; obj* x_37; obj* x_38; obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; -x_34 = lean::cnstr_get(x_0, 0); -lean::inc(x_34); +obj* x_32; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_46; +x_32 = lean::cnstr_get(x_0, 0); +lean::inc(x_32); lean::dec(x_0); -x_37 = l_lean_parser_command_strict__implicit__binder_has__view; -x_38 = lean::cnstr_get(x_37, 1); -lean::inc(x_38); -x_40 = lean::apply_1(x_38, x_34); -lean::inc(x_1); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_1); -x_43 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; -lean::inc(x_43); -x_45 = l_lean_parser_syntax_mk__node(x_43, x_42); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_1); -x_47 = l_lean_parser_command_structure__field__block; -lean::inc(x_47); -x_49 = l_lean_parser_syntax_mk__node(x_47, x_46); -return x_49; +x_35 = l_lean_parser_command_strict__implicit__binder_has__view; +x_36 = lean::cnstr_get(x_35, 1); +lean::inc(x_36); +x_38 = lean::apply_1(x_36, x_32); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_1); +x_40 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; +lean::inc(x_40); +x_42 = l_lean_parser_syntax_mk__node(x_40, x_39); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_1); +x_44 = l_lean_parser_command_structure__field__block; +lean::inc(x_44); +x_46 = l_lean_parser_syntax_mk__node(x_44, x_43); +return x_46; } default: { -obj* x_50; obj* x_53; obj* x_54; obj* x_56; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_65; -x_50 = lean::cnstr_get(x_0, 0); -lean::inc(x_50); +obj* x_47; obj* x_50; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_61; +x_47 = lean::cnstr_get(x_0, 0); +lean::inc(x_47); lean::dec(x_0); -x_53 = l_lean_parser_command_inst__implicit__binder_has__view; -x_54 = lean::cnstr_get(x_53, 1); -lean::inc(x_54); -x_56 = lean::apply_1(x_54, x_50); -lean::inc(x_1); +x_50 = l_lean_parser_command_inst__implicit__binder_has__view; +x_51 = lean::cnstr_get(x_50, 1); +lean::inc(x_51); +x_53 = lean::apply_1(x_51, x_47); +x_54 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_54, 0, x_53); +lean::cnstr_set(x_54, 1, x_1); +x_55 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +lean::inc(x_55); +x_57 = l_lean_parser_syntax_mk__node(x_55, x_54); x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_56); +lean::cnstr_set(x_58, 0, x_57); lean::cnstr_set(x_58, 1, x_1); -x_59 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +x_59 = l_lean_parser_command_structure__field__block; lean::inc(x_59); x_61 = l_lean_parser_syntax_mk__node(x_59, x_58); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_1); -x_63 = l_lean_parser_command_structure__field__block; -lean::inc(x_63); -x_65 = l_lean_parser_syntax_mk__node(x_63, x_62); -return x_65; +return x_61; } } } @@ -21075,7 +20974,7 @@ return x_0; obj* _init_l_lean_parser_command_structure__field__block_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_42; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; 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_35; obj* x_36; obj* x_38; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; x_0 = lean::mk_string("("); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -21085,72 +20984,65 @@ lean::inc(x_4); x_6 = l_lean_parser_tokens___rarg(x_4); x_7 = lean::box(0); x_8 = l_lean_parser_command_struct__binder__content_parser_lean_parser_has__tokens; -lean::inc(x_7); lean::inc(x_8); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_8, x_7); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_6, x_11); -x_13 = l_lean_parser_tokens___rarg(x_12); -lean::inc(x_7); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_13, x_7); -x_16 = l_lean_parser_tokens___rarg(x_15); -x_17 = lean::mk_string(")"); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_8, x_7); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_6, x_10); +x_12 = l_lean_parser_tokens___rarg(x_11); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_12, x_7); +x_14 = l_lean_parser_tokens___rarg(x_13); +x_15 = lean::mk_string(")"); lean::inc(x_1); -x_19 = l_lean_parser_symbol_tokens___rarg(x_17, x_1); -lean::inc(x_7); -x_21 = l_lean_parser_list_cons_tokens___rarg(x_19, x_7); -x_22 = l_lean_parser_list_cons_tokens___rarg(x_16, x_21); -x_23 = l_lean_parser_list_cons_tokens___rarg(x_3, x_22); -x_24 = l_lean_parser_tokens___rarg(x_23); -x_25 = lean::mk_string("{"); +x_17 = l_lean_parser_symbol_tokens___rarg(x_15, x_1); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_17, x_7); +x_19 = l_lean_parser_list_cons_tokens___rarg(x_14, x_18); +x_20 = l_lean_parser_list_cons_tokens___rarg(x_3, x_19); +x_21 = l_lean_parser_tokens___rarg(x_20); +x_22 = lean::mk_string("{"); +lean::inc(x_1); +x_24 = l_lean_parser_symbol_tokens___rarg(x_22, x_1); +x_25 = lean::mk_string("}"); lean::inc(x_1); x_27 = l_lean_parser_symbol_tokens___rarg(x_25, x_1); -x_28 = lean::mk_string("}"); -lean::inc(x_1); -x_30 = l_lean_parser_symbol_tokens___rarg(x_28, x_1); -lean::inc(x_7); -x_32 = l_lean_parser_list_cons_tokens___rarg(x_30, x_7); +x_28 = l_lean_parser_list_cons_tokens___rarg(x_27, x_7); lean::inc(x_8); -x_34 = l_lean_parser_list_cons_tokens___rarg(x_8, x_32); -x_35 = l_lean_parser_list_cons_tokens___rarg(x_27, x_34); -x_36 = l_lean_parser_tokens___rarg(x_35); -x_37 = lean::mk_string("\xe2\xa6\x83"); +x_30 = l_lean_parser_list_cons_tokens___rarg(x_8, x_28); +x_31 = l_lean_parser_list_cons_tokens___rarg(x_24, x_30); +x_32 = l_lean_parser_tokens___rarg(x_31); +x_33 = lean::mk_string("\xe2\xa6\x83"); lean::inc(x_1); -x_39 = l_lean_parser_symbol_tokens___rarg(x_37, x_1); -x_40 = lean::mk_string("\xe2\xa6\x84"); +x_35 = l_lean_parser_symbol_tokens___rarg(x_33, x_1); +x_36 = lean::mk_string("\xe2\xa6\x84"); lean::inc(x_1); -x_42 = l_lean_parser_symbol_tokens___rarg(x_40, x_1); -lean::inc(x_7); -x_44 = l_lean_parser_list_cons_tokens___rarg(x_42, x_7); +x_38 = l_lean_parser_symbol_tokens___rarg(x_36, x_1); +x_39 = l_lean_parser_list_cons_tokens___rarg(x_38, x_7); lean::inc(x_8); -x_46 = l_lean_parser_list_cons_tokens___rarg(x_8, x_44); -x_47 = l_lean_parser_list_cons_tokens___rarg(x_39, x_46); -x_48 = l_lean_parser_tokens___rarg(x_47); -x_49 = lean::mk_string("["); +x_41 = l_lean_parser_list_cons_tokens___rarg(x_8, x_39); +x_42 = l_lean_parser_list_cons_tokens___rarg(x_35, x_41); +x_43 = l_lean_parser_tokens___rarg(x_42); +x_44 = lean::mk_string("["); lean::inc(x_1); -x_51 = l_lean_parser_symbol_tokens___rarg(x_49, x_1); -x_52 = lean::mk_string("]"); -x_53 = l_lean_parser_symbol_tokens___rarg(x_52, x_1); -lean::inc(x_7); -x_55 = l_lean_parser_list_cons_tokens___rarg(x_53, x_7); +x_46 = l_lean_parser_symbol_tokens___rarg(x_44, x_1); +x_47 = lean::mk_string("]"); +x_48 = l_lean_parser_symbol_tokens___rarg(x_47, x_1); +x_49 = l_lean_parser_list_cons_tokens___rarg(x_48, x_7); lean::inc(x_8); -x_57 = l_lean_parser_list_cons_tokens___rarg(x_8, x_55); -x_58 = l_lean_parser_list_cons_tokens___rarg(x_51, x_57); -x_59 = l_lean_parser_tokens___rarg(x_58); -lean::inc(x_7); -x_61 = l_lean_parser_list_cons_tokens___rarg(x_59, x_7); -x_62 = l_lean_parser_list_cons_tokens___rarg(x_48, x_61); -x_63 = l_lean_parser_list_cons_tokens___rarg(x_36, x_62); -x_64 = l_lean_parser_list_cons_tokens___rarg(x_24, x_63); -x_65 = l_lean_parser_tokens___rarg(x_64); -x_66 = l_lean_parser_list_cons_tokens___rarg(x_65, x_7); -x_67 = l_lean_parser_tokens___rarg(x_66); -return x_67; +x_51 = l_lean_parser_list_cons_tokens___rarg(x_8, x_49); +x_52 = l_lean_parser_list_cons_tokens___rarg(x_46, x_51); +x_53 = l_lean_parser_tokens___rarg(x_52); +x_54 = l_lean_parser_list_cons_tokens___rarg(x_53, x_7); +x_55 = l_lean_parser_list_cons_tokens___rarg(x_43, x_54); +x_56 = l_lean_parser_list_cons_tokens___rarg(x_32, x_55); +x_57 = l_lean_parser_list_cons_tokens___rarg(x_21, x_56); +x_58 = l_lean_parser_tokens___rarg(x_57); +x_59 = l_lean_parser_list_cons_tokens___rarg(x_58, x_7); +x_60 = l_lean_parser_tokens___rarg(x_59); +return x_60; } } obj* _init_l_lean_parser_command_structure__field__block_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_44; obj* x_46; obj* x_48; obj* x_50; obj* x_51; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_58; obj* x_60; obj* x_61; obj* x_62; obj* x_64; obj* x_66; obj* x_68; obj* x_70; obj* x_71; obj* x_72; obj* x_74; obj* x_75; obj* x_76; obj* x_78; obj* x_80; obj* x_81; obj* x_82; obj* x_84; obj* x_86; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_93; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_113; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; 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_35; obj* x_37; obj* x_38; obj* x_39; obj* x_41; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_50; obj* x_51; obj* x_52; obj* x_54; obj* x_56; obj* x_57; obj* x_58; obj* x_60; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_69; obj* x_70; obj* x_71; obj* x_73; obj* x_75; obj* x_76; obj* x_77; obj* x_79; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_106; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -21167,198 +21059,191 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run lean::closure_set(x_8, 0, x_7); x_9 = lean::box(0); x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_struct__binder__content_parser), 4, 0); -lean::inc(x_9); lean::inc(x_10); +x_12 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_12, 0, x_10); +lean::cnstr_set(x_12, 1, x_9); x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_9); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_8); -lean::cnstr_set(x_14, 1, x_13); +lean::cnstr_set(x_13, 0, x_8); +lean::cnstr_set(x_13, 1, x_12); lean::inc(x_4); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_4); -lean::inc(x_9); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_9); -x_19 = l_lean_parser_command_struct__explicit__binder__content; -lean::inc(x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_21, 0, x_19); -lean::closure_set(x_21, 1, x_18); -x_22 = lean::mk_string(")"); -x_23 = l_string_trim(x_22); -lean::inc(x_23); -x_25 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_25, 0, x_23); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_15, 0, x_13); +lean::closure_set(x_15, 1, x_4); +x_16 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_16, 0, x_15); +lean::cnstr_set(x_16, 1, x_9); +x_17 = l_lean_parser_command_struct__explicit__binder__content; +lean::inc(x_17); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_19, 0, x_17); +lean::closure_set(x_19, 1, x_16); +x_20 = lean::mk_string(")"); +x_21 = l_string_trim(x_20); +lean::inc(x_21); +x_23 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_23, 0, x_21); lean::inc(x_4); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_27, 0, x_23); -lean::closure_set(x_27, 1, x_4); -lean::closure_set(x_27, 2, x_25); -lean::inc(x_9); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_27); -lean::cnstr_set(x_29, 1, x_9); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_21); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_6); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_lean_parser_command_struct__explicit__binder; -lean::inc(x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_34, 0, x_32); -lean::closure_set(x_34, 1, x_31); -x_35 = lean::mk_string("{"); -x_36 = l_string_trim(x_35); -lean::inc(x_36); -x_38 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_38, 0, x_36); +x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_25, 0, x_21); +lean::closure_set(x_25, 1, x_4); +lean::closure_set(x_25, 2, x_23); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_9); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_19); +lean::cnstr_set(x_27, 1, x_26); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_6); +lean::cnstr_set(x_28, 1, x_27); +x_29 = l_lean_parser_command_struct__explicit__binder; +lean::inc(x_29); +x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_31, 0, x_29); +lean::closure_set(x_31, 1, x_28); +x_32 = lean::mk_string("{"); +x_33 = l_string_trim(x_32); +lean::inc(x_33); +x_35 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_35, 0, x_33); lean::inc(x_4); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_40, 0, x_36); -lean::closure_set(x_40, 1, x_4); -lean::closure_set(x_40, 2, x_38); -x_41 = lean::mk_string("}"); -x_42 = l_string_trim(x_41); -lean::inc(x_42); -x_44 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_44, 0, x_42); +x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_37, 0, x_33); +lean::closure_set(x_37, 1, x_4); +lean::closure_set(x_37, 2, x_35); +x_38 = lean::mk_string("}"); +x_39 = l_string_trim(x_38); +lean::inc(x_39); +x_41 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_41, 0, x_39); lean::inc(x_4); -x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_46, 0, x_42); -lean::closure_set(x_46, 1, x_4); -lean::closure_set(x_46, 2, x_44); -lean::inc(x_9); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_46); -lean::cnstr_set(x_48, 1, x_9); +x_43 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_43, 0, x_39); +lean::closure_set(x_43, 1, x_4); +lean::closure_set(x_43, 2, x_41); +x_44 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_44, 0, x_43); +lean::cnstr_set(x_44, 1, x_9); lean::inc(x_10); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_10); -lean::cnstr_set(x_50, 1, x_48); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_40); -lean::cnstr_set(x_51, 1, x_50); -x_52 = l_lean_parser_command_struct__implicit__binder; +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_10); +lean::cnstr_set(x_46, 1, x_44); +x_47 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_47, 0, x_37); +lean::cnstr_set(x_47, 1, x_46); +x_48 = l_lean_parser_command_struct__implicit__binder; +lean::inc(x_48); +x_50 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_50, 0, x_48); +lean::closure_set(x_50, 1, x_47); +x_51 = lean::mk_string("\xe2\xa6\x83"); +x_52 = l_string_trim(x_51); lean::inc(x_52); -x_54 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +x_54 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_54, 0, x_52); -lean::closure_set(x_54, 1, x_51); -x_55 = lean::mk_string("\xe2\xa6\x83"); -x_56 = l_string_trim(x_55); -lean::inc(x_56); -x_58 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_58, 0, x_56); lean::inc(x_4); -x_60 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_60, 0, x_56); -lean::closure_set(x_60, 1, x_4); -lean::closure_set(x_60, 2, x_58); -x_61 = lean::mk_string("\xe2\xa6\x84"); -x_62 = l_string_trim(x_61); -lean::inc(x_62); -x_64 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_64, 0, x_62); +x_56 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_56, 0, x_52); +lean::closure_set(x_56, 1, x_4); +lean::closure_set(x_56, 2, x_54); +x_57 = lean::mk_string("\xe2\xa6\x84"); +x_58 = l_string_trim(x_57); +lean::inc(x_58); +x_60 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_60, 0, x_58); lean::inc(x_4); -x_66 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_66, 0, x_62); -lean::closure_set(x_66, 1, x_4); -lean::closure_set(x_66, 2, x_64); -lean::inc(x_9); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_66); -lean::cnstr_set(x_68, 1, x_9); +x_62 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_62, 0, x_58); +lean::closure_set(x_62, 1, x_4); +lean::closure_set(x_62, 2, x_60); +x_63 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_63, 0, x_62); +lean::cnstr_set(x_63, 1, x_9); lean::inc(x_10); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_10); -lean::cnstr_set(x_70, 1, x_68); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_60); -lean::cnstr_set(x_71, 1, x_70); -x_72 = l_lean_parser_command_strict__implicit__binder; -lean::inc(x_72); -x_74 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_74, 0, x_72); -lean::closure_set(x_74, 1, x_71); -x_75 = lean::mk_string("["); -x_76 = l_string_trim(x_75); -lean::inc(x_76); -x_78 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_78, 0, x_76); +x_65 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_65, 0, x_10); +lean::cnstr_set(x_65, 1, x_63); +x_66 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_66, 0, x_56); +lean::cnstr_set(x_66, 1, x_65); +x_67 = l_lean_parser_command_strict__implicit__binder; +lean::inc(x_67); +x_69 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_69, 0, x_67); +lean::closure_set(x_69, 1, x_66); +x_70 = lean::mk_string("["); +x_71 = l_string_trim(x_70); +lean::inc(x_71); +x_73 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_73, 0, x_71); lean::inc(x_4); -x_80 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_80, 0, x_76); -lean::closure_set(x_80, 1, x_4); -lean::closure_set(x_80, 2, x_78); -x_81 = lean::mk_string("]"); -x_82 = l_string_trim(x_81); -lean::inc(x_82); -x_84 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_84, 0, x_82); +x_75 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_75, 0, x_71); +lean::closure_set(x_75, 1, x_4); +lean::closure_set(x_75, 2, x_73); +x_76 = lean::mk_string("]"); +x_77 = l_string_trim(x_76); +lean::inc(x_77); +x_79 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_79, 0, x_77); lean::inc(x_4); -x_86 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_86, 0, x_82); -lean::closure_set(x_86, 1, x_4); -lean::closure_set(x_86, 2, x_84); -lean::inc(x_9); +x_81 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_81, 0, x_77); +lean::closure_set(x_81, 1, x_4); +lean::closure_set(x_81, 2, x_79); +x_82 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_82, 0, x_81); +lean::cnstr_set(x_82, 1, x_9); +x_83 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_83, 0, x_10); +lean::cnstr_set(x_83, 1, x_82); +x_84 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_84, 0, x_75); +lean::cnstr_set(x_84, 1, x_83); +x_85 = l_lean_parser_command_inst__implicit__binder; +lean::inc(x_85); +x_87 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_87, 0, x_85); +lean::closure_set(x_87, 1, x_84); x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_86); +lean::cnstr_set(x_88, 0, x_87); lean::cnstr_set(x_88, 1, x_9); x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_10); +lean::cnstr_set(x_89, 0, x_69); lean::cnstr_set(x_89, 1, x_88); x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_80); +lean::cnstr_set(x_90, 0, x_50); lean::cnstr_set(x_90, 1, x_89); -x_91 = l_lean_parser_command_inst__implicit__binder; -lean::inc(x_91); -x_93 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_93, 0, x_91); -lean::closure_set(x_93, 1, x_90); -lean::inc(x_9); -x_95 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_95, 0, x_93); -lean::cnstr_set(x_95, 1, x_9); -x_96 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_96, 0, x_74); -lean::cnstr_set(x_96, 1, x_95); -x_97 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_97, 0, x_54); -lean::cnstr_set(x_97, 1, x_96); -x_98 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_98, 0, x_34); -lean::cnstr_set(x_98, 1, x_97); -x_99 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_99, 0, x_98); -lean::closure_set(x_99, 1, x_4); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_9); -x_101 = l_lean_parser_command__parser__m_monad___closed__1; -x_102 = l_lean_parser_command__parser__m_monad__except___closed__1; -x_103 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -x_104 = l_lean_parser_command__parser__m_alternative___closed__1; -x_105 = l_lean_parser_command_structure__field__block; -x_106 = l_lean_parser_command_structure__field__block_has__view; -lean::inc(x_106); -lean::inc(x_105); -lean::inc(x_104); -lean::inc(x_103); -lean::inc(x_102); -lean::inc(x_101); -x_113 = l_lean_parser_combinators_node_view___rarg(x_101, x_102, x_103, x_104, x_105, x_100, x_106); -return x_113; +x_91 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_91, 0, x_31); +lean::cnstr_set(x_91, 1, x_90); +x_92 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_92, 0, x_91); +lean::closure_set(x_92, 1, x_4); +x_93 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_93, 0, x_92); +lean::cnstr_set(x_93, 1, x_9); +x_94 = l_lean_parser_command__parser__m_monad___closed__1; +x_95 = l_lean_parser_command__parser__m_monad__except___closed__1; +x_96 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; +x_97 = l_lean_parser_command__parser__m_alternative___closed__1; +x_98 = l_lean_parser_command_structure__field__block; +x_99 = l_lean_parser_command_structure__field__block_has__view; +lean::inc(x_99); +lean::inc(x_98); +lean::inc(x_97); +lean::inc(x_96); +lean::inc(x_95); +lean::inc(x_94); +x_106 = l_lean_parser_combinators_node_view___rarg(x_94, x_95, x_96, x_97, x_98, x_93, x_99); +return x_106; } } obj* _init_l_lean_parser_command_structure__field__block_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_44; obj* x_46; obj* x_48; obj* x_50; obj* x_51; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_58; obj* x_60; obj* x_61; obj* x_62; obj* x_64; obj* x_66; obj* x_68; obj* x_70; obj* x_71; obj* x_72; obj* x_74; obj* x_75; obj* x_76; obj* x_78; obj* x_80; obj* x_81; obj* x_82; obj* x_84; obj* x_86; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_93; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; 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_35; obj* x_37; obj* x_38; obj* x_39; obj* x_41; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_50; obj* x_51; obj* x_52; obj* x_54; obj* x_56; obj* x_57; obj* x_58; obj* x_60; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_69; obj* x_70; obj* x_71; obj* x_73; obj* x_75; obj* x_76; obj* x_77; obj* x_79; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -21375,179 +21260,172 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run lean::closure_set(x_8, 0, x_7); x_9 = lean::box(0); x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_struct__binder__content_parser), 4, 0); -lean::inc(x_9); lean::inc(x_10); +x_12 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_12, 0, x_10); +lean::cnstr_set(x_12, 1, x_9); x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_9); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_8); -lean::cnstr_set(x_14, 1, x_13); +lean::cnstr_set(x_13, 0, x_8); +lean::cnstr_set(x_13, 1, x_12); lean::inc(x_4); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_4); -lean::inc(x_9); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_9); -x_19 = l_lean_parser_command_struct__explicit__binder__content; -lean::inc(x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_21, 0, x_19); -lean::closure_set(x_21, 1, x_18); -x_22 = lean::mk_string(")"); -x_23 = l_string_trim(x_22); -lean::inc(x_23); -x_25 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_25, 0, x_23); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_15, 0, x_13); +lean::closure_set(x_15, 1, x_4); +x_16 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_16, 0, x_15); +lean::cnstr_set(x_16, 1, x_9); +x_17 = l_lean_parser_command_struct__explicit__binder__content; +lean::inc(x_17); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_19, 0, x_17); +lean::closure_set(x_19, 1, x_16); +x_20 = lean::mk_string(")"); +x_21 = l_string_trim(x_20); +lean::inc(x_21); +x_23 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_23, 0, x_21); lean::inc(x_4); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_27, 0, x_23); -lean::closure_set(x_27, 1, x_4); -lean::closure_set(x_27, 2, x_25); -lean::inc(x_9); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_27); -lean::cnstr_set(x_29, 1, x_9); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_21); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_6); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_lean_parser_command_struct__explicit__binder; -lean::inc(x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_34, 0, x_32); -lean::closure_set(x_34, 1, x_31); -x_35 = lean::mk_string("{"); -x_36 = l_string_trim(x_35); -lean::inc(x_36); -x_38 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_38, 0, x_36); +x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_25, 0, x_21); +lean::closure_set(x_25, 1, x_4); +lean::closure_set(x_25, 2, x_23); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_9); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_19); +lean::cnstr_set(x_27, 1, x_26); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_6); +lean::cnstr_set(x_28, 1, x_27); +x_29 = l_lean_parser_command_struct__explicit__binder; +lean::inc(x_29); +x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_31, 0, x_29); +lean::closure_set(x_31, 1, x_28); +x_32 = lean::mk_string("{"); +x_33 = l_string_trim(x_32); +lean::inc(x_33); +x_35 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_35, 0, x_33); lean::inc(x_4); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_40, 0, x_36); -lean::closure_set(x_40, 1, x_4); -lean::closure_set(x_40, 2, x_38); -x_41 = lean::mk_string("}"); -x_42 = l_string_trim(x_41); -lean::inc(x_42); -x_44 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_44, 0, x_42); +x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_37, 0, x_33); +lean::closure_set(x_37, 1, x_4); +lean::closure_set(x_37, 2, x_35); +x_38 = lean::mk_string("}"); +x_39 = l_string_trim(x_38); +lean::inc(x_39); +x_41 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_41, 0, x_39); lean::inc(x_4); -x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_46, 0, x_42); -lean::closure_set(x_46, 1, x_4); -lean::closure_set(x_46, 2, x_44); -lean::inc(x_9); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_46); -lean::cnstr_set(x_48, 1, x_9); +x_43 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_43, 0, x_39); +lean::closure_set(x_43, 1, x_4); +lean::closure_set(x_43, 2, x_41); +x_44 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_44, 0, x_43); +lean::cnstr_set(x_44, 1, x_9); lean::inc(x_10); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_10); -lean::cnstr_set(x_50, 1, x_48); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_40); -lean::cnstr_set(x_51, 1, x_50); -x_52 = l_lean_parser_command_struct__implicit__binder; +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_10); +lean::cnstr_set(x_46, 1, x_44); +x_47 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_47, 0, x_37); +lean::cnstr_set(x_47, 1, x_46); +x_48 = l_lean_parser_command_struct__implicit__binder; +lean::inc(x_48); +x_50 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_50, 0, x_48); +lean::closure_set(x_50, 1, x_47); +x_51 = lean::mk_string("\xe2\xa6\x83"); +x_52 = l_string_trim(x_51); lean::inc(x_52); -x_54 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +x_54 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_54, 0, x_52); -lean::closure_set(x_54, 1, x_51); -x_55 = lean::mk_string("\xe2\xa6\x83"); -x_56 = l_string_trim(x_55); -lean::inc(x_56); -x_58 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_58, 0, x_56); lean::inc(x_4); -x_60 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_60, 0, x_56); -lean::closure_set(x_60, 1, x_4); -lean::closure_set(x_60, 2, x_58); -x_61 = lean::mk_string("\xe2\xa6\x84"); -x_62 = l_string_trim(x_61); -lean::inc(x_62); -x_64 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_64, 0, x_62); +x_56 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_56, 0, x_52); +lean::closure_set(x_56, 1, x_4); +lean::closure_set(x_56, 2, x_54); +x_57 = lean::mk_string("\xe2\xa6\x84"); +x_58 = l_string_trim(x_57); +lean::inc(x_58); +x_60 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_60, 0, x_58); lean::inc(x_4); -x_66 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_66, 0, x_62); -lean::closure_set(x_66, 1, x_4); -lean::closure_set(x_66, 2, x_64); -lean::inc(x_9); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_66); -lean::cnstr_set(x_68, 1, x_9); +x_62 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_62, 0, x_58); +lean::closure_set(x_62, 1, x_4); +lean::closure_set(x_62, 2, x_60); +x_63 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_63, 0, x_62); +lean::cnstr_set(x_63, 1, x_9); lean::inc(x_10); -x_70 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_70, 0, x_10); -lean::cnstr_set(x_70, 1, x_68); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_60); -lean::cnstr_set(x_71, 1, x_70); -x_72 = l_lean_parser_command_strict__implicit__binder; -lean::inc(x_72); -x_74 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_74, 0, x_72); -lean::closure_set(x_74, 1, x_71); -x_75 = lean::mk_string("["); -x_76 = l_string_trim(x_75); -lean::inc(x_76); -x_78 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_78, 0, x_76); +x_65 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_65, 0, x_10); +lean::cnstr_set(x_65, 1, x_63); +x_66 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_66, 0, x_56); +lean::cnstr_set(x_66, 1, x_65); +x_67 = l_lean_parser_command_strict__implicit__binder; +lean::inc(x_67); +x_69 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_69, 0, x_67); +lean::closure_set(x_69, 1, x_66); +x_70 = lean::mk_string("["); +x_71 = l_string_trim(x_70); +lean::inc(x_71); +x_73 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_73, 0, x_71); lean::inc(x_4); -x_80 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_80, 0, x_76); -lean::closure_set(x_80, 1, x_4); -lean::closure_set(x_80, 2, x_78); -x_81 = lean::mk_string("]"); -x_82 = l_string_trim(x_81); -lean::inc(x_82); -x_84 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_84, 0, x_82); +x_75 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_75, 0, x_71); +lean::closure_set(x_75, 1, x_4); +lean::closure_set(x_75, 2, x_73); +x_76 = lean::mk_string("]"); +x_77 = l_string_trim(x_76); +lean::inc(x_77); +x_79 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_79, 0, x_77); lean::inc(x_4); -x_86 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_86, 0, x_82); -lean::closure_set(x_86, 1, x_4); -lean::closure_set(x_86, 2, x_84); -lean::inc(x_9); +x_81 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_81, 0, x_77); +lean::closure_set(x_81, 1, x_4); +lean::closure_set(x_81, 2, x_79); +x_82 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_82, 0, x_81); +lean::cnstr_set(x_82, 1, x_9); +x_83 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_83, 0, x_10); +lean::cnstr_set(x_83, 1, x_82); +x_84 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_84, 0, x_75); +lean::cnstr_set(x_84, 1, x_83); +x_85 = l_lean_parser_command_inst__implicit__binder; +lean::inc(x_85); +x_87 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_87, 0, x_85); +lean::closure_set(x_87, 1, x_84); x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_86); +lean::cnstr_set(x_88, 0, x_87); lean::cnstr_set(x_88, 1, x_9); x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_10); +lean::cnstr_set(x_89, 0, x_69); lean::cnstr_set(x_89, 1, x_88); x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_80); +lean::cnstr_set(x_90, 0, x_50); lean::cnstr_set(x_90, 1, x_89); -x_91 = l_lean_parser_command_inst__implicit__binder; -lean::inc(x_91); -x_93 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_93, 0, x_91); -lean::closure_set(x_93, 1, x_90); -lean::inc(x_9); -x_95 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_95, 0, x_93); -lean::cnstr_set(x_95, 1, x_9); -x_96 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_96, 0, x_74); -lean::cnstr_set(x_96, 1, x_95); -x_97 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_97, 0, x_54); -lean::cnstr_set(x_97, 1, x_96); -x_98 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_98, 0, x_34); -lean::cnstr_set(x_98, 1, x_97); -x_99 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_99, 0, x_98); -lean::closure_set(x_99, 1, x_4); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_9); -return x_100; +x_91 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_91, 0, x_31); +lean::cnstr_set(x_91, 1, x_90); +x_92 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_92, 0, x_91); +lean::closure_set(x_92, 1, x_4); +x_93 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_93, 0, x_92); +lean::cnstr_set(x_93, 1, x_9); +return x_93; } } obj* l_lean_parser_command_structure__field__block_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -22156,7 +22034,7 @@ return x_85; obj* l_lean_parser_command_old__univ__params_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -22168,29 +22046,28 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); -x_14 = l_list_map___main___at_lean_parser_command_old__univ__params_has__view_x_27___spec__2(x_3); -x_15 = l_lean_parser_no__kind; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); +x_13 = l_list_map___main___at_lean_parser_command_old__univ__params_has__view_x_27___spec__2(x_3); +x_14 = l_lean_parser_no__kind; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); lean::inc(x_8); -x_19 = l_option_map___rarg(x_8, x_5); -x_20 = l_option_get__or__else___main___rarg(x_19, x_11); -x_21 = lean::box(0); +x_18 = l_option_map___rarg(x_8, x_5); +x_19 = l_option_get__or__else___main___rarg(x_18, x_11); +x_20 = lean::box(0); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_19); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 0, x_16); lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_17); +lean::cnstr_set(x_23, 0, x_12); lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_13); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_command_old__univ__params; -lean::inc(x_25); -x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); -return x_27; +x_24 = l_lean_parser_command_old__univ__params; +lean::inc(x_24); +x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); +return x_26; } } obj* _init_l_lean_parser_command_old__univ__params_has__view_x_27() { @@ -22217,21 +22094,20 @@ return x_0; obj* _init_l_lean_parser_command_old__univ__params_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; x_0 = lean::mk_string("{"); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_4 = lean::box(0); -lean::inc(x_4); -x_6 = l_lean_parser_tokens___rarg(x_4); -x_7 = lean::mk_string("}"); -x_8 = l_lean_parser_symbol_tokens___rarg(x_7, x_1); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_8, x_4); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_6, x_9); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_3, x_10); -x_12 = l_lean_parser_tokens___rarg(x_11); -return x_12; +x_5 = l_lean_parser_tokens___rarg(x_4); +x_6 = lean::mk_string("}"); +x_7 = l_lean_parser_symbol_tokens___rarg(x_6, x_1); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_7, x_4); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_5, x_8); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_3, x_9); +x_11 = l_lean_parser_tokens___rarg(x_10); +return x_11; } } obj* _init_l_lean_parser_command_old__univ__params_parser_lean_parser_has__view() { @@ -22933,7 +22809,7 @@ return x_85; obj* l_lean_parser_command_univ__params_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -22945,29 +22821,28 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); -x_14 = l_list_map___main___at_lean_parser_command_univ__params_has__view_x_27___spec__2(x_3); -x_15 = l_lean_parser_no__kind; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); +x_13 = l_list_map___main___at_lean_parser_command_univ__params_has__view_x_27___spec__2(x_3); +x_14 = l_lean_parser_no__kind; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); lean::inc(x_8); -x_19 = l_option_map___rarg(x_8, x_5); -x_20 = l_option_get__or__else___main___rarg(x_19, x_11); -x_21 = lean::box(0); +x_18 = l_option_map___rarg(x_8, x_5); +x_19 = l_option_get__or__else___main___rarg(x_18, x_11); +x_20 = lean::box(0); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_19); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 0, x_16); lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_17); +lean::cnstr_set(x_23, 0, x_12); lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_13); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_command_univ__params; -lean::inc(x_25); -x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); -return x_27; +x_24 = l_lean_parser_command_univ__params; +lean::inc(x_24); +x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); +return x_26; } } obj* _init_l_lean_parser_command_univ__params_has__view_x_27() { @@ -23010,57 +22885,50 @@ return x_8; obj* _init_l_lean_parser_command_ident__univ__params_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -x_8 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_8, 0, x_0); -lean::cnstr_set(x_8, 1, x_3); -lean::cnstr_set(x_8, 2, x_5); -lean::cnstr_set(x_8, 3, x_0); -lean::cnstr_set(x_8, 4, x_0); -x_9 = l_lean_parser_command_univ__params_has__view; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_12 = lean::box(3); -x_13 = lean::apply_1(x_10, x_12); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_8); -lean::cnstr_set(x_15, 1, x_14); -return x_15; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = l_lean_parser_command_univ__params_has__view; +x_7 = lean::cnstr_get(x_6, 0); +lean::inc(x_7); +x_9 = lean::box(3); +x_10 = lean::apply_1(x_7, x_9); +x_11 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_11, 0, x_10); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_5); +lean::cnstr_set(x_12, 1, x_11); +return x_12; } } obj* _init_l_lean_parser_command_ident__univ__params_has__view_x_27___lambda__1___closed__2() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_0); -lean::cnstr_set(x_9, 1, x_3); -lean::cnstr_set(x_9, 2, x_5); -lean::cnstr_set(x_9, 3, x_0); -lean::cnstr_set(x_9, 4, x_0); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_0); -return x_10; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_0); +return x_6; } } obj* _init_l_lean_parser_command_ident__univ__params_has__view_x_27___lambda__1___closed__3() { @@ -23802,7 +23670,7 @@ return x_12; } else { -obj* x_13; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; +obj* x_13; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; x_13 = lean::cnstr_get(x_3, 0); lean::inc(x_13); lean::dec(x_3); @@ -23811,23 +23679,22 @@ x_17 = l_lean_parser_command_univ__params_has__view; x_18 = lean::cnstr_get(x_17, 1); lean::inc(x_18); x_20 = lean::apply_1(x_18, x_13); -lean::inc(x_16); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); -lean::cnstr_set(x_22, 1, x_16); -x_23 = l_lean_parser_no__kind; -lean::inc(x_23); -x_25 = l_lean_parser_syntax_mk__node(x_23, x_22); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_20); +lean::cnstr_set(x_21, 1, x_16); +x_22 = l_lean_parser_no__kind; +lean::inc(x_22); +x_24 = l_lean_parser_syntax_mk__node(x_22, x_21); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_16); x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_16); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_6); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_lean_parser_command_ident__univ__params; -lean::inc(x_28); -x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); -return x_30; +lean::cnstr_set(x_26, 0, x_6); +lean::cnstr_set(x_26, 1, x_25); +x_27 = l_lean_parser_command_ident__univ__params; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +return x_29; } } } @@ -23855,33 +23722,30 @@ return x_0; obj* _init_l_lean_parser_command_ident__univ__params_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; x_0 = lean::box(0); x_1 = lean::mk_string(".{"); x_2 = lean::mk_nat_obj(0u); lean::inc(x_2); x_4 = l_lean_parser_symbol_tokens___rarg(x_1, x_2); -lean::inc(x_0); -x_6 = l_lean_parser_tokens___rarg(x_0); -x_7 = lean::mk_string("}"); -x_8 = l_lean_parser_symbol_tokens___rarg(x_7, x_2); -lean::inc(x_0); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_8, x_0); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_6, x_10); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_4, x_11); -x_13 = l_lean_parser_tokens___rarg(x_12); -x_14 = l_lean_parser_tokens___rarg(x_13); -lean::inc(x_0); -x_16 = l_lean_parser_list_cons_tokens___rarg(x_14, x_0); -x_17 = l_lean_parser_list_cons_tokens___rarg(x_0, x_16); -x_18 = l_lean_parser_tokens___rarg(x_17); -return x_18; +x_5 = l_lean_parser_tokens___rarg(x_0); +x_6 = lean::mk_string("}"); +x_7 = l_lean_parser_symbol_tokens___rarg(x_6, x_2); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_7, x_0); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_5, x_8); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_4, x_9); +x_11 = l_lean_parser_tokens___rarg(x_10); +x_12 = l_lean_parser_tokens___rarg(x_11); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_12, x_0); +x_14 = l_lean_parser_list_cons_tokens___rarg(x_0, x_13); +x_15 = l_lean_parser_tokens___rarg(x_14); +return x_15; } } obj* _init_l_lean_parser_command_ident__univ__params_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* 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_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_38; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* 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_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_37; x_0 = lean::mk_string(".{"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -23907,49 +23771,48 @@ lean::closure_set(x_14, 0, x_11); lean::closure_set(x_14, 1, x_4); lean::closure_set(x_14, 2, x_13); x_15 = lean::box(0); -lean::inc(x_15); +x_16 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_16, 0, x_14); +lean::cnstr_set(x_16, 1, x_15); x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_14); -lean::cnstr_set(x_17, 1, x_15); +lean::cnstr_set(x_17, 0, x_9); +lean::cnstr_set(x_17, 1, x_16); x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_9); +lean::cnstr_set(x_18, 0, x_6); lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_6); -lean::cnstr_set(x_19, 1, x_18); -x_20 = l_lean_parser_command_univ__params; -lean::inc(x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_22, 0, x_20); -lean::closure_set(x_22, 1, x_19); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_23, 0, x_22); +x_19 = l_lean_parser_command_univ__params; +lean::inc(x_19); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_21, 0, x_19); +lean::closure_set(x_21, 1, x_18); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_22, 0, x_21); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_22); +lean::cnstr_set(x_23, 1, x_15); x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_15); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_7); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_lean_parser_command__parser__m_monad___closed__1; -x_27 = l_lean_parser_command__parser__m_monad__except___closed__1; -x_28 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -x_29 = l_lean_parser_command__parser__m_alternative___closed__1; -x_30 = l_lean_parser_command_ident__univ__params; -x_31 = l_lean_parser_command_ident__univ__params_has__view; -lean::inc(x_31); +lean::cnstr_set(x_24, 0, x_7); +lean::cnstr_set(x_24, 1, x_23); +x_25 = l_lean_parser_command__parser__m_monad___closed__1; +x_26 = l_lean_parser_command__parser__m_monad__except___closed__1; +x_27 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; +x_28 = l_lean_parser_command__parser__m_alternative___closed__1; +x_29 = l_lean_parser_command_ident__univ__params; +x_30 = l_lean_parser_command_ident__univ__params_has__view; lean::inc(x_30); lean::inc(x_29); lean::inc(x_28); lean::inc(x_27); lean::inc(x_26); -x_38 = l_lean_parser_combinators_node_view___rarg(x_26, x_27, x_28, x_29, x_30, x_25, x_31); -return x_38; +lean::inc(x_25); +x_37 = l_lean_parser_combinators_node_view___rarg(x_25, x_26, x_27, x_28, x_29, x_24, x_30); +return x_37; } } obj* _init_l_lean_parser_command_ident__univ__params_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* 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_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* 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_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; x_0 = lean::mk_string(".{"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -23975,30 +23838,29 @@ lean::closure_set(x_14, 0, x_11); lean::closure_set(x_14, 1, x_4); lean::closure_set(x_14, 2, x_13); x_15 = lean::box(0); -lean::inc(x_15); +x_16 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_16, 0, x_14); +lean::cnstr_set(x_16, 1, x_15); x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_14); -lean::cnstr_set(x_17, 1, x_15); +lean::cnstr_set(x_17, 0, x_9); +lean::cnstr_set(x_17, 1, x_16); x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_9); +lean::cnstr_set(x_18, 0, x_6); lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_6); -lean::cnstr_set(x_19, 1, x_18); -x_20 = l_lean_parser_command_univ__params; -lean::inc(x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_22, 0, x_20); -lean::closure_set(x_22, 1, x_19); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_23, 0, x_22); +x_19 = l_lean_parser_command_univ__params; +lean::inc(x_19); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_21, 0, x_19); +lean::closure_set(x_21, 1, x_18); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_22, 0, x_21); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_22); +lean::cnstr_set(x_23, 1, x_15); x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_15); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_7); -lean::cnstr_set(x_25, 1, x_24); -return x_25; +lean::cnstr_set(x_24, 0, x_7); +lean::cnstr_set(x_24, 1, x_23); +return x_24; } } obj* l_lean_parser_command_ident__univ__params_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -24249,50 +24111,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__3; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__3; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__3; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__3; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__3; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__3; +lean::inc(x_69); +return x_69; } } } @@ -24302,52 +24163,52 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__3; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__3; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { switch (lean::obj_tag(x_1)) { case 0: { -obj* x_80; obj* x_83; obj* x_84; -x_80 = lean::cnstr_get(x_1, 0); -lean::inc(x_80); +obj* x_79; obj* x_82; obj* x_83; +x_79 = lean::cnstr_get(x_1, 0); +lean::inc(x_79); lean::dec(x_1); +x_82 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_82, 0, x_79); x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_80); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +lean::cnstr_set(x_83, 0, x_82); +return x_83; } case 3: { -obj* x_85; -x_85 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__1; -lean::inc(x_85); -return x_85; +obj* x_84; +x_84 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__1; +lean::inc(x_84); +return x_84; } default: { -obj* x_88; +obj* x_87; lean::dec(x_1); -x_88 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__1; -lean::inc(x_88); -return x_88; +x_87 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__1; +lean::inc(x_87); +return x_87; } } } @@ -24356,30 +24217,30 @@ else switch (lean::obj_tag(x_1)) { case 0: { -obj* x_90; obj* x_93; obj* x_94; -x_90 = lean::cnstr_get(x_1, 0); -lean::inc(x_90); +obj* x_89; obj* x_92; obj* x_93; +x_89 = lean::cnstr_get(x_1, 0); +lean::inc(x_89); lean::dec(x_1); -x_93 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_93, 0, x_90); -x_94 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_94, 0, x_93); -return x_94; +x_92 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_92, 0, x_89); +x_93 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_93, 0, x_92); +return x_93; } case 3: { -obj* x_95; -x_95 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__2; -lean::inc(x_95); -return x_95; +obj* x_94; +x_94 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__2; +lean::inc(x_94); +return x_94; } default: { -obj* x_98; +obj* x_97; lean::dec(x_1); -x_98 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__2; -lean::inc(x_98); -return x_98; +x_97 = l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__2; +lean::inc(x_97); +return x_97; } } } @@ -24393,7 +24254,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; +obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -24402,46 +24263,44 @@ lean::inc(x_5); x_7 = l_option_map___rarg(x_5, x_2); x_8 = lean::box(3); x_9 = l_option_get__or__else___main___rarg(x_7, x_8); -lean::inc(x_1); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_1); -x_12 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_12); -x_14 = l_lean_parser_syntax_mk__node(x_12, x_11); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_1); -x_16 = l_lean_parser_command_structure__kw; -lean::inc(x_16); -x_18 = l_lean_parser_syntax_mk__node(x_16, x_15); -return x_18; +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_1); +x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_11); +x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_1); +x_15 = l_lean_parser_command_structure__kw; +lean::inc(x_15); +x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); +return x_17; } else { -obj* x_19; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; -x_19 = lean::cnstr_get(x_0, 0); -lean::inc(x_19); +obj* x_18; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; +x_18 = lean::cnstr_get(x_0, 0); +lean::inc(x_18); lean::dec(x_0); -x_22 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_22); -x_24 = l_option_map___rarg(x_22, x_19); -x_25 = lean::box(3); -x_26 = l_option_get__or__else___main___rarg(x_24, x_25); -lean::inc(x_1); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_1); -x_29 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_29); -x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_1); -x_33 = l_lean_parser_command_structure__kw; -lean::inc(x_33); -x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); -return x_35; +x_21 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_21); +x_23 = l_option_map___rarg(x_21, x_18); +x_24 = lean::box(3); +x_25 = l_option_get__or__else___main___rarg(x_23, x_24); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_1); +x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_1); +x_31 = l_lean_parser_command_structure__kw; +lean::inc(x_31); +x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); +return x_33; } } } @@ -24508,87 +24367,86 @@ if (lean::is_shared(x_0)) { } if (lean::obj_tag(x_4) == 0) { -obj* x_7; obj* x_9; obj* x_10; +obj* x_7; obj* x_8; obj* x_9; x_7 = lean::box(0); -lean::inc(x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_7); +x_8 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_8, 0, x_2); +lean::cnstr_set(x_8, 1, x_7); if (lean::is_scalar(x_6)) { - x_10 = lean::alloc_cnstr(1, 2, 0); + x_9 = lean::alloc_cnstr(1, 2, 0); } else { - x_10 = x_6; + x_9 = x_6; } -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_7); -return x_10; +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_7); +return x_9; } else { -obj* x_11; obj* x_13; obj* x_16; -x_11 = lean::cnstr_get(x_4, 0); -lean::inc(x_11); -x_13 = lean::cnstr_get(x_4, 1); -lean::inc(x_13); +obj* x_10; obj* x_12; obj* x_15; +x_10 = lean::cnstr_get(x_4, 0); +lean::inc(x_10); +x_12 = lean::cnstr_get(x_4, 1); +lean::inc(x_12); lean::dec(x_4); -x_16 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_command_extends_has__view_x_27___spec__1(x_13); -switch (lean::obj_tag(x_11)) { +x_15 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_command_extends_has__view_x_27___spec__1(x_12); +switch (lean::obj_tag(x_10)) { case 0: { -obj* x_17; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_17 = lean::cnstr_get(x_11, 0); -lean::inc(x_17); -lean::dec(x_11); +obj* x_16; obj* x_19; obj* x_20; obj* x_21; obj* x_22; +x_16 = lean::cnstr_get(x_10, 0); +lean::inc(x_16); +lean::dec(x_10); +x_19 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_19, 0, x_16); x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_17); -x_21 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_2); -lean::cnstr_set(x_22, 1, x_21); +lean::cnstr_set(x_20, 0, x_19); +x_21 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_21, 0, x_2); +lean::cnstr_set(x_21, 1, x_20); if (lean::is_scalar(x_6)) { - x_23 = lean::alloc_cnstr(1, 2, 0); + x_22 = lean::alloc_cnstr(1, 2, 0); } else { - x_23 = x_6; + x_22 = x_6; } -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_16); -return x_23; +lean::cnstr_set(x_22, 0, x_21); +lean::cnstr_set(x_22, 1, x_15); +return x_22; } case 3: { -obj* x_24; obj* x_26; obj* x_27; -x_24 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_24); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_2); -lean::cnstr_set(x_26, 1, x_24); +obj* x_23; obj* x_25; obj* x_26; +x_23 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_23); +x_25 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_25, 0, x_2); +lean::cnstr_set(x_25, 1, x_23); if (lean::is_scalar(x_6)) { - x_27 = lean::alloc_cnstr(1, 2, 0); + x_26 = lean::alloc_cnstr(1, 2, 0); } else { - x_27 = x_6; + x_26 = x_6; } -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_16); -return x_27; +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_15); +return x_26; } default: { -obj* x_29; obj* x_31; obj* x_32; -lean::dec(x_11); -x_29 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_29); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_2); -lean::cnstr_set(x_31, 1, x_29); +obj* x_28; obj* x_30; obj* x_31; +lean::dec(x_10); +x_28 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_28); +x_30 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_30, 0, x_2); +lean::cnstr_set(x_30, 1, x_28); if (lean::is_scalar(x_6)) { - x_32 = lean::alloc_cnstr(1, 2, 0); + x_31 = lean::alloc_cnstr(1, 2, 0); } else { - x_32 = x_6; + x_31 = x_6; } -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_16); -return x_32; +lean::cnstr_set(x_31, 0, x_30); +lean::cnstr_set(x_31, 1, x_15); +return x_31; } } } @@ -25259,94 +25117,93 @@ lean::dec(x_49); x_54 = lean::box(0); if (lean::obj_tag(x_18) == 0) { -obj* x_56; -lean::inc(x_54); -x_56 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_56, 0, x_5); -lean::cnstr_set(x_56, 1, x_54); -lean::cnstr_set(x_56, 2, x_54); -return x_56; +obj* x_55; +x_55 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_55, 0, x_5); +lean::cnstr_set(x_55, 1, x_54); +lean::cnstr_set(x_55, 2, x_54); +return x_55; } else { -obj* x_57; -x_57 = lean::cnstr_get(x_18, 0); -lean::inc(x_57); +obj* x_56; +x_56 = lean::cnstr_get(x_18, 0); +lean::inc(x_56); lean::dec(x_18); x_15 = x_54; -x_16 = x_57; +x_16 = x_56; goto lbl_17; } } else { -obj* x_60; obj* x_62; -x_60 = lean::cnstr_get(x_50, 0); -lean::inc(x_60); -x_62 = lean::cnstr_get(x_50, 1); -lean::inc(x_62); +obj* x_59; obj* x_61; +x_59 = lean::cnstr_get(x_50, 0); +lean::inc(x_59); +x_61 = lean::cnstr_get(x_50, 1); +lean::inc(x_61); lean::dec(x_50); -if (lean::obj_tag(x_62) == 0) +if (lean::obj_tag(x_61) == 0) { -obj* x_65; obj* x_66; obj* x_68; obj* x_69; -x_65 = l_lean_parser_command_infer__modifier_has__view; -x_66 = lean::cnstr_get(x_65, 0); -lean::inc(x_66); -x_68 = lean::apply_1(x_66, x_60); +obj* x_64; obj* x_65; obj* x_67; obj* x_68; +x_64 = l_lean_parser_command_infer__modifier_has__view; +x_65 = lean::cnstr_get(x_64, 0); +lean::inc(x_65); +x_67 = lean::apply_1(x_65, x_59); if (lean::is_scalar(x_49)) { - x_69 = lean::alloc_cnstr(1, 1, 0); + x_68 = lean::alloc_cnstr(1, 1, 0); } else { - x_69 = x_49; + x_68 = x_49; } -lean::cnstr_set(x_69, 0, x_68); +lean::cnstr_set(x_68, 0, x_67); if (lean::obj_tag(x_18) == 0) { -obj* x_70; obj* x_71; -x_70 = lean::box(0); -x_71 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_71, 0, x_5); -lean::cnstr_set(x_71, 1, x_69); -lean::cnstr_set(x_71, 2, x_70); -return x_71; +obj* x_69; obj* x_70; +x_69 = lean::box(0); +x_70 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_70, 0, x_5); +lean::cnstr_set(x_70, 1, x_68); +lean::cnstr_set(x_70, 2, x_69); +return x_70; } else { -obj* x_72; -x_72 = lean::cnstr_get(x_18, 0); -lean::inc(x_72); +obj* x_71; +x_71 = lean::cnstr_get(x_18, 0); +lean::inc(x_71); lean::dec(x_18); -x_15 = x_69; -x_16 = x_72; +x_15 = x_68; +x_16 = x_71; goto lbl_17; } } else { lean::dec(x_49); -lean::dec(x_60); -lean::dec(x_62); +lean::dec(x_59); +lean::dec(x_61); if (lean::obj_tag(x_18) == 0) { -obj* x_78; obj* x_79; obj* x_81; -x_78 = lean::box(0); -x_79 = l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__1; -lean::inc(x_79); -x_81 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_81, 0, x_5); -lean::cnstr_set(x_81, 1, x_79); -lean::cnstr_set(x_81, 2, x_78); -return x_81; +obj* x_77; obj* x_78; obj* x_80; +x_77 = lean::box(0); +x_78 = l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__1; +lean::inc(x_78); +x_80 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_80, 0, x_5); +lean::cnstr_set(x_80, 1, x_78); +lean::cnstr_set(x_80, 2, x_77); +return x_80; } else { -obj* x_82; obj* x_85; -x_82 = lean::cnstr_get(x_18, 0); -lean::inc(x_82); +obj* x_81; obj* x_84; +x_81 = lean::cnstr_get(x_18, 0); +lean::inc(x_81); lean::dec(x_18); -x_85 = l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__1; -lean::inc(x_85); -x_15 = x_85; -x_16 = x_82; +x_84 = l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__1; +lean::inc(x_84); +x_15 = x_84; +x_16 = x_81; goto lbl_17; } } @@ -25546,94 +25403,93 @@ lean::dec(x_63); x_68 = lean::box(0); if (lean::obj_tag(x_32) == 0) { -obj* x_70; -lean::inc(x_68); -x_70 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_70, 0, x_19); -lean::cnstr_set(x_70, 1, x_68); -lean::cnstr_set(x_70, 2, x_68); -return x_70; +obj* x_69; +x_69 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_69, 0, x_19); +lean::cnstr_set(x_69, 1, x_68); +lean::cnstr_set(x_69, 2, x_68); +return x_69; } else { -obj* x_71; -x_71 = lean::cnstr_get(x_32, 0); -lean::inc(x_71); +obj* x_70; +x_70 = lean::cnstr_get(x_32, 0); +lean::inc(x_70); lean::dec(x_32); x_29 = x_68; -x_30 = x_71; +x_30 = x_70; goto lbl_31; } } else { -obj* x_74; obj* x_76; -x_74 = lean::cnstr_get(x_64, 0); -lean::inc(x_74); -x_76 = lean::cnstr_get(x_64, 1); -lean::inc(x_76); +obj* x_73; obj* x_75; +x_73 = lean::cnstr_get(x_64, 0); +lean::inc(x_73); +x_75 = lean::cnstr_get(x_64, 1); +lean::inc(x_75); lean::dec(x_64); -if (lean::obj_tag(x_76) == 0) +if (lean::obj_tag(x_75) == 0) { -obj* x_79; obj* x_80; obj* x_82; obj* x_83; -x_79 = l_lean_parser_command_infer__modifier_has__view; -x_80 = lean::cnstr_get(x_79, 0); -lean::inc(x_80); -x_82 = lean::apply_1(x_80, x_74); +obj* x_78; obj* x_79; obj* x_81; obj* x_82; +x_78 = l_lean_parser_command_infer__modifier_has__view; +x_79 = lean::cnstr_get(x_78, 0); +lean::inc(x_79); +x_81 = lean::apply_1(x_79, x_73); if (lean::is_scalar(x_63)) { - x_83 = lean::alloc_cnstr(1, 1, 0); + x_82 = lean::alloc_cnstr(1, 1, 0); } else { - x_83 = x_63; + x_82 = x_63; } -lean::cnstr_set(x_83, 0, x_82); +lean::cnstr_set(x_82, 0, x_81); if (lean::obj_tag(x_32) == 0) { -obj* x_84; obj* x_85; -x_84 = lean::box(0); -x_85 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_85, 0, x_19); -lean::cnstr_set(x_85, 1, x_83); -lean::cnstr_set(x_85, 2, x_84); -return x_85; +obj* x_83; obj* x_84; +x_83 = lean::box(0); +x_84 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_84, 0, x_19); +lean::cnstr_set(x_84, 1, x_82); +lean::cnstr_set(x_84, 2, x_83); +return x_84; } else { -obj* x_86; -x_86 = lean::cnstr_get(x_32, 0); -lean::inc(x_86); +obj* x_85; +x_85 = lean::cnstr_get(x_32, 0); +lean::inc(x_85); lean::dec(x_32); -x_29 = x_83; -x_30 = x_86; +x_29 = x_82; +x_30 = x_85; goto lbl_31; } } else { lean::dec(x_63); -lean::dec(x_74); -lean::dec(x_76); +lean::dec(x_75); +lean::dec(x_73); if (lean::obj_tag(x_32) == 0) { -obj* x_92; obj* x_93; obj* x_95; -x_92 = lean::box(0); -x_93 = l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__1; -lean::inc(x_93); -x_95 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_95, 0, x_19); -lean::cnstr_set(x_95, 1, x_93); -lean::cnstr_set(x_95, 2, x_92); -return x_95; +obj* x_91; obj* x_92; obj* x_94; +x_91 = lean::box(0); +x_92 = l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__1; +lean::inc(x_92); +x_94 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_94, 0, x_19); +lean::cnstr_set(x_94, 1, x_92); +lean::cnstr_set(x_94, 2, x_91); +return x_94; } else { -obj* x_96; obj* x_99; -x_96 = lean::cnstr_get(x_32, 0); -lean::inc(x_96); +obj* x_95; obj* x_98; +x_95 = lean::cnstr_get(x_32, 0); +lean::inc(x_95); lean::dec(x_32); -x_99 = l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__1; -lean::inc(x_99); -x_29 = x_99; -x_30 = x_96; +x_98 = l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__1; +lean::inc(x_98); +x_29 = x_98; +x_30 = x_95; goto lbl_31; } } @@ -25647,7 +25503,7 @@ goto lbl_31; obj* l_lean_parser_command_structure__ctor_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -25663,53 +25519,51 @@ x_11 = l_option_map___rarg(x_9, x_5); x_12 = lean::box(3); x_13 = l_option_get__or__else___main___rarg(x_11, x_12); x_14 = lean::box(0); -lean::inc(x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_13); -lean::cnstr_set(x_16, 1, x_14); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_13); +lean::cnstr_set(x_15, 1, x_14); if (lean::obj_tag(x_3) == 0) { -obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; -lean::dec(x_14); -x_18 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_16); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_8); -lean::cnstr_set(x_21, 1, x_20); -x_22 = l_lean_parser_command_structure__ctor; -lean::inc(x_22); -x_24 = l_lean_parser_syntax_mk__node(x_22, x_21); -return x_24; +obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; +x_16 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_16); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_16); +lean::cnstr_set(x_18, 1, x_15); +x_19 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_19, 0, x_8); +lean::cnstr_set(x_19, 1, x_18); +x_20 = l_lean_parser_command_structure__ctor; +lean::inc(x_20); +x_22 = l_lean_parser_syntax_mk__node(x_20, x_19); +return x_22; } else { -obj* x_25; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_40; -x_25 = lean::cnstr_get(x_3, 0); -lean::inc(x_25); +obj* x_23; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_38; +x_23 = lean::cnstr_get(x_3, 0); +lean::inc(x_23); lean::dec(x_3); -x_28 = l_lean_parser_command_infer__modifier_has__view; -x_29 = lean::cnstr_get(x_28, 1); -lean::inc(x_29); -x_31 = lean::apply_1(x_29, x_25); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_14); -x_33 = l_lean_parser_no__kind; -lean::inc(x_33); -x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_16); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_8); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_lean_parser_command_structure__ctor; -lean::inc(x_38); -x_40 = l_lean_parser_syntax_mk__node(x_38, x_37); -return x_40; +x_26 = l_lean_parser_command_infer__modifier_has__view; +x_27 = lean::cnstr_get(x_26, 1); +lean::inc(x_27); +x_29 = lean::apply_1(x_27, x_23); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_14); +x_31 = l_lean_parser_no__kind; +lean::inc(x_31); +x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); +x_34 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_34, 0, x_33); +lean::cnstr_set(x_34, 1, x_15); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_8); +lean::cnstr_set(x_35, 1, x_34); +x_36 = l_lean_parser_command_structure__ctor; +lean::inc(x_36); +x_38 = l_lean_parser_syntax_mk__node(x_36, x_35); +return x_38; } } } @@ -26990,7 +26844,7 @@ return x_1; obj* l_lean_parser_command_structure_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_13; obj* x_15; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_46; obj* x_47; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_13; obj* x_15; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -27032,229 +26886,224 @@ x_38 = l_lean_parser_no__kind; lean::inc(x_38); x_40 = l_lean_parser_syntax_mk__node(x_38, x_37); x_41 = lean::box(0); -lean::inc(x_41); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_40); -lean::cnstr_set(x_43, 1, x_41); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_40); +lean::cnstr_set(x_42, 1, x_41); if (lean::obj_tag(x_3) == 0) { if (lean::obj_tag(x_9) == 0) { -obj* x_49; -x_49 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_49); -x_44 = x_49; -goto lbl_45; +obj* x_48; +x_48 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_48); +x_43 = x_48; +goto lbl_44; } else { -obj* x_51; obj* x_54; -x_51 = lean::cnstr_get(x_9, 0); -lean::inc(x_51); +obj* x_50; obj* x_53; +x_50 = lean::cnstr_get(x_9, 0); +lean::inc(x_50); lean::dec(x_9); -x_54 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_54); -x_46 = x_54; -x_47 = x_51; -goto lbl_48; +x_53 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_53); +x_45 = x_53; +x_46 = x_50; +goto lbl_47; } } else { -obj* x_56; obj* x_59; obj* x_60; obj* x_62; obj* x_64; obj* x_66; -x_56 = lean::cnstr_get(x_3, 0); -lean::inc(x_56); +obj* x_55; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_64; +x_55 = lean::cnstr_get(x_3, 0); +lean::inc(x_55); lean::dec(x_3); -x_59 = l_lean_parser_command_old__univ__params_has__view; -x_60 = lean::cnstr_get(x_59, 1); -lean::inc(x_60); -x_62 = lean::apply_1(x_60, x_56); -lean::inc(x_41); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_62); -lean::cnstr_set(x_64, 1, x_41); +x_58 = l_lean_parser_command_old__univ__params_has__view; +x_59 = lean::cnstr_get(x_58, 1); +lean::inc(x_59); +x_61 = lean::apply_1(x_59, x_55); +x_62 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_62, 0, x_61); +lean::cnstr_set(x_62, 1, x_41); lean::inc(x_38); -x_66 = l_lean_parser_syntax_mk__node(x_38, x_64); +x_64 = l_lean_parser_syntax_mk__node(x_38, x_62); if (lean::obj_tag(x_9) == 0) { -x_44 = x_66; -goto lbl_45; +x_43 = x_64; +goto lbl_44; } else { -obj* x_67; -x_67 = lean::cnstr_get(x_9, 0); -lean::inc(x_67); +obj* x_65; +x_65 = lean::cnstr_get(x_9, 0); +lean::inc(x_65); lean::dec(x_9); -x_46 = x_66; -x_47 = x_67; -goto lbl_48; +x_45 = x_64; +x_46 = x_65; +goto lbl_47; } } -lbl_45: +lbl_44: { if (lean::obj_tag(x_13) == 0) { -obj* x_71; obj* x_73; obj* x_74; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_83; -lean::dec(x_41); -x_71 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_71); +obj* x_68; obj* x_70; obj* x_71; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_80; +x_68 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_68); +x_70 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_70, 0, x_68); +lean::cnstr_set(x_70, 1, x_42); +x_71 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_71, 0, x_34); +lean::cnstr_set(x_71, 1, x_70); +lean::inc(x_68); x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_71); -lean::cnstr_set(x_73, 1, x_43); +lean::cnstr_set(x_73, 0, x_68); +lean::cnstr_set(x_73, 1, x_71); x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_34); +lean::cnstr_set(x_74, 0, x_29); lean::cnstr_set(x_74, 1, x_73); -lean::inc(x_71); +x_75 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_75, 0, x_25); +lean::cnstr_set(x_75, 1, x_74); x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_71); -lean::cnstr_set(x_76, 1, x_74); +lean::cnstr_set(x_76, 0, x_43); +lean::cnstr_set(x_76, 1, x_75); x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_29); +lean::cnstr_set(x_77, 0, x_21); lean::cnstr_set(x_77, 1, x_76); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_25); -lean::cnstr_set(x_78, 1, x_77); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_44); -lean::cnstr_set(x_79, 1, x_78); -x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_21); -lean::cnstr_set(x_80, 1, x_79); -x_81 = l_lean_parser_command_structure; -lean::inc(x_81); -x_83 = l_lean_parser_syntax_mk__node(x_81, x_80); -return x_83; +x_78 = l_lean_parser_command_structure; +lean::inc(x_78); +x_80 = l_lean_parser_syntax_mk__node(x_78, x_77); +return x_80; } else { -obj* x_84; obj* x_87; obj* x_88; obj* x_90; obj* x_91; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_105; -x_84 = lean::cnstr_get(x_13, 0); -lean::inc(x_84); +obj* x_81; obj* x_84; obj* x_85; obj* x_87; obj* x_88; 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; +x_81 = lean::cnstr_get(x_13, 0); +lean::inc(x_81); lean::dec(x_13); -x_87 = l_lean_parser_command_structure__ctor_has__view; -x_88 = lean::cnstr_get(x_87, 1); -lean::inc(x_88); -x_90 = lean::apply_1(x_88, x_84); +x_84 = l_lean_parser_command_structure__ctor_has__view; +x_85 = lean::cnstr_get(x_84, 1); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_81); +x_88 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_88, 0, x_87); +lean::cnstr_set(x_88, 1, x_41); +lean::inc(x_38); +x_90 = l_lean_parser_syntax_mk__node(x_38, x_88); x_91 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_41); -lean::inc(x_38); -x_93 = l_lean_parser_syntax_mk__node(x_38, x_91); -x_94 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_43); +lean::cnstr_set(x_91, 1, x_42); +x_92 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_92, 0, x_34); +lean::cnstr_set(x_92, 1, x_91); +x_93 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_93); x_95 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_95, 0, x_34); -lean::cnstr_set(x_95, 1, x_94); -x_96 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_96); +lean::cnstr_set(x_95, 0, x_93); +lean::cnstr_set(x_95, 1, x_92); +x_96 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_96, 0, x_29); +lean::cnstr_set(x_96, 1, x_95); +x_97 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_97, 0, x_25); +lean::cnstr_set(x_97, 1, x_96); x_98 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_98, 0, x_96); -lean::cnstr_set(x_98, 1, x_95); +lean::cnstr_set(x_98, 0, x_43); +lean::cnstr_set(x_98, 1, x_97); x_99 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_99, 0, x_29); +lean::cnstr_set(x_99, 0, x_21); lean::cnstr_set(x_99, 1, x_98); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_25); -lean::cnstr_set(x_100, 1, x_99); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_44); -lean::cnstr_set(x_101, 1, x_100); -x_102 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_102, 0, x_21); -lean::cnstr_set(x_102, 1, x_101); -x_103 = l_lean_parser_command_structure; -lean::inc(x_103); -x_105 = l_lean_parser_syntax_mk__node(x_103, x_102); -return x_105; +x_100 = l_lean_parser_command_structure; +lean::inc(x_100); +x_102 = l_lean_parser_syntax_mk__node(x_100, x_99); +return x_102; } } -lbl_48: +lbl_47: { -obj* x_106; obj* x_107; obj* x_109; obj* x_111; obj* x_113; -x_106 = l_lean_parser_command_extends_has__view; -x_107 = lean::cnstr_get(x_106, 1); -lean::inc(x_107); -x_109 = lean::apply_1(x_107, x_47); -lean::inc(x_41); -x_111 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_111, 0, x_109); -lean::cnstr_set(x_111, 1, x_41); +obj* x_103; obj* x_104; obj* x_106; obj* x_107; obj* x_109; +x_103 = l_lean_parser_command_extends_has__view; +x_104 = lean::cnstr_get(x_103, 1); +lean::inc(x_104); +x_106 = lean::apply_1(x_104, x_46); +x_107 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_107, 0, x_106); +lean::cnstr_set(x_107, 1, x_41); lean::inc(x_38); -x_113 = l_lean_parser_syntax_mk__node(x_38, x_111); +x_109 = l_lean_parser_syntax_mk__node(x_38, x_107); if (lean::obj_tag(x_13) == 0) { -obj* x_115; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_126; -lean::dec(x_41); -x_115 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_115); +obj* x_110; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_121; +x_110 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_110); +x_112 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_112, 0, x_110); +lean::cnstr_set(x_112, 1, x_42); +x_113 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_113, 0, x_34); +lean::cnstr_set(x_113, 1, x_112); +x_114 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_114, 0, x_109); +lean::cnstr_set(x_114, 1, x_113); +x_115 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_115, 0, x_29); +lean::cnstr_set(x_115, 1, x_114); +x_116 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_116, 0, x_25); +lean::cnstr_set(x_116, 1, x_115); x_117 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_117, 0, x_115); -lean::cnstr_set(x_117, 1, x_43); +lean::cnstr_set(x_117, 0, x_45); +lean::cnstr_set(x_117, 1, x_116); x_118 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_118, 0, x_34); +lean::cnstr_set(x_118, 0, x_21); lean::cnstr_set(x_118, 1, x_117); -x_119 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_119, 0, x_113); -lean::cnstr_set(x_119, 1, x_118); -x_120 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_120, 0, x_29); -lean::cnstr_set(x_120, 1, x_119); -x_121 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_121, 0, x_25); -lean::cnstr_set(x_121, 1, x_120); -x_122 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_122, 0, x_46); -lean::cnstr_set(x_122, 1, x_121); -x_123 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_123, 0, x_21); -lean::cnstr_set(x_123, 1, x_122); -x_124 = l_lean_parser_command_structure; -lean::inc(x_124); -x_126 = l_lean_parser_syntax_mk__node(x_124, x_123); -return x_126; +x_119 = l_lean_parser_command_structure; +lean::inc(x_119); +x_121 = l_lean_parser_syntax_mk__node(x_119, x_118); +return x_121; } else { -obj* x_127; obj* x_130; obj* x_131; obj* x_133; obj* x_134; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_146; -x_127 = lean::cnstr_get(x_13, 0); -lean::inc(x_127); +obj* x_122; obj* x_125; obj* x_126; obj* x_128; obj* x_129; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_141; +x_122 = lean::cnstr_get(x_13, 0); +lean::inc(x_122); lean::dec(x_13); -x_130 = l_lean_parser_command_structure__ctor_has__view; -x_131 = lean::cnstr_get(x_130, 1); -lean::inc(x_131); -x_133 = lean::apply_1(x_131, x_127); -x_134 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_134, 0, x_133); -lean::cnstr_set(x_134, 1, x_41); +x_125 = l_lean_parser_command_structure__ctor_has__view; +x_126 = lean::cnstr_get(x_125, 1); +lean::inc(x_126); +x_128 = lean::apply_1(x_126, x_122); +x_129 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_129, 0, x_128); +lean::cnstr_set(x_129, 1, x_41); lean::inc(x_38); -x_136 = l_lean_parser_syntax_mk__node(x_38, x_134); +x_131 = l_lean_parser_syntax_mk__node(x_38, x_129); +x_132 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_132, 0, x_131); +lean::cnstr_set(x_132, 1, x_42); +x_133 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_133, 0, x_34); +lean::cnstr_set(x_133, 1, x_132); +x_134 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_134, 0, x_109); +lean::cnstr_set(x_134, 1, x_133); +x_135 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_135, 0, x_29); +lean::cnstr_set(x_135, 1, x_134); +x_136 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_136, 0, x_25); +lean::cnstr_set(x_136, 1, x_135); x_137 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_137, 0, x_136); -lean::cnstr_set(x_137, 1, x_43); +lean::cnstr_set(x_137, 0, x_45); +lean::cnstr_set(x_137, 1, x_136); x_138 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_138, 0, x_34); +lean::cnstr_set(x_138, 0, x_21); lean::cnstr_set(x_138, 1, x_137); -x_139 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_139, 0, x_113); -lean::cnstr_set(x_139, 1, x_138); -x_140 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_140, 0, x_29); -lean::cnstr_set(x_140, 1, x_139); -x_141 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_141, 0, x_25); -lean::cnstr_set(x_141, 1, x_140); -x_142 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_142, 0, x_46); -lean::cnstr_set(x_142, 1, x_141); -x_143 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_143, 0, x_21); -lean::cnstr_set(x_143, 1, x_142); -x_144 = l_lean_parser_command_structure; -lean::inc(x_144); -x_146 = l_lean_parser_syntax_mk__node(x_144, x_143); -return x_146; +x_139 = l_lean_parser_command_structure; +lean::inc(x_139); +x_141 = l_lean_parser_syntax_mk__node(x_139, x_138); +return x_141; } } } @@ -27283,7 +27132,7 @@ return x_0; obj* _init_l_lean_parser_command_structure_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* 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_17; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_60; obj* x_61; obj* x_62; obj* x_63; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_58; x_0 = lean::mk_string("structure"); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -27292,69 +27141,64 @@ x_4 = lean::mk_string("class"); lean::inc(x_1); x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_1); x_7 = lean::box(0); -lean::inc(x_7); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_6, x_7); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_3, x_9); -x_11 = l_lean_parser_tokens___rarg(x_10); -lean::inc(x_7); -x_13 = l_lean_parser_list_cons_tokens___rarg(x_11, x_7); -x_14 = l_lean_parser_tokens___rarg(x_13); -x_15 = l_lean_parser_command_old__univ__params_parser_lean_parser_has__tokens; -lean::inc(x_15); -x_17 = l_lean_parser_tokens___rarg(x_15); -x_18 = lean::mk_string("extends"); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_6, x_7); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_3, x_8); +x_10 = l_lean_parser_tokens___rarg(x_9); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_10, x_7); +x_12 = l_lean_parser_tokens___rarg(x_11); +x_13 = l_lean_parser_command_old__univ__params_parser_lean_parser_has__tokens; +lean::inc(x_13); +x_15 = l_lean_parser_tokens___rarg(x_13); +x_16 = lean::mk_string("extends"); lean::inc(x_1); -x_20 = l_lean_parser_symbol_tokens___rarg(x_18, x_1); -x_21 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_21); -x_23 = l_lean_parser_tokens___rarg(x_21); -x_24 = lean::mk_string(","); +x_18 = l_lean_parser_symbol_tokens___rarg(x_16, x_1); +x_19 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_19); +x_21 = l_lean_parser_tokens___rarg(x_19); +x_22 = lean::mk_string(","); lean::inc(x_1); -x_26 = l_lean_parser_symbol_tokens___rarg(x_24, x_1); -x_27 = l_lean_parser_combinators_sep__by1_tokens___rarg(x_23, x_26); -lean::inc(x_7); -x_29 = l_lean_parser_list_cons_tokens___rarg(x_27, x_7); -x_30 = l_lean_parser_list_cons_tokens___rarg(x_20, x_29); -x_31 = l_lean_parser_tokens___rarg(x_30); -x_32 = l_lean_parser_tokens___rarg(x_31); -x_33 = lean::mk_string(":="); +x_24 = l_lean_parser_symbol_tokens___rarg(x_22, x_1); +x_25 = l_lean_parser_combinators_sep__by1_tokens___rarg(x_21, x_24); +x_26 = l_lean_parser_list_cons_tokens___rarg(x_25, x_7); +x_27 = l_lean_parser_list_cons_tokens___rarg(x_18, x_26); +x_28 = l_lean_parser_tokens___rarg(x_27); +x_29 = l_lean_parser_tokens___rarg(x_28); +x_30 = lean::mk_string(":="); lean::inc(x_1); -x_35 = l_lean_parser_symbol_tokens___rarg(x_33, x_1); -x_36 = l_lean_parser_command_infer__modifier_parser_lean_parser_has__tokens; -lean::inc(x_36); -x_38 = l_lean_parser_tokens___rarg(x_36); -x_39 = lean::mk_string("::"); -x_40 = l_lean_parser_symbol_tokens___rarg(x_39, x_1); -lean::inc(x_7); -x_42 = l_lean_parser_list_cons_tokens___rarg(x_40, x_7); -x_43 = l_lean_parser_list_cons_tokens___rarg(x_38, x_42); -lean::inc(x_7); -x_45 = l_lean_parser_list_cons_tokens___rarg(x_7, x_43); -x_46 = l_lean_parser_tokens___rarg(x_45); -x_47 = l_lean_parser_tokens___rarg(x_46); -x_48 = l_lean_parser_command_structure__field__block_parser_lean_parser_has__tokens; -lean::inc(x_48); -x_50 = l_lean_parser_tokens___rarg(x_48); -x_51 = l_lean_parser_list_cons_tokens___rarg(x_50, x_7); -x_52 = l_lean_parser_list_cons_tokens___rarg(x_47, x_51); -x_53 = l_lean_parser_list_cons_tokens___rarg(x_35, x_52); -x_54 = l_lean_parser_list_cons_tokens___rarg(x_32, x_53); -x_55 = l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__tokens; -lean::inc(x_55); -x_57 = l_lean_parser_list_cons_tokens___rarg(x_55, x_54); -x_58 = l_lean_parser_command_ident__univ__params_parser_lean_parser_has__tokens; -lean::inc(x_58); -x_60 = l_lean_parser_list_cons_tokens___rarg(x_58, x_57); -x_61 = l_lean_parser_list_cons_tokens___rarg(x_17, x_60); -x_62 = l_lean_parser_list_cons_tokens___rarg(x_14, x_61); -x_63 = l_lean_parser_tokens___rarg(x_62); -return x_63; +x_32 = l_lean_parser_symbol_tokens___rarg(x_30, x_1); +x_33 = l_lean_parser_command_infer__modifier_parser_lean_parser_has__tokens; +lean::inc(x_33); +x_35 = l_lean_parser_tokens___rarg(x_33); +x_36 = lean::mk_string("::"); +x_37 = l_lean_parser_symbol_tokens___rarg(x_36, x_1); +x_38 = l_lean_parser_list_cons_tokens___rarg(x_37, x_7); +x_39 = l_lean_parser_list_cons_tokens___rarg(x_35, x_38); +x_40 = l_lean_parser_list_cons_tokens___rarg(x_7, x_39); +x_41 = l_lean_parser_tokens___rarg(x_40); +x_42 = l_lean_parser_tokens___rarg(x_41); +x_43 = l_lean_parser_command_structure__field__block_parser_lean_parser_has__tokens; +lean::inc(x_43); +x_45 = l_lean_parser_tokens___rarg(x_43); +x_46 = l_lean_parser_list_cons_tokens___rarg(x_45, x_7); +x_47 = l_lean_parser_list_cons_tokens___rarg(x_42, x_46); +x_48 = l_lean_parser_list_cons_tokens___rarg(x_32, x_47); +x_49 = l_lean_parser_list_cons_tokens___rarg(x_29, x_48); +x_50 = l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__tokens; +lean::inc(x_50); +x_52 = l_lean_parser_list_cons_tokens___rarg(x_50, x_49); +x_53 = l_lean_parser_command_ident__univ__params_parser_lean_parser_has__tokens; +lean::inc(x_53); +x_55 = l_lean_parser_list_cons_tokens___rarg(x_53, x_52); +x_56 = l_lean_parser_list_cons_tokens___rarg(x_15, x_55); +x_57 = l_lean_parser_list_cons_tokens___rarg(x_12, x_56); +x_58 = l_lean_parser_tokens___rarg(x_57); +return x_58; } } obj* _init_l_lean_parser_command_structure_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_40; uint8 x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_54; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_97; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_38; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_93; x_0 = lean::mk_string("structure"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -27377,163 +27221,159 @@ lean::closure_set(x_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); x_13 = lean::box(0); -lean::inc(x_13); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_12); +lean::cnstr_set(x_14, 1, x_13); x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_12); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_6); -lean::cnstr_set(x_16, 1, x_15); +lean::cnstr_set(x_15, 0, x_6); +lean::cnstr_set(x_15, 1, x_14); lean::inc(x_4); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_4); -lean::inc(x_13); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_13); -x_21 = l_lean_parser_command_structure__kw; -lean::inc(x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_20); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_old__univ__params_parser), 4, 0); -x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_25, 0, x_24); -x_26 = lean::mk_string("extends"); -x_27 = l_string_trim(x_26); -lean::inc(x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_29, 0, x_27); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_17, 0, x_15); +lean::closure_set(x_17, 1, x_4); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_17); +lean::cnstr_set(x_18, 1, x_13); +x_19 = l_lean_parser_command_structure__kw; +lean::inc(x_19); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_21, 0, x_19); +lean::closure_set(x_21, 1, x_18); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_old__univ__params_parser), 4, 0); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_23, 0, x_22); +x_24 = lean::mk_string("extends"); +x_25 = l_string_trim(x_24); +lean::inc(x_25); +x_27 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_27, 0, x_25); lean::inc(x_4); -x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_31, 0, x_27); -lean::closure_set(x_31, 1, x_4); -lean::closure_set(x_31, 2, x_29); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_29, 0, x_25); +lean::closure_set(x_29, 1, x_4); +lean::closure_set(x_29, 2, x_27); lean::inc(x_4); -x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_33, 0, x_4); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); -lean::closure_set(x_34, 0, x_33); -x_35 = lean::mk_string(","); -x_36 = l_string_trim(x_35); -lean::inc(x_36); -x_38 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_38, 0, x_36); +x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_31, 0, x_4); +x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); +lean::closure_set(x_32, 0, x_31); +x_33 = lean::mk_string(","); +x_34 = l_string_trim(x_33); +lean::inc(x_34); +x_36 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_36, 0, x_34); lean::inc(x_4); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_40, 0, x_36); -lean::closure_set(x_40, 1, x_4); -lean::closure_set(x_40, 2, x_38); -x_41 = 1; -x_42 = lean::box(x_41); -x_43 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__1___boxed), 7, 3); -lean::closure_set(x_43, 0, x_34); -lean::closure_set(x_43, 1, x_40); -lean::closure_set(x_43, 2, x_42); -lean::inc(x_13); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_13); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_31); -lean::cnstr_set(x_46, 1, x_45); -x_47 = l_lean_parser_command_extends; -lean::inc(x_47); -x_49 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_49, 0, x_47); -lean::closure_set(x_49, 1, x_46); -x_50 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_50, 0, x_49); -x_51 = lean::mk_string(":="); -x_52 = l_string_trim(x_51); -lean::inc(x_52); -x_54 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_54, 0, x_52); +x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_38, 0, x_34); +lean::closure_set(x_38, 1, x_4); +lean::closure_set(x_38, 2, x_36); +x_39 = 1; +x_40 = lean::box(x_39); +x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__1___boxed), 7, 3); +lean::closure_set(x_41, 0, x_32); +lean::closure_set(x_41, 1, x_38); +lean::closure_set(x_41, 2, x_40); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_41); +lean::cnstr_set(x_42, 1, x_13); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_29); +lean::cnstr_set(x_43, 1, x_42); +x_44 = l_lean_parser_command_extends; +lean::inc(x_44); +x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_46, 0, x_44); +lean::closure_set(x_46, 1, x_43); +x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_47, 0, x_46); +x_48 = lean::mk_string(":="); +x_49 = l_string_trim(x_48); +lean::inc(x_49); +x_51 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_51, 0, x_49); lean::inc(x_4); -x_56 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_56, 0, x_52); -lean::closure_set(x_56, 1, x_4); -lean::closure_set(x_56, 2, x_54); -x_57 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser), 4, 0); -x_58 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_58, 0, x_57); -x_59 = lean::mk_string("::"); -x_60 = l_string_trim(x_59); -lean::inc(x_60); -x_62 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_62, 0, x_60); -x_63 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_63, 0, x_60); -lean::closure_set(x_63, 1, x_4); -lean::closure_set(x_63, 2, x_62); -lean::inc(x_13); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_63); -lean::cnstr_set(x_65, 1, x_13); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_58); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1), 4, 0); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_67); -lean::cnstr_set(x_68, 1, x_66); -x_69 = l_lean_parser_command_structure__ctor; -lean::inc(x_69); -x_71 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_71, 0, x_69); -lean::closure_set(x_71, 1, x_68); -x_72 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_72, 0, x_71); -x_73 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_structure__field__block_parser), 4, 0); -x_74 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); -lean::closure_set(x_74, 0, x_73); -x_75 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_75, 0, x_74); -lean::cnstr_set(x_75, 1, x_13); +x_53 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_53, 0, x_49); +lean::closure_set(x_53, 1, x_4); +lean::closure_set(x_53, 2, x_51); +x_54 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser), 4, 0); +x_55 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_55, 0, x_54); +x_56 = lean::mk_string("::"); +x_57 = l_string_trim(x_56); +lean::inc(x_57); +x_59 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_59, 0, x_57); +x_60 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_60, 0, x_57); +lean::closure_set(x_60, 1, x_4); +lean::closure_set(x_60, 2, x_59); +x_61 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_61, 0, x_60); +lean::cnstr_set(x_61, 1, x_13); +x_62 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_62, 0, x_55); +lean::cnstr_set(x_62, 1, x_61); +x_63 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1), 4, 0); +x_64 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_64, 0, x_63); +lean::cnstr_set(x_64, 1, x_62); +x_65 = l_lean_parser_command_structure__ctor; +lean::inc(x_65); +x_67 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_67, 0, x_65); +lean::closure_set(x_67, 1, x_64); +x_68 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_68, 0, x_67); +x_69 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_structure__field__block_parser), 4, 0); +x_70 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); +lean::closure_set(x_70, 0, x_69); +x_71 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_71, 0, x_70); +lean::cnstr_set(x_71, 1, x_13); +x_72 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_72, 0, x_68); +lean::cnstr_set(x_72, 1, x_71); +x_73 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_73, 0, x_53); +lean::cnstr_set(x_73, 1, x_72); +x_74 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_74, 0, x_47); +lean::cnstr_set(x_74, 1, x_73); +x_75 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_opt__decl__sig_parser), 4, 0); x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_72); -lean::cnstr_set(x_76, 1, x_75); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_56); -lean::cnstr_set(x_77, 1, x_76); +lean::cnstr_set(x_76, 0, x_75); +lean::cnstr_set(x_76, 1, x_74); +x_77 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_ident__univ__params_parser), 4, 0); x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_50); -lean::cnstr_set(x_78, 1, x_77); -x_79 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_opt__decl__sig_parser), 4, 0); +lean::cnstr_set(x_78, 0, x_77); +lean::cnstr_set(x_78, 1, x_76); +x_79 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_79, 0, x_23); +lean::cnstr_set(x_79, 1, x_78); x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_78); -x_81 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_ident__univ__params_parser), 4, 0); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_81); -lean::cnstr_set(x_82, 1, x_80); -x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_25); -lean::cnstr_set(x_83, 1, x_82); -x_84 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_84, 0, x_23); -lean::cnstr_set(x_84, 1, x_83); -x_85 = l_lean_parser_command__parser__m_monad___closed__1; -x_86 = l_lean_parser_command__parser__m_monad__except___closed__1; -x_87 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -x_88 = l_lean_parser_command__parser__m_alternative___closed__1; -x_89 = l_lean_parser_command_structure; -x_90 = l_lean_parser_command_structure_has__view; -lean::inc(x_90); -lean::inc(x_89); -lean::inc(x_88); -lean::inc(x_87); +lean::cnstr_set(x_80, 0, x_21); +lean::cnstr_set(x_80, 1, x_79); +x_81 = l_lean_parser_command__parser__m_monad___closed__1; +x_82 = l_lean_parser_command__parser__m_monad__except___closed__1; +x_83 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; +x_84 = l_lean_parser_command__parser__m_alternative___closed__1; +x_85 = l_lean_parser_command_structure; +x_86 = l_lean_parser_command_structure_has__view; lean::inc(x_86); lean::inc(x_85); -x_97 = l_lean_parser_combinators_node_view___rarg(x_85, x_86, x_87, x_88, x_89, x_84, x_90); -return x_97; +lean::inc(x_84); +lean::inc(x_83); +lean::inc(x_82); +lean::inc(x_81); +x_93 = l_lean_parser_combinators_node_view___rarg(x_81, x_82, x_83, x_84, x_85, x_80, x_86); +return x_93; } } obj* _init_l_lean_parser_command_structure_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_40; uint8 x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_54; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_38; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; x_0 = lean::mk_string("structure"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -27556,144 +27396,140 @@ lean::closure_set(x_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); x_13 = lean::box(0); -lean::inc(x_13); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_12); +lean::cnstr_set(x_14, 1, x_13); x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_12); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_6); -lean::cnstr_set(x_16, 1, x_15); +lean::cnstr_set(x_15, 0, x_6); +lean::cnstr_set(x_15, 1, x_14); lean::inc(x_4); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_4); -lean::inc(x_13); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_13); -x_21 = l_lean_parser_command_structure__kw; -lean::inc(x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_20); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_old__univ__params_parser), 4, 0); -x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_25, 0, x_24); -x_26 = lean::mk_string("extends"); -x_27 = l_string_trim(x_26); -lean::inc(x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_29, 0, x_27); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_17, 0, x_15); +lean::closure_set(x_17, 1, x_4); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_17); +lean::cnstr_set(x_18, 1, x_13); +x_19 = l_lean_parser_command_structure__kw; +lean::inc(x_19); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_21, 0, x_19); +lean::closure_set(x_21, 1, x_18); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_old__univ__params_parser), 4, 0); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_23, 0, x_22); +x_24 = lean::mk_string("extends"); +x_25 = l_string_trim(x_24); +lean::inc(x_25); +x_27 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_27, 0, x_25); lean::inc(x_4); -x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_31, 0, x_27); -lean::closure_set(x_31, 1, x_4); -lean::closure_set(x_31, 2, x_29); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_29, 0, x_25); +lean::closure_set(x_29, 1, x_4); +lean::closure_set(x_29, 2, x_27); lean::inc(x_4); -x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_33, 0, x_4); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); -lean::closure_set(x_34, 0, x_33); -x_35 = lean::mk_string(","); -x_36 = l_string_trim(x_35); -lean::inc(x_36); -x_38 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_38, 0, x_36); +x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_31, 0, x_4); +x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); +lean::closure_set(x_32, 0, x_31); +x_33 = lean::mk_string(","); +x_34 = l_string_trim(x_33); +lean::inc(x_34); +x_36 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_36, 0, x_34); lean::inc(x_4); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_40, 0, x_36); -lean::closure_set(x_40, 1, x_4); -lean::closure_set(x_40, 2, x_38); -x_41 = 1; -x_42 = lean::box(x_41); -x_43 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__1___boxed), 7, 3); -lean::closure_set(x_43, 0, x_34); -lean::closure_set(x_43, 1, x_40); -lean::closure_set(x_43, 2, x_42); -lean::inc(x_13); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_13); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_31); -lean::cnstr_set(x_46, 1, x_45); -x_47 = l_lean_parser_command_extends; -lean::inc(x_47); -x_49 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_49, 0, x_47); -lean::closure_set(x_49, 1, x_46); -x_50 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_50, 0, x_49); -x_51 = lean::mk_string(":="); -x_52 = l_string_trim(x_51); -lean::inc(x_52); -x_54 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_54, 0, x_52); +x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_38, 0, x_34); +lean::closure_set(x_38, 1, x_4); +lean::closure_set(x_38, 2, x_36); +x_39 = 1; +x_40 = lean::box(x_39); +x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__1___boxed), 7, 3); +lean::closure_set(x_41, 0, x_32); +lean::closure_set(x_41, 1, x_38); +lean::closure_set(x_41, 2, x_40); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_41); +lean::cnstr_set(x_42, 1, x_13); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_29); +lean::cnstr_set(x_43, 1, x_42); +x_44 = l_lean_parser_command_extends; +lean::inc(x_44); +x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_46, 0, x_44); +lean::closure_set(x_46, 1, x_43); +x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_47, 0, x_46); +x_48 = lean::mk_string(":="); +x_49 = l_string_trim(x_48); +lean::inc(x_49); +x_51 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_51, 0, x_49); lean::inc(x_4); -x_56 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_56, 0, x_52); -lean::closure_set(x_56, 1, x_4); -lean::closure_set(x_56, 2, x_54); -x_57 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser), 4, 0); -x_58 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_58, 0, x_57); -x_59 = lean::mk_string("::"); -x_60 = l_string_trim(x_59); -lean::inc(x_60); -x_62 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_62, 0, x_60); -x_63 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_63, 0, x_60); -lean::closure_set(x_63, 1, x_4); -lean::closure_set(x_63, 2, x_62); -lean::inc(x_13); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_63); -lean::cnstr_set(x_65, 1, x_13); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_58); -lean::cnstr_set(x_66, 1, x_65); -x_67 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1), 4, 0); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_67); -lean::cnstr_set(x_68, 1, x_66); -x_69 = l_lean_parser_command_structure__ctor; -lean::inc(x_69); -x_71 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_71, 0, x_69); -lean::closure_set(x_71, 1, x_68); -x_72 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_72, 0, x_71); -x_73 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_structure__field__block_parser), 4, 0); -x_74 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); -lean::closure_set(x_74, 0, x_73); -x_75 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_75, 0, x_74); -lean::cnstr_set(x_75, 1, x_13); +x_53 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_53, 0, x_49); +lean::closure_set(x_53, 1, x_4); +lean::closure_set(x_53, 2, x_51); +x_54 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser), 4, 0); +x_55 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_55, 0, x_54); +x_56 = lean::mk_string("::"); +x_57 = l_string_trim(x_56); +lean::inc(x_57); +x_59 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_59, 0, x_57); +x_60 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_60, 0, x_57); +lean::closure_set(x_60, 1, x_4); +lean::closure_set(x_60, 2, x_59); +x_61 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_61, 0, x_60); +lean::cnstr_set(x_61, 1, x_13); +x_62 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_62, 0, x_55); +lean::cnstr_set(x_62, 1, x_61); +x_63 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1), 4, 0); +x_64 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_64, 0, x_63); +lean::cnstr_set(x_64, 1, x_62); +x_65 = l_lean_parser_command_structure__ctor; +lean::inc(x_65); +x_67 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_67, 0, x_65); +lean::closure_set(x_67, 1, x_64); +x_68 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_68, 0, x_67); +x_69 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_structure__field__block_parser), 4, 0); +x_70 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); +lean::closure_set(x_70, 0, x_69); +x_71 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_71, 0, x_70); +lean::cnstr_set(x_71, 1, x_13); +x_72 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_72, 0, x_68); +lean::cnstr_set(x_72, 1, x_71); +x_73 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_73, 0, x_53); +lean::cnstr_set(x_73, 1, x_72); +x_74 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_74, 0, x_47); +lean::cnstr_set(x_74, 1, x_73); +x_75 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_opt__decl__sig_parser), 4, 0); x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_72); -lean::cnstr_set(x_76, 1, x_75); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_56); -lean::cnstr_set(x_77, 1, x_76); +lean::cnstr_set(x_76, 0, x_75); +lean::cnstr_set(x_76, 1, x_74); +x_77 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_ident__univ__params_parser), 4, 0); x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_50); -lean::cnstr_set(x_78, 1, x_77); -x_79 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_opt__decl__sig_parser), 4, 0); +lean::cnstr_set(x_78, 0, x_77); +lean::cnstr_set(x_78, 1, x_76); +x_79 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_79, 0, x_23); +lean::cnstr_set(x_79, 1, x_78); x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_79); -lean::cnstr_set(x_80, 1, x_78); -x_81 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_ident__univ__params_parser), 4, 0); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_81); -lean::cnstr_set(x_82, 1, x_80); -x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_25); -lean::cnstr_set(x_83, 1, x_82); -x_84 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_84, 0, x_23); -lean::cnstr_set(x_84, 1, x_83); -return x_84; +lean::cnstr_set(x_80, 0, x_21); +lean::cnstr_set(x_80, 1, x_79); +return x_80; } } obj* l_lean_parser_command_structure_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -27998,50 +27834,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__4; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__4; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__4; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__4; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__4; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__4; +lean::inc(x_69); +return x_69; } } } @@ -28051,58 +27886,58 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__4; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__4; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); -if (x_77 == 0) +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); +if (x_76 == 0) { -obj* x_79; uint8 x_80; -x_79 = lean::mk_nat_obj(1u); -x_80 = lean::nat_dec_eq(x_2, x_79); -lean::dec(x_79); +obj* x_78; uint8 x_79; +x_78 = lean::mk_nat_obj(1u); +x_79 = lean::nat_dec_eq(x_2, x_78); +lean::dec(x_78); lean::dec(x_2); -if (x_80 == 0) +if (x_79 == 0) { switch (lean::obj_tag(x_1)) { case 0: { -obj* x_83; obj* x_86; obj* x_87; -x_83 = lean::cnstr_get(x_1, 0); -lean::inc(x_83); +obj* x_82; obj* x_85; obj* x_86; +x_82 = lean::cnstr_get(x_1, 0); +lean::inc(x_82); lean::dec(x_1); -x_86 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_86, 0, x_83); -x_87 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_87, 0, x_86); +x_85 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_85, 0, x_82); +x_86 = lean::alloc_cnstr(2, 1, 0); +lean::cnstr_set(x_86, 0, x_85); +return x_86; +} +case 3: +{ +obj* x_87; +x_87 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__1; +lean::inc(x_87); return x_87; } -case 3: -{ -obj* x_88; -x_88 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__1; -lean::inc(x_88); -return x_88; -} default: { -obj* x_91; +obj* x_90; lean::dec(x_1); -x_91 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__1; -lean::inc(x_91); -return x_91; +x_90 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__1; +lean::inc(x_90); +return x_90; } } } @@ -28111,30 +27946,30 @@ else switch (lean::obj_tag(x_1)) { case 0: { -obj* x_93; obj* x_96; obj* x_97; -x_93 = lean::cnstr_get(x_1, 0); -lean::inc(x_93); +obj* x_92; obj* x_95; obj* x_96; +x_92 = lean::cnstr_get(x_1, 0); +lean::inc(x_92); lean::dec(x_1); +x_95 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_95, 0, x_92); x_96 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_96, 0, x_93); -x_97 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_97, 0, x_96); -return x_97; +lean::cnstr_set(x_96, 0, x_95); +return x_96; } case 3: { -obj* x_98; -x_98 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__2; -lean::inc(x_98); -return x_98; +obj* x_97; +x_97 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__2; +lean::inc(x_97); +return x_97; } default: { -obj* x_101; +obj* x_100; lean::dec(x_1); -x_101 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__2; -lean::inc(x_101); -return x_101; +x_100 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__2; +lean::inc(x_100); +return x_100; } } } @@ -28145,30 +27980,30 @@ lean::dec(x_2); switch (lean::obj_tag(x_1)) { case 0: { -obj* x_104; obj* x_107; obj* x_108; -x_104 = lean::cnstr_get(x_1, 0); -lean::inc(x_104); +obj* x_103; obj* x_106; obj* x_107; +x_103 = lean::cnstr_get(x_1, 0); +lean::inc(x_103); lean::dec(x_1); -x_107 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_107, 0, x_104); -x_108 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_108, 0, x_107); -return x_108; +x_106 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_106, 0, x_103); +x_107 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_107, 0, x_106); +return x_107; } case 3: { -obj* x_109; -x_109 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__3; -lean::inc(x_109); -return x_109; +obj* x_108; +x_108 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__3; +lean::inc(x_108); +return x_108; } default: { -obj* x_112; +obj* x_111; lean::dec(x_1); -x_112 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__3; -lean::inc(x_112); -return x_112; +x_111 = l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__3; +lean::inc(x_111); +return x_111; } } } @@ -28183,7 +28018,7 @@ x_1 = lean::box(0); switch (lean::obj_tag(x_0)) { case 0: { -obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; +obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -28192,72 +28027,69 @@ lean::inc(x_5); x_7 = l_option_map___rarg(x_5, x_2); x_8 = lean::box(3); x_9 = l_option_get__or__else___main___rarg(x_7, x_8); -lean::inc(x_1); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_1); -x_12 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_12); -x_14 = l_lean_parser_syntax_mk__node(x_12, x_11); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_1); -x_16 = l_lean_parser_command_def__like_kind; -lean::inc(x_16); -x_18 = l_lean_parser_syntax_mk__node(x_16, x_15); -return x_18; +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_1); +x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_11); +x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_1); +x_15 = l_lean_parser_command_def__like_kind; +lean::inc(x_15); +x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); +return x_17; } case 1: { -obj* x_19; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; -x_19 = lean::cnstr_get(x_0, 0); -lean::inc(x_19); +obj* x_18; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; +x_18 = lean::cnstr_get(x_0, 0); +lean::inc(x_18); lean::dec(x_0); -x_22 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_22); -x_24 = l_option_map___rarg(x_22, x_19); -x_25 = lean::box(3); -x_26 = l_option_get__or__else___main___rarg(x_24, x_25); -lean::inc(x_1); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_1); -x_29 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_29); -x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_1); -x_33 = l_lean_parser_command_def__like_kind; -lean::inc(x_33); -x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); -return x_35; +x_21 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_21); +x_23 = l_option_map___rarg(x_21, x_18); +x_24 = lean::box(3); +x_25 = l_option_get__or__else___main___rarg(x_23, x_24); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_1); +x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_1); +x_31 = l_lean_parser_command_def__like_kind; +lean::inc(x_31); +x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); +return x_33; } default: { -obj* x_36; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_52; -x_36 = lean::cnstr_get(x_0, 0); -lean::inc(x_36); +obj* x_34; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; +x_34 = lean::cnstr_get(x_0, 0); +lean::inc(x_34); lean::dec(x_0); -x_39 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_39); -x_41 = l_option_map___rarg(x_39, x_36); -x_42 = lean::box(3); -x_43 = l_option_get__or__else___main___rarg(x_41, x_42); -lean::inc(x_1); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_1); -x_46 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; -lean::inc(x_46); -x_48 = l_lean_parser_syntax_mk__node(x_46, x_45); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_1); -x_50 = l_lean_parser_command_def__like_kind; -lean::inc(x_50); -x_52 = l_lean_parser_syntax_mk__node(x_50, x_49); -return x_52; +x_37 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_37); +x_39 = l_option_map___rarg(x_37, x_34); +x_40 = lean::box(3); +x_41 = l_option_get__or__else___main___rarg(x_39, x_40); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_41); +lean::cnstr_set(x_42, 1, x_1); +x_43 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; +lean::inc(x_43); +x_45 = l_lean_parser_syntax_mk__node(x_43, x_42); +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_45); +lean::cnstr_set(x_46, 1, x_1); +x_47 = l_lean_parser_command_def__like_kind; +lean::inc(x_47); +x_49 = l_lean_parser_syntax_mk__node(x_47, x_46); +return x_49; } } } @@ -28799,7 +28631,7 @@ return x_107; obj* l_lean_parser_command_def__like_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_13; obj* x_15; obj* 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_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_13; obj* x_15; obj* 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_29; obj* x_30; obj* x_31; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -28828,59 +28660,57 @@ x_25 = lean::cnstr_get(x_24, 1); lean::inc(x_25); x_27 = lean::apply_1(x_25, x_9); x_28 = lean::box(0); -lean::inc(x_28); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_27); +lean::cnstr_set(x_29, 1, x_28); x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_27); -lean::cnstr_set(x_30, 1, x_28); +lean::cnstr_set(x_30, 0, x_23); +lean::cnstr_set(x_30, 1, x_29); x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_23); +lean::cnstr_set(x_31, 0, x_19); lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_19); -lean::cnstr_set(x_32, 1, x_31); if (lean::obj_tag(x_3) == 0) { -obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_40; -lean::dec(x_28); -x_34 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set(x_36, 1, x_32); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_15); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_lean_parser_command_def__like; -lean::inc(x_38); -x_40 = l_lean_parser_syntax_mk__node(x_38, x_37); -return x_40; +obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_38; +x_32 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_32); +x_34 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_34, 0, x_32); +lean::cnstr_set(x_34, 1, x_31); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_15); +lean::cnstr_set(x_35, 1, x_34); +x_36 = l_lean_parser_command_def__like; +lean::inc(x_36); +x_38 = l_lean_parser_syntax_mk__node(x_36, x_35); +return x_38; } else { -obj* x_41; obj* x_44; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_56; -x_41 = lean::cnstr_get(x_3, 0); -lean::inc(x_41); +obj* x_39; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_54; +x_39 = lean::cnstr_get(x_3, 0); +lean::inc(x_39); lean::dec(x_3); -x_44 = l_lean_parser_command_old__univ__params_has__view; -x_45 = lean::cnstr_get(x_44, 1); -lean::inc(x_45); -x_47 = lean::apply_1(x_45, x_41); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_28); -x_49 = l_lean_parser_no__kind; -lean::inc(x_49); -x_51 = l_lean_parser_syntax_mk__node(x_49, x_48); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_32); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_15); -lean::cnstr_set(x_53, 1, x_52); -x_54 = l_lean_parser_command_def__like; -lean::inc(x_54); -x_56 = l_lean_parser_syntax_mk__node(x_54, x_53); -return x_56; +x_42 = l_lean_parser_command_old__univ__params_has__view; +x_43 = lean::cnstr_get(x_42, 1); +lean::inc(x_43); +x_45 = lean::apply_1(x_43, x_39); +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_45); +lean::cnstr_set(x_46, 1, x_28); +x_47 = l_lean_parser_no__kind; +lean::inc(x_47); +x_49 = l_lean_parser_syntax_mk__node(x_47, x_46); +x_50 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_50, 0, x_49); +lean::cnstr_set(x_50, 1, x_31); +x_51 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_51, 0, x_15); +lean::cnstr_set(x_51, 1, x_50); +x_52 = l_lean_parser_command_def__like; +lean::inc(x_52); +x_54 = l_lean_parser_syntax_mk__node(x_52, x_51); +return x_54; } } } @@ -29545,7 +29375,7 @@ return x_122; obj* l_lean_parser_command_instance_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; 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_25; obj* x_26; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; 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; obj* x_25; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -29569,56 +29399,54 @@ x_20 = lean::cnstr_get(x_19, 1); lean::inc(x_20); x_22 = lean::apply_1(x_20, x_7); x_23 = lean::box(0); -lean::inc(x_23); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_22); +lean::cnstr_set(x_24, 1, x_23); x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_22); -lean::cnstr_set(x_25, 1, x_23); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_18); -lean::cnstr_set(x_26, 1, x_25); +lean::cnstr_set(x_25, 0, x_18); +lean::cnstr_set(x_25, 1, x_24); if (lean::obj_tag(x_3) == 0) { -obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; -lean::dec(x_23); -x_28 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set(x_30, 1, x_26); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_14); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_lean_parser_command_instance; -lean::inc(x_32); -x_34 = l_lean_parser_syntax_mk__node(x_32, x_31); -return x_34; +obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_32; +x_26 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_26); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_26); +lean::cnstr_set(x_28, 1, x_25); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_14); +lean::cnstr_set(x_29, 1, x_28); +x_30 = l_lean_parser_command_instance; +lean::inc(x_30); +x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); +return x_32; } else { -obj* x_35; obj* x_38; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_50; -x_35 = lean::cnstr_get(x_3, 0); -lean::inc(x_35); +obj* x_33; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_48; +x_33 = lean::cnstr_get(x_3, 0); +lean::inc(x_33); lean::dec(x_3); -x_38 = l_lean_parser_command_ident__univ__params_has__view; -x_39 = lean::cnstr_get(x_38, 1); -lean::inc(x_39); -x_41 = lean::apply_1(x_39, x_35); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_23); -x_43 = l_lean_parser_no__kind; -lean::inc(x_43); -x_45 = l_lean_parser_syntax_mk__node(x_43, x_42); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_26); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_14); -lean::cnstr_set(x_47, 1, x_46); -x_48 = l_lean_parser_command_instance; -lean::inc(x_48); -x_50 = l_lean_parser_syntax_mk__node(x_48, x_47); -return x_50; +x_36 = l_lean_parser_command_ident__univ__params_has__view; +x_37 = lean::cnstr_get(x_36, 1); +lean::inc(x_37); +x_39 = lean::apply_1(x_37, x_33); +x_40 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_40, 0, x_39); +lean::cnstr_set(x_40, 1, x_23); +x_41 = l_lean_parser_no__kind; +lean::inc(x_41); +x_43 = l_lean_parser_syntax_mk__node(x_41, x_40); +x_44 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_44, 0, x_43); +lean::cnstr_set(x_44, 1, x_25); +x_45 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_45, 0, x_14); +lean::cnstr_set(x_45, 1, x_44); +x_46 = l_lean_parser_command_instance; +lean::inc(x_46); +x_48 = l_lean_parser_syntax_mk__node(x_46, x_45); +return x_48; } } } @@ -30309,50 +30137,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__3; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__3; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__3; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__3; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__3; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__3; +lean::inc(x_69); +return x_69; } } } @@ -30362,52 +30189,52 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__3; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__3; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { switch (lean::obj_tag(x_1)) { case 0: { -obj* x_80; obj* x_83; obj* x_84; -x_80 = lean::cnstr_get(x_1, 0); -lean::inc(x_80); +obj* x_79; obj* x_82; obj* x_83; +x_79 = lean::cnstr_get(x_1, 0); +lean::inc(x_79); lean::dec(x_1); +x_82 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_82, 0, x_79); x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_80); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +lean::cnstr_set(x_83, 0, x_82); +return x_83; } case 3: { -obj* x_85; -x_85 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__1; -lean::inc(x_85); -return x_85; +obj* x_84; +x_84 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__1; +lean::inc(x_84); +return x_84; } default: { -obj* x_88; +obj* x_87; lean::dec(x_1); -x_88 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__1; -lean::inc(x_88); -return x_88; +x_87 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__1; +lean::inc(x_87); +return x_87; } } } @@ -30416,30 +30243,30 @@ else switch (lean::obj_tag(x_1)) { case 0: { -obj* x_90; obj* x_93; obj* x_94; -x_90 = lean::cnstr_get(x_1, 0); -lean::inc(x_90); +obj* x_89; obj* x_92; obj* x_93; +x_89 = lean::cnstr_get(x_1, 0); +lean::inc(x_89); lean::dec(x_1); -x_93 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_93, 0, x_90); -x_94 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_94, 0, x_93); -return x_94; +x_92 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_92, 0, x_89); +x_93 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_93, 0, x_92); +return x_93; } case 3: { -obj* x_95; -x_95 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__2; -lean::inc(x_95); -return x_95; +obj* x_94; +x_94 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__2; +lean::inc(x_94); +return x_94; } default: { -obj* x_98; +obj* x_97; lean::dec(x_1); -x_98 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__2; -lean::inc(x_98); -return x_98; +x_97 = l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__2; +lean::inc(x_97); +return x_97; } } } @@ -30453,7 +30280,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; +obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -30462,46 +30289,44 @@ lean::inc(x_5); x_7 = l_option_map___rarg(x_5, x_2); x_8 = lean::box(3); x_9 = l_option_get__or__else___main___rarg(x_7, x_8); -lean::inc(x_1); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_1); -x_12 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_12); -x_14 = l_lean_parser_syntax_mk__node(x_12, x_11); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_1); -x_16 = l_lean_parser_command_constant__keyword; -lean::inc(x_16); -x_18 = l_lean_parser_syntax_mk__node(x_16, x_15); -return x_18; +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_1); +x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_11); +x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_1); +x_15 = l_lean_parser_command_constant__keyword; +lean::inc(x_15); +x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); +return x_17; } else { -obj* x_19; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; -x_19 = lean::cnstr_get(x_0, 0); -lean::inc(x_19); +obj* x_18; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; +x_18 = lean::cnstr_get(x_0, 0); +lean::inc(x_18); lean::dec(x_0); -x_22 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_22); -x_24 = l_option_map___rarg(x_22, x_19); -x_25 = lean::box(3); -x_26 = l_option_get__or__else___main___rarg(x_24, x_25); -lean::inc(x_1); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_1); -x_29 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_29); -x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_1); -x_33 = l_lean_parser_command_constant__keyword; -lean::inc(x_33); -x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); -return x_35; +x_21 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_21); +x_23 = l_option_map___rarg(x_21, x_18); +x_24 = lean::box(3); +x_25 = l_option_get__or__else___main___rarg(x_23, x_24); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_1); +x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_1); +x_31 = l_lean_parser_command_constant__keyword; +lean::inc(x_31); +x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); +return x_33; } } } @@ -32114,7 +31939,7 @@ return x_1; obj* l_lean_parser_command_inductive_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_13; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_38; obj* x_40; obj* x_41; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_13; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_38; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -32134,209 +31959,201 @@ x_16 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_16); x_18 = l_option_map___rarg(x_16, x_3); x_19 = lean::box(3); -lean::inc(x_19); -x_21 = l_option_get__or__else___main___rarg(x_18, x_19); -x_22 = lean::box(0); -lean::inc(x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_22); -x_25 = l_lean_parser_command_ident__univ__params_has__view; -x_26 = lean::cnstr_get(x_25, 1); -lean::inc(x_26); -x_28 = lean::apply_1(x_26, x_7); -x_29 = l_lean_parser_command_opt__decl__sig_has__view; -x_30 = lean::cnstr_get(x_29, 1); -lean::inc(x_30); -x_32 = lean::apply_1(x_30, x_9); -x_33 = l_lean_parser_command_inductive_has__view_x_27___lambda__2___closed__1; -lean::inc(x_33); -x_35 = l_list_map___main___rarg(x_33, x_13); -x_36 = l_lean_parser_no__kind; -lean::inc(x_36); -x_38 = l_lean_parser_syntax_mk__node(x_36, x_35); -lean::inc(x_22); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_38); -lean::cnstr_set(x_40, 1, x_22); +x_20 = l_option_get__or__else___main___rarg(x_18, x_19); +x_21 = lean::box(0); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 1, x_21); +x_23 = l_lean_parser_command_ident__univ__params_has__view; +x_24 = lean::cnstr_get(x_23, 1); +lean::inc(x_24); +x_26 = lean::apply_1(x_24, x_7); +x_27 = l_lean_parser_command_opt__decl__sig_has__view; +x_28 = lean::cnstr_get(x_27, 1); +lean::inc(x_28); +x_30 = lean::apply_1(x_28, x_9); +x_31 = l_lean_parser_command_inductive_has__view_x_27___lambda__2___closed__1; +lean::inc(x_31); +x_33 = l_list_map___main___rarg(x_31, x_13); +x_34 = l_lean_parser_no__kind; +lean::inc(x_34); +x_36 = l_lean_parser_syntax_mk__node(x_34, x_33); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_36); +lean::cnstr_set(x_37, 1, x_21); if (lean::obj_tag(x_1) == 0) { -obj* x_44; -lean::dec(x_19); -x_44 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_44); -x_41 = x_44; -goto lbl_42; +obj* x_40; +x_40 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_40); +x_38 = x_40; +goto lbl_39; } else { -obj* x_46; obj* x_50; obj* x_51; obj* x_53; obj* x_55; -x_46 = lean::cnstr_get(x_1, 0); -lean::inc(x_46); +obj* x_42; obj* x_46; obj* x_47; obj* x_48; obj* x_50; +x_42 = lean::cnstr_get(x_1, 0); +lean::inc(x_42); lean::dec(x_1); lean::inc(x_16); -x_50 = l_option_map___rarg(x_16, x_46); -x_51 = l_option_get__or__else___main___rarg(x_50, x_19); -lean::inc(x_22); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_51); -lean::cnstr_set(x_53, 1, x_22); -lean::inc(x_36); -x_55 = l_lean_parser_syntax_mk__node(x_36, x_53); -x_41 = x_55; -goto lbl_42; +x_46 = l_option_map___rarg(x_16, x_42); +x_47 = l_option_get__or__else___main___rarg(x_46, x_19); +x_48 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_48, 0, x_47); +lean::cnstr_set(x_48, 1, x_21); +lean::inc(x_34); +x_50 = l_lean_parser_syntax_mk__node(x_34, x_48); +x_38 = x_50; +goto lbl_39; } -lbl_42: +lbl_39: { -obj* x_56; obj* x_58; -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_41); -lean::cnstr_set(x_56, 1, x_24); -lean::inc(x_36); -x_58 = l_lean_parser_syntax_mk__node(x_36, x_56); +obj* x_51; obj* x_53; +x_51 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_51, 0, x_38); +lean::cnstr_set(x_51, 1, x_22); +lean::inc(x_34); +x_53 = l_lean_parser_syntax_mk__node(x_34, x_51); if (lean::obj_tag(x_5) == 0) { if (lean::obj_tag(x_11) == 0) { -obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_66; obj* x_67; obj* x_68; obj* x_70; -lean::dec(x_22); -x_60 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_60); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_60); -lean::cnstr_set(x_62, 1, x_40); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_32); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_28); -lean::cnstr_set(x_64, 1, x_63); -lean::inc(x_60); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_60); -lean::cnstr_set(x_66, 1, x_64); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_58); -lean::cnstr_set(x_67, 1, x_66); -x_68 = l_lean_parser_command_inductive; -lean::inc(x_68); -x_70 = l_lean_parser_syntax_mk__node(x_68, x_67); -return x_70; +obj* x_54; obj* x_56; obj* x_57; obj* x_58; obj* x_60; obj* x_61; obj* x_62; obj* x_64; +x_54 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_54); +x_56 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_56, 0, x_54); +lean::cnstr_set(x_56, 1, x_37); +x_57 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_57, 0, x_30); +lean::cnstr_set(x_57, 1, x_56); +x_58 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_58, 0, x_26); +lean::cnstr_set(x_58, 1, x_57); +lean::inc(x_54); +x_60 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_60, 0, x_54); +lean::cnstr_set(x_60, 1, x_58); +x_61 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_61, 0, x_53); +lean::cnstr_set(x_61, 1, x_60); +x_62 = l_lean_parser_command_inductive; +lean::inc(x_62); +x_64 = l_lean_parser_syntax_mk__node(x_62, x_61); +return x_64; } else { -obj* x_71; obj* x_74; obj* x_75; obj* x_77; obj* x_78; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_86; obj* x_87; obj* x_88; obj* x_90; -x_71 = lean::cnstr_get(x_11, 0); -lean::inc(x_71); +obj* x_65; obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_80; obj* x_81; obj* x_82; obj* x_84; +x_65 = lean::cnstr_get(x_11, 0); +lean::inc(x_65); lean::dec(x_11); -x_74 = l_lean_parser_command_notation__like_has__view; -x_75 = lean::cnstr_get(x_74, 1); -lean::inc(x_75); -x_77 = lean::apply_1(x_75, x_71); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_22); -lean::inc(x_36); -x_80 = l_lean_parser_syntax_mk__node(x_36, x_78); +x_68 = l_lean_parser_command_notation__like_has__view; +x_69 = lean::cnstr_get(x_68, 1); +lean::inc(x_69); +x_71 = lean::apply_1(x_69, x_65); +x_72 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_72, 0, x_71); +lean::cnstr_set(x_72, 1, x_21); +lean::inc(x_34); +x_74 = l_lean_parser_syntax_mk__node(x_34, x_72); +x_75 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_75, 0, x_74); +lean::cnstr_set(x_75, 1, x_37); +x_76 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_76, 0, x_30); +lean::cnstr_set(x_76, 1, x_75); +x_77 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_77, 0, x_26); +lean::cnstr_set(x_77, 1, x_76); +x_78 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_78); +x_80 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_80, 0, x_78); +lean::cnstr_set(x_80, 1, x_77); x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_80); -lean::cnstr_set(x_81, 1, x_40); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_32); -lean::cnstr_set(x_82, 1, x_81); -x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_28); -lean::cnstr_set(x_83, 1, x_82); -x_84 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_84); -x_86 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_86, 0, x_84); -lean::cnstr_set(x_86, 1, x_83); -x_87 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_87, 0, x_58); -lean::cnstr_set(x_87, 1, x_86); -x_88 = l_lean_parser_command_inductive; -lean::inc(x_88); -x_90 = l_lean_parser_syntax_mk__node(x_88, x_87); -return x_90; +lean::cnstr_set(x_81, 0, x_53); +lean::cnstr_set(x_81, 1, x_80); +x_82 = l_lean_parser_command_inductive; +lean::inc(x_82); +x_84 = l_lean_parser_syntax_mk__node(x_82, x_81); +return x_84; } } else { -obj* x_91; obj* x_94; obj* x_95; obj* x_97; obj* x_99; obj* x_101; -x_91 = lean::cnstr_get(x_5, 0); -lean::inc(x_91); +obj* x_85; obj* x_88; obj* x_89; obj* x_91; obj* x_92; obj* x_94; +x_85 = lean::cnstr_get(x_5, 0); +lean::inc(x_85); lean::dec(x_5); -x_94 = l_lean_parser_command_old__univ__params_has__view; -x_95 = lean::cnstr_get(x_94, 1); -lean::inc(x_95); -x_97 = lean::apply_1(x_95, x_91); -lean::inc(x_22); -x_99 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_99, 0, x_97); -lean::cnstr_set(x_99, 1, x_22); -lean::inc(x_36); -x_101 = l_lean_parser_syntax_mk__node(x_36, x_99); +x_88 = l_lean_parser_command_old__univ__params_has__view; +x_89 = lean::cnstr_get(x_88, 1); +lean::inc(x_89); +x_91 = lean::apply_1(x_89, x_85); +x_92 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_92, 0, x_91); +lean::cnstr_set(x_92, 1, x_21); +lean::inc(x_34); +x_94 = l_lean_parser_syntax_mk__node(x_34, x_92); if (lean::obj_tag(x_11) == 0) { -obj* x_103; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_112; -lean::dec(x_22); -x_103 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_103); -x_105 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_105, 0, x_103); -lean::cnstr_set(x_105, 1, x_40); -x_106 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_106, 0, x_32); -lean::cnstr_set(x_106, 1, x_105); -x_107 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_107, 0, x_28); -lean::cnstr_set(x_107, 1, x_106); -x_108 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_108, 0, x_101); -lean::cnstr_set(x_108, 1, x_107); -x_109 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_109, 0, x_58); -lean::cnstr_set(x_109, 1, x_108); -x_110 = l_lean_parser_command_inductive; -lean::inc(x_110); -x_112 = l_lean_parser_syntax_mk__node(x_110, x_109); -return x_112; +obj* x_95; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_104; +x_95 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_95); +x_97 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_97, 0, x_95); +lean::cnstr_set(x_97, 1, x_37); +x_98 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_98, 0, x_30); +lean::cnstr_set(x_98, 1, x_97); +x_99 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_99, 0, x_26); +lean::cnstr_set(x_99, 1, x_98); +x_100 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_100, 0, x_94); +lean::cnstr_set(x_100, 1, x_99); +x_101 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_101, 0, x_53); +lean::cnstr_set(x_101, 1, x_100); +x_102 = l_lean_parser_command_inductive; +lean::inc(x_102); +x_104 = l_lean_parser_syntax_mk__node(x_102, x_101); +return x_104; } else { -obj* x_113; obj* x_116; obj* x_117; obj* x_119; obj* x_120; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_130; -x_113 = lean::cnstr_get(x_11, 0); -lean::inc(x_113); +obj* x_105; obj* x_108; obj* x_109; obj* x_111; obj* x_112; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_122; +x_105 = lean::cnstr_get(x_11, 0); +lean::inc(x_105); lean::dec(x_11); -x_116 = l_lean_parser_command_notation__like_has__view; -x_117 = lean::cnstr_get(x_116, 1); -lean::inc(x_117); -x_119 = lean::apply_1(x_117, x_113); -x_120 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_120, 0, x_119); -lean::cnstr_set(x_120, 1, x_22); -lean::inc(x_36); -x_122 = l_lean_parser_syntax_mk__node(x_36, x_120); -x_123 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_123, 0, x_122); -lean::cnstr_set(x_123, 1, x_40); -x_124 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_124, 0, x_32); -lean::cnstr_set(x_124, 1, x_123); -x_125 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_125, 0, x_28); -lean::cnstr_set(x_125, 1, x_124); -x_126 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_126, 0, x_101); -lean::cnstr_set(x_126, 1, x_125); -x_127 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_127, 0, x_58); -lean::cnstr_set(x_127, 1, x_126); -x_128 = l_lean_parser_command_inductive; -lean::inc(x_128); -x_130 = l_lean_parser_syntax_mk__node(x_128, x_127); -return x_130; +x_108 = l_lean_parser_command_notation__like_has__view; +x_109 = lean::cnstr_get(x_108, 1); +lean::inc(x_109); +x_111 = lean::apply_1(x_109, x_105); +x_112 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_112, 0, x_111); +lean::cnstr_set(x_112, 1, x_21); +lean::inc(x_34); +x_114 = l_lean_parser_syntax_mk__node(x_34, x_112); +x_115 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_115, 0, x_114); +lean::cnstr_set(x_115, 1, x_37); +x_116 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_116, 0, x_30); +lean::cnstr_set(x_116, 1, x_115); +x_117 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_117, 0, x_26); +lean::cnstr_set(x_117, 1, x_116); +x_118 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_118, 0, x_94); +lean::cnstr_set(x_118, 1, x_117); +x_119 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_119, 0, x_53); +lean::cnstr_set(x_119, 1, x_118); +x_120 = l_lean_parser_command_inductive; +lean::inc(x_120); +x_122 = l_lean_parser_syntax_mk__node(x_120, x_119); +return x_122; } } } @@ -32617,50 +32434,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_declaration_inner_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_declaration_inner_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_declaration_inner_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_declaration_inner_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_declaration_inner_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_declaration_inner_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -32670,120 +32486,120 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_declaration_inner_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_declaration_inner_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); -if (x_77 == 0) +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); +if (x_76 == 0) { -obj* x_79; uint8 x_80; -x_79 = lean::mk_nat_obj(1u); -x_80 = lean::nat_dec_eq(x_2, x_79); -lean::dec(x_79); -if (x_80 == 0) +obj* x_78; uint8 x_79; +x_78 = lean::mk_nat_obj(1u); +x_79 = lean::nat_dec_eq(x_2, x_78); +lean::dec(x_78); +if (x_79 == 0) { -obj* x_82; uint8 x_83; -x_82 = lean::mk_nat_obj(2u); -x_83 = lean::nat_dec_eq(x_2, x_82); -lean::dec(x_82); -if (x_83 == 0) +obj* x_81; uint8 x_82; +x_81 = lean::mk_nat_obj(2u); +x_82 = lean::nat_dec_eq(x_2, x_81); +lean::dec(x_81); +if (x_82 == 0) { -obj* x_85; uint8 x_86; -x_85 = lean::mk_nat_obj(3u); -x_86 = lean::nat_dec_eq(x_2, x_85); -lean::dec(x_85); -if (x_86 == 0) +obj* x_84; uint8 x_85; +x_84 = lean::mk_nat_obj(3u); +x_85 = lean::nat_dec_eq(x_2, x_84); +lean::dec(x_84); +if (x_85 == 0) { -obj* x_88; uint8 x_89; -x_88 = lean::mk_nat_obj(4u); -x_89 = lean::nat_dec_eq(x_2, x_88); -lean::dec(x_88); +obj* x_87; uint8 x_88; +x_87 = lean::mk_nat_obj(4u); +x_88 = lean::nat_dec_eq(x_2, x_87); +lean::dec(x_87); lean::dec(x_2); -if (x_89 == 0) +if (x_88 == 0) { -obj* x_92; obj* x_93; obj* x_95; obj* x_96; -x_92 = l_lean_parser_command_structure_has__view; -x_93 = lean::cnstr_get(x_92, 0); -lean::inc(x_93); -x_95 = lean::apply_1(x_93, x_1); -x_96 = lean::alloc_cnstr(5, 1, 0); -lean::cnstr_set(x_96, 0, x_95); -return x_96; +obj* x_91; obj* x_92; obj* x_94; obj* x_95; +x_91 = l_lean_parser_command_structure_has__view; +x_92 = lean::cnstr_get(x_91, 0); +lean::inc(x_92); +x_94 = lean::apply_1(x_92, x_1); +x_95 = lean::alloc_cnstr(5, 1, 0); +lean::cnstr_set(x_95, 0, x_94); +return x_95; } else { -obj* x_97; obj* x_98; obj* x_100; obj* x_101; -x_97 = l_lean_parser_command_inductive_has__view; -x_98 = lean::cnstr_get(x_97, 0); -lean::inc(x_98); -x_100 = lean::apply_1(x_98, x_1); -x_101 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_101, 0, x_100); -return x_101; +obj* x_96; obj* x_97; obj* x_99; obj* x_100; +x_96 = l_lean_parser_command_inductive_has__view; +x_97 = lean::cnstr_get(x_96, 0); +lean::inc(x_97); +x_99 = lean::apply_1(x_97, x_1); +x_100 = lean::alloc_cnstr(4, 1, 0); +lean::cnstr_set(x_100, 0, x_99); +return x_100; } } else { -obj* x_103; obj* x_104; obj* x_106; obj* x_107; +obj* x_102; obj* x_103; obj* x_105; obj* x_106; lean::dec(x_2); -x_103 = l_lean_parser_command_constant_has__view; -x_104 = lean::cnstr_get(x_103, 0); -lean::inc(x_104); -x_106 = lean::apply_1(x_104, x_1); -x_107 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_107, 0, x_106); -return x_107; +x_102 = l_lean_parser_command_constant_has__view; +x_103 = lean::cnstr_get(x_102, 0); +lean::inc(x_103); +x_105 = lean::apply_1(x_103, x_1); +x_106 = lean::alloc_cnstr(3, 1, 0); +lean::cnstr_set(x_106, 0, x_105); +return x_106; } } else { -obj* x_109; obj* x_110; obj* x_112; obj* x_113; +obj* x_108; obj* x_109; obj* x_111; obj* x_112; lean::dec(x_2); -x_109 = l_lean_parser_command_example_has__view; -x_110 = lean::cnstr_get(x_109, 0); -lean::inc(x_110); -x_112 = lean::apply_1(x_110, x_1); -x_113 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_113, 0, x_112); -return x_113; +x_108 = l_lean_parser_command_example_has__view; +x_109 = lean::cnstr_get(x_108, 0); +lean::inc(x_109); +x_111 = lean::apply_1(x_109, x_1); +x_112 = lean::alloc_cnstr(2, 1, 0); +lean::cnstr_set(x_112, 0, x_111); +return x_112; } } else { -obj* x_115; obj* x_116; obj* x_118; obj* x_119; +obj* x_114; obj* x_115; obj* x_117; obj* x_118; lean::dec(x_2); -x_115 = l_lean_parser_command_instance_has__view; -x_116 = lean::cnstr_get(x_115, 0); -lean::inc(x_116); -x_118 = lean::apply_1(x_116, x_1); -x_119 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_119, 0, x_118); -return x_119; +x_114 = l_lean_parser_command_instance_has__view; +x_115 = lean::cnstr_get(x_114, 0); +lean::inc(x_115); +x_117 = lean::apply_1(x_115, x_1); +x_118 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_118, 0, x_117); +return x_118; } } else { -obj* x_121; obj* x_122; obj* x_124; obj* x_125; +obj* x_120; obj* x_121; obj* x_123; obj* x_124; lean::dec(x_2); -x_121 = l_lean_parser_command_def__like_has__view; -x_122 = lean::cnstr_get(x_121, 0); -lean::inc(x_122); -x_124 = lean::apply_1(x_122, x_1); -x_125 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_125, 0, x_124); -return x_125; +x_120 = l_lean_parser_command_def__like_has__view; +x_121 = lean::cnstr_get(x_120, 0); +lean::inc(x_121); +x_123 = lean::apply_1(x_121, x_1); +x_124 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_124, 0, x_123); +return x_124; } } } @@ -32796,7 +32612,7 @@ x_1 = lean::box(0); switch (lean::obj_tag(x_0)) { case 0: { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -32804,145 +32620,139 @@ x_5 = l_lean_parser_command_def__like_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_command_declaration_inner; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_command_declaration_inner; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } case 1: { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_command_instance_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_command_declaration_inner; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_command_instance_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_command_declaration_inner; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } case 2: { -obj* x_34; obj* x_37; obj* x_38; obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; -x_34 = lean::cnstr_get(x_0, 0); -lean::inc(x_34); +obj* x_32; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_46; +x_32 = lean::cnstr_get(x_0, 0); +lean::inc(x_32); lean::dec(x_0); -x_37 = l_lean_parser_command_example_has__view; -x_38 = lean::cnstr_get(x_37, 1); -lean::inc(x_38); -x_40 = lean::apply_1(x_38, x_34); -lean::inc(x_1); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_1); -x_43 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; -lean::inc(x_43); -x_45 = l_lean_parser_syntax_mk__node(x_43, x_42); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_1); -x_47 = l_lean_parser_command_declaration_inner; -lean::inc(x_47); -x_49 = l_lean_parser_syntax_mk__node(x_47, x_46); -return x_49; +x_35 = l_lean_parser_command_example_has__view; +x_36 = lean::cnstr_get(x_35, 1); +lean::inc(x_36); +x_38 = lean::apply_1(x_36, x_32); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_1); +x_40 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; +lean::inc(x_40); +x_42 = l_lean_parser_syntax_mk__node(x_40, x_39); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_1); +x_44 = l_lean_parser_command_declaration_inner; +lean::inc(x_44); +x_46 = l_lean_parser_syntax_mk__node(x_44, x_43); +return x_46; } case 3: { -obj* x_50; obj* x_53; obj* x_54; obj* x_56; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_65; -x_50 = lean::cnstr_get(x_0, 0); -lean::inc(x_50); +obj* x_47; obj* x_50; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_61; +x_47 = lean::cnstr_get(x_0, 0); +lean::inc(x_47); lean::dec(x_0); -x_53 = l_lean_parser_command_constant_has__view; -x_54 = lean::cnstr_get(x_53, 1); -lean::inc(x_54); -x_56 = lean::apply_1(x_54, x_50); -lean::inc(x_1); +x_50 = l_lean_parser_command_constant_has__view; +x_51 = lean::cnstr_get(x_50, 1); +lean::inc(x_51); +x_53 = lean::apply_1(x_51, x_47); +x_54 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_54, 0, x_53); +lean::cnstr_set(x_54, 1, x_1); +x_55 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +lean::inc(x_55); +x_57 = l_lean_parser_syntax_mk__node(x_55, x_54); x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_56); +lean::cnstr_set(x_58, 0, x_57); lean::cnstr_set(x_58, 1, x_1); -x_59 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +x_59 = l_lean_parser_command_declaration_inner; lean::inc(x_59); x_61 = l_lean_parser_syntax_mk__node(x_59, x_58); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_1); -x_63 = l_lean_parser_command_declaration_inner; -lean::inc(x_63); -x_65 = l_lean_parser_syntax_mk__node(x_63, x_62); -return x_65; +return x_61; } case 4: { -obj* x_66; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; obj* x_78; obj* x_79; obj* x_81; -x_66 = lean::cnstr_get(x_0, 0); -lean::inc(x_66); +obj* x_62; obj* x_65; obj* x_66; obj* x_68; obj* x_69; obj* x_70; obj* x_72; obj* x_73; obj* x_74; obj* x_76; +x_62 = lean::cnstr_get(x_0, 0); +lean::inc(x_62); lean::dec(x_0); -x_69 = l_lean_parser_command_inductive_has__view; -x_70 = lean::cnstr_get(x_69, 1); +x_65 = l_lean_parser_command_inductive_has__view; +x_66 = lean::cnstr_get(x_65, 1); +lean::inc(x_66); +x_68 = lean::apply_1(x_66, x_62); +x_69 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_69, 0, x_68); +lean::cnstr_set(x_69, 1, x_1); +x_70 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__2___closed__1; lean::inc(x_70); -x_72 = lean::apply_1(x_70, x_66); -lean::inc(x_1); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_72); -lean::cnstr_set(x_74, 1, x_1); -x_75 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__2___closed__1; -lean::inc(x_75); -x_77 = l_lean_parser_syntax_mk__node(x_75, x_74); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_1); -x_79 = l_lean_parser_command_declaration_inner; -lean::inc(x_79); -x_81 = l_lean_parser_syntax_mk__node(x_79, x_78); -return x_81; +x_72 = l_lean_parser_syntax_mk__node(x_70, x_69); +x_73 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_73, 0, x_72); +lean::cnstr_set(x_73, 1, x_1); +x_74 = l_lean_parser_command_declaration_inner; +lean::inc(x_74); +x_76 = l_lean_parser_syntax_mk__node(x_74, x_73); +return x_76; } default: { -obj* x_82; obj* x_85; obj* x_86; obj* x_88; obj* x_90; obj* x_91; obj* x_93; obj* x_94; obj* x_95; obj* x_97; -x_82 = lean::cnstr_get(x_0, 0); -lean::inc(x_82); +obj* x_77; obj* x_80; obj* x_81; obj* x_83; obj* x_84; obj* x_85; obj* x_87; obj* x_88; obj* x_89; obj* x_91; +x_77 = lean::cnstr_get(x_0, 0); +lean::inc(x_77); lean::dec(x_0); -x_85 = l_lean_parser_command_structure_has__view; -x_86 = lean::cnstr_get(x_85, 1); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_82); -lean::inc(x_1); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_88); -lean::cnstr_set(x_90, 1, x_1); -x_91 = l_lean_parser_level_leading_has__view_x_27___lambda__2___closed__2; -lean::inc(x_91); -x_93 = l_lean_parser_syntax_mk__node(x_91, x_90); -x_94 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_1); -x_95 = l_lean_parser_command_declaration_inner; -lean::inc(x_95); -x_97 = l_lean_parser_syntax_mk__node(x_95, x_94); -return x_97; +x_80 = l_lean_parser_command_structure_has__view; +x_81 = lean::cnstr_get(x_80, 1); +lean::inc(x_81); +x_83 = lean::apply_1(x_81, x_77); +x_84 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_84, 0, x_83); +lean::cnstr_set(x_84, 1, x_1); +x_85 = l_lean_parser_level_leading_has__view_x_27___lambda__2___closed__2; +lean::inc(x_85); +x_87 = l_lean_parser_syntax_mk__node(x_85, x_84); +x_88 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_88, 0, x_87); +lean::cnstr_set(x_88, 1, x_1); +x_89 = l_lean_parser_command_declaration_inner; +lean::inc(x_89); +x_91 = l_lean_parser_syntax_mk__node(x_89, x_88); +return x_91; } } } @@ -32987,21 +32797,20 @@ return x_8; obj* _init_l_lean_parser_command_declaration_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; x_0 = l_lean_parser_command_decl__modifiers_has__view; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::box(3); -lean::inc(x_3); -x_5 = lean::apply_1(x_1, x_3); -x_6 = l_lean_parser_command_declaration_inner_has__view; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_9 = lean::apply_1(x_7, x_3); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -return x_10; +x_4 = lean::apply_1(x_1, x_3); +x_5 = l_lean_parser_command_declaration_inner_has__view; +x_6 = lean::cnstr_get(x_5, 0); +lean::inc(x_6); +x_8 = lean::apply_1(x_6, x_3); +x_9 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_9, 0, x_4); +lean::cnstr_set(x_9, 1, x_8); +return x_9; } } obj* _init_l_lean_parser_command_declaration_has__view_x_27___lambda__1___closed__2() { @@ -33171,7 +32980,7 @@ return x_0; obj* _init_l_lean_parser_command_declaration_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_25; obj* x_26; obj* x_29; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_56; obj* x_57; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_69; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_87; obj* x_88; obj* x_89; obj* x_91; obj* x_93; obj* x_94; obj* x_96; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_118; obj* x_119; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_38; obj* x_39; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* 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_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; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_80; obj* x_81; obj* x_82; obj* x_84; obj* x_85; obj* x_86; obj* x_88; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_108; obj* x_109; x_0 = lean::mk_string("def"); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -33183,116 +32992,106 @@ x_7 = lean::mk_string("theorem"); lean::inc(x_1); x_9 = l_lean_parser_symbol_tokens___rarg(x_7, x_1); x_10 = lean::box(0); -lean::inc(x_10); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_9, x_10); -x_13 = l_lean_parser_list_cons_tokens___rarg(x_6, x_12); -x_14 = l_lean_parser_list_cons_tokens___rarg(x_3, x_13); -x_15 = l_lean_parser_tokens___rarg(x_14); -lean::inc(x_10); -x_17 = l_lean_parser_list_cons_tokens___rarg(x_15, x_10); -x_18 = l_lean_parser_tokens___rarg(x_17); -x_19 = l_lean_parser_command_old__univ__params_parser_lean_parser_has__tokens; -lean::inc(x_19); -x_21 = l_lean_parser_tokens___rarg(x_19); -x_22 = l_lean_parser_command_decl__val_parser_lean_parser_has__tokens; -lean::inc(x_10); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_9, x_10); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_6, x_11); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_3, x_12); +x_14 = l_lean_parser_tokens___rarg(x_13); +x_15 = l_lean_parser_list_cons_tokens___rarg(x_14, x_10); +x_16 = l_lean_parser_tokens___rarg(x_15); +x_17 = l_lean_parser_command_old__univ__params_parser_lean_parser_has__tokens; +lean::inc(x_17); +x_19 = l_lean_parser_tokens___rarg(x_17); +x_20 = l_lean_parser_command_decl__val_parser_lean_parser_has__tokens; +lean::inc(x_20); +x_22 = l_lean_parser_list_cons_tokens___rarg(x_20, x_10); +x_23 = l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__tokens; lean::inc(x_22); -x_25 = l_lean_parser_list_cons_tokens___rarg(x_22, x_10); -x_26 = l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__tokens; -lean::inc(x_25); -lean::inc(x_26); -x_29 = l_lean_parser_list_cons_tokens___rarg(x_26, x_25); -x_30 = l_lean_parser_command_ident__univ__params_parser_lean_parser_has__tokens; -lean::inc(x_30); -x_32 = l_lean_parser_list_cons_tokens___rarg(x_30, x_29); -lean::inc(x_21); -x_34 = l_lean_parser_list_cons_tokens___rarg(x_21, x_32); -x_35 = l_lean_parser_list_cons_tokens___rarg(x_18, x_34); -x_36 = l_lean_parser_tokens___rarg(x_35); -x_37 = lean::mk_string("instance"); +lean::inc(x_23); +x_26 = l_lean_parser_list_cons_tokens___rarg(x_23, x_22); +x_27 = l_lean_parser_command_ident__univ__params_parser_lean_parser_has__tokens; +lean::inc(x_27); +x_29 = l_lean_parser_list_cons_tokens___rarg(x_27, x_26); +lean::inc(x_19); +x_31 = l_lean_parser_list_cons_tokens___rarg(x_19, x_29); +x_32 = l_lean_parser_list_cons_tokens___rarg(x_16, x_31); +x_33 = l_lean_parser_tokens___rarg(x_32); +x_34 = lean::mk_string("instance"); lean::inc(x_1); -x_39 = l_lean_parser_symbol_tokens___rarg(x_37, x_1); -lean::inc(x_30); -x_41 = l_lean_parser_tokens___rarg(x_30); -x_42 = l_lean_parser_command_decl__sig_parser_lean_parser_has__tokens; -lean::inc(x_42); -x_44 = l_lean_parser_list_cons_tokens___rarg(x_42, x_25); -lean::inc(x_44); -x_46 = l_lean_parser_list_cons_tokens___rarg(x_41, x_44); -x_47 = l_lean_parser_list_cons_tokens___rarg(x_39, x_46); -x_48 = l_lean_parser_tokens___rarg(x_47); -x_49 = lean::mk_string("example"); +x_36 = l_lean_parser_symbol_tokens___rarg(x_34, x_1); +lean::inc(x_27); +x_38 = l_lean_parser_tokens___rarg(x_27); +x_39 = l_lean_parser_command_decl__sig_parser_lean_parser_has__tokens; +lean::inc(x_39); +x_41 = l_lean_parser_list_cons_tokens___rarg(x_39, x_22); +lean::inc(x_41); +x_43 = l_lean_parser_list_cons_tokens___rarg(x_38, x_41); +x_44 = l_lean_parser_list_cons_tokens___rarg(x_36, x_43); +x_45 = l_lean_parser_tokens___rarg(x_44); +x_46 = lean::mk_string("example"); lean::inc(x_1); -x_51 = l_lean_parser_symbol_tokens___rarg(x_49, x_1); -x_52 = l_lean_parser_list_cons_tokens___rarg(x_51, x_44); -x_53 = l_lean_parser_tokens___rarg(x_52); -x_54 = lean::mk_string("constant"); +x_48 = l_lean_parser_symbol_tokens___rarg(x_46, x_1); +x_49 = l_lean_parser_list_cons_tokens___rarg(x_48, x_41); +x_50 = l_lean_parser_tokens___rarg(x_49); +x_51 = lean::mk_string("constant"); +lean::inc(x_1); +x_53 = l_lean_parser_symbol_tokens___rarg(x_51, x_1); +x_54 = lean::mk_string("axiom"); lean::inc(x_1); x_56 = l_lean_parser_symbol_tokens___rarg(x_54, x_1); -x_57 = lean::mk_string("axiom"); +x_57 = l_lean_parser_list_cons_tokens___rarg(x_56, x_10); +x_58 = l_lean_parser_list_cons_tokens___rarg(x_53, x_57); +x_59 = l_lean_parser_tokens___rarg(x_58); +x_60 = l_lean_parser_list_cons_tokens___rarg(x_59, x_10); +x_61 = l_lean_parser_tokens___rarg(x_60); +lean::inc(x_39); +x_63 = l_lean_parser_list_cons_tokens___rarg(x_39, x_10); +lean::inc(x_27); +x_65 = l_lean_parser_list_cons_tokens___rarg(x_27, x_63); +x_66 = l_lean_parser_list_cons_tokens___rarg(x_61, x_65); +x_67 = l_lean_parser_tokens___rarg(x_66); +x_68 = lean::mk_string("class"); lean::inc(x_1); -x_59 = l_lean_parser_symbol_tokens___rarg(x_57, x_1); -lean::inc(x_10); -x_61 = l_lean_parser_list_cons_tokens___rarg(x_59, x_10); -x_62 = l_lean_parser_list_cons_tokens___rarg(x_56, x_61); -x_63 = l_lean_parser_tokens___rarg(x_62); -lean::inc(x_10); -x_65 = l_lean_parser_list_cons_tokens___rarg(x_63, x_10); -x_66 = l_lean_parser_tokens___rarg(x_65); -lean::inc(x_10); -lean::inc(x_42); -x_69 = l_lean_parser_list_cons_tokens___rarg(x_42, x_10); -lean::inc(x_30); -x_71 = l_lean_parser_list_cons_tokens___rarg(x_30, x_69); -x_72 = l_lean_parser_list_cons_tokens___rarg(x_66, x_71); -x_73 = l_lean_parser_tokens___rarg(x_72); -x_74 = lean::mk_string("class"); -lean::inc(x_1); -x_76 = l_lean_parser_symbol_tokens___rarg(x_74, x_1); +x_70 = l_lean_parser_symbol_tokens___rarg(x_68, x_1); +x_71 = l_lean_parser_tokens___rarg(x_70); +x_72 = lean::mk_string("inductive"); +x_73 = l_lean_parser_symbol_tokens___rarg(x_72, x_1); +x_74 = l_lean_parser_list_cons_tokens___rarg(x_73, x_10); +x_75 = l_lean_parser_list_cons_tokens___rarg(x_71, x_74); +x_76 = l_lean_parser_tokens___rarg(x_75); x_77 = l_lean_parser_tokens___rarg(x_76); -x_78 = lean::mk_string("inductive"); -x_79 = l_lean_parser_symbol_tokens___rarg(x_78, x_1); -lean::inc(x_10); -x_81 = l_lean_parser_list_cons_tokens___rarg(x_79, x_10); -x_82 = l_lean_parser_list_cons_tokens___rarg(x_77, x_81); -x_83 = l_lean_parser_tokens___rarg(x_82); -x_84 = l_lean_parser_tokens___rarg(x_83); -x_85 = l_lean_parser_command_notation__like_parser_lean_parser_has__tokens; -lean::inc(x_85); -x_87 = l_lean_parser_tokens___rarg(x_85); -x_88 = l_lean_parser_tokens___rarg(x_87); -x_89 = l_lean_parser_command_intro__rule_parser_lean_parser_has__tokens; -lean::inc(x_89); -x_91 = l_lean_parser_tokens___rarg(x_89); -lean::inc(x_10); -x_93 = l_lean_parser_list_cons_tokens___rarg(x_91, x_10); -x_94 = l_lean_parser_list_cons_tokens___rarg(x_88, x_93); -lean::inc(x_26); -x_96 = l_lean_parser_list_cons_tokens___rarg(x_26, x_94); -lean::inc(x_30); -x_98 = l_lean_parser_list_cons_tokens___rarg(x_30, x_96); -x_99 = l_lean_parser_list_cons_tokens___rarg(x_21, x_98); -x_100 = l_lean_parser_list_cons_tokens___rarg(x_84, x_99); -x_101 = l_lean_parser_tokens___rarg(x_100); -x_102 = l_lean_parser_command_structure_parser_lean_parser_has__tokens; -lean::inc(x_10); -lean::inc(x_102); -x_105 = l_lean_parser_list_cons_tokens___rarg(x_102, x_10); -x_106 = l_lean_parser_list_cons_tokens___rarg(x_101, x_105); -x_107 = l_lean_parser_list_cons_tokens___rarg(x_73, x_106); -x_108 = l_lean_parser_list_cons_tokens___rarg(x_53, x_107); -x_109 = l_lean_parser_list_cons_tokens___rarg(x_48, x_108); -x_110 = l_lean_parser_list_cons_tokens___rarg(x_36, x_109); -x_111 = l_lean_parser_tokens___rarg(x_110); -lean::inc(x_10); -x_113 = l_lean_parser_list_cons_tokens___rarg(x_111, x_10); -x_114 = l_lean_parser_tokens___rarg(x_113); -x_115 = l_lean_parser_list_cons_tokens___rarg(x_114, x_10); -x_116 = l_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens; -lean::inc(x_116); -x_118 = l_lean_parser_list_cons_tokens___rarg(x_116, x_115); -x_119 = l_lean_parser_tokens___rarg(x_118); -return x_119; +x_78 = l_lean_parser_command_notation__like_parser_lean_parser_has__tokens; +lean::inc(x_78); +x_80 = l_lean_parser_tokens___rarg(x_78); +x_81 = l_lean_parser_tokens___rarg(x_80); +x_82 = l_lean_parser_command_intro__rule_parser_lean_parser_has__tokens; +lean::inc(x_82); +x_84 = l_lean_parser_tokens___rarg(x_82); +x_85 = l_lean_parser_list_cons_tokens___rarg(x_84, x_10); +x_86 = l_lean_parser_list_cons_tokens___rarg(x_81, x_85); +lean::inc(x_23); +x_88 = l_lean_parser_list_cons_tokens___rarg(x_23, x_86); +lean::inc(x_27); +x_90 = l_lean_parser_list_cons_tokens___rarg(x_27, x_88); +x_91 = l_lean_parser_list_cons_tokens___rarg(x_19, x_90); +x_92 = l_lean_parser_list_cons_tokens___rarg(x_77, x_91); +x_93 = l_lean_parser_tokens___rarg(x_92); +x_94 = l_lean_parser_command_structure_parser_lean_parser_has__tokens; +lean::inc(x_94); +x_96 = l_lean_parser_list_cons_tokens___rarg(x_94, x_10); +x_97 = l_lean_parser_list_cons_tokens___rarg(x_93, x_96); +x_98 = l_lean_parser_list_cons_tokens___rarg(x_67, x_97); +x_99 = l_lean_parser_list_cons_tokens___rarg(x_50, x_98); +x_100 = l_lean_parser_list_cons_tokens___rarg(x_45, x_99); +x_101 = l_lean_parser_list_cons_tokens___rarg(x_33, x_100); +x_102 = l_lean_parser_tokens___rarg(x_101); +x_103 = l_lean_parser_list_cons_tokens___rarg(x_102, x_10); +x_104 = l_lean_parser_tokens___rarg(x_103); +x_105 = l_lean_parser_list_cons_tokens___rarg(x_104, x_10); +x_106 = l_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens; +lean::inc(x_106); +x_108 = l_lean_parser_list_cons_tokens___rarg(x_106, x_105); +x_109 = l_lean_parser_tokens___rarg(x_108); +return x_109; } } obj* l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -33328,7 +33127,7 @@ return x_14; obj* _init_l_lean_parser_command_declaration_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_39; obj* x_40; obj* x_42; obj* x_44; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_56; obj* x_57; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_69; obj* x_71; obj* x_72; obj* x_73; obj* x_75; obj* x_76; obj* x_77; obj* x_79; obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_87; obj* x_89; obj* x_90; obj* x_92; obj* x_94; obj* x_95; obj* x_97; obj* x_99; obj* x_101; obj* x_102; obj* x_103; obj* x_105; obj* x_106; obj* x_107; obj* x_109; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_116; obj* x_118; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_137; obj* x_138; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_148; obj* x_149; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_167; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_36; obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_66; obj* x_68; obj* x_69; obj* x_70; obj* x_72; obj* x_73; obj* x_74; obj* x_76; obj* x_78; obj* x_79; obj* x_80; obj* x_82; obj* x_84; obj* x_85; obj* x_86; obj* x_88; obj* x_89; obj* x_90; obj* x_92; obj* x_93; obj* x_95; obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_101; obj* x_103; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_110; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_157; x_0 = lean::mk_string("def"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -33361,286 +33160,276 @@ lean::closure_set(x_18, 0, x_14); lean::closure_set(x_18, 1, x_4); lean::closure_set(x_18, 2, x_16); x_19 = lean::box(0); -lean::inc(x_19); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_18); +lean::cnstr_set(x_20, 1, x_19); x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_18); -lean::cnstr_set(x_21, 1, x_19); +lean::cnstr_set(x_21, 0, x_12); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_12); +lean::cnstr_set(x_22, 0, x_6); lean::cnstr_set(x_22, 1, x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_6); -lean::cnstr_set(x_23, 1, x_22); lean::inc(x_4); -x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_25, 0, x_23); -lean::closure_set(x_25, 1, x_4); -lean::inc(x_19); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_19); -x_28 = l_lean_parser_command_def__like_kind; -lean::inc(x_28); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_30, 0, x_28); -lean::closure_set(x_30, 1, x_27); -x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_old__univ__params_parser), 4, 0); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_32, 0, x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__val_parser), 4, 0); -lean::inc(x_19); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_33); -lean::cnstr_set(x_35, 1, x_19); -x_36 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_opt__decl__sig_parser), 4, 0); -lean::inc(x_35); -lean::inc(x_36); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_36); -lean::cnstr_set(x_39, 1, x_35); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_ident__univ__params_parser), 4, 0); -lean::inc(x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_39); +x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_24, 0, x_22); +lean::closure_set(x_24, 1, x_4); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_19); +x_26 = l_lean_parser_command_def__like_kind; +lean::inc(x_26); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_28, 0, x_26); +lean::closure_set(x_28, 1, x_25); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_old__univ__params_parser), 4, 0); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_30, 0, x_29); +x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__val_parser), 4, 0); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_31); +lean::cnstr_set(x_32, 1, x_19); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_opt__decl__sig_parser), 4, 0); lean::inc(x_32); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_32); -lean::cnstr_set(x_44, 1, x_42); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_30); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_lean_parser_command_def__like; -lean::inc(x_46); -x_48 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_48, 0, x_46); -lean::closure_set(x_48, 1, x_45); -x_49 = lean::mk_string("instance"); -x_50 = l_string_trim(x_49); -lean::inc(x_50); -x_52 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_52, 0, x_50); +lean::inc(x_33); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_33); +lean::cnstr_set(x_36, 1, x_32); +x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_ident__univ__params_parser), 4, 0); +lean::inc(x_37); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_37); +lean::cnstr_set(x_39, 1, x_36); +lean::inc(x_30); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_30); +lean::cnstr_set(x_41, 1, x_39); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_28); +lean::cnstr_set(x_42, 1, x_41); +x_43 = l_lean_parser_command_def__like; +lean::inc(x_43); +x_45 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_45, 0, x_43); +lean::closure_set(x_45, 1, x_42); +x_46 = lean::mk_string("instance"); +x_47 = l_string_trim(x_46); +lean::inc(x_47); +x_49 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_49, 0, x_47); lean::inc(x_4); -x_54 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_54, 0, x_50); -lean::closure_set(x_54, 1, x_4); -lean::closure_set(x_54, 2, x_52); -lean::inc(x_40); -x_56 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_56, 0, x_40); -x_57 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__sig_parser), 4, 0); -lean::inc(x_57); +x_51 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_51, 0, x_47); +lean::closure_set(x_51, 1, x_4); +lean::closure_set(x_51, 2, x_49); +lean::inc(x_37); +x_53 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_53, 0, x_37); +x_54 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__sig_parser), 4, 0); +lean::inc(x_54); +x_56 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_56, 0, x_54); +lean::cnstr_set(x_56, 1, x_32); +lean::inc(x_56); +x_58 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_58, 0, x_53); +lean::cnstr_set(x_58, 1, x_56); x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_57); -lean::cnstr_set(x_59, 1, x_35); -lean::inc(x_59); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_56); -lean::cnstr_set(x_61, 1, x_59); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_54); -lean::cnstr_set(x_62, 1, x_61); -x_63 = l_lean_parser_command_instance; -lean::inc(x_63); -x_65 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_65, 0, x_63); -lean::closure_set(x_65, 1, x_62); -x_66 = lean::mk_string("example"); -x_67 = l_string_trim(x_66); -lean::inc(x_67); -x_69 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_69, 0, x_67); +lean::cnstr_set(x_59, 0, x_51); +lean::cnstr_set(x_59, 1, x_58); +x_60 = l_lean_parser_command_instance; +lean::inc(x_60); +x_62 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_62, 0, x_60); +lean::closure_set(x_62, 1, x_59); +x_63 = lean::mk_string("example"); +x_64 = l_string_trim(x_63); +lean::inc(x_64); +x_66 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_66, 0, x_64); lean::inc(x_4); -x_71 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_71, 0, x_67); -lean::closure_set(x_71, 1, x_4); -lean::closure_set(x_71, 2, x_69); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_59); -x_73 = l_lean_parser_command_example; -lean::inc(x_73); -x_75 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_75, 0, x_73); -lean::closure_set(x_75, 1, x_72); -x_76 = lean::mk_string("constant"); -x_77 = l_string_trim(x_76); -lean::inc(x_77); -x_79 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_79, 0, x_77); +x_68 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_68, 0, x_64); +lean::closure_set(x_68, 1, x_4); +lean::closure_set(x_68, 2, x_66); +x_69 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_69, 0, x_68); +lean::cnstr_set(x_69, 1, x_56); +x_70 = l_lean_parser_command_example; +lean::inc(x_70); +x_72 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_72, 0, x_70); +lean::closure_set(x_72, 1, x_69); +x_73 = lean::mk_string("constant"); +x_74 = l_string_trim(x_73); +lean::inc(x_74); +x_76 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_76, 0, x_74); lean::inc(x_4); -x_81 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_81, 0, x_77); -lean::closure_set(x_81, 1, x_4); -lean::closure_set(x_81, 2, x_79); -x_82 = lean::mk_string("axiom"); -x_83 = l_string_trim(x_82); -lean::inc(x_83); -x_85 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_85, 0, x_83); +x_78 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_78, 0, x_74); +lean::closure_set(x_78, 1, x_4); +lean::closure_set(x_78, 2, x_76); +x_79 = lean::mk_string("axiom"); +x_80 = l_string_trim(x_79); +lean::inc(x_80); +x_82 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_82, 0, x_80); lean::inc(x_4); -x_87 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_87, 0, x_83); -lean::closure_set(x_87, 1, x_4); -lean::closure_set(x_87, 2, x_85); -lean::inc(x_19); +x_84 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_84, 0, x_80); +lean::closure_set(x_84, 1, x_4); +lean::closure_set(x_84, 2, x_82); +x_85 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_85, 0, x_84); +lean::cnstr_set(x_85, 1, x_19); +x_86 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_86, 0, x_78); +lean::cnstr_set(x_86, 1, x_85); +lean::inc(x_4); +x_88 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_88, 0, x_86); +lean::closure_set(x_88, 1, x_4); x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_87); +lean::cnstr_set(x_89, 0, x_88); lean::cnstr_set(x_89, 1, x_19); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_81); -lean::cnstr_set(x_90, 1, x_89); -lean::inc(x_4); -x_92 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +x_90 = l_lean_parser_command_constant__keyword; +lean::inc(x_90); +x_92 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); lean::closure_set(x_92, 0, x_90); -lean::closure_set(x_92, 1, x_4); -lean::inc(x_19); -x_94 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_94, 0, x_92); -lean::cnstr_set(x_94, 1, x_19); -x_95 = l_lean_parser_command_constant__keyword; -lean::inc(x_95); -x_97 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_97, 0, x_95); -lean::closure_set(x_97, 1, x_94); -lean::inc(x_19); -x_99 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_99, 0, x_57); -lean::cnstr_set(x_99, 1, x_19); -lean::inc(x_40); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_40); -lean::cnstr_set(x_101, 1, x_99); -x_102 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_102, 0, x_97); -lean::cnstr_set(x_102, 1, x_101); -x_103 = l_lean_parser_command_constant; -lean::inc(x_103); -x_105 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_105, 0, x_103); -lean::closure_set(x_105, 1, x_102); -x_106 = lean::mk_string("class"); -x_107 = l_string_trim(x_106); -lean::inc(x_107); -x_109 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_109, 0, x_107); +lean::closure_set(x_92, 1, x_89); +x_93 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_93, 0, x_54); +lean::cnstr_set(x_93, 1, x_19); +lean::inc(x_37); +x_95 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_95, 0, x_37); +lean::cnstr_set(x_95, 1, x_93); +x_96 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_96, 0, x_92); +lean::cnstr_set(x_96, 1, x_95); +x_97 = l_lean_parser_command_constant; +lean::inc(x_97); +x_99 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_99, 0, x_97); +lean::closure_set(x_99, 1, x_96); +x_100 = lean::mk_string("class"); +x_101 = l_string_trim(x_100); +lean::inc(x_101); +x_103 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_103, 0, x_101); lean::inc(x_4); -x_111 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_111, 0, x_107); -lean::closure_set(x_111, 1, x_4); -lean::closure_set(x_111, 2, x_109); -x_112 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_112, 0, x_111); -x_113 = lean::mk_string("inductive"); -x_114 = l_string_trim(x_113); -lean::inc(x_114); -x_116 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_116, 0, x_114); +x_105 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_105, 0, x_101); +lean::closure_set(x_105, 1, x_4); +lean::closure_set(x_105, 2, x_103); +x_106 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_106, 0, x_105); +x_107 = lean::mk_string("inductive"); +x_108 = l_string_trim(x_107); +lean::inc(x_108); +x_110 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_110, 0, x_108); lean::inc(x_4); -x_118 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_118, 0, x_114); -lean::closure_set(x_118, 1, x_4); -lean::closure_set(x_118, 2, x_116); -lean::inc(x_19); -x_120 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_120, 0, x_118); -lean::cnstr_set(x_120, 1, x_19); +x_112 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_112, 0, x_108); +lean::closure_set(x_112, 1, x_4); +lean::closure_set(x_112, 2, x_110); +x_113 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_113, 0, x_112); +lean::cnstr_set(x_113, 1, x_19); +x_114 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_114, 0, x_106); +lean::cnstr_set(x_114, 1, x_113); +x_115 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); +lean::closure_set(x_115, 0, x_114); +x_116 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__like_parser), 5, 0); +x_117 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); +lean::closure_set(x_117, 0, x_116); +x_118 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_118, 0, x_117); +x_119 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_intro__rule_parser), 4, 0); +x_120 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); +lean::closure_set(x_120, 0, x_119); x_121 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_121, 0, x_112); -lean::cnstr_set(x_121, 1, x_120); -x_122 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); -lean::closure_set(x_122, 0, x_121); -x_123 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__like_parser), 5, 0); -x_124 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); -lean::closure_set(x_124, 0, x_123); -x_125 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_125, 0, x_124); -x_126 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_intro__rule_parser), 4, 0); -x_127 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); -lean::closure_set(x_127, 0, x_126); -lean::inc(x_19); -x_129 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_129, 0, x_127); -lean::cnstr_set(x_129, 1, x_19); -x_130 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_130, 0, x_125); -lean::cnstr_set(x_130, 1, x_129); +lean::cnstr_set(x_121, 0, x_120); +lean::cnstr_set(x_121, 1, x_19); +x_122 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_122, 0, x_118); +lean::cnstr_set(x_122, 1, x_121); +x_123 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_123, 0, x_33); +lean::cnstr_set(x_123, 1, x_122); +x_124 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_124, 0, x_37); +lean::cnstr_set(x_124, 1, x_123); +x_125 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_125, 0, x_30); +lean::cnstr_set(x_125, 1, x_124); +x_126 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_126, 0, x_115); +lean::cnstr_set(x_126, 1, x_125); +x_127 = l_lean_parser_command_inductive; +lean::inc(x_127); +x_129 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_129, 0, x_127); +lean::closure_set(x_129, 1, x_126); +x_130 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_structure_parser), 4, 0); x_131 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_131, 0, x_36); -lean::cnstr_set(x_131, 1, x_130); +lean::cnstr_set(x_131, 0, x_130); +lean::cnstr_set(x_131, 1, x_19); x_132 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_132, 0, x_40); +lean::cnstr_set(x_132, 0, x_129); lean::cnstr_set(x_132, 1, x_131); x_133 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_133, 0, x_32); +lean::cnstr_set(x_133, 0, x_99); lean::cnstr_set(x_133, 1, x_132); x_134 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_134, 0, x_122); +lean::cnstr_set(x_134, 0, x_72); lean::cnstr_set(x_134, 1, x_133); -x_135 = l_lean_parser_command_inductive; -lean::inc(x_135); -x_137 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_137, 0, x_135); -lean::closure_set(x_137, 1, x_134); -x_138 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_structure_parser), 4, 0); -lean::inc(x_19); -x_140 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_140, 0, x_138); -lean::cnstr_set(x_140, 1, x_19); -x_141 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_141, 0, x_137); -lean::cnstr_set(x_141, 1, x_140); +x_135 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_135, 0, x_62); +lean::cnstr_set(x_135, 1, x_134); +x_136 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_136, 0, x_45); +lean::cnstr_set(x_136, 1, x_135); +x_137 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_137, 0, x_136); +lean::closure_set(x_137, 1, x_4); +x_138 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_138, 0, x_137); +lean::cnstr_set(x_138, 1, x_19); +x_139 = l_lean_parser_command_declaration_inner; +lean::inc(x_139); +x_141 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_141, 0, x_139); +lean::closure_set(x_141, 1, x_138); x_142 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_142, 0, x_105); -lean::cnstr_set(x_142, 1, x_141); -x_143 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_143, 0, x_75); -lean::cnstr_set(x_143, 1, x_142); +lean::cnstr_set(x_142, 0, x_141); +lean::cnstr_set(x_142, 1, x_19); +x_143 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__modifiers_parser), 4, 0); x_144 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_144, 0, x_65); -lean::cnstr_set(x_144, 1, x_143); -x_145 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_145, 0, x_48); -lean::cnstr_set(x_145, 1, x_144); -x_146 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_146, 0, x_145); -lean::closure_set(x_146, 1, x_4); -lean::inc(x_19); -x_148 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_148, 0, x_146); -lean::cnstr_set(x_148, 1, x_19); -x_149 = l_lean_parser_command_declaration_inner; +lean::cnstr_set(x_144, 0, x_143); +lean::cnstr_set(x_144, 1, x_142); +x_145 = l_lean_parser_command__parser__m_monad___closed__1; +x_146 = l_lean_parser_command__parser__m_monad__except___closed__1; +x_147 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; +x_148 = l_lean_parser_command__parser__m_alternative___closed__1; +x_149 = l_lean_parser_command_declaration; +x_150 = l_lean_parser_command_declaration_has__view; +lean::inc(x_150); lean::inc(x_149); -x_151 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_151, 0, x_149); -lean::closure_set(x_151, 1, x_148); -x_152 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_152, 0, x_151); -lean::cnstr_set(x_152, 1, x_19); -x_153 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__modifiers_parser), 4, 0); -x_154 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_154, 0, x_153); -lean::cnstr_set(x_154, 1, x_152); -x_155 = l_lean_parser_command__parser__m_monad___closed__1; -x_156 = l_lean_parser_command__parser__m_monad__except___closed__1; -x_157 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -x_158 = l_lean_parser_command__parser__m_alternative___closed__1; -x_159 = l_lean_parser_command_declaration; -x_160 = l_lean_parser_command_declaration_has__view; -lean::inc(x_160); -lean::inc(x_159); -lean::inc(x_158); -lean::inc(x_157); -lean::inc(x_156); -lean::inc(x_155); -x_167 = l_lean_parser_combinators_node_view___rarg(x_155, x_156, x_157, x_158, x_159, x_154, x_160); -return x_167; +lean::inc(x_148); +lean::inc(x_147); +lean::inc(x_146); +lean::inc(x_145); +x_157 = l_lean_parser_combinators_node_view___rarg(x_145, x_146, x_147, x_148, x_149, x_144, x_150); +return x_157; } } obj* _init_l_lean_parser_command_declaration_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_39; obj* x_40; obj* x_42; obj* x_44; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_56; obj* x_57; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_69; obj* x_71; obj* x_72; obj* x_73; obj* x_75; obj* x_76; obj* x_77; obj* x_79; obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_87; obj* x_89; obj* x_90; obj* x_92; obj* x_94; obj* x_95; obj* x_97; obj* x_99; obj* x_101; obj* x_102; obj* x_103; obj* x_105; obj* x_106; obj* x_107; obj* x_109; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_116; obj* x_118; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_137; obj* x_138; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_148; obj* x_149; obj* x_151; obj* x_152; obj* x_153; obj* x_154; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_36; obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_66; obj* x_68; obj* x_69; obj* x_70; obj* x_72; obj* x_73; obj* x_74; obj* x_76; obj* x_78; obj* x_79; obj* x_80; obj* x_82; obj* x_84; obj* x_85; obj* x_86; obj* x_88; obj* x_89; obj* x_90; obj* x_92; obj* x_93; obj* x_95; obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_101; obj* x_103; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_110; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_141; obj* x_142; obj* x_143; obj* x_144; x_0 = lean::mk_string("def"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -33673,267 +33462,257 @@ lean::closure_set(x_18, 0, x_14); lean::closure_set(x_18, 1, x_4); lean::closure_set(x_18, 2, x_16); x_19 = lean::box(0); -lean::inc(x_19); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_18); +lean::cnstr_set(x_20, 1, x_19); x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_18); -lean::cnstr_set(x_21, 1, x_19); +lean::cnstr_set(x_21, 0, x_12); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_12); +lean::cnstr_set(x_22, 0, x_6); lean::cnstr_set(x_22, 1, x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_6); -lean::cnstr_set(x_23, 1, x_22); lean::inc(x_4); -x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_25, 0, x_23); -lean::closure_set(x_25, 1, x_4); -lean::inc(x_19); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_19); -x_28 = l_lean_parser_command_def__like_kind; -lean::inc(x_28); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_30, 0, x_28); -lean::closure_set(x_30, 1, x_27); -x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_old__univ__params_parser), 4, 0); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_32, 0, x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__val_parser), 4, 0); -lean::inc(x_19); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_33); -lean::cnstr_set(x_35, 1, x_19); -x_36 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_opt__decl__sig_parser), 4, 0); -lean::inc(x_35); -lean::inc(x_36); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_36); -lean::cnstr_set(x_39, 1, x_35); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_ident__univ__params_parser), 4, 0); -lean::inc(x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_39); +x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_24, 0, x_22); +lean::closure_set(x_24, 1, x_4); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_19); +x_26 = l_lean_parser_command_def__like_kind; +lean::inc(x_26); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_28, 0, x_26); +lean::closure_set(x_28, 1, x_25); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_old__univ__params_parser), 4, 0); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_30, 0, x_29); +x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__val_parser), 4, 0); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_31); +lean::cnstr_set(x_32, 1, x_19); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_opt__decl__sig_parser), 4, 0); lean::inc(x_32); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_32); -lean::cnstr_set(x_44, 1, x_42); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_30); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_lean_parser_command_def__like; -lean::inc(x_46); -x_48 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_48, 0, x_46); -lean::closure_set(x_48, 1, x_45); -x_49 = lean::mk_string("instance"); -x_50 = l_string_trim(x_49); -lean::inc(x_50); -x_52 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_52, 0, x_50); +lean::inc(x_33); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_33); +lean::cnstr_set(x_36, 1, x_32); +x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_ident__univ__params_parser), 4, 0); +lean::inc(x_37); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_37); +lean::cnstr_set(x_39, 1, x_36); +lean::inc(x_30); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_30); +lean::cnstr_set(x_41, 1, x_39); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_28); +lean::cnstr_set(x_42, 1, x_41); +x_43 = l_lean_parser_command_def__like; +lean::inc(x_43); +x_45 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_45, 0, x_43); +lean::closure_set(x_45, 1, x_42); +x_46 = lean::mk_string("instance"); +x_47 = l_string_trim(x_46); +lean::inc(x_47); +x_49 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_49, 0, x_47); lean::inc(x_4); -x_54 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_54, 0, x_50); -lean::closure_set(x_54, 1, x_4); -lean::closure_set(x_54, 2, x_52); -lean::inc(x_40); -x_56 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_56, 0, x_40); -x_57 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__sig_parser), 4, 0); -lean::inc(x_57); +x_51 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_51, 0, x_47); +lean::closure_set(x_51, 1, x_4); +lean::closure_set(x_51, 2, x_49); +lean::inc(x_37); +x_53 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_53, 0, x_37); +x_54 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__sig_parser), 4, 0); +lean::inc(x_54); +x_56 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_56, 0, x_54); +lean::cnstr_set(x_56, 1, x_32); +lean::inc(x_56); +x_58 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_58, 0, x_53); +lean::cnstr_set(x_58, 1, x_56); x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_57); -lean::cnstr_set(x_59, 1, x_35); -lean::inc(x_59); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_56); -lean::cnstr_set(x_61, 1, x_59); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_54); -lean::cnstr_set(x_62, 1, x_61); -x_63 = l_lean_parser_command_instance; -lean::inc(x_63); -x_65 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_65, 0, x_63); -lean::closure_set(x_65, 1, x_62); -x_66 = lean::mk_string("example"); -x_67 = l_string_trim(x_66); -lean::inc(x_67); -x_69 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_69, 0, x_67); +lean::cnstr_set(x_59, 0, x_51); +lean::cnstr_set(x_59, 1, x_58); +x_60 = l_lean_parser_command_instance; +lean::inc(x_60); +x_62 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_62, 0, x_60); +lean::closure_set(x_62, 1, x_59); +x_63 = lean::mk_string("example"); +x_64 = l_string_trim(x_63); +lean::inc(x_64); +x_66 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_66, 0, x_64); lean::inc(x_4); -x_71 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_71, 0, x_67); -lean::closure_set(x_71, 1, x_4); -lean::closure_set(x_71, 2, x_69); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_71); -lean::cnstr_set(x_72, 1, x_59); -x_73 = l_lean_parser_command_example; -lean::inc(x_73); -x_75 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_75, 0, x_73); -lean::closure_set(x_75, 1, x_72); -x_76 = lean::mk_string("constant"); -x_77 = l_string_trim(x_76); -lean::inc(x_77); -x_79 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_79, 0, x_77); +x_68 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_68, 0, x_64); +lean::closure_set(x_68, 1, x_4); +lean::closure_set(x_68, 2, x_66); +x_69 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_69, 0, x_68); +lean::cnstr_set(x_69, 1, x_56); +x_70 = l_lean_parser_command_example; +lean::inc(x_70); +x_72 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_72, 0, x_70); +lean::closure_set(x_72, 1, x_69); +x_73 = lean::mk_string("constant"); +x_74 = l_string_trim(x_73); +lean::inc(x_74); +x_76 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_76, 0, x_74); lean::inc(x_4); -x_81 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_81, 0, x_77); -lean::closure_set(x_81, 1, x_4); -lean::closure_set(x_81, 2, x_79); -x_82 = lean::mk_string("axiom"); -x_83 = l_string_trim(x_82); -lean::inc(x_83); -x_85 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_85, 0, x_83); +x_78 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_78, 0, x_74); +lean::closure_set(x_78, 1, x_4); +lean::closure_set(x_78, 2, x_76); +x_79 = lean::mk_string("axiom"); +x_80 = l_string_trim(x_79); +lean::inc(x_80); +x_82 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_82, 0, x_80); lean::inc(x_4); -x_87 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_87, 0, x_83); -lean::closure_set(x_87, 1, x_4); -lean::closure_set(x_87, 2, x_85); -lean::inc(x_19); +x_84 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_84, 0, x_80); +lean::closure_set(x_84, 1, x_4); +lean::closure_set(x_84, 2, x_82); +x_85 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_85, 0, x_84); +lean::cnstr_set(x_85, 1, x_19); +x_86 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_86, 0, x_78); +lean::cnstr_set(x_86, 1, x_85); +lean::inc(x_4); +x_88 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_88, 0, x_86); +lean::closure_set(x_88, 1, x_4); x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_87); +lean::cnstr_set(x_89, 0, x_88); lean::cnstr_set(x_89, 1, x_19); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_81); -lean::cnstr_set(x_90, 1, x_89); -lean::inc(x_4); -x_92 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +x_90 = l_lean_parser_command_constant__keyword; +lean::inc(x_90); +x_92 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); lean::closure_set(x_92, 0, x_90); -lean::closure_set(x_92, 1, x_4); -lean::inc(x_19); -x_94 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_94, 0, x_92); -lean::cnstr_set(x_94, 1, x_19); -x_95 = l_lean_parser_command_constant__keyword; -lean::inc(x_95); -x_97 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_97, 0, x_95); -lean::closure_set(x_97, 1, x_94); -lean::inc(x_19); -x_99 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_99, 0, x_57); -lean::cnstr_set(x_99, 1, x_19); -lean::inc(x_40); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_40); -lean::cnstr_set(x_101, 1, x_99); -x_102 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_102, 0, x_97); -lean::cnstr_set(x_102, 1, x_101); -x_103 = l_lean_parser_command_constant; -lean::inc(x_103); -x_105 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_105, 0, x_103); -lean::closure_set(x_105, 1, x_102); -x_106 = lean::mk_string("class"); -x_107 = l_string_trim(x_106); -lean::inc(x_107); -x_109 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_109, 0, x_107); +lean::closure_set(x_92, 1, x_89); +x_93 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_93, 0, x_54); +lean::cnstr_set(x_93, 1, x_19); +lean::inc(x_37); +x_95 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_95, 0, x_37); +lean::cnstr_set(x_95, 1, x_93); +x_96 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_96, 0, x_92); +lean::cnstr_set(x_96, 1, x_95); +x_97 = l_lean_parser_command_constant; +lean::inc(x_97); +x_99 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_99, 0, x_97); +lean::closure_set(x_99, 1, x_96); +x_100 = lean::mk_string("class"); +x_101 = l_string_trim(x_100); +lean::inc(x_101); +x_103 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_103, 0, x_101); lean::inc(x_4); -x_111 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_111, 0, x_107); -lean::closure_set(x_111, 1, x_4); -lean::closure_set(x_111, 2, x_109); -x_112 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_112, 0, x_111); -x_113 = lean::mk_string("inductive"); -x_114 = l_string_trim(x_113); -lean::inc(x_114); -x_116 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_116, 0, x_114); +x_105 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_105, 0, x_101); +lean::closure_set(x_105, 1, x_4); +lean::closure_set(x_105, 2, x_103); +x_106 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_106, 0, x_105); +x_107 = lean::mk_string("inductive"); +x_108 = l_string_trim(x_107); +lean::inc(x_108); +x_110 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_110, 0, x_108); lean::inc(x_4); -x_118 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); -lean::closure_set(x_118, 0, x_114); -lean::closure_set(x_118, 1, x_4); -lean::closure_set(x_118, 2, x_116); -lean::inc(x_19); -x_120 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_120, 0, x_118); -lean::cnstr_set(x_120, 1, x_19); +x_112 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_112, 0, x_108); +lean::closure_set(x_112, 1, x_4); +lean::closure_set(x_112, 2, x_110); +x_113 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_113, 0, x_112); +lean::cnstr_set(x_113, 1, x_19); +x_114 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_114, 0, x_106); +lean::cnstr_set(x_114, 1, x_113); +x_115 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); +lean::closure_set(x_115, 0, x_114); +x_116 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__like_parser), 5, 0); +x_117 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); +lean::closure_set(x_117, 0, x_116); +x_118 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_118, 0, x_117); +x_119 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_intro__rule_parser), 4, 0); +x_120 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); +lean::closure_set(x_120, 0, x_119); x_121 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_121, 0, x_112); -lean::cnstr_set(x_121, 1, x_120); -x_122 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_declaration_parser_lean_parser_has__view___lambda__1), 5, 1); -lean::closure_set(x_122, 0, x_121); -x_123 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__like_parser), 5, 0); -x_124 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); -lean::closure_set(x_124, 0, x_123); -x_125 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1), 5, 1); -lean::closure_set(x_125, 0, x_124); -x_126 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_intro__rule_parser), 4, 0); -x_127 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2), 5, 1); -lean::closure_set(x_127, 0, x_126); -lean::inc(x_19); -x_129 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_129, 0, x_127); -lean::cnstr_set(x_129, 1, x_19); -x_130 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_130, 0, x_125); -lean::cnstr_set(x_130, 1, x_129); +lean::cnstr_set(x_121, 0, x_120); +lean::cnstr_set(x_121, 1, x_19); +x_122 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_122, 0, x_118); +lean::cnstr_set(x_122, 1, x_121); +x_123 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_123, 0, x_33); +lean::cnstr_set(x_123, 1, x_122); +x_124 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_124, 0, x_37); +lean::cnstr_set(x_124, 1, x_123); +x_125 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_125, 0, x_30); +lean::cnstr_set(x_125, 1, x_124); +x_126 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_126, 0, x_115); +lean::cnstr_set(x_126, 1, x_125); +x_127 = l_lean_parser_command_inductive; +lean::inc(x_127); +x_129 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_129, 0, x_127); +lean::closure_set(x_129, 1, x_126); +x_130 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_structure_parser), 4, 0); x_131 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_131, 0, x_36); -lean::cnstr_set(x_131, 1, x_130); +lean::cnstr_set(x_131, 0, x_130); +lean::cnstr_set(x_131, 1, x_19); x_132 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_132, 0, x_40); +lean::cnstr_set(x_132, 0, x_129); lean::cnstr_set(x_132, 1, x_131); x_133 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_133, 0, x_32); +lean::cnstr_set(x_133, 0, x_99); lean::cnstr_set(x_133, 1, x_132); x_134 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_134, 0, x_122); +lean::cnstr_set(x_134, 0, x_72); lean::cnstr_set(x_134, 1, x_133); -x_135 = l_lean_parser_command_inductive; -lean::inc(x_135); -x_137 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_137, 0, x_135); -lean::closure_set(x_137, 1, x_134); -x_138 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_structure_parser), 4, 0); -lean::inc(x_19); -x_140 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_140, 0, x_138); -lean::cnstr_set(x_140, 1, x_19); -x_141 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_141, 0, x_137); -lean::cnstr_set(x_141, 1, x_140); +x_135 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_135, 0, x_62); +lean::cnstr_set(x_135, 1, x_134); +x_136 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_136, 0, x_45); +lean::cnstr_set(x_136, 1, x_135); +x_137 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); +lean::closure_set(x_137, 0, x_136); +lean::closure_set(x_137, 1, x_4); +x_138 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_138, 0, x_137); +lean::cnstr_set(x_138, 1, x_19); +x_139 = l_lean_parser_command_declaration_inner; +lean::inc(x_139); +x_141 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); +lean::closure_set(x_141, 0, x_139); +lean::closure_set(x_141, 1, x_138); x_142 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_142, 0, x_105); -lean::cnstr_set(x_142, 1, x_141); -x_143 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_143, 0, x_75); -lean::cnstr_set(x_143, 1, x_142); +lean::cnstr_set(x_142, 0, x_141); +lean::cnstr_set(x_142, 1, x_19); +x_143 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__modifiers_parser), 4, 0); x_144 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_144, 0, x_65); -lean::cnstr_set(x_144, 1, x_143); -x_145 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_145, 0, x_48); -lean::cnstr_set(x_145, 1, x_144); -x_146 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2), 6, 2); -lean::closure_set(x_146, 0, x_145); -lean::closure_set(x_146, 1, x_4); -lean::inc(x_19); -x_148 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_148, 0, x_146); -lean::cnstr_set(x_148, 1, x_19); -x_149 = l_lean_parser_command_declaration_inner; -lean::inc(x_149); -x_151 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4), 6, 2); -lean::closure_set(x_151, 0, x_149); -lean::closure_set(x_151, 1, x_148); -x_152 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_152, 0, x_151); -lean::cnstr_set(x_152, 1, x_19); -x_153 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__modifiers_parser), 4, 0); -x_154 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_154, 0, x_153); -lean::cnstr_set(x_154, 1, x_152); -return x_154; +lean::cnstr_set(x_144, 0, x_143); +lean::cnstr_set(x_144, 1, x_142); +return x_144; } } obj* l_lean_parser_command_declaration_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { diff --git a/src/boot/init/lean/parser/identifier.cpp b/src/boot/init/lean/parser/identifier.cpp index 3b697048f9..2e7d679350 100644 --- a/src/boot/init/lean/parser/identifier.cpp +++ b/src/boot/init/lean/parser/identifier.cpp @@ -1229,51 +1229,49 @@ lean::dec(x_0); x_5 = lean::string_iterator_has_next(x_3); if (x_5 == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_3); lean::dec(x_2); x_8 = lean::box(0); x_9 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_id__part__default___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_id__part__default___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); +return x_13; } else { -uint32 x_15; uint8 x_16; -x_15 = lean::string_iterator_curr(x_3); -x_16 = l_lean_is__id__first(x_15); -if (x_16 == 0) +uint32 x_14; uint8 x_15; +x_14 = lean::string_iterator_curr(x_3); +x_15 = l_lean_is__id__first(x_14); +if (x_15 == 0) { -obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_29; +obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; lean::dec(x_3); lean::dec(x_2); -x_19 = l_char_quote__core(x_15); -x_20 = l_char_has__repr___closed__1; -lean::inc(x_20); -x_22 = lean::string_append(x_20, x_19); -lean::dec(x_19); -x_24 = lean::string_append(x_22, x_20); -x_25 = lean::box(0); -x_26 = l_mjoin___rarg___closed__1; +x_18 = l_char_quote__core(x_14); +x_19 = l_char_has__repr___closed__1; +lean::inc(x_19); +x_21 = lean::string_append(x_19, x_18); +lean::dec(x_18); +x_23 = lean::string_append(x_21, x_19); +x_24 = lean::box(0); +x_25 = l_mjoin___rarg___closed__1; lean::inc(x_25); -lean::inc(x_26); -x_29 = l_lean_parser_monad__parsec_error___at_lean_parser_id__part__default___spec__2___rarg(x_1, lean::box(0), x_24, x_26, x_25, x_25); -return x_29; +x_27 = l_lean_parser_monad__parsec_error___at_lean_parser_id__part__default___spec__2___rarg(x_1, lean::box(0), x_23, x_25, x_24, x_24); +return x_27; } else { -obj* x_31; obj* x_32; obj* x_33; +obj* x_29; obj* x_30; obj* x_31; lean::dec(x_1); -x_31 = lean::box_uint32(x_15); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_32, 0, x_3); -lean::closure_set(x_32, 1, x_31); -x_33 = lean::apply_2(x_2, lean::box(0), x_32); -return x_33; +x_29 = lean::box_uint32(x_14); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_30, 0, x_3); +lean::closure_set(x_30, 1, x_29); +x_31 = lean::apply_2(x_2, lean::box(0), x_30); +return x_31; } } } @@ -1487,51 +1485,49 @@ lean::dec(x_0); x_5 = lean::string_iterator_has_next(x_3); if (x_5 == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_3); lean::dec(x_2); x_8 = lean::box(0); x_9 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_id__part__escaped___spec__2___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_id__part__escaped___spec__2___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); +return x_13; } else { -uint32 x_15; uint8 x_16; -x_15 = lean::string_iterator_curr(x_3); -x_16 = l_lean_is__id__end__escape(x_15); -if (x_16 == 0) +uint32 x_14; uint8 x_15; +x_14 = lean::string_iterator_curr(x_3); +x_15 = l_lean_is__id__end__escape(x_14); +if (x_15 == 0) { -obj* x_18; obj* x_19; obj* x_20; +obj* x_17; obj* x_18; obj* x_19; lean::dec(x_1); -x_18 = lean::box_uint32(x_15); -x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_19, 0, x_3); -lean::closure_set(x_19, 1, x_18); -x_20 = lean::apply_2(x_2, lean::box(0), x_19); -return x_20; +x_17 = lean::box_uint32(x_14); +x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_18, 0, x_3); +lean::closure_set(x_18, 1, x_17); +x_19 = lean::apply_2(x_2, lean::box(0), x_18); +return x_19; } else { -obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_33; +obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; lean::dec(x_3); lean::dec(x_2); -x_23 = l_char_quote__core(x_15); -x_24 = l_char_has__repr___closed__1; -lean::inc(x_24); -x_26 = lean::string_append(x_24, x_23); -lean::dec(x_23); -x_28 = lean::string_append(x_26, x_24); -x_29 = lean::box(0); -x_30 = l_mjoin___rarg___closed__1; +x_22 = l_char_quote__core(x_14); +x_23 = l_char_has__repr___closed__1; +lean::inc(x_23); +x_25 = lean::string_append(x_23, x_22); +lean::dec(x_22); +x_27 = lean::string_append(x_25, x_23); +x_28 = lean::box(0); +x_29 = l_mjoin___rarg___closed__1; lean::inc(x_29); -lean::inc(x_30); -x_33 = l_lean_parser_monad__parsec_error___at_lean_parser_id__part__escaped___spec__3___rarg(x_1, lean::box(0), x_28, x_30, x_29, x_29); -return x_33; +x_31 = l_lean_parser_monad__parsec_error___at_lean_parser_id__part__escaped___spec__3___rarg(x_1, lean::box(0), x_27, x_29, x_28, x_28); +return x_31; } } } @@ -2072,102 +2068,99 @@ lean::dec(x_0); x_5 = lean::string_iterator_has_next(x_3); if (x_5 == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_3); lean::dec(x_2); x_8 = lean::box(0); x_9 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_c__identifier___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_c__identifier___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); +return x_13; } else { -uint32 x_15; uint8 x_16; -x_15 = lean::string_iterator_curr(x_3); -x_16 = l_char_is__alpha(x_15); -if (x_16 == 0) +uint32 x_14; uint8 x_15; +x_14 = lean::string_iterator_curr(x_3); +x_15 = l_char_is__alpha(x_14); +if (x_15 == 0) { -uint32 x_17; uint8 x_18; -x_17 = 95; -x_18 = x_15 == x_17; -if (x_18 == 0) +uint32 x_16; uint8 x_17; +x_16 = 95; +x_17 = x_14 == x_16; +if (x_17 == 0) { -if (x_16 == 0) +if (x_15 == 0) { -obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_31; +obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; lean::dec(x_3); lean::dec(x_2); -x_21 = l_char_quote__core(x_15); -x_22 = l_char_has__repr___closed__1; -lean::inc(x_22); -x_24 = lean::string_append(x_22, x_21); -lean::dec(x_21); -x_26 = lean::string_append(x_24, x_22); -x_27 = lean::box(0); -x_28 = l_mjoin___rarg___closed__1; +x_20 = l_char_quote__core(x_14); +x_21 = l_char_has__repr___closed__1; +lean::inc(x_21); +x_23 = lean::string_append(x_21, x_20); +lean::dec(x_20); +x_25 = lean::string_append(x_23, x_21); +x_26 = lean::box(0); +x_27 = l_mjoin___rarg___closed__1; lean::inc(x_27); -lean::inc(x_28); -x_31 = l_lean_parser_monad__parsec_error___at_lean_parser_c__identifier___spec__2___rarg(x_1, lean::box(0), x_26, x_28, x_27, x_27); -return x_31; +x_29 = l_lean_parser_monad__parsec_error___at_lean_parser_c__identifier___spec__2___rarg(x_1, lean::box(0), x_25, x_27, x_26, x_26); +return x_29; } else { -obj* x_33; obj* x_34; obj* x_35; +obj* x_31; obj* x_32; obj* x_33; lean::dec(x_1); -x_33 = lean::box_uint32(x_15); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_34, 0, x_3); -lean::closure_set(x_34, 1, x_33); -x_35 = lean::apply_2(x_2, lean::box(0), x_34); -return x_35; +x_31 = lean::box_uint32(x_14); +x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_32, 0, x_3); +lean::closure_set(x_32, 1, x_31); +x_33 = lean::apply_2(x_2, lean::box(0), x_32); +return x_33; } } else { -obj* x_37; obj* x_38; obj* x_39; +obj* x_35; obj* x_36; obj* x_37; lean::dec(x_1); -x_37 = lean::box_uint32(x_15); -x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_38, 0, x_3); -lean::closure_set(x_38, 1, x_37); -x_39 = lean::apply_2(x_2, lean::box(0), x_38); -return x_39; +x_35 = lean::box_uint32(x_14); +x_36 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_36, 0, x_3); +lean::closure_set(x_36, 1, x_35); +x_37 = lean::apply_2(x_2, lean::box(0), x_36); +return x_37; } } else { -if (x_16 == 0) +if (x_15 == 0) { -obj* x_42; obj* x_43; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_52; +obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; lean::dec(x_3); lean::dec(x_2); -x_42 = l_char_quote__core(x_15); -x_43 = l_char_has__repr___closed__1; -lean::inc(x_43); -x_45 = lean::string_append(x_43, x_42); -lean::dec(x_42); -x_47 = lean::string_append(x_45, x_43); -x_48 = lean::box(0); -x_49 = l_mjoin___rarg___closed__1; -lean::inc(x_48); -lean::inc(x_49); -x_52 = l_lean_parser_monad__parsec_error___at_lean_parser_c__identifier___spec__3___rarg(x_1, lean::box(0), x_47, x_49, x_48, x_48); -return x_52; +x_40 = l_char_quote__core(x_14); +x_41 = l_char_has__repr___closed__1; +lean::inc(x_41); +x_43 = lean::string_append(x_41, x_40); +lean::dec(x_40); +x_45 = lean::string_append(x_43, x_41); +x_46 = lean::box(0); +x_47 = l_mjoin___rarg___closed__1; +lean::inc(x_47); +x_49 = l_lean_parser_monad__parsec_error___at_lean_parser_c__identifier___spec__3___rarg(x_1, lean::box(0), x_45, x_47, x_46, x_46); +return x_49; } else { -obj* x_54; obj* x_55; obj* x_56; +obj* x_51; obj* x_52; obj* x_53; lean::dec(x_1); -x_54 = lean::box_uint32(x_15); -x_55 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_55, 0, x_3); -lean::closure_set(x_55, 1, x_54); -x_56 = lean::apply_2(x_2, lean::box(0), x_55); -return x_56; +x_51 = lean::box_uint32(x_14); +x_52 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_52, 0, x_3); +lean::closure_set(x_52, 1, x_51); +x_53 = lean::apply_2(x_2, lean::box(0), x_52); +return x_53; } } } diff --git a/src/boot/init/lean/parser/level.cpp b/src/boot/init/lean/parser/level.cpp index ee3080accc..db47b92847 100644 --- a/src/boot/init/lean/parser/level.cpp +++ b/src/boot/init/lean/parser/level.cpp @@ -1089,7 +1089,7 @@ return x_80; obj* l_lean_parser_level_paren_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_23; +obj* x_1; obj* x_3; obj* x_5; 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_22; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -1101,25 +1101,24 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); lean::inc(x_8); -x_15 = l_option_map___rarg(x_8, x_5); -x_16 = l_option_get__or__else___main___rarg(x_15, x_11); -x_17 = lean::box(0); +x_14 = l_option_map___rarg(x_8, x_5); +x_15 = l_option_get__or__else___main___rarg(x_14, x_11); +x_16 = lean::box(0); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_15); +lean::cnstr_set(x_17, 1, x_16); x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_16); +lean::cnstr_set(x_18, 0, x_3); lean::cnstr_set(x_18, 1, x_17); x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_3); +lean::cnstr_set(x_19, 0, x_12); lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_13); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_lean_parser_level_paren; -lean::inc(x_21); -x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); -return x_23; +x_20 = l_lean_parser_level_paren; +lean::inc(x_20); +x_22 = l_lean_parser_syntax_mk__node(x_20, x_19); +return x_22; } } obj* _init_l_lean_parser_level_paren_has__view_x_27() { @@ -1942,24 +1941,21 @@ return x_8; obj* _init_l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_9; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -x_8 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_8, 0, x_0); -lean::cnstr_set(x_8, 1, x_3); -lean::cnstr_set(x_8, 2, x_5); -lean::cnstr_set(x_8, 3, x_0); -lean::cnstr_set(x_8, 4, x_0); -x_9 = lean::alloc_cnstr(5, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -return x_9; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = lean::alloc_cnstr(5, 1, 0); +lean::cnstr_set(x_6, 0, x_5); +return x_6; } } obj* _init_l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__2() { @@ -2247,50 +2243,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__4; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__4; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__4; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__4; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__4; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__4; +lean::inc(x_69); +return x_69; } } } @@ -2300,100 +2295,100 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__4; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__4; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); -if (x_77 == 0) +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); +if (x_76 == 0) { -obj* x_79; uint8 x_80; -x_79 = lean::mk_nat_obj(1u); -x_80 = lean::nat_dec_eq(x_2, x_79); -lean::dec(x_79); -if (x_80 == 0) +obj* x_78; uint8 x_79; +x_78 = lean::mk_nat_obj(1u); +x_79 = lean::nat_dec_eq(x_2, x_78); +lean::dec(x_78); +if (x_79 == 0) { -obj* x_82; uint8 x_83; -x_82 = lean::mk_nat_obj(2u); -x_83 = lean::nat_dec_eq(x_2, x_82); -lean::dec(x_82); -if (x_83 == 0) +obj* x_81; uint8 x_82; +x_81 = lean::mk_nat_obj(2u); +x_82 = lean::nat_dec_eq(x_2, x_81); +lean::dec(x_81); +if (x_82 == 0) { -obj* x_85; uint8 x_86; -x_85 = lean::mk_nat_obj(3u); -x_86 = lean::nat_dec_eq(x_2, x_85); -lean::dec(x_85); -if (x_86 == 0) +obj* x_84; uint8 x_85; +x_84 = lean::mk_nat_obj(3u); +x_85 = lean::nat_dec_eq(x_2, x_84); +lean::dec(x_84); +if (x_85 == 0) { -obj* x_88; uint8 x_89; -x_88 = lean::mk_nat_obj(4u); -x_89 = lean::nat_dec_eq(x_2, x_88); -lean::dec(x_88); +obj* x_87; uint8 x_88; +x_87 = lean::mk_nat_obj(4u); +x_88 = lean::nat_dec_eq(x_2, x_87); +lean::dec(x_87); lean::dec(x_2); -if (x_89 == 0) +if (x_88 == 0) { switch (lean::obj_tag(x_1)) { case 1: { -obj* x_92; obj* x_95; -x_92 = lean::cnstr_get(x_1, 0); -lean::inc(x_92); +obj* x_91; obj* x_94; +x_91 = lean::cnstr_get(x_1, 0); +lean::inc(x_91); lean::dec(x_1); -x_95 = lean::alloc_cnstr(5, 1, 0); -lean::cnstr_set(x_95, 0, x_92); -return x_95; +x_94 = lean::alloc_cnstr(5, 1, 0); +lean::cnstr_set(x_94, 0, x_91); +return x_94; } case 3: { -obj* x_96; -x_96 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__2; -lean::inc(x_96); -return x_96; +obj* x_95; +x_95 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__2; +lean::inc(x_95); +return x_95; } default: { -obj* x_99; +obj* x_98; lean::dec(x_1); -x_99 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__2; -lean::inc(x_99); -return x_99; +x_98 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__2; +lean::inc(x_98); +return x_98; } } } else { -obj* x_101; obj* x_102; obj* x_104; obj* x_105; -x_101 = l_lean_parser_number_has__view; -x_102 = lean::cnstr_get(x_101, 0); -lean::inc(x_102); -x_104 = lean::apply_1(x_102, x_1); -x_105 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_105, 0, x_104); -return x_105; +obj* x_100; obj* x_101; obj* x_103; obj* x_104; +x_100 = l_lean_parser_number_has__view; +x_101 = lean::cnstr_get(x_100, 0); +lean::inc(x_101); +x_103 = lean::apply_1(x_101, x_1); +x_104 = lean::alloc_cnstr(4, 1, 0); +lean::cnstr_set(x_104, 0, x_103); +return x_104; } } else { -obj* x_107; obj* x_108; obj* x_110; obj* x_111; +obj* x_106; obj* x_107; obj* x_109; obj* x_110; lean::dec(x_2); -x_107 = l_lean_parser_level_paren_has__view; -x_108 = lean::cnstr_get(x_107, 0); -lean::inc(x_108); -x_110 = lean::apply_1(x_108, x_1); -x_111 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_111, 0, x_110); -return x_111; +x_106 = l_lean_parser_level_paren_has__view; +x_107 = lean::cnstr_get(x_106, 0); +lean::inc(x_107); +x_109 = lean::apply_1(x_107, x_1); +x_110 = lean::alloc_cnstr(3, 1, 0); +lean::cnstr_set(x_110, 0, x_109); +return x_110; } } else @@ -2402,50 +2397,50 @@ lean::dec(x_2); switch (lean::obj_tag(x_1)) { case 0: { -obj* x_113; obj* x_116; obj* x_117; -x_113 = lean::cnstr_get(x_1, 0); -lean::inc(x_113); +obj* x_112; obj* x_115; obj* x_116; +x_112 = lean::cnstr_get(x_1, 0); +lean::inc(x_112); lean::dec(x_1); -x_116 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_116, 0, x_113); -x_117 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_117, 0, x_116); -return x_117; +x_115 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_115, 0, x_112); +x_116 = lean::alloc_cnstr(2, 1, 0); +lean::cnstr_set(x_116, 0, x_115); +return x_116; } case 3: { -obj* x_118; -x_118 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__3; -lean::inc(x_118); -return x_118; +obj* x_117; +x_117 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__3; +lean::inc(x_117); +return x_117; } default: { -obj* x_121; +obj* x_120; lean::dec(x_1); -x_121 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__3; -lean::inc(x_121); -return x_121; +x_120 = l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__3; +lean::inc(x_120); +return x_120; } } } } else { -obj* x_124; +obj* x_123; lean::dec(x_2); -x_124 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_124, 0, x_1); -return x_124; +x_123 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_123, 0, x_1); +return x_123; } } else { -obj* x_126; +obj* x_125; lean::dec(x_2); -x_126 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_126, 0, x_1); -return x_126; +x_125 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_125, 0, x_1); +return x_125; } } } @@ -2478,144 +2473,138 @@ x_1 = lean::box(0); switch (lean::obj_tag(x_0)) { case 0: { -obj* x_2; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); -lean::inc(x_1); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_2); -lean::cnstr_set(x_6, 1, x_1); -x_7 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_7); -x_9 = l_lean_parser_syntax_mk__node(x_7, x_6); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_level_leading; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -return x_13; +x_5 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_5, 0, x_2); +lean::cnstr_set(x_5, 1, x_1); +x_6 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_6); +x_8 = l_lean_parser_syntax_mk__node(x_6, x_5); +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_level_leading; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +return x_12; } case 1: { -obj* x_14; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; -x_14 = lean::cnstr_get(x_0, 0); -lean::inc(x_14); +obj* x_13; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; +x_13 = lean::cnstr_get(x_0, 0); +lean::inc(x_13); lean::dec(x_0); -lean::inc(x_1); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_14); -lean::cnstr_set(x_18, 1, x_1); -x_19 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_19); -x_21 = l_lean_parser_syntax_mk__node(x_19, x_18); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_1); -x_23 = l_lean_parser_level_leading; -lean::inc(x_23); -x_25 = l_lean_parser_syntax_mk__node(x_23, x_22); -return x_25; +x_16 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_16, 0, x_13); +lean::cnstr_set(x_16, 1, x_1); +x_17 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_17); +x_19 = l_lean_parser_syntax_mk__node(x_17, x_16); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_19); +lean::cnstr_set(x_20, 1, x_1); +x_21 = l_lean_parser_level_leading; +lean::inc(x_21); +x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); +return x_23; } case 2: { -obj* x_26; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; -x_26 = lean::cnstr_get(x_0, 0); -lean::inc(x_26); +obj* x_24; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; +x_24 = lean::cnstr_get(x_0, 0); +lean::inc(x_24); lean::dec(x_0); -x_29 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_29); -x_31 = l_option_map___rarg(x_29, x_26); -x_32 = lean::box(3); -x_33 = l_option_get__or__else___main___rarg(x_31, x_32); -lean::inc(x_1); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_33); -lean::cnstr_set(x_35, 1, x_1); -x_36 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; -lean::inc(x_36); -x_38 = l_lean_parser_syntax_mk__node(x_36, x_35); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_1); -x_40 = l_lean_parser_level_leading; -lean::inc(x_40); -x_42 = l_lean_parser_syntax_mk__node(x_40, x_39); -return x_42; +x_27 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_27); +x_29 = l_option_map___rarg(x_27, x_24); +x_30 = lean::box(3); +x_31 = l_option_get__or__else___main___rarg(x_29, x_30); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_31); +lean::cnstr_set(x_32, 1, x_1); +x_33 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; +lean::inc(x_33); +x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_35); +lean::cnstr_set(x_36, 1, x_1); +x_37 = l_lean_parser_level_leading; +lean::inc(x_37); +x_39 = l_lean_parser_syntax_mk__node(x_37, x_36); +return x_39; } case 3: { -obj* x_43; obj* x_46; obj* x_47; obj* x_49; obj* x_51; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_58; -x_43 = lean::cnstr_get(x_0, 0); -lean::inc(x_43); +obj* x_40; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_50; obj* x_51; obj* x_52; obj* x_54; +x_40 = lean::cnstr_get(x_0, 0); +lean::inc(x_40); lean::dec(x_0); -x_46 = l_lean_parser_level_paren_has__view; -x_47 = lean::cnstr_get(x_46, 1); -lean::inc(x_47); -x_49 = lean::apply_1(x_47, x_43); -lean::inc(x_1); +x_43 = l_lean_parser_level_paren_has__view; +x_44 = lean::cnstr_get(x_43, 1); +lean::inc(x_44); +x_46 = lean::apply_1(x_44, x_40); +x_47 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_47, 0, x_46); +lean::cnstr_set(x_47, 1, x_1); +x_48 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +lean::inc(x_48); +x_50 = l_lean_parser_syntax_mk__node(x_48, x_47); x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_49); +lean::cnstr_set(x_51, 0, x_50); lean::cnstr_set(x_51, 1, x_1); -x_52 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +x_52 = l_lean_parser_level_leading; lean::inc(x_52); x_54 = l_lean_parser_syntax_mk__node(x_52, x_51); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_1); -x_56 = l_lean_parser_level_leading; -lean::inc(x_56); -x_58 = l_lean_parser_syntax_mk__node(x_56, x_55); -return x_58; +return x_54; } case 4: { -obj* x_59; obj* x_62; obj* x_63; obj* x_65; obj* x_67; obj* x_68; obj* x_70; obj* x_71; obj* x_72; obj* x_74; -x_59 = lean::cnstr_get(x_0, 0); -lean::inc(x_59); +obj* x_55; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_69; +x_55 = lean::cnstr_get(x_0, 0); +lean::inc(x_55); lean::dec(x_0); -x_62 = l_lean_parser_number_has__view; -x_63 = lean::cnstr_get(x_62, 1); +x_58 = l_lean_parser_number_has__view; +x_59 = lean::cnstr_get(x_58, 1); +lean::inc(x_59); +x_61 = lean::apply_1(x_59, x_55); +x_62 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_62, 0, x_61); +lean::cnstr_set(x_62, 1, x_1); +x_63 = l_lean_parser_level_leading_has__view_x_27___lambda__2___closed__1; lean::inc(x_63); -x_65 = lean::apply_1(x_63, x_59); -lean::inc(x_1); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_65); -lean::cnstr_set(x_67, 1, x_1); -x_68 = l_lean_parser_level_leading_has__view_x_27___lambda__2___closed__1; -lean::inc(x_68); -x_70 = l_lean_parser_syntax_mk__node(x_68, x_67); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_1); -x_72 = l_lean_parser_level_leading; -lean::inc(x_72); -x_74 = l_lean_parser_syntax_mk__node(x_72, x_71); -return x_74; +x_65 = l_lean_parser_syntax_mk__node(x_63, x_62); +x_66 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_66, 0, x_65); +lean::cnstr_set(x_66, 1, x_1); +x_67 = l_lean_parser_level_leading; +lean::inc(x_67); +x_69 = l_lean_parser_syntax_mk__node(x_67, x_66); +return x_69; } default: { -obj* x_75; obj* x_78; obj* x_80; obj* x_81; obj* x_83; obj* x_84; obj* x_85; obj* x_87; -x_75 = lean::cnstr_get(x_0, 0); -lean::inc(x_75); +obj* x_70; obj* x_73; obj* x_74; obj* x_75; obj* x_77; obj* x_78; obj* x_79; obj* x_81; +x_70 = lean::cnstr_get(x_0, 0); +lean::inc(x_70); lean::dec(x_0); -x_78 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_78, 0, x_75); -lean::inc(x_1); -x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_78); -lean::cnstr_set(x_80, 1, x_1); -x_81 = l_lean_parser_level_leading_has__view_x_27___lambda__2___closed__2; -lean::inc(x_81); -x_83 = l_lean_parser_syntax_mk__node(x_81, x_80); -x_84 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_84, 0, x_83); -lean::cnstr_set(x_84, 1, x_1); -x_85 = l_lean_parser_level_leading; -lean::inc(x_85); -x_87 = l_lean_parser_syntax_mk__node(x_85, x_84); -return x_87; +x_73 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_73, 0, x_70); +x_74 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_74, 0, x_73); +lean::cnstr_set(x_74, 1, x_1); +x_75 = l_lean_parser_level_leading_has__view_x_27___lambda__2___closed__2; +lean::inc(x_75); +x_77 = l_lean_parser_syntax_mk__node(x_75, x_74); +x_78 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_78, 0, x_77); +lean::cnstr_set(x_78, 1, x_1); +x_79 = l_lean_parser_level_leading; +lean::inc(x_79); +x_81 = l_lean_parser_syntax_mk__node(x_79, x_78); +return x_81; } } } @@ -3293,213 +3282,211 @@ _start: { if (lean::obj_tag(x_0) == 0) { -obj* x_7; obj* x_8; obj* x_9; obj* x_13; +obj* x_7; obj* x_8; obj* x_9; obj* x_12; lean::dec(x_1); x_7 = lean::box(0); x_8 = l_lean_parser_combinators_choice__aux___main___rarg___closed__1; x_9 = l_mjoin___rarg___closed__1; -lean::inc(x_7); lean::inc(x_9); lean::inc(x_8); -x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__5___rarg(x_8, x_9, x_7, x_7, x_2, x_3, x_4, x_5); -return x_13; +x_12 = l_lean_parser_monad__parsec_error___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__5___rarg(x_8, x_9, x_7, x_7, x_2, x_3, x_4, x_5); +return x_12; } else { -obj* x_14; obj* x_16; obj* x_18; obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; -x_14 = lean::cnstr_get(x_0, 0); -lean::inc(x_14); -x_16 = lean::cnstr_get(x_0, 1); -lean::inc(x_16); +obj* x_13; obj* x_15; obj* x_17; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_28; +x_13 = lean::cnstr_get(x_0, 0); +lean::inc(x_13); +x_15 = lean::cnstr_get(x_0, 1); +lean::inc(x_15); if (lean::is_shared(x_0)) { lean::dec(x_0); - x_18 = lean::box(0); + x_17 = lean::box(0); } else { lean::cnstr_release(x_0, 0); lean::cnstr_release(x_0, 1); - x_18 = x_0; + x_17 = x_0; } lean::inc(x_4); lean::inc(x_3); lean::inc(x_2); -x_22 = lean::apply_4(x_14, x_2, x_3, x_4, x_5); -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -x_25 = lean::cnstr_get(x_22, 1); -lean::inc(x_25); +x_21 = lean::apply_4(x_13, x_2, x_3, x_4, x_5); +x_22 = lean::cnstr_get(x_21, 0); +lean::inc(x_22); +x_24 = lean::cnstr_get(x_21, 1); +lean::inc(x_24); +if (lean::is_shared(x_21)) { + lean::dec(x_21); + x_26 = lean::box(0); +} else { + lean::cnstr_release(x_21, 0); + lean::cnstr_release(x_21, 1); + x_26 = x_21; +} +x_27 = lean::mk_nat_obj(1u); +x_28 = lean::nat_add(x_1, x_27); +lean::dec(x_27); +if (lean::obj_tag(x_22) == 0) +{ +obj* x_30; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; +x_30 = lean::cnstr_get(x_22, 0); +lean::inc(x_30); +x_32 = lean::cnstr_get(x_22, 1); +lean::inc(x_32); +x_34 = lean::cnstr_get(x_22, 2); +lean::inc(x_34); if (lean::is_shared(x_22)) { lean::dec(x_22); - x_27 = lean::box(0); + x_36 = lean::box(0); } else { lean::cnstr_release(x_22, 0); lean::cnstr_release(x_22, 1); - x_27 = x_22; + lean::cnstr_release(x_22, 2); + x_36 = x_22; } -x_28 = lean::mk_nat_obj(1u); -x_29 = lean::nat_add(x_1, x_28); +x_37 = lean::box(0); +x_38 = lean_name_mk_numeral(x_37, x_1); +if (lean::is_scalar(x_17)) { + x_39 = lean::alloc_cnstr(1, 2, 0); +} else { + x_39 = x_17; +} +lean::cnstr_set(x_39, 0, x_30); +lean::cnstr_set(x_39, 1, x_37); +x_40 = l_lean_parser_syntax_mk__node(x_38, x_39); +x_41 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_41); +if (lean::is_scalar(x_36)) { + x_43 = lean::alloc_cnstr(0, 3, 0); +} else { + x_43 = x_36; +} +lean::cnstr_set(x_43, 0, x_40); +lean::cnstr_set(x_43, 1, x_32); +lean::cnstr_set(x_43, 2, x_41); +x_44 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_34, x_43); +if (lean::obj_tag(x_44) == 0) +{ +obj* x_50; +lean::dec(x_4); +lean::dec(x_3); +lean::dec(x_2); lean::dec(x_28); -if (lean::obj_tag(x_23) == 0) -{ -obj* x_31; obj* x_33; obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; -x_31 = lean::cnstr_get(x_23, 0); -lean::inc(x_31); -x_33 = lean::cnstr_get(x_23, 1); -lean::inc(x_33); -x_35 = lean::cnstr_get(x_23, 2); -lean::inc(x_35); -if (lean::is_shared(x_23)) { - lean::dec(x_23); - x_37 = lean::box(0); +lean::dec(x_15); +if (lean::is_scalar(x_26)) { + x_50 = lean::alloc_cnstr(0, 2, 0); } else { - lean::cnstr_release(x_23, 0); - lean::cnstr_release(x_23, 1); - lean::cnstr_release(x_23, 2); - x_37 = x_23; + x_50 = x_26; } -x_38 = lean::box(0); -lean::inc(x_38); -x_40 = lean_name_mk_numeral(x_38, x_1); -if (lean::is_scalar(x_18)) { - x_41 = lean::alloc_cnstr(1, 2, 0); -} else { - x_41 = x_18; -} -lean::cnstr_set(x_41, 0, x_31); -lean::cnstr_set(x_41, 1, x_38); -x_42 = l_lean_parser_syntax_mk__node(x_40, x_41); -x_43 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_43); -if (lean::is_scalar(x_37)) { - x_45 = lean::alloc_cnstr(0, 3, 0); -} else { - x_45 = x_37; -} -lean::cnstr_set(x_45, 0, x_42); -lean::cnstr_set(x_45, 1, x_33); -lean::cnstr_set(x_45, 2, x_43); -x_46 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_35, x_45); -if (lean::obj_tag(x_46) == 0) -{ -obj* x_52; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_29); -lean::dec(x_16); -if (lean::is_scalar(x_27)) { - x_52 = lean::alloc_cnstr(0, 2, 0); -} else { - x_52 = x_27; -} -lean::cnstr_set(x_52, 0, x_46); -lean::cnstr_set(x_52, 1, x_25); -return x_52; +lean::cnstr_set(x_50, 0, x_44); +lean::cnstr_set(x_50, 1, x_24); +return x_50; } else { -obj* x_53; uint8 x_55; -x_53 = lean::cnstr_get(x_46, 0); -lean::inc(x_53); -x_55 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); -if (x_55 == 0) +obj* x_51; uint8 x_53; +x_51 = lean::cnstr_get(x_44, 0); +lean::inc(x_51); +x_53 = lean::cnstr_get_scalar(x_44, sizeof(void*)*1); +if (x_53 == 0) { -obj* x_57; obj* x_58; obj* x_60; obj* x_63; obj* x_64; -lean::dec(x_46); -x_57 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__4(x_16, x_29, x_2, x_3, x_4, x_25); -x_58 = lean::cnstr_get(x_57, 0); +obj* x_55; obj* x_56; obj* x_58; obj* x_61; obj* x_62; +lean::dec(x_44); +x_55 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__4(x_15, x_28, x_2, x_3, x_4, x_24); +x_56 = lean::cnstr_get(x_55, 0); +lean::inc(x_56); +x_58 = lean::cnstr_get(x_55, 1); lean::inc(x_58); -x_60 = lean::cnstr_get(x_57, 1); -lean::inc(x_60); -lean::dec(x_57); -x_63 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_53, x_58); -if (lean::is_scalar(x_27)) { - x_64 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_55); +x_61 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_51, x_56); +if (lean::is_scalar(x_26)) { + x_62 = lean::alloc_cnstr(0, 2, 0); } else { - x_64 = x_27; + x_62 = x_26; } -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_60); -return x_64; +lean::cnstr_set(x_62, 0, x_61); +lean::cnstr_set(x_62, 1, x_58); +return x_62; } else { -obj* x_71; -lean::dec(x_53); +obj* x_69; lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); -lean::dec(x_29); -lean::dec(x_16); -if (lean::is_scalar(x_27)) { - x_71 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_51); +lean::dec(x_28); +lean::dec(x_15); +if (lean::is_scalar(x_26)) { + x_69 = lean::alloc_cnstr(0, 2, 0); } else { - x_71 = x_27; + x_69 = x_26; } -lean::cnstr_set(x_71, 0, x_46); -lean::cnstr_set(x_71, 1, x_25); -return x_71; +lean::cnstr_set(x_69, 0, x_44); +lean::cnstr_set(x_69, 1, x_24); +return x_69; } } } else { -obj* x_74; uint8 x_76; obj* x_77; +obj* x_72; uint8 x_74; obj* x_75; lean::dec(x_1); -lean::dec(x_18); -x_74 = lean::cnstr_get(x_23, 0); -lean::inc(x_74); -x_76 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); -if (lean::is_shared(x_23)) { - lean::dec(x_23); - x_77 = lean::box(0); +lean::dec(x_17); +x_72 = lean::cnstr_get(x_22, 0); +lean::inc(x_72); +x_74 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); +if (lean::is_shared(x_22)) { + lean::dec(x_22); + x_75 = lean::box(0); } else { - lean::cnstr_release(x_23, 0); - x_77 = x_23; + lean::cnstr_release(x_22, 0); + x_75 = x_22; } -if (x_76 == 0) +if (x_74 == 0) { -obj* x_79; obj* x_80; obj* x_82; obj* x_85; obj* x_86; -lean::dec(x_77); -x_79 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__4(x_16, x_29, x_2, x_3, x_4, x_25); -x_80 = lean::cnstr_get(x_79, 0); +obj* x_77; obj* x_78; obj* x_80; obj* x_83; obj* x_84; +lean::dec(x_75); +x_77 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__4(x_15, x_28, x_2, x_3, x_4, x_24); +x_78 = lean::cnstr_get(x_77, 0); +lean::inc(x_78); +x_80 = lean::cnstr_get(x_77, 1); lean::inc(x_80); -x_82 = lean::cnstr_get(x_79, 1); -lean::inc(x_82); -lean::dec(x_79); -x_85 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_74, x_80); -if (lean::is_scalar(x_27)) { - x_86 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_77); +x_83 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_72, x_78); +if (lean::is_scalar(x_26)) { + x_84 = lean::alloc_cnstr(0, 2, 0); } else { - x_86 = x_27; + x_84 = x_26; } -lean::cnstr_set(x_86, 0, x_85); -lean::cnstr_set(x_86, 1, x_82); -return x_86; +lean::cnstr_set(x_84, 0, x_83); +lean::cnstr_set(x_84, 1, x_80); +return x_84; } else { -obj* x_92; obj* x_93; obj* x_94; +obj* x_90; obj* x_91; obj* x_92; lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); -lean::dec(x_29); -lean::dec(x_16); -if (lean::is_scalar(x_77)) { - x_92 = lean::alloc_cnstr(1, 1, 1); +lean::dec(x_28); +lean::dec(x_15); +if (lean::is_scalar(x_75)) { + x_90 = lean::alloc_cnstr(1, 1, 1); } else { - x_92 = x_77; + x_90 = x_75; } -lean::cnstr_set(x_92, 0, x_74); -lean::cnstr_set_scalar(x_92, sizeof(void*)*1, x_76); -x_93 = x_92; -if (lean::is_scalar(x_27)) { - x_94 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_90, 0, x_72); +lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_74); +x_91 = x_90; +if (lean::is_scalar(x_26)) { + x_92 = lean::alloc_cnstr(0, 2, 0); } else { - x_94 = x_27; + x_92 = x_26; } -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_25); -return x_94; +lean::cnstr_set(x_92, 0, x_91); +lean::cnstr_set(x_92, 1, x_24); +return x_92; } } } @@ -3508,35 +3495,30 @@ return x_94; obj* _init_l_lean_parser_level_leading_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; x_0 = lean::box(0); x_1 = lean::mk_string("_"); x_2 = l_lean_parser_max__prec; lean::inc(x_2); x_4 = l_lean_parser_symbol_tokens___rarg(x_1, x_2); -lean::inc(x_0); -lean::inc(x_0); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_0, x_0); -lean::inc(x_0); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_0, x_7); -x_10 = l_lean_parser_level_paren_parser_lean_parser_has__tokens; -lean::inc(x_10); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_10, x_9); -x_13 = l_lean_parser_list_cons_tokens___rarg(x_4, x_12); -lean::inc(x_0); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_0, x_13); -lean::inc(x_0); -x_17 = l_lean_parser_list_cons_tokens___rarg(x_0, x_15); -x_18 = l_lean_parser_tokens___rarg(x_17); -x_19 = l_lean_parser_list_cons_tokens___rarg(x_18, x_0); -x_20 = l_lean_parser_tokens___rarg(x_19); -return x_20; +x_5 = l_lean_parser_list_cons_tokens___rarg(x_0, x_0); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_0, x_5); +x_7 = l_lean_parser_level_paren_parser_lean_parser_has__tokens; +lean::inc(x_7); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_7, x_6); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_4, x_9); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_0, x_10); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_0, x_11); +x_13 = l_lean_parser_tokens___rarg(x_12); +x_14 = l_lean_parser_list_cons_tokens___rarg(x_13, x_0); +x_15 = l_lean_parser_tokens___rarg(x_14); +return x_15; } } obj* _init_l_lean_parser_level_leading_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_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; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_37; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_36; x_0 = lean::mk_string("max"); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__1), 5, 1); lean::closure_set(x_1, 0, x_0); @@ -3556,54 +3538,53 @@ lean::closure_set(x_10, 1, x_8); lean::closure_set(x_10, 2, x_7); x_11 = lean::box(0); x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__3), 1, 0); -lean::inc(x_11); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_11); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2), 1, 0); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level_paren_parser), 4, 0); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_11); +x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2), 1, 0); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_14); +lean::cnstr_set(x_15, 1, x_13); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level_paren_parser), 4, 0); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_16); +lean::cnstr_set(x_17, 1, x_15); x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_16); +lean::cnstr_set(x_18, 0, x_10); +lean::cnstr_set(x_18, 1, x_17); x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_10); +lean::cnstr_set(x_19, 0, x_3); lean::cnstr_set(x_19, 1, x_18); x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_3); +lean::cnstr_set(x_20, 0, x_1); lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_1); -lean::cnstr_set(x_21, 1, x_20); -x_22 = lean::mk_nat_obj(0u); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__4), 6, 2); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_11); -x_25 = l_lean_parser_level__parser__m_monad; -x_26 = l_lean_parser_level__parser__m_monad__except; -x_27 = l_lean_parser_level__parser__m_lean_parser_monad__parsec; -x_28 = l_lean_parser_level__parser__m_alternative; -x_29 = l_lean_parser_level_leading; -x_30 = l_lean_parser_level_leading_has__view; -lean::inc(x_30); +x_21 = lean::mk_nat_obj(0u); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__4), 6, 2); +lean::closure_set(x_22, 0, x_20); +lean::closure_set(x_22, 1, x_21); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_22); +lean::cnstr_set(x_23, 1, x_11); +x_24 = l_lean_parser_level__parser__m_monad; +x_25 = l_lean_parser_level__parser__m_monad__except; +x_26 = l_lean_parser_level__parser__m_lean_parser_monad__parsec; +x_27 = l_lean_parser_level__parser__m_alternative; +x_28 = l_lean_parser_level_leading; +x_29 = l_lean_parser_level_leading_has__view; lean::inc(x_29); lean::inc(x_28); lean::inc(x_27); lean::inc(x_26); lean::inc(x_25); -x_37 = l_lean_parser_combinators_node_view___rarg(x_25, x_26, x_27, x_28, x_29, x_24, x_30); -return x_37; +lean::inc(x_24); +x_36 = l_lean_parser_combinators_node_view___rarg(x_24, x_25, x_26, x_27, x_28, x_23, x_29); +return x_36; } } obj* _init_l_lean_parser_level_leading_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_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; obj* x_22; obj* x_23; obj* x_24; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; x_0 = lean::mk_string("max"); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__1), 5, 1); lean::closure_set(x_1, 0, x_0); @@ -3623,35 +3604,34 @@ lean::closure_set(x_10, 1, x_8); lean::closure_set(x_10, 2, x_7); x_11 = lean::box(0); x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__3), 1, 0); -lean::inc(x_11); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_11); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2), 1, 0); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level_paren_parser), 4, 0); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_11); +x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2), 1, 0); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_14); +lean::cnstr_set(x_15, 1, x_13); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level_paren_parser), 4, 0); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_16); +lean::cnstr_set(x_17, 1, x_15); x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_16); +lean::cnstr_set(x_18, 0, x_10); +lean::cnstr_set(x_18, 1, x_17); x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_10); +lean::cnstr_set(x_19, 0, x_3); lean::cnstr_set(x_19, 1, x_18); x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_3); +lean::cnstr_set(x_20, 0, x_1); lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_1); -lean::cnstr_set(x_21, 1, x_20); -x_22 = lean::mk_nat_obj(0u); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__4), 6, 2); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_11); -return x_24; +x_21 = lean::mk_nat_obj(0u); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__4), 6, 2); +lean::closure_set(x_22, 0, x_20); +lean::closure_set(x_22, 1, x_21); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_22); +lean::cnstr_set(x_23, 1, x_11); +return x_23; } } obj* l_lean_parser_level_leading_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -3685,13 +3665,12 @@ return x_8; obj* _init_l_lean_parser_level_app_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_2; +obj* x_0; obj* x_1; x_0 = lean::box(3); -lean::inc(x_0); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_0); -lean::cnstr_set(x_2, 1, x_0); -return x_2; +x_1 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1, 0, x_0); +lean::cnstr_set(x_1, 1, x_0); +return x_1; } } obj* l_lean_parser_level_app_has__view_x_27___lambda__1(obj* x_0) { @@ -5116,19 +5095,18 @@ return x_4; obj* _init_l_lean_parser_level_add__lit_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; x_0 = lean::mk_string("+"); x_1 = lean::mk_nat_obj(0u); x_2 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_3 = lean::box(0); -lean::inc(x_3); -x_5 = l_lean_parser_list_cons_tokens___rarg(x_3, x_3); -x_6 = l_lean_parser_list_cons_tokens___rarg(x_2, x_5); -x_7 = l_lean_parser_level_lean_parser_has__tokens; -lean::inc(x_7); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_7, x_6); -x_10 = l_lean_parser_tokens___rarg(x_9); -return x_10; +x_4 = l_lean_parser_list_cons_tokens___rarg(x_3, x_3); +x_5 = l_lean_parser_list_cons_tokens___rarg(x_2, x_4); +x_6 = l_lean_parser_level_lean_parser_has__tokens; +lean::inc(x_6); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_6, x_5); +x_9 = l_lean_parser_tokens___rarg(x_8); +return x_9; } } obj* _init_l_lean_parser_level_add__lit_parser_lean_parser_has__view() { @@ -5388,50 +5366,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_level_trailing_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_level_trailing_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_level_trailing_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_level_trailing_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_level_trailing_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_level_trailing_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -5441,44 +5418,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_level_trailing_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_level_trailing_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_level_add__lit_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_level_add__lit_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_level_app_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_level_app_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -5490,7 +5467,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -5498,45 +5475,43 @@ x_5 = l_lean_parser_level_app_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_level_trailing; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_level_trailing; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_level_add__lit_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_level_trailing; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_level_add__lit_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_level_trailing; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -5599,217 +5574,215 @@ _start: { if (lean::obj_tag(x_0) == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_1); x_8 = lean::box(0); x_9 = l_lean_parser_combinators_choice__aux___main___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__2___rarg(x_9, x_10, x_8, x_8, x_2, x_3, x_4, x_5, x_6); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__2___rarg(x_9, x_10, x_8, x_8, x_2, x_3, x_4, x_5, x_6); +return x_13; } else { -obj* x_15; obj* x_17; obj* x_19; obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_30; obj* x_31; -x_15 = lean::cnstr_get(x_0, 0); -lean::inc(x_15); -x_17 = lean::cnstr_get(x_0, 1); -lean::inc(x_17); +obj* x_14; obj* x_16; obj* x_18; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; +x_14 = lean::cnstr_get(x_0, 0); +lean::inc(x_14); +x_16 = lean::cnstr_get(x_0, 1); +lean::inc(x_16); if (lean::is_shared(x_0)) { lean::dec(x_0); - x_19 = lean::box(0); + x_18 = lean::box(0); } else { lean::cnstr_release(x_0, 0); lean::cnstr_release(x_0, 1); - x_19 = x_0; + x_18 = x_0; } lean::inc(x_5); lean::inc(x_4); lean::inc(x_3); lean::inc(x_2); -x_24 = lean::apply_5(x_15, x_2, x_3, x_4, x_5, x_6); -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); +x_23 = lean::apply_5(x_14, x_2, x_3, x_4, x_5, x_6); +x_24 = lean::cnstr_get(x_23, 0); +lean::inc(x_24); +x_26 = lean::cnstr_get(x_23, 1); +lean::inc(x_26); +if (lean::is_shared(x_23)) { + lean::dec(x_23); + x_28 = lean::box(0); +} else { + lean::cnstr_release(x_23, 0); + lean::cnstr_release(x_23, 1); + x_28 = x_23; +} +x_29 = lean::mk_nat_obj(1u); +x_30 = lean::nat_add(x_1, x_29); +lean::dec(x_29); +if (lean::obj_tag(x_24) == 0) +{ +obj* x_32; obj* x_34; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; +x_32 = lean::cnstr_get(x_24, 0); +lean::inc(x_32); +x_34 = lean::cnstr_get(x_24, 1); +lean::inc(x_34); +x_36 = lean::cnstr_get(x_24, 2); +lean::inc(x_36); if (lean::is_shared(x_24)) { lean::dec(x_24); - x_29 = lean::box(0); + x_38 = lean::box(0); } else { lean::cnstr_release(x_24, 0); lean::cnstr_release(x_24, 1); - x_29 = x_24; + lean::cnstr_release(x_24, 2); + x_38 = x_24; } -x_30 = lean::mk_nat_obj(1u); -x_31 = lean::nat_add(x_1, x_30); +x_39 = lean::box(0); +x_40 = lean_name_mk_numeral(x_39, x_1); +if (lean::is_scalar(x_18)) { + x_41 = lean::alloc_cnstr(1, 2, 0); +} else { + x_41 = x_18; +} +lean::cnstr_set(x_41, 0, x_32); +lean::cnstr_set(x_41, 1, x_39); +x_42 = l_lean_parser_syntax_mk__node(x_40, x_41); +x_43 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_43); +if (lean::is_scalar(x_38)) { + x_45 = lean::alloc_cnstr(0, 3, 0); +} else { + x_45 = x_38; +} +lean::cnstr_set(x_45, 0, x_42); +lean::cnstr_set(x_45, 1, x_34); +lean::cnstr_set(x_45, 2, x_43); +x_46 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_36, x_45); +if (lean::obj_tag(x_46) == 0) +{ +obj* x_53; +lean::dec(x_5); +lean::dec(x_4); +lean::dec(x_3); +lean::dec(x_2); lean::dec(x_30); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_33; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_48; -x_33 = lean::cnstr_get(x_25, 0); -lean::inc(x_33); -x_35 = lean::cnstr_get(x_25, 1); -lean::inc(x_35); -x_37 = lean::cnstr_get(x_25, 2); -lean::inc(x_37); -if (lean::is_shared(x_25)) { - lean::dec(x_25); - x_39 = lean::box(0); +lean::dec(x_16); +if (lean::is_scalar(x_28)) { + x_53 = lean::alloc_cnstr(0, 2, 0); } else { - lean::cnstr_release(x_25, 0); - lean::cnstr_release(x_25, 1); - lean::cnstr_release(x_25, 2); - x_39 = x_25; + x_53 = x_28; } -x_40 = lean::box(0); -lean::inc(x_40); -x_42 = lean_name_mk_numeral(x_40, x_1); -if (lean::is_scalar(x_19)) { - x_43 = lean::alloc_cnstr(1, 2, 0); -} else { - x_43 = x_19; -} -lean::cnstr_set(x_43, 0, x_33); -lean::cnstr_set(x_43, 1, x_40); -x_44 = l_lean_parser_syntax_mk__node(x_42, x_43); -x_45 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_45); -if (lean::is_scalar(x_39)) { - x_47 = lean::alloc_cnstr(0, 3, 0); -} else { - x_47 = x_39; -} -lean::cnstr_set(x_47, 0, x_44); -lean::cnstr_set(x_47, 1, x_35); -lean::cnstr_set(x_47, 2, x_45); -x_48 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_37, x_47); -if (lean::obj_tag(x_48) == 0) -{ -obj* x_55; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_31); -lean::dec(x_17); -if (lean::is_scalar(x_29)) { - x_55 = lean::alloc_cnstr(0, 2, 0); -} else { - x_55 = x_29; -} -lean::cnstr_set(x_55, 0, x_48); -lean::cnstr_set(x_55, 1, x_27); -return x_55; +lean::cnstr_set(x_53, 0, x_46); +lean::cnstr_set(x_53, 1, x_26); +return x_53; } else { -obj* x_56; uint8 x_58; -x_56 = lean::cnstr_get(x_48, 0); -lean::inc(x_56); -x_58 = lean::cnstr_get_scalar(x_48, sizeof(void*)*1); -if (x_58 == 0) +obj* x_54; uint8 x_56; +x_54 = lean::cnstr_get(x_46, 0); +lean::inc(x_54); +x_56 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); +if (x_56 == 0) { -obj* x_60; obj* x_61; obj* x_63; obj* x_66; obj* x_67; -lean::dec(x_48); -x_60 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__1(x_17, x_31, x_2, x_3, x_4, x_5, x_27); -x_61 = lean::cnstr_get(x_60, 0); +obj* x_58; obj* x_59; obj* x_61; obj* x_64; obj* x_65; +lean::dec(x_46); +x_58 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__1(x_16, x_30, x_2, x_3, x_4, x_5, x_26); +x_59 = lean::cnstr_get(x_58, 0); +lean::inc(x_59); +x_61 = lean::cnstr_get(x_58, 1); lean::inc(x_61); -x_63 = lean::cnstr_get(x_60, 1); -lean::inc(x_63); -lean::dec(x_60); -x_66 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_56, x_61); -if (lean::is_scalar(x_29)) { - x_67 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_58); +x_64 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_54, x_59); +if (lean::is_scalar(x_28)) { + x_65 = lean::alloc_cnstr(0, 2, 0); } else { - x_67 = x_29; + x_65 = x_28; } -lean::cnstr_set(x_67, 0, x_66); -lean::cnstr_set(x_67, 1, x_63); -return x_67; +lean::cnstr_set(x_65, 0, x_64); +lean::cnstr_set(x_65, 1, x_61); +return x_65; } else { -obj* x_75; +obj* x_73; lean::dec(x_5); +lean::dec(x_54); lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); -lean::dec(x_31); -lean::dec(x_17); -lean::dec(x_56); -if (lean::is_scalar(x_29)) { - x_75 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_30); +lean::dec(x_16); +if (lean::is_scalar(x_28)) { + x_73 = lean::alloc_cnstr(0, 2, 0); } else { - x_75 = x_29; + x_73 = x_28; } -lean::cnstr_set(x_75, 0, x_48); -lean::cnstr_set(x_75, 1, x_27); -return x_75; +lean::cnstr_set(x_73, 0, x_46); +lean::cnstr_set(x_73, 1, x_26); +return x_73; } } } else { -obj* x_78; uint8 x_80; obj* x_81; -lean::dec(x_19); +obj* x_76; uint8 x_78; obj* x_79; lean::dec(x_1); -x_78 = lean::cnstr_get(x_25, 0); -lean::inc(x_78); -x_80 = lean::cnstr_get_scalar(x_25, sizeof(void*)*1); -if (lean::is_shared(x_25)) { - lean::dec(x_25); - x_81 = lean::box(0); +lean::dec(x_18); +x_76 = lean::cnstr_get(x_24, 0); +lean::inc(x_76); +x_78 = lean::cnstr_get_scalar(x_24, sizeof(void*)*1); +if (lean::is_shared(x_24)) { + lean::dec(x_24); + x_79 = lean::box(0); } else { - lean::cnstr_release(x_25, 0); - x_81 = x_25; + lean::cnstr_release(x_24, 0); + x_79 = x_24; } -if (x_80 == 0) +if (x_78 == 0) { -obj* x_83; obj* x_84; obj* x_86; obj* x_89; obj* x_90; -lean::dec(x_81); -x_83 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__1(x_17, x_31, x_2, x_3, x_4, x_5, x_27); -x_84 = lean::cnstr_get(x_83, 0); +obj* x_81; obj* x_82; obj* x_84; obj* x_87; obj* x_88; +lean::dec(x_79); +x_81 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__1(x_16, x_30, x_2, x_3, x_4, x_5, x_26); +x_82 = lean::cnstr_get(x_81, 0); +lean::inc(x_82); +x_84 = lean::cnstr_get(x_81, 1); lean::inc(x_84); -x_86 = lean::cnstr_get(x_83, 1); -lean::inc(x_86); -lean::dec(x_83); -x_89 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_78, x_84); -if (lean::is_scalar(x_29)) { - x_90 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_81); +x_87 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_76, x_82); +if (lean::is_scalar(x_28)) { + x_88 = lean::alloc_cnstr(0, 2, 0); } else { - x_90 = x_29; + x_88 = x_28; } -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_86); -return x_90; +lean::cnstr_set(x_88, 0, x_87); +lean::cnstr_set(x_88, 1, x_84); +return x_88; } else { -obj* x_97; obj* x_98; obj* x_99; +obj* x_95; obj* x_96; obj* x_97; lean::dec(x_5); lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); -lean::dec(x_31); -lean::dec(x_17); -if (lean::is_scalar(x_81)) { - x_97 = lean::alloc_cnstr(1, 1, 1); +lean::dec(x_30); +lean::dec(x_16); +if (lean::is_scalar(x_79)) { + x_95 = lean::alloc_cnstr(1, 1, 1); } else { - x_97 = x_81; + x_95 = x_79; } -lean::cnstr_set(x_97, 0, x_78); -lean::cnstr_set_scalar(x_97, sizeof(void*)*1, x_80); -x_98 = x_97; -if (lean::is_scalar(x_29)) { - x_99 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_95, 0, x_76); +lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_78); +x_96 = x_95; +if (lean::is_scalar(x_28)) { + x_97 = lean::alloc_cnstr(0, 2, 0); } else { - x_99 = x_29; + x_97 = x_28; } -lean::cnstr_set(x_99, 0, x_98); -lean::cnstr_set(x_99, 1, x_27); -return x_99; +lean::cnstr_set(x_97, 0, x_96); +lean::cnstr_set(x_97, 1, x_26); +return x_97; } } } @@ -5818,80 +5791,77 @@ return x_99; obj* _init_l_lean_parser_level_trailing_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; x_0 = lean::box(0); x_1 = l_lean_parser_level_add__lit_parser_lean_parser_has__tokens; -lean::inc(x_0); lean::inc(x_1); -x_4 = l_lean_parser_list_cons_tokens___rarg(x_1, x_0); -x_5 = l_lean_parser_level_app_parser_lean_parser_has__tokens; -lean::inc(x_5); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_4); -x_8 = l_lean_parser_tokens___rarg(x_7); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_8, x_0); -x_10 = l_lean_parser_tokens___rarg(x_9); -return x_10; +x_3 = l_lean_parser_list_cons_tokens___rarg(x_1, x_0); +x_4 = l_lean_parser_level_app_parser_lean_parser_has__tokens; +lean::inc(x_4); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_4, x_3); +x_7 = l_lean_parser_tokens___rarg(x_6); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_7, x_0); +x_9 = l_lean_parser_tokens___rarg(x_8); +return x_9; } } obj* _init_l_lean_parser_level_trailing_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_21; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_20; x_0 = lean::box(0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level_add__lit_parser), 5, 0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level_app_parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__1), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_0); -x_9 = l_lean_parser_trailing__level__parser__m_monad; -x_10 = l_lean_parser_trailing__level__parser__m_monad__except; -x_11 = l_lean_parser_trailing__level__parser__m_lean_parser_monad__parsec; -x_12 = l_lean_parser_trailing__level__parser__m_alternative; -x_13 = l_lean_parser_level_trailing; -x_14 = l_lean_parser_level_trailing_has__view; -lean::inc(x_14); +x_2 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level_app_parser), 5, 0); +x_4 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_4, 0, x_3); +lean::cnstr_set(x_4, 1, x_2); +x_5 = lean::mk_nat_obj(0u); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__1), 7, 2); +lean::closure_set(x_6, 0, x_4); +lean::closure_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_0); +x_8 = l_lean_parser_trailing__level__parser__m_monad; +x_9 = l_lean_parser_trailing__level__parser__m_monad__except; +x_10 = l_lean_parser_trailing__level__parser__m_lean_parser_monad__parsec; +x_11 = l_lean_parser_trailing__level__parser__m_alternative; +x_12 = l_lean_parser_level_trailing; +x_13 = l_lean_parser_level_trailing_has__view; lean::inc(x_13); lean::inc(x_12); lean::inc(x_11); lean::inc(x_10); lean::inc(x_9); -x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x_8, x_14); -return x_21; +lean::inc(x_8); +x_20 = l_lean_parser_combinators_node_view___rarg(x_8, x_9, x_10, x_11, x_12, x_7, x_13); +return x_20; } } obj* _init_l_lean_parser_level_trailing_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level_add__lit_parser), 5, 0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level_app_parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__1), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_0); -return x_8; +x_2 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level_app_parser), 5, 0); +x_4 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_4, 0, x_3); +lean::cnstr_set(x_4, 1, x_2); +x_5 = lean::mk_nat_obj(0u); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__1), 7, 2); +lean::closure_set(x_6, 0, x_4); +lean::closure_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_0); +return x_7; } } obj* l_lean_parser_level_trailing_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -6085,258 +6055,255 @@ x_38 = lean::string_mk_iterator(x_33); x_39 = l_lean_parser_trie_match__prefix___rarg(x_36, x_38); if (lean::obj_tag(x_39) == 0) { -obj* x_41; obj* x_42; obj* x_43; obj* x_47; obj* x_48; obj* x_50; obj* x_53; obj* x_55; obj* x_57; obj* x_58; obj* x_59; +obj* x_41; obj* x_42; obj* x_43; obj* x_46; obj* x_47; obj* x_49; obj* x_52; obj* x_54; obj* x_56; obj* x_57; obj* x_58; lean::dec(x_17); x_41 = lean::box(0); x_42 = l_lean_parser_curr__lbp___rarg___lambda__1___closed__1; x_43 = l_mjoin___rarg___closed__1; -lean::inc(x_41); lean::inc(x_43); lean::inc(x_42); -x_47 = l_lean_parser_monad__parsec_error___at_lean_parser_level__parser_run___spec__3___rarg(x_42, x_43, x_41, x_41, x_0, x_1, x_13, x_8); -x_48 = lean::cnstr_get(x_47, 0); -lean::inc(x_48); -x_50 = lean::cnstr_get(x_47, 1); -lean::inc(x_50); -lean::dec(x_47); -x_53 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_53); -x_55 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_53, x_48); -lean::inc(x_53); -x_57 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_53, x_55); -x_58 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_57); +x_46 = l_lean_parser_monad__parsec_error___at_lean_parser_level__parser_run___spec__3___rarg(x_42, x_43, x_41, x_41, x_0, x_1, x_13, x_8); +x_47 = lean::cnstr_get(x_46, 0); +lean::inc(x_47); +x_49 = lean::cnstr_get(x_46, 1); +lean::inc(x_49); +lean::dec(x_46); +x_52 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_52); +x_54 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_52, x_47); +lean::inc(x_52); +x_56 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_52, x_54); +x_57 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_56); if (lean::is_scalar(x_10)) { - x_59 = lean::alloc_cnstr(0, 2, 0); + x_58 = lean::alloc_cnstr(0, 2, 0); } else { - x_59 = x_10; + x_58 = x_10; } -lean::cnstr_set(x_59, 0, x_58); -lean::cnstr_set(x_59, 1, x_50); -return x_59; +lean::cnstr_set(x_58, 0, x_57); +lean::cnstr_set(x_58, 1, x_49); +return x_58; } else { -obj* x_62; obj* x_65; obj* x_68; obj* x_71; obj* x_73; obj* x_74; obj* x_75; +obj* x_61; obj* x_64; obj* x_67; obj* x_70; obj* x_72; obj* x_73; obj* x_74; lean::dec(x_1); lean::dec(x_0); -x_62 = lean::cnstr_get(x_39, 0); -lean::inc(x_62); +x_61 = lean::cnstr_get(x_39, 0); +lean::inc(x_61); lean::dec(x_39); -x_65 = lean::cnstr_get(x_62, 1); -lean::inc(x_65); -lean::dec(x_62); -x_68 = lean::cnstr_get(x_65, 1); -lean::inc(x_68); -lean::dec(x_65); -x_71 = l_lean_parser_match__token___closed__2; -lean::inc(x_71); +x_64 = lean::cnstr_get(x_61, 1); +lean::inc(x_64); +lean::dec(x_61); +x_67 = lean::cnstr_get(x_64, 1); +lean::inc(x_67); +lean::dec(x_64); +x_70 = l_lean_parser_match__token___closed__2; +lean::inc(x_70); if (lean::is_scalar(x_17)) { - x_73 = lean::alloc_cnstr(0, 3, 0); + x_72 = lean::alloc_cnstr(0, 3, 0); } else { - x_73 = x_17; + x_72 = x_17; } -lean::cnstr_set(x_73, 0, x_68); -lean::cnstr_set(x_73, 1, x_13); -lean::cnstr_set(x_73, 2, x_71); -x_74 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_73); +lean::cnstr_set(x_72, 0, x_67); +lean::cnstr_set(x_72, 1, x_13); +lean::cnstr_set(x_72, 2, x_70); +x_73 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_72); if (lean::is_scalar(x_10)) { - x_75 = lean::alloc_cnstr(0, 2, 0); + x_74 = lean::alloc_cnstr(0, 2, 0); } else { - x_75 = x_10; + x_74 = x_10; } -lean::cnstr_set(x_75, 0, x_74); -lean::cnstr_set(x_75, 1, x_8); -return x_75; +lean::cnstr_set(x_74, 0, x_73); +lean::cnstr_set(x_74, 1, x_8); +return x_74; } } case 1: { -obj* x_79; obj* x_80; obj* x_83; obj* x_84; obj* x_85; +obj* x_78; obj* x_79; obj* x_82; obj* x_83; obj* x_84; lean::dec(x_1); lean::dec(x_0); lean::dec(x_27); -x_79 = l_lean_parser_max__prec; -x_80 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_80); +x_78 = l_lean_parser_max__prec; +x_79 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_79); +lean::inc(x_78); if (lean::is_scalar(x_17)) { - x_83 = lean::alloc_cnstr(0, 3, 0); + x_82 = lean::alloc_cnstr(0, 3, 0); } else { - x_83 = x_17; + x_82 = x_17; } -lean::cnstr_set(x_83, 0, x_79); -lean::cnstr_set(x_83, 1, x_13); -lean::cnstr_set(x_83, 2, x_80); -x_84 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_83); +lean::cnstr_set(x_82, 0, x_78); +lean::cnstr_set(x_82, 1, x_13); +lean::cnstr_set(x_82, 2, x_79); +x_83 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_82); if (lean::is_scalar(x_10)) { - x_85 = lean::alloc_cnstr(0, 2, 0); + x_84 = lean::alloc_cnstr(0, 2, 0); } else { - x_85 = x_10; + x_84 = x_10; } -lean::cnstr_set(x_85, 0, x_84); -lean::cnstr_set(x_85, 1, x_8); -return x_85; +lean::cnstr_set(x_84, 0, x_83); +lean::cnstr_set(x_84, 1, x_8); +return x_84; } case 2: { -obj* x_86; obj* x_89; obj* x_92; uint8 x_93; -x_86 = lean::cnstr_get(x_27, 0); -lean::inc(x_86); +obj* x_85; obj* x_88; obj* x_91; uint8 x_92; +x_85 = lean::cnstr_get(x_27, 0); +lean::inc(x_85); lean::dec(x_27); -x_89 = lean::cnstr_get(x_86, 0); -lean::inc(x_89); -lean::dec(x_86); -x_92 = l_lean_parser_number_has__view_x_27___lambda__1___closed__6; -x_93 = lean_name_dec_eq(x_89, x_92); -if (x_93 == 0) +x_88 = lean::cnstr_get(x_85, 0); +lean::inc(x_88); +lean::dec(x_85); +x_91 = l_lean_parser_number_has__view_x_27___lambda__1___closed__6; +x_92 = lean_name_dec_eq(x_88, x_91); +if (x_92 == 0) { -obj* x_94; uint8 x_95; -x_94 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__1; -x_95 = lean_name_dec_eq(x_89, x_94); -lean::dec(x_89); -if (x_95 == 0) +obj* x_93; uint8 x_94; +x_93 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__1; +x_94 = lean_name_dec_eq(x_88, x_93); +lean::dec(x_88); +if (x_94 == 0) { -obj* x_98; obj* x_99; obj* x_100; obj* x_104; obj* x_105; obj* x_107; obj* x_110; obj* x_111; +obj* x_97; obj* x_98; obj* x_99; obj* x_102; obj* x_103; obj* x_105; obj* x_108; obj* x_109; lean::dec(x_17); -x_98 = lean::box(0); -x_99 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__2; -x_100 = l_mjoin___rarg___closed__1; -lean::inc(x_98); -lean::inc(x_100); +x_97 = lean::box(0); +x_98 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__2; +x_99 = l_mjoin___rarg___closed__1; lean::inc(x_99); -x_104 = l_lean_parser_monad__parsec_error___at_lean_parser_level__parser_run___spec__3___rarg(x_99, x_100, x_98, x_98, x_0, x_1, x_13, x_8); -x_105 = lean::cnstr_get(x_104, 0); +lean::inc(x_98); +x_102 = l_lean_parser_monad__parsec_error___at_lean_parser_level__parser_run___spec__3___rarg(x_98, x_99, x_97, x_97, x_0, x_1, x_13, x_8); +x_103 = lean::cnstr_get(x_102, 0); +lean::inc(x_103); +x_105 = lean::cnstr_get(x_102, 1); lean::inc(x_105); -x_107 = lean::cnstr_get(x_104, 1); -lean::inc(x_107); -lean::dec(x_104); -x_110 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_105); +lean::dec(x_102); +x_108 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_103); if (lean::is_scalar(x_10)) { - x_111 = lean::alloc_cnstr(0, 2, 0); + x_109 = lean::alloc_cnstr(0, 2, 0); } else { - x_111 = x_10; + x_109 = x_10; } -lean::cnstr_set(x_111, 0, x_110); -lean::cnstr_set(x_111, 1, x_107); -return x_111; +lean::cnstr_set(x_109, 0, x_108); +lean::cnstr_set(x_109, 1, x_105); +return x_109; } else { -obj* x_114; obj* x_115; obj* x_118; obj* x_119; obj* x_120; +obj* x_112; obj* x_113; obj* x_116; obj* x_117; obj* x_118; lean::dec(x_1); lean::dec(x_0); -x_114 = l_lean_parser_max__prec; -x_115 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_115); -lean::inc(x_114); +x_112 = l_lean_parser_max__prec; +x_113 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_113); +lean::inc(x_112); if (lean::is_scalar(x_17)) { - x_118 = lean::alloc_cnstr(0, 3, 0); + x_116 = lean::alloc_cnstr(0, 3, 0); } else { - x_118 = x_17; + x_116 = x_17; } -lean::cnstr_set(x_118, 0, x_114); -lean::cnstr_set(x_118, 1, x_13); -lean::cnstr_set(x_118, 2, x_115); -x_119 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_118); +lean::cnstr_set(x_116, 0, x_112); +lean::cnstr_set(x_116, 1, x_13); +lean::cnstr_set(x_116, 2, x_113); +x_117 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_116); if (lean::is_scalar(x_10)) { - x_120 = lean::alloc_cnstr(0, 2, 0); + x_118 = lean::alloc_cnstr(0, 2, 0); } else { - x_120 = x_10; + x_118 = x_10; } -lean::cnstr_set(x_120, 0, x_119); -lean::cnstr_set(x_120, 1, x_8); -return x_120; +lean::cnstr_set(x_118, 0, x_117); +lean::cnstr_set(x_118, 1, x_8); +return x_118; } } else { -obj* x_124; obj* x_125; obj* x_128; obj* x_129; obj* x_130; +obj* x_122; obj* x_123; obj* x_126; obj* x_127; obj* x_128; lean::dec(x_1); lean::dec(x_0); -lean::dec(x_89); -x_124 = l_lean_parser_max__prec; -x_125 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_125); -lean::inc(x_124); +lean::dec(x_88); +x_122 = l_lean_parser_max__prec; +x_123 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_123); +lean::inc(x_122); if (lean::is_scalar(x_17)) { - x_128 = lean::alloc_cnstr(0, 3, 0); + x_126 = lean::alloc_cnstr(0, 3, 0); } else { - x_128 = x_17; + x_126 = x_17; } -lean::cnstr_set(x_128, 0, x_124); -lean::cnstr_set(x_128, 1, x_13); -lean::cnstr_set(x_128, 2, x_125); -x_129 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_128); +lean::cnstr_set(x_126, 0, x_122); +lean::cnstr_set(x_126, 1, x_13); +lean::cnstr_set(x_126, 2, x_123); +x_127 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_126); if (lean::is_scalar(x_10)) { - x_130 = lean::alloc_cnstr(0, 2, 0); + x_128 = lean::alloc_cnstr(0, 2, 0); } else { - x_130 = x_10; + x_128 = x_10; } -lean::cnstr_set(x_130, 0, x_129); -lean::cnstr_set(x_130, 1, x_8); -return x_130; +lean::cnstr_set(x_128, 0, x_127); +lean::cnstr_set(x_128, 1, x_8); +return x_128; } } default: { -obj* x_132; obj* x_133; obj* x_134; obj* x_138; obj* x_139; obj* x_141; obj* x_144; obj* x_145; +obj* x_130; obj* x_131; obj* x_132; obj* x_135; obj* x_136; obj* x_138; obj* x_141; obj* x_142; lean::dec(x_17); -x_132 = lean::box(0); -x_133 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__2; -x_134 = l_mjoin___rarg___closed__1; +x_130 = lean::box(0); +x_131 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__2; +x_132 = l_mjoin___rarg___closed__1; lean::inc(x_132); -lean::inc(x_134); -lean::inc(x_133); -x_138 = l_lean_parser_monad__parsec_error___at_lean_parser_level__parser_run___spec__3___rarg(x_133, x_134, x_132, x_132, x_0, x_1, x_13, x_8); -x_139 = lean::cnstr_get(x_138, 0); -lean::inc(x_139); -x_141 = lean::cnstr_get(x_138, 1); -lean::inc(x_141); -lean::dec(x_138); -x_144 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_139); +lean::inc(x_131); +x_135 = l_lean_parser_monad__parsec_error___at_lean_parser_level__parser_run___spec__3___rarg(x_131, x_132, x_130, x_130, x_0, x_1, x_13, x_8); +x_136 = lean::cnstr_get(x_135, 0); +lean::inc(x_136); +x_138 = lean::cnstr_get(x_135, 1); +lean::inc(x_138); +lean::dec(x_135); +x_141 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_136); if (lean::is_scalar(x_10)) { - x_145 = lean::alloc_cnstr(0, 2, 0); + x_142 = lean::alloc_cnstr(0, 2, 0); } else { - x_145 = x_10; + x_142 = x_10; } -lean::cnstr_set(x_145, 0, x_144); -lean::cnstr_set(x_145, 1, x_141); -return x_145; +lean::cnstr_set(x_142, 0, x_141); +lean::cnstr_set(x_142, 1, x_138); +return x_142; } } } } else { -obj* x_148; uint8 x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; +obj* x_145; uint8 x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; lean::dec(x_1); lean::dec(x_0); -x_148 = lean::cnstr_get(x_6, 0); -lean::inc(x_148); -x_150 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); +x_145 = lean::cnstr_get(x_6, 0); +lean::inc(x_145); +x_147 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); if (lean::is_shared(x_6)) { lean::dec(x_6); - x_151 = lean::box(0); + x_148 = lean::box(0); } else { lean::cnstr_release(x_6, 0); - x_151 = x_6; + x_148 = x_6; } -if (lean::is_scalar(x_151)) { - x_152 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_148)) { + x_149 = lean::alloc_cnstr(1, 1, 1); } else { - x_152 = x_151; + x_149 = x_148; } -lean::cnstr_set(x_152, 0, x_148); -lean::cnstr_set_scalar(x_152, sizeof(void*)*1, x_150); -x_153 = x_152; +lean::cnstr_set(x_149, 0, x_145); +lean::cnstr_set_scalar(x_149, sizeof(void*)*1, x_147); +x_150 = x_149; if (lean::is_scalar(x_10)) { - x_154 = lean::alloc_cnstr(0, 2, 0); + x_151 = lean::alloc_cnstr(0, 2, 0); } else { - x_154 = x_10; + x_151 = x_10; } -lean::cnstr_set(x_154, 0, x_153); -lean::cnstr_set(x_154, 1, x_8); -return x_154; +lean::cnstr_set(x_151, 0, x_150); +lean::cnstr_set(x_151, 1, x_8); +return x_151; } } } @@ -6534,7 +6501,7 @@ return x_93; } else { -obj* x_98; obj* x_99; obj* x_100; obj* x_104; +obj* x_98; obj* x_99; obj* x_100; obj* x_103; lean::dec(x_1); lean::dec(x_3); lean::dec(x_0); @@ -6542,11 +6509,10 @@ lean::dec(x_2); x_98 = lean::box(0); x_99 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_100 = l_mjoin___rarg___closed__1; -lean::inc(x_98); lean::inc(x_100); lean::inc(x_99); -x_104 = l_lean_parser_monad__parsec_error___at_lean_parser_level__parser_run___spec__3___rarg(x_99, x_100, x_98, x_98, x_4, x_5, x_6, x_7); -return x_104; +x_103 = l_lean_parser_monad__parsec_error___at_lean_parser_level__parser_run___spec__3___rarg(x_99, x_100, x_98, x_98, x_4, x_5, x_6, x_7); +return x_103; } } } diff --git a/src/boot/init/lean/parser/module.cpp b/src/boot/init/lean/parser/module.cpp index 013e24741b..7e62430386 100644 --- a/src/boot/init/lean/parser/module.cpp +++ b/src/boot/init/lean/parser/module.cpp @@ -1436,30 +1436,25 @@ return x_13; obj* _init_l_lean_parser_module_import__path_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_11; obj* x_12; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); -lean::inc(x_0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_0); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::mk_string("NOT_AN_IDENT"); -lean::inc(x_4); -x_6 = l_lean_parser_substring_of__string(x_4); -lean::inc(x_0); -x_8 = lean_name_mk_string(x_0, x_4); -lean::inc(x_0); -lean::inc(x_0); -x_11 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_11, 0, x_0); -lean::cnstr_set(x_11, 1, x_6); -lean::cnstr_set(x_11, 2, x_8); -lean::cnstr_set(x_11, 3, x_0); -lean::cnstr_set(x_11, 4, x_0); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_3); -lean::cnstr_set(x_12, 1, x_11); -return x_12; +x_1 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_1, 0, x_0); +lean::cnstr_set(x_1, 1, x_0); +x_2 = lean::mk_string("NOT_AN_IDENT"); +lean::inc(x_2); +x_4 = l_lean_parser_substring_of__string(x_2); +x_5 = lean_name_mk_string(x_0, x_2); +x_6 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_6, 0, x_0); +lean::cnstr_set(x_6, 1, x_4); +lean::cnstr_set(x_6, 2, x_5); +lean::cnstr_set(x_6, 3, x_0); +lean::cnstr_set(x_6, 4, x_0); +x_7 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_7, 0, x_1); +lean::cnstr_set(x_7, 1, x_6); +return x_7; } } obj* _init_l_lean_parser_module_import__path_has__view_x_27___lambda__1___closed__2() { @@ -1474,13 +1469,12 @@ return x_0; obj* _init_l_lean_parser_module_import__path_has__view_x_27___lambda__1___closed__3() { _start: { -obj* x_0; obj* x_2; +obj* x_0; obj* x_1; x_0 = lean::box(0); -lean::inc(x_0); -x_2 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_2, 0, x_0); -lean::cnstr_set(x_2, 1, x_0); -return x_2; +x_1 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_1, 0, x_0); +lean::cnstr_set(x_1, 1, x_0); +return x_1; } } obj* _init_l_lean_parser_module_import__path_has__view_x_27___lambda__1___closed__4() { @@ -2192,15 +2186,13 @@ return x_24; obj* _init_l_lean_parser_module_import__path_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_2; obj* x_4; obj* x_5; obj* x_6; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; x_0 = lean::box(0); -lean::inc(x_0); -x_2 = l_lean_parser_tokens___rarg(x_0); -lean::inc(x_0); -x_4 = l_lean_parser_list_cons_tokens___rarg(x_0, x_0); -x_5 = l_lean_parser_list_cons_tokens___rarg(x_2, x_4); -x_6 = l_lean_parser_tokens___rarg(x_5); -return x_6; +x_1 = l_lean_parser_tokens___rarg(x_0); +x_2 = l_lean_parser_list_cons_tokens___rarg(x_0, x_0); +x_3 = l_lean_parser_list_cons_tokens___rarg(x_1, x_2); +x_4 = l_lean_parser_tokens___rarg(x_3); +return x_4; } } obj* _init_l_lean_parser_module_import__path_parser___closed__1() { @@ -3289,7 +3281,7 @@ return x_1; obj* l_lean_parser_module_header_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; +obj* x_1; obj* x_3; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -3302,46 +3294,44 @@ x_9 = l_lean_parser_no__kind; lean::inc(x_9); x_11 = l_lean_parser_syntax_mk__node(x_9, x_8); x_12 = lean::box(0); -lean::inc(x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_12); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_11); +lean::cnstr_set(x_13, 1, x_12); if (lean::obj_tag(x_1) == 0) { -obj* x_16; obj* x_18; obj* x_19; obj* x_21; -lean::dec(x_12); -x_16 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_14); -x_19 = l_lean_parser_module_header; -lean::inc(x_19); -x_21 = l_lean_parser_syntax_mk__node(x_19, x_18); -return x_21; +obj* x_14; obj* x_16; obj* x_17; obj* x_19; +x_14 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_14); +x_16 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_16, 0, x_14); +lean::cnstr_set(x_16, 1, x_13); +x_17 = l_lean_parser_module_header; +lean::inc(x_17); +x_19 = l_lean_parser_syntax_mk__node(x_17, x_16); +return x_19; } else { -obj* x_22; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; -x_22 = lean::cnstr_get(x_1, 0); -lean::inc(x_22); +obj* x_20; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; +x_20 = lean::cnstr_get(x_1, 0); +lean::inc(x_20); lean::dec(x_1); -x_25 = l_lean_parser_module_prelude_has__view; -x_26 = lean::cnstr_get(x_25, 1); -lean::inc(x_26); -x_28 = lean::apply_1(x_26, x_22); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_12); +x_23 = l_lean_parser_module_prelude_has__view; +x_24 = lean::cnstr_get(x_23, 1); +lean::inc(x_24); +x_26 = lean::apply_1(x_24, x_20); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_26); +lean::cnstr_set(x_27, 1, x_12); lean::inc(x_9); -x_31 = l_lean_parser_syntax_mk__node(x_9, x_29); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_14); -x_33 = l_lean_parser_module_header; -lean::inc(x_33); -x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); -return x_35; +x_29 = l_lean_parser_syntax_mk__node(x_9, x_27); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_13); +x_31 = l_lean_parser_module_header; +lean::inc(x_31); +x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); +return x_33; } } } @@ -3443,7 +3433,7 @@ goto lbl_10; } else { -obj* x_36; uint8 x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_44; obj* x_46; obj* x_49; obj* x_51; obj* x_52; obj* x_54; obj* x_55; obj* x_56; +obj* x_36; uint8 x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_44; obj* x_46; obj* x_49; obj* x_50; obj* x_51; obj* x_53; obj* x_54; obj* x_55; x_36 = lean::cnstr_get(x_13, 0); lean::inc(x_36); x_38 = lean::cnstr_get_scalar(x_13, sizeof(void*)*1); @@ -3464,48 +3454,47 @@ x_46 = lean::cnstr_get(x_36, 3); lean::inc(x_46); lean::dec(x_36); x_49 = l_option_get___main___at_lean_parser_run___spec__2(x_46); -lean::inc(x_7); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_49); -lean::cnstr_set(x_51, 1, x_7); -x_52 = l_lean_parser_no__kind; -lean::inc(x_52); -x_54 = l_lean_parser_syntax_mk__node(x_52, x_51); -x_55 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_55, 0, x_54); -x_56 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_56, 0, x_40); -lean::cnstr_set(x_56, 1, x_42); -lean::cnstr_set(x_56, 2, x_44); -lean::cnstr_set(x_56, 3, x_55); +x_50 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_50, 0, x_49); +lean::cnstr_set(x_50, 1, x_7); +x_51 = l_lean_parser_no__kind; +lean::inc(x_51); +x_53 = l_lean_parser_syntax_mk__node(x_51, x_50); +x_54 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_54, 0, x_53); +x_55 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_55, 0, x_40); +lean::cnstr_set(x_55, 1, x_42); +lean::cnstr_set(x_55, 2, x_44); +lean::cnstr_set(x_55, 3, x_54); if (x_38 == 0) { -uint8 x_57; obj* x_58; obj* x_59; -x_57 = 0; +uint8 x_56; obj* x_57; obj* x_58; +x_56 = 0; if (lean::is_scalar(x_39)) { - x_58 = lean::alloc_cnstr(1, 1, 1); + x_57 = lean::alloc_cnstr(1, 1, 1); } else { - x_58 = x_39; + x_57 = x_39; } -lean::cnstr_set(x_58, 0, x_56); -lean::cnstr_set_scalar(x_58, sizeof(void*)*1, x_57); -x_59 = x_58; -x_8 = x_59; +lean::cnstr_set(x_57, 0, x_55); +lean::cnstr_set_scalar(x_57, sizeof(void*)*1, x_56); +x_58 = x_57; +x_8 = x_58; x_9 = x_15; goto lbl_10; } else { -obj* x_60; obj* x_61; +obj* x_59; obj* x_60; if (lean::is_scalar(x_39)) { - x_60 = lean::alloc_cnstr(1, 1, 1); + x_59 = lean::alloc_cnstr(1, 1, 1); } else { - x_60 = x_39; + x_59 = x_39; } -lean::cnstr_set(x_60, 0, x_56); -lean::cnstr_set_scalar(x_60, sizeof(void*)*1, x_38); -x_61 = x_60; -x_8 = x_61; +lean::cnstr_set(x_59, 0, x_55); +lean::cnstr_set_scalar(x_59, sizeof(void*)*1, x_38); +x_60 = x_59; +x_8 = x_60; x_9 = x_15; goto lbl_10; } @@ -3514,105 +3503,104 @@ lbl_6: { if (lean::obj_tag(x_4) == 0) { -obj* x_62; obj* x_64; obj* x_66; obj* x_68; -x_62 = lean::cnstr_get(x_4, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_4, 1); -lean::inc(x_64); -x_66 = lean::cnstr_get(x_4, 2); -lean::inc(x_66); +obj* x_61; obj* x_63; obj* x_65; obj* x_67; +x_61 = lean::cnstr_get(x_4, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_4, 1); +lean::inc(x_63); +x_65 = lean::cnstr_get(x_4, 2); +lean::inc(x_65); if (lean::is_shared(x_4)) { lean::dec(x_4); - x_68 = lean::box(0); + x_67 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); lean::cnstr_release(x_4, 2); - x_68 = x_4; + x_67 = x_4; } -if (lean::obj_tag(x_62) == 0) +if (lean::obj_tag(x_61) == 0) { -obj* x_69; obj* x_70; obj* x_73; obj* x_74; obj* x_75; -x_69 = l_lean_parser_combinators_many___rarg___closed__1; -x_70 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_70); +obj* x_68; obj* x_69; obj* x_72; obj* x_73; obj* x_74; +x_68 = l_lean_parser_combinators_many___rarg___closed__1; +x_69 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_69); -if (lean::is_scalar(x_68)) { - x_73 = lean::alloc_cnstr(0, 3, 0); +lean::inc(x_68); +if (lean::is_scalar(x_67)) { + x_72 = lean::alloc_cnstr(0, 3, 0); } else { - x_73 = x_68; + x_72 = x_67; } -lean::cnstr_set(x_73, 0, x_69); -lean::cnstr_set(x_73, 1, x_64); -lean::cnstr_set(x_73, 2, x_70); -x_74 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_66, x_73); -x_75 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_75, 0, x_74); -lean::cnstr_set(x_75, 1, x_5); -return x_75; +lean::cnstr_set(x_72, 0, x_68); +lean::cnstr_set(x_72, 1, x_63); +lean::cnstr_set(x_72, 2, x_69); +x_73 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_65, x_72); +x_74 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_74, 0, x_73); +lean::cnstr_set(x_74, 1, x_5); +return x_74; } else { -obj* x_76; obj* x_79; obj* x_80; obj* x_81; obj* x_83; obj* x_84; obj* x_86; obj* x_87; obj* x_88; -x_76 = lean::cnstr_get(x_62, 0); -lean::inc(x_76); -lean::dec(x_62); -x_79 = lean::box(0); -x_80 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_80, 0, x_76); -lean::cnstr_set(x_80, 1, x_79); -x_81 = l_lean_parser_no__kind; -lean::inc(x_81); -x_83 = l_lean_parser_syntax_mk__node(x_81, x_80); -x_84 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_84); -if (lean::is_scalar(x_68)) { - x_86 = lean::alloc_cnstr(0, 3, 0); +obj* x_75; obj* x_78; obj* x_79; obj* x_80; obj* x_82; obj* x_83; obj* x_85; obj* x_86; obj* x_87; +x_75 = lean::cnstr_get(x_61, 0); +lean::inc(x_75); +lean::dec(x_61); +x_78 = lean::box(0); +x_79 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_79, 0, x_75); +lean::cnstr_set(x_79, 1, x_78); +x_80 = l_lean_parser_no__kind; +lean::inc(x_80); +x_82 = l_lean_parser_syntax_mk__node(x_80, x_79); +x_83 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_83); +if (lean::is_scalar(x_67)) { + x_85 = lean::alloc_cnstr(0, 3, 0); } else { - x_86 = x_68; + x_85 = x_67; } -lean::cnstr_set(x_86, 0, x_83); -lean::cnstr_set(x_86, 1, x_64); -lean::cnstr_set(x_86, 2, x_84); -x_87 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_66, x_86); -x_88 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_88, 0, x_87); -lean::cnstr_set(x_88, 1, x_5); -return x_88; +lean::cnstr_set(x_85, 0, x_82); +lean::cnstr_set(x_85, 1, x_63); +lean::cnstr_set(x_85, 2, x_83); +x_86 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_65, x_85); +x_87 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_87, 0, x_86); +lean::cnstr_set(x_87, 1, x_5); +return x_87; } } else { -obj* x_89; uint8 x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; -x_89 = lean::cnstr_get(x_4, 0); -lean::inc(x_89); -x_91 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); +obj* x_88; uint8 x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; +x_88 = lean::cnstr_get(x_4, 0); +lean::inc(x_88); +x_90 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); if (lean::is_shared(x_4)) { lean::dec(x_4); - x_92 = lean::box(0); + x_91 = lean::box(0); } else { lean::cnstr_release(x_4, 0); - x_92 = x_4; + x_91 = x_4; } -if (lean::is_scalar(x_92)) { - x_93 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_91)) { + x_92 = lean::alloc_cnstr(1, 1, 1); } else { - x_93 = x_92; + x_92 = x_91; } -lean::cnstr_set(x_93, 0, x_89); -lean::cnstr_set_scalar(x_93, sizeof(void*)*1, x_91); -x_94 = x_93; -x_95 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set(x_95, 1, x_5); -return x_95; +lean::cnstr_set(x_92, 0, x_88); +lean::cnstr_set_scalar(x_92, sizeof(void*)*1, x_90); +x_93 = x_92; +x_94 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_94, 0, x_93); +lean::cnstr_set(x_94, 1, x_5); +return x_94; } } lbl_10: { if (lean::obj_tag(x_8) == 0) { -lean::dec(x_7); lean::dec(x_2); x_4 = x_8; x_5 = x_9; @@ -3620,37 +3608,36 @@ goto lbl_6; } else { -obj* x_98; uint8 x_100; -x_98 = lean::cnstr_get(x_8, 0); -lean::inc(x_98); -x_100 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (x_100 == 0) +obj* x_96; uint8 x_98; +x_96 = lean::cnstr_get(x_8, 0); +lean::inc(x_96); +x_98 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); +if (x_98 == 0) { -obj* x_102; obj* x_105; obj* x_107; obj* x_108; obj* x_109; +obj* x_100; obj* x_103; obj* x_105; obj* x_106; obj* x_107; lean::dec(x_8); -x_102 = lean::cnstr_get(x_98, 2); -lean::inc(x_102); -lean::dec(x_98); -x_105 = l_mjoin___rarg___closed__1; -lean::inc(x_105); -x_107 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_107, 0, x_102); -lean::closure_set(x_107, 1, x_105); -x_108 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_108, 0, x_107); -x_109 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_109, 0, x_7); -lean::cnstr_set(x_109, 1, x_2); -lean::cnstr_set(x_109, 2, x_108); -x_4 = x_109; +x_100 = lean::cnstr_get(x_96, 2); +lean::inc(x_100); +lean::dec(x_96); +x_103 = l_mjoin___rarg___closed__1; +lean::inc(x_103); +x_105 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_105, 0, x_100); +lean::closure_set(x_105, 1, x_103); +x_106 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_106, 0, x_105); +x_107 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_107, 0, x_7); +lean::cnstr_set(x_107, 1, x_2); +lean::cnstr_set(x_107, 2, x_106); +x_4 = x_107; x_5 = x_9; goto lbl_6; } else { -lean::dec(x_7); lean::dec(x_2); -lean::dec(x_98); +lean::dec(x_96); x_4 = x_8; x_5 = x_9; goto lbl_6; @@ -3931,7 +3918,7 @@ lean::dec(x_21); lean::dec(x_20); if (x_22 == 0) { -uint32 x_29; obj* x_31; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_41; obj* x_42; +uint32 x_29; obj* x_31; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_40; obj* x_41; lean::dec(x_6); lean::dec(x_0); lean::dec(x_13); @@ -3946,81 +3933,80 @@ lean::dec(x_31); x_36 = lean::string_append(x_34, x_32); x_37 = lean::box(0); x_38 = l_lean_parser_monad__parsec_eoi___rarg___lambda__1___closed__1; -lean::inc(x_37); lean::inc(x_38); -x_41 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_module_1__commands__aux___main___spec__1___rarg(x_36, x_38, x_37, x_37, x_16, x_9, x_4); -x_42 = lean::alloc_closure(reinterpret_cast(l_coroutine_bind___main___rarg), 3, 2); -lean::closure_set(x_42, 0, x_41); -lean::closure_set(x_42, 1, x_19); -return x_42; +x_40 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_module_1__commands__aux___main___spec__1___rarg(x_36, x_38, x_37, x_37, x_16, x_9, x_4); +x_41 = lean::alloc_closure(reinterpret_cast(l_coroutine_bind___main___rarg), 3, 2); +lean::closure_set(x_41, 0, x_40); +lean::closure_set(x_41, 1, x_19); +return x_41; } else { -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; +obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; lean::dec(x_14); -x_44 = lean::box(0); +x_43 = lean::box(0); if (lean::is_scalar(x_6)) { - x_45 = lean::alloc_cnstr(0, 2, 0); + x_44 = lean::alloc_cnstr(0, 2, 0); } else { - x_45 = x_6; + x_44 = x_6; +} +lean::cnstr_set(x_44, 0, x_43); +lean::cnstr_set(x_44, 1, x_16); +if (lean::is_scalar(x_13)) { + x_45 = lean::alloc_cnstr(0, 3, 0); +} else { + x_45 = x_13; } lean::cnstr_set(x_45, 0, x_44); -lean::cnstr_set(x_45, 1, x_16); -if (lean::is_scalar(x_13)) { - x_46 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_45, 1, x_9); +lean::cnstr_set(x_45, 2, x_0); +if (lean::is_scalar(x_18)) { + x_46 = lean::alloc_cnstr(0, 2, 0); } else { - x_46 = x_13; + x_46 = x_18; } lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_9); -lean::cnstr_set(x_46, 2, x_0); -if (lean::is_scalar(x_18)) { - x_47 = lean::alloc_cnstr(0, 2, 0); -} else { - x_47 = x_18; -} -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_4); -x_48 = lean::alloc_closure(reinterpret_cast(l_lean_parser_module__parser__m_lift__parser__t___rarg___lambda__2), 2, 1); +lean::cnstr_set(x_46, 1, x_4); +x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_module__parser__m_lift__parser__t___rarg___lambda__2), 2, 1); +lean::closure_set(x_47, 0, x_46); +x_48 = lean::alloc_closure(reinterpret_cast(l_coroutine_bind___main___rarg), 3, 2); lean::closure_set(x_48, 0, x_47); -x_49 = lean::alloc_closure(reinterpret_cast(l_coroutine_bind___main___rarg), 3, 2); -lean::closure_set(x_49, 0, x_48); -lean::closure_set(x_49, 1, x_19); -return x_49; +lean::closure_set(x_48, 1, x_19); +return x_48; } } else { -obj* x_51; uint8 x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; +obj* x_50; uint8 x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; lean::dec(x_0); -x_51 = lean::cnstr_get(x_2, 0); -lean::inc(x_51); -x_53 = lean::cnstr_get_scalar(x_2, sizeof(void*)*1); +x_50 = lean::cnstr_get(x_2, 0); +lean::inc(x_50); +x_52 = lean::cnstr_get_scalar(x_2, sizeof(void*)*1); if (lean::is_shared(x_2)) { lean::dec(x_2); - x_54 = lean::box(0); + x_53 = lean::box(0); } else { lean::cnstr_release(x_2, 0); - x_54 = x_2; + x_53 = x_2; } -if (lean::is_scalar(x_54)) { - x_55 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_53)) { + x_54 = lean::alloc_cnstr(1, 1, 1); } else { - x_55 = x_54; + x_54 = x_53; } -lean::cnstr_set(x_55, 0, x_51); -lean::cnstr_set_scalar(x_55, sizeof(void*)*1, x_53); -x_56 = x_55; +lean::cnstr_set(x_54, 0, x_50); +lean::cnstr_set_scalar(x_54, sizeof(void*)*1, x_52); +x_55 = x_54; if (lean::is_scalar(x_6)) { - x_57 = lean::alloc_cnstr(0, 2, 0); + x_56 = lean::alloc_cnstr(0, 2, 0); } else { - x_57 = x_6; + x_56 = x_6; } -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_4); -x_58 = lean::alloc_closure(reinterpret_cast(l_lean_parser_module__parser__m_lift__parser__t___rarg___lambda__2), 2, 1); -lean::closure_set(x_58, 0, x_57); -return x_58; +lean::cnstr_set(x_56, 0, x_55); +lean::cnstr_set(x_56, 1, x_4); +x_57 = lean::alloc_closure(reinterpret_cast(l_lean_parser_module__parser__m_lift__parser__t___rarg___lambda__2), 2, 1); +lean::closure_set(x_57, 0, x_56); +return x_57; } } } @@ -4208,7 +4194,7 @@ lean::closure_set(x_19, 0, x_11); x_20 = lean::string_iterator_has_next(x_14); if (x_20 == 0) { -obj* x_25; obj* x_26; obj* x_27; obj* x_31; obj* x_32; +obj* x_25; obj* x_26; obj* x_27; obj* x_30; obj* x_31; lean::dec(x_14); lean::dec(x_6); lean::dec(x_0); @@ -4216,112 +4202,110 @@ lean::dec(x_13); x_25 = lean::box(0); x_26 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_27 = l_mjoin___rarg___closed__1; -lean::inc(x_25); lean::inc(x_27); lean::inc(x_26); -x_31 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_module_1__commands__aux___main___spec__1___rarg(x_26, x_27, x_25, x_25, x_16, x_9, x_4); -x_32 = lean::alloc_closure(reinterpret_cast(l_coroutine_bind___main___rarg), 3, 2); -lean::closure_set(x_32, 0, x_31); -lean::closure_set(x_32, 1, x_19); -return x_32; +x_30 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_module_1__commands__aux___main___spec__1___rarg(x_26, x_27, x_25, x_25, x_16, x_9, x_4); +x_31 = lean::alloc_closure(reinterpret_cast(l_coroutine_bind___main___rarg), 3, 2); +lean::closure_set(x_31, 0, x_30); +lean::closure_set(x_31, 1, x_19); +return x_31; } else { -uint32 x_33; uint8 x_34; -x_33 = lean::string_iterator_curr(x_14); -x_34 = l_true_decidable; -if (x_34 == 0) +uint32 x_32; uint8 x_33; +x_32 = lean::string_iterator_curr(x_14); +x_33 = l_true_decidable; +if (x_33 == 0) { -obj* x_39; obj* x_40; obj* x_42; obj* x_44; obj* x_45; obj* x_46; obj* x_49; obj* x_50; +obj* x_38; obj* x_39; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_48; lean::dec(x_14); lean::dec(x_6); lean::dec(x_0); lean::dec(x_13); -x_39 = l_char_quote__core(x_33); -x_40 = l_char_has__repr___closed__1; -lean::inc(x_40); -x_42 = lean::string_append(x_40, x_39); -lean::dec(x_39); -x_44 = lean::string_append(x_42, x_40); -x_45 = lean::box(0); -x_46 = l_mjoin___rarg___closed__1; +x_38 = l_char_quote__core(x_32); +x_39 = l_char_has__repr___closed__1; +lean::inc(x_39); +x_41 = lean::string_append(x_39, x_38); +lean::dec(x_38); +x_43 = lean::string_append(x_41, x_39); +x_44 = lean::box(0); +x_45 = l_mjoin___rarg___closed__1; lean::inc(x_45); -lean::inc(x_46); -x_49 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_module_1__commands__aux___main___spec__1___rarg(x_44, x_46, x_45, x_45, x_16, x_9, x_4); -x_50 = lean::alloc_closure(reinterpret_cast(l_coroutine_bind___main___rarg), 3, 2); -lean::closure_set(x_50, 0, x_49); -lean::closure_set(x_50, 1, x_19); -return x_50; +x_47 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_module_1__commands__aux___main___spec__1___rarg(x_43, x_45, x_44, x_44, x_16, x_9, x_4); +x_48 = lean::alloc_closure(reinterpret_cast(l_coroutine_bind___main___rarg), 3, 2); +lean::closure_set(x_48, 0, x_47); +lean::closure_set(x_48, 1, x_19); +return x_48; } else { -obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; +obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; lean::dec(x_9); -x_52 = lean::string_iterator_next(x_14); -x_53 = lean::box(0); -x_54 = lean::box_uint32(x_33); +x_50 = lean::string_iterator_next(x_14); +x_51 = lean::box(0); +x_52 = lean::box_uint32(x_32); if (lean::is_scalar(x_13)) { - x_55 = lean::alloc_cnstr(0, 3, 0); + x_53 = lean::alloc_cnstr(0, 3, 0); } else { - x_55 = x_13; + x_53 = x_13; } -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_52); -lean::cnstr_set(x_55, 2, x_53); +lean::cnstr_set(x_53, 0, x_52); +lean::cnstr_set(x_53, 1, x_50); +lean::cnstr_set(x_53, 2, x_51); if (lean::is_scalar(x_6)) { - x_56 = lean::alloc_cnstr(0, 2, 0); + x_54 = lean::alloc_cnstr(0, 2, 0); } else { - x_56 = x_6; + x_54 = x_6; } -lean::cnstr_set(x_56, 0, x_55); -lean::cnstr_set(x_56, 1, x_4); -x_57 = lean::alloc_closure(reinterpret_cast(l_lean_parser_module__parser__m_lift__parser__t___rarg___lambda__2), 2, 1); -lean::closure_set(x_57, 0, x_56); -x_58 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_any___at___private_init_lean_parser_module_1__commands__aux___main___spec__3___lambda__1), 3, 2); -lean::closure_set(x_58, 0, x_16); -lean::closure_set(x_58, 1, x_0); -x_59 = lean::alloc_closure(reinterpret_cast(l_coroutine_bind___main___rarg), 3, 2); -lean::closure_set(x_59, 0, x_57); -lean::closure_set(x_59, 1, x_58); -x_60 = lean::alloc_closure(reinterpret_cast(l_coroutine_bind___main___rarg), 3, 2); -lean::closure_set(x_60, 0, x_59); -lean::closure_set(x_60, 1, x_19); -return x_60; +lean::cnstr_set(x_54, 0, x_53); +lean::cnstr_set(x_54, 1, x_4); +x_55 = lean::alloc_closure(reinterpret_cast(l_lean_parser_module__parser__m_lift__parser__t___rarg___lambda__2), 2, 1); +lean::closure_set(x_55, 0, x_54); +x_56 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_any___at___private_init_lean_parser_module_1__commands__aux___main___spec__3___lambda__1), 3, 2); +lean::closure_set(x_56, 0, x_16); +lean::closure_set(x_56, 1, x_0); +x_57 = lean::alloc_closure(reinterpret_cast(l_coroutine_bind___main___rarg), 3, 2); +lean::closure_set(x_57, 0, x_55); +lean::closure_set(x_57, 1, x_56); +x_58 = lean::alloc_closure(reinterpret_cast(l_coroutine_bind___main___rarg), 3, 2); +lean::closure_set(x_58, 0, x_57); +lean::closure_set(x_58, 1, x_19); +return x_58; } } } else { -obj* x_62; uint8 x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; +obj* x_60; uint8 x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; lean::dec(x_0); -x_62 = lean::cnstr_get(x_2, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get_scalar(x_2, sizeof(void*)*1); +x_60 = lean::cnstr_get(x_2, 0); +lean::inc(x_60); +x_62 = lean::cnstr_get_scalar(x_2, sizeof(void*)*1); if (lean::is_shared(x_2)) { lean::dec(x_2); - x_65 = lean::box(0); + x_63 = lean::box(0); } else { lean::cnstr_release(x_2, 0); - x_65 = x_2; + x_63 = x_2; } -if (lean::is_scalar(x_65)) { - x_66 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_63)) { + x_64 = lean::alloc_cnstr(1, 1, 1); } else { - x_66 = x_65; + x_64 = x_63; } -lean::cnstr_set(x_66, 0, x_62); -lean::cnstr_set_scalar(x_66, sizeof(void*)*1, x_64); -x_67 = x_66; +lean::cnstr_set(x_64, 0, x_60); +lean::cnstr_set_scalar(x_64, sizeof(void*)*1, x_62); +x_65 = x_64; if (lean::is_scalar(x_6)) { - x_68 = lean::alloc_cnstr(0, 2, 0); + x_66 = lean::alloc_cnstr(0, 2, 0); } else { - x_68 = x_6; + x_66 = x_6; } -lean::cnstr_set(x_68, 0, x_67); -lean::cnstr_set(x_68, 1, x_4); -x_69 = lean::alloc_closure(reinterpret_cast(l_lean_parser_module__parser__m_lift__parser__t___rarg___lambda__2), 2, 1); -lean::closure_set(x_69, 0, x_68); -return x_69; +lean::cnstr_set(x_66, 0, x_65); +lean::cnstr_set(x_66, 1, x_4); +x_67 = lean::alloc_closure(reinterpret_cast(l_lean_parser_module__parser__m_lift__parser__t___rarg___lambda__2), 2, 1); +lean::closure_set(x_67, 0, x_66); +return x_67; } } } @@ -6486,16 +6470,15 @@ return x_26; } else { -obj* x_28; obj* x_29; obj* x_30; obj* x_34; +obj* x_28; obj* x_29; obj* x_30; obj* x_33; lean::dec(x_1); x_28 = lean::box(0); x_29 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_30 = l_mjoin___rarg___closed__1; -lean::inc(x_28); lean::inc(x_30); lean::inc(x_29); -x_34 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_module_1__commands__aux___main___spec__1___rarg(x_29, x_30, x_28, x_28, x_2, x_3, x_4); -return x_34; +x_33 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_module_1__commands__aux___main___spec__1___rarg(x_29, x_30, x_28, x_28, x_2, x_3, x_4); +return x_33; } } } diff --git a/src/boot/init/lean/parser/notation.cpp b/src/boot/init/lean/parser/notation.cpp index b077e97781..5c7a9d1bc3 100644 --- a/src/boot/init/lean/parser/notation.cpp +++ b/src/boot/init/lean/parser/notation.cpp @@ -728,50 +728,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -781,40 +780,40 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; -x_80 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_80, 0, x_1); -return x_80; +obj* x_79; +x_79 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_79, 0, x_1); +return x_79; } else { -obj* x_81; obj* x_82; obj* x_84; obj* x_85; -x_81 = l_lean_parser_number_has__view; -x_82 = lean::cnstr_get(x_81, 0); -lean::inc(x_82); -x_84 = lean::apply_1(x_82, x_1); -x_85 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_85, 0, x_84); -return x_85; +obj* x_80; obj* x_81; obj* x_83; obj* x_84; +x_80 = l_lean_parser_number_has__view; +x_81 = lean::cnstr_get(x_80, 0); +lean::inc(x_81); +x_83 = lean::apply_1(x_81, x_1); +x_84 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_84, 0, x_83); +return x_84; } } } @@ -826,7 +825,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -834,41 +833,39 @@ x_5 = l_lean_parser_number_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_command_notation__spec_precedence__lit; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_command_notation__spec_precedence__lit; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -lean::inc(x_1); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_18); -lean::cnstr_set(x_22, 1, x_1); -x_23 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_23); -x_25 = l_lean_parser_syntax_mk__node(x_23, x_22); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_command_notation__spec_precedence__lit; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -return x_29; +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_17); +lean::cnstr_set(x_20, 1, x_1); +x_21 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_21); +x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_command_notation__spec_precedence__lit; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +return x_27; } } } @@ -1370,217 +1367,215 @@ _start: { if (lean::obj_tag(x_0) == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_1); x_8 = lean::box(0); x_9 = l_lean_parser_combinators_choice__aux___main___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_9, x_10, x_8, x_8, x_2, x_3, x_4, x_5, x_6); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_9, x_10, x_8, x_8, x_2, x_3, x_4, x_5, x_6); +return x_13; } else { -obj* x_15; obj* x_17; obj* x_19; obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_30; obj* x_31; -x_15 = lean::cnstr_get(x_0, 0); -lean::inc(x_15); -x_17 = lean::cnstr_get(x_0, 1); -lean::inc(x_17); +obj* x_14; obj* x_16; obj* x_18; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; +x_14 = lean::cnstr_get(x_0, 0); +lean::inc(x_14); +x_16 = lean::cnstr_get(x_0, 1); +lean::inc(x_16); if (lean::is_shared(x_0)) { lean::dec(x_0); - x_19 = lean::box(0); + x_18 = lean::box(0); } else { lean::cnstr_release(x_0, 0); lean::cnstr_release(x_0, 1); - x_19 = x_0; + x_18 = x_0; } lean::inc(x_5); lean::inc(x_4); lean::inc(x_3); lean::inc(x_2); -x_24 = lean::apply_5(x_15, x_2, x_3, x_4, x_5, x_6); -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); +x_23 = lean::apply_5(x_14, x_2, x_3, x_4, x_5, x_6); +x_24 = lean::cnstr_get(x_23, 0); +lean::inc(x_24); +x_26 = lean::cnstr_get(x_23, 1); +lean::inc(x_26); +if (lean::is_shared(x_23)) { + lean::dec(x_23); + x_28 = lean::box(0); +} else { + lean::cnstr_release(x_23, 0); + lean::cnstr_release(x_23, 1); + x_28 = x_23; +} +x_29 = lean::mk_nat_obj(1u); +x_30 = lean::nat_add(x_1, x_29); +lean::dec(x_29); +if (lean::obj_tag(x_24) == 0) +{ +obj* x_32; obj* x_34; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; +x_32 = lean::cnstr_get(x_24, 0); +lean::inc(x_32); +x_34 = lean::cnstr_get(x_24, 1); +lean::inc(x_34); +x_36 = lean::cnstr_get(x_24, 2); +lean::inc(x_36); if (lean::is_shared(x_24)) { lean::dec(x_24); - x_29 = lean::box(0); + x_38 = lean::box(0); } else { lean::cnstr_release(x_24, 0); lean::cnstr_release(x_24, 1); - x_29 = x_24; + lean::cnstr_release(x_24, 2); + x_38 = x_24; } -x_30 = lean::mk_nat_obj(1u); -x_31 = lean::nat_add(x_1, x_30); +x_39 = lean::box(0); +x_40 = lean_name_mk_numeral(x_39, x_1); +if (lean::is_scalar(x_18)) { + x_41 = lean::alloc_cnstr(1, 2, 0); +} else { + x_41 = x_18; +} +lean::cnstr_set(x_41, 0, x_32); +lean::cnstr_set(x_41, 1, x_39); +x_42 = l_lean_parser_syntax_mk__node(x_40, x_41); +x_43 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_43); +if (lean::is_scalar(x_38)) { + x_45 = lean::alloc_cnstr(0, 3, 0); +} else { + x_45 = x_38; +} +lean::cnstr_set(x_45, 0, x_42); +lean::cnstr_set(x_45, 1, x_34); +lean::cnstr_set(x_45, 2, x_43); +x_46 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_36, x_45); +if (lean::obj_tag(x_46) == 0) +{ +obj* x_53; +lean::dec(x_5); +lean::dec(x_4); +lean::dec(x_3); +lean::dec(x_2); lean::dec(x_30); -if (lean::obj_tag(x_25) == 0) -{ -obj* x_33; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_48; -x_33 = lean::cnstr_get(x_25, 0); -lean::inc(x_33); -x_35 = lean::cnstr_get(x_25, 1); -lean::inc(x_35); -x_37 = lean::cnstr_get(x_25, 2); -lean::inc(x_37); -if (lean::is_shared(x_25)) { - lean::dec(x_25); - x_39 = lean::box(0); +lean::dec(x_16); +if (lean::is_scalar(x_28)) { + x_53 = lean::alloc_cnstr(0, 2, 0); } else { - lean::cnstr_release(x_25, 0); - lean::cnstr_release(x_25, 1); - lean::cnstr_release(x_25, 2); - x_39 = x_25; + x_53 = x_28; } -x_40 = lean::box(0); -lean::inc(x_40); -x_42 = lean_name_mk_numeral(x_40, x_1); -if (lean::is_scalar(x_19)) { - x_43 = lean::alloc_cnstr(1, 2, 0); -} else { - x_43 = x_19; -} -lean::cnstr_set(x_43, 0, x_33); -lean::cnstr_set(x_43, 1, x_40); -x_44 = l_lean_parser_syntax_mk__node(x_42, x_43); -x_45 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_45); -if (lean::is_scalar(x_39)) { - x_47 = lean::alloc_cnstr(0, 3, 0); -} else { - x_47 = x_39; -} -lean::cnstr_set(x_47, 0, x_44); -lean::cnstr_set(x_47, 1, x_35); -lean::cnstr_set(x_47, 2, x_45); -x_48 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_37, x_47); -if (lean::obj_tag(x_48) == 0) -{ -obj* x_55; -lean::dec(x_5); -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_31); -lean::dec(x_17); -if (lean::is_scalar(x_29)) { - x_55 = lean::alloc_cnstr(0, 2, 0); -} else { - x_55 = x_29; -} -lean::cnstr_set(x_55, 0, x_48); -lean::cnstr_set(x_55, 1, x_27); -return x_55; +lean::cnstr_set(x_53, 0, x_46); +lean::cnstr_set(x_53, 1, x_26); +return x_53; } else { -obj* x_56; uint8 x_58; -x_56 = lean::cnstr_get(x_48, 0); -lean::inc(x_56); -x_58 = lean::cnstr_get_scalar(x_48, sizeof(void*)*1); -if (x_58 == 0) +obj* x_54; uint8 x_56; +x_54 = lean::cnstr_get(x_46, 0); +lean::inc(x_54); +x_56 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); +if (x_56 == 0) { -obj* x_60; obj* x_61; obj* x_63; obj* x_66; obj* x_67; -lean::dec(x_48); -x_60 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3(x_17, x_31, x_2, x_3, x_4, x_5, x_27); -x_61 = lean::cnstr_get(x_60, 0); +obj* x_58; obj* x_59; obj* x_61; obj* x_64; obj* x_65; +lean::dec(x_46); +x_58 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3(x_16, x_30, x_2, x_3, x_4, x_5, x_26); +x_59 = lean::cnstr_get(x_58, 0); +lean::inc(x_59); +x_61 = lean::cnstr_get(x_58, 1); lean::inc(x_61); -x_63 = lean::cnstr_get(x_60, 1); -lean::inc(x_63); -lean::dec(x_60); -x_66 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_56, x_61); -if (lean::is_scalar(x_29)) { - x_67 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_58); +x_64 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_54, x_59); +if (lean::is_scalar(x_28)) { + x_65 = lean::alloc_cnstr(0, 2, 0); } else { - x_67 = x_29; + x_65 = x_28; } -lean::cnstr_set(x_67, 0, x_66); -lean::cnstr_set(x_67, 1, x_63); -return x_67; +lean::cnstr_set(x_65, 0, x_64); +lean::cnstr_set(x_65, 1, x_61); +return x_65; } else { -obj* x_75; +obj* x_73; lean::dec(x_5); +lean::dec(x_54); lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); -lean::dec(x_31); -lean::dec(x_17); -lean::dec(x_56); -if (lean::is_scalar(x_29)) { - x_75 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_30); +lean::dec(x_16); +if (lean::is_scalar(x_28)) { + x_73 = lean::alloc_cnstr(0, 2, 0); } else { - x_75 = x_29; + x_73 = x_28; } -lean::cnstr_set(x_75, 0, x_48); -lean::cnstr_set(x_75, 1, x_27); -return x_75; +lean::cnstr_set(x_73, 0, x_46); +lean::cnstr_set(x_73, 1, x_26); +return x_73; } } } else { -obj* x_78; uint8 x_80; obj* x_81; -lean::dec(x_19); +obj* x_76; uint8 x_78; obj* x_79; lean::dec(x_1); -x_78 = lean::cnstr_get(x_25, 0); -lean::inc(x_78); -x_80 = lean::cnstr_get_scalar(x_25, sizeof(void*)*1); -if (lean::is_shared(x_25)) { - lean::dec(x_25); - x_81 = lean::box(0); +lean::dec(x_18); +x_76 = lean::cnstr_get(x_24, 0); +lean::inc(x_76); +x_78 = lean::cnstr_get_scalar(x_24, sizeof(void*)*1); +if (lean::is_shared(x_24)) { + lean::dec(x_24); + x_79 = lean::box(0); } else { - lean::cnstr_release(x_25, 0); - x_81 = x_25; + lean::cnstr_release(x_24, 0); + x_79 = x_24; } -if (x_80 == 0) +if (x_78 == 0) { -obj* x_83; obj* x_84; obj* x_86; obj* x_89; obj* x_90; -lean::dec(x_81); -x_83 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3(x_17, x_31, x_2, x_3, x_4, x_5, x_27); -x_84 = lean::cnstr_get(x_83, 0); +obj* x_81; obj* x_82; obj* x_84; obj* x_87; obj* x_88; +lean::dec(x_79); +x_81 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3(x_16, x_30, x_2, x_3, x_4, x_5, x_26); +x_82 = lean::cnstr_get(x_81, 0); +lean::inc(x_82); +x_84 = lean::cnstr_get(x_81, 1); lean::inc(x_84); -x_86 = lean::cnstr_get(x_83, 1); -lean::inc(x_86); -lean::dec(x_83); -x_89 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_78, x_84); -if (lean::is_scalar(x_29)) { - x_90 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_81); +x_87 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_76, x_82); +if (lean::is_scalar(x_28)) { + x_88 = lean::alloc_cnstr(0, 2, 0); } else { - x_90 = x_29; + x_88 = x_28; } -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_86); -return x_90; +lean::cnstr_set(x_88, 0, x_87); +lean::cnstr_set(x_88, 1, x_84); +return x_88; } else { -obj* x_97; obj* x_98; obj* x_99; +obj* x_95; obj* x_96; obj* x_97; lean::dec(x_5); lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); -lean::dec(x_31); -lean::dec(x_17); -if (lean::is_scalar(x_81)) { - x_97 = lean::alloc_cnstr(1, 1, 1); +lean::dec(x_30); +lean::dec(x_16); +if (lean::is_scalar(x_79)) { + x_95 = lean::alloc_cnstr(1, 1, 1); } else { - x_97 = x_81; + x_95 = x_79; } -lean::cnstr_set(x_97, 0, x_78); -lean::cnstr_set_scalar(x_97, sizeof(void*)*1, x_80); -x_98 = x_97; -if (lean::is_scalar(x_29)) { - x_99 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_95, 0, x_76); +lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_78); +x_96 = x_95; +if (lean::is_scalar(x_28)) { + x_97 = lean::alloc_cnstr(0, 2, 0); } else { - x_99 = x_29; + x_97 = x_28; } -lean::cnstr_set(x_99, 0, x_98); -lean::cnstr_set(x_99, 1, x_27); -return x_99; +lean::cnstr_set(x_97, 0, x_96); +lean::cnstr_set(x_97, 1, x_26); +return x_97; } } } @@ -1589,56 +1584,52 @@ return x_99; obj* _init_l_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::box(0); -lean::inc(x_0); -lean::inc(x_0); -x_3 = l_lean_parser_list_cons_tokens___rarg(x_0, x_0); -lean::inc(x_0); -x_5 = l_lean_parser_list_cons_tokens___rarg(x_0, x_3); -x_6 = l_lean_parser_tokens___rarg(x_5); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_6, x_0); -x_8 = l_lean_parser_tokens___rarg(x_7); -return x_8; +x_1 = l_lean_parser_list_cons_tokens___rarg(x_0, x_0); +x_2 = l_lean_parser_list_cons_tokens___rarg(x_0, x_1); +x_3 = l_lean_parser_tokens___rarg(x_2); +x_4 = l_lean_parser_list_cons_tokens___rarg(x_3, x_0); +x_5 = l_lean_parser_tokens___rarg(x_4); +return x_5; } } obj* _init_l_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_22; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_21; x_0 = lean::mk_string("max"); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__2), 6, 1); lean::closure_set(x_1, 0, x_0); x_2 = lean::box(0); -lean::inc(x_2); -x_4 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_2); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1), 1, 0); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::mk_nat_obj(0u); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_8, 0, x_6); -lean::closure_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_2); -x_10 = l_lean_parser_term__parser__m_monad; -x_11 = l_lean_parser_term__parser__m_monad__except; -x_12 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_13 = l_lean_parser_term__parser__m_alternative; -x_14 = l_lean_parser_command_notation__spec_precedence__lit; -x_15 = l_lean_parser_command_notation__spec_precedence__lit_has__view; -lean::inc(x_15); +x_3 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_3, 0, x_1); +lean::cnstr_set(x_3, 1, x_2); +x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1), 1, 0); +x_5 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_5, 0, x_4); +lean::cnstr_set(x_5, 1, x_3); +x_6 = lean::mk_nat_obj(0u); +x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_7, 0, x_5); +lean::closure_set(x_7, 1, x_6); +x_8 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_8, 0, x_7); +lean::cnstr_set(x_8, 1, x_2); +x_9 = l_lean_parser_term__parser__m_monad; +x_10 = l_lean_parser_term__parser__m_monad__except; +x_11 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_12 = l_lean_parser_term__parser__m_alternative; +x_13 = l_lean_parser_command_notation__spec_precedence__lit; +x_14 = l_lean_parser_command_notation__spec_precedence__lit_has__view; lean::inc(x_14); lean::inc(x_13); lean::inc(x_12); lean::inc(x_11); lean::inc(x_10); -x_22 = l_lean_parser_combinators_node_view___rarg(x_10, x_11, x_12, x_13, x_14, x_9, x_15); -return x_22; +lean::inc(x_9); +x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x_8, x_14); +return x_21; } } obj* l_list_mfoldl___main___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { @@ -2034,27 +2025,26 @@ return x_36; obj* _init_l_lean_parser_command_notation__spec_precedence__lit_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; x_0 = lean::mk_string("max"); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__2), 6, 1); lean::closure_set(x_1, 0, x_0); x_2 = lean::box(0); -lean::inc(x_2); -x_4 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_4, 0, x_1); -lean::cnstr_set(x_4, 1, x_2); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1), 1, 0); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::mk_nat_obj(0u); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_8, 0, x_6); -lean::closure_set(x_8, 1, x_7); -x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_8); -lean::cnstr_set(x_9, 1, x_2); -return x_9; +x_3 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_3, 0, x_1); +lean::cnstr_set(x_3, 1, x_2); +x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1), 1, 0); +x_5 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_5, 0, x_4); +lean::cnstr_set(x_5, 1, x_3); +x_6 = lean::mk_nat_obj(0u); +x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_7, 0, x_5); +lean::closure_set(x_7, 1, x_6); +x_8 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_8, 0, x_7); +lean::cnstr_set(x_8, 1, x_2); +return x_8; } } obj* l_lean_parser_command_notation__spec_precedence__lit_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -2339,50 +2329,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__3; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__3; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__3; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__3; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__3; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__3; +lean::inc(x_69); +return x_69; } } } @@ -2392,52 +2381,52 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__3; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__3; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { switch (lean::obj_tag(x_1)) { case 0: { -obj* x_80; obj* x_83; obj* x_84; -x_80 = lean::cnstr_get(x_1, 0); -lean::inc(x_80); +obj* x_79; obj* x_82; obj* x_83; +x_79 = lean::cnstr_get(x_1, 0); +lean::inc(x_79); lean::dec(x_1); +x_82 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_82, 0, x_79); x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_80); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +lean::cnstr_set(x_83, 0, x_82); +return x_83; } case 3: { -obj* x_85; -x_85 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__1; -lean::inc(x_85); -return x_85; +obj* x_84; +x_84 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__1; +lean::inc(x_84); +return x_84; } default: { -obj* x_88; +obj* x_87; lean::dec(x_1); -x_88 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__1; -lean::inc(x_88); -return x_88; +x_87 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__1; +lean::inc(x_87); +return x_87; } } } @@ -2446,30 +2435,30 @@ else switch (lean::obj_tag(x_1)) { case 0: { -obj* x_90; obj* x_93; obj* x_94; -x_90 = lean::cnstr_get(x_1, 0); -lean::inc(x_90); +obj* x_89; obj* x_92; obj* x_93; +x_89 = lean::cnstr_get(x_1, 0); +lean::inc(x_89); lean::dec(x_1); -x_93 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_93, 0, x_90); -x_94 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_94, 0, x_93); -return x_94; +x_92 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_92, 0, x_89); +x_93 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_93, 0, x_92); +return x_93; } case 3: { -obj* x_95; -x_95 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__2; -lean::inc(x_95); -return x_95; +obj* x_94; +x_94 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__2; +lean::inc(x_94); +return x_94; } default: { -obj* x_98; +obj* x_97; lean::dec(x_1); -x_98 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__2; -lean::inc(x_98); -return x_98; +x_97 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__2; +lean::inc(x_97); +return x_97; } } } @@ -2483,7 +2472,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; +obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -2492,46 +2481,44 @@ lean::inc(x_5); x_7 = l_option_map___rarg(x_5, x_2); x_8 = lean::box(3); x_9 = l_option_get__or__else___main___rarg(x_7, x_8); -lean::inc(x_1); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_1); -x_12 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_12); -x_14 = l_lean_parser_syntax_mk__node(x_12, x_11); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_1); -x_16 = l_lean_parser_command_notation__spec_precedence__offset__op; -lean::inc(x_16); -x_18 = l_lean_parser_syntax_mk__node(x_16, x_15); -return x_18; +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_1); +x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_11); +x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_1); +x_15 = l_lean_parser_command_notation__spec_precedence__offset__op; +lean::inc(x_15); +x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); +return x_17; } else { -obj* x_19; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; -x_19 = lean::cnstr_get(x_0, 0); -lean::inc(x_19); +obj* x_18; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; +x_18 = lean::cnstr_get(x_0, 0); +lean::inc(x_18); lean::dec(x_0); -x_22 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_22); -x_24 = l_option_map___rarg(x_22, x_19); -x_25 = lean::box(3); -x_26 = l_option_get__or__else___main___rarg(x_24, x_25); -lean::inc(x_1); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_1); -x_29 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_29); -x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_1); -x_33 = l_lean_parser_command_notation__spec_precedence__offset__op; -lean::inc(x_33); -x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); -return x_35; +x_21 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_21); +x_23 = l_option_map___rarg(x_21, x_18); +x_24 = lean::box(3); +x_25 = l_option_get__or__else___main___rarg(x_23, x_24); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_1); +x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_1); +x_31 = l_lean_parser_command_notation__spec_precedence__offset__op; +lean::inc(x_31); +x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); +return x_33; } } } @@ -3124,7 +3111,7 @@ return x_100; obj* l_lean_parser_command_notation__spec_precedence__offset_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_41; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_40; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -3140,43 +3127,42 @@ x_12 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_12); x_14 = l_option_map___rarg(x_12, x_1); x_15 = lean::box(3); -lean::inc(x_15); -x_17 = l_option_get__or__else___main___rarg(x_14, x_15); -x_18 = l_lean_parser_command_notation__spec_precedence__lit_has__view; -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -x_21 = lean::apply_1(x_19, x_3); -x_22 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view; -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -x_25 = lean::apply_1(x_23, x_5); -x_26 = l_lean_parser_number_has__view; -x_27 = lean::cnstr_get(x_26, 1); -lean::inc(x_27); -x_29 = lean::apply_1(x_27, x_7); +x_16 = l_option_get__or__else___main___rarg(x_14, x_15); +x_17 = l_lean_parser_command_notation__spec_precedence__lit_has__view; +x_18 = lean::cnstr_get(x_17, 1); +lean::inc(x_18); +x_20 = lean::apply_1(x_18, x_3); +x_21 = l_lean_parser_command_notation__spec_precedence__offset__op_has__view; +x_22 = lean::cnstr_get(x_21, 1); +lean::inc(x_22); +x_24 = lean::apply_1(x_22, x_5); +x_25 = l_lean_parser_number_has__view; +x_26 = lean::cnstr_get(x_25, 1); +lean::inc(x_26); +x_28 = lean::apply_1(x_26, x_7); lean::inc(x_12); -x_31 = l_option_map___rarg(x_12, x_9); -x_32 = l_option_get__or__else___main___rarg(x_31, x_15); -x_33 = lean::box(0); +x_30 = l_option_map___rarg(x_12, x_9); +x_31 = l_option_get__or__else___main___rarg(x_30, x_15); +x_32 = lean::box(0); +x_33 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_33, 0, x_31); +lean::cnstr_set(x_33, 1, x_32); x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_32); +lean::cnstr_set(x_34, 0, x_28); lean::cnstr_set(x_34, 1, x_33); x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_29); +lean::cnstr_set(x_35, 0, x_24); lean::cnstr_set(x_35, 1, x_34); x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_25); +lean::cnstr_set(x_36, 0, x_20); lean::cnstr_set(x_36, 1, x_35); x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_21); +lean::cnstr_set(x_37, 0, x_16); lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_17); -lean::cnstr_set(x_38, 1, x_37); -x_39 = l_lean_parser_command_notation__spec_precedence__offset; -lean::inc(x_39); -x_41 = l_lean_parser_syntax_mk__node(x_39, x_38); -return x_41; +x_38 = l_lean_parser_command_notation__spec_precedence__offset; +lean::inc(x_38); +x_40 = l_lean_parser_syntax_mk__node(x_38, x_37); +return x_40; } } obj* _init_l_lean_parser_command_notation__spec_precedence__offset_has__view_x_27() { @@ -3378,50 +3364,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -3431,44 +3416,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_command_notation__spec_precedence__offset_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_command_notation__spec_precedence__offset_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_command_notation__spec_precedence__lit_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_command_notation__spec_precedence__lit_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -3480,7 +3465,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -3488,45 +3473,43 @@ x_5 = l_lean_parser_command_notation__spec_precedence__lit_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_command_notation__spec_precedence__term; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_command_notation__spec_precedence__term; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_command_notation__spec_precedence__offset_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_command_notation__spec_precedence__term; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_command_notation__spec_precedence__offset_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_command_notation__spec_precedence__term; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -3821,7 +3804,7 @@ return x_130; obj* _init_l_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_36; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; 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_28; obj* x_29; obj* x_30; obj* x_31; x_0 = lean::mk_string("("); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -3833,39 +3816,34 @@ x_7 = lean::mk_string(" - "); lean::inc(x_1); x_9 = l_lean_parser_symbol_tokens___rarg(x_7, x_1); x_10 = lean::box(0); -lean::inc(x_10); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_9, x_10); -x_13 = l_lean_parser_list_cons_tokens___rarg(x_6, x_12); -x_14 = l_lean_parser_tokens___rarg(x_13); -lean::inc(x_10); -x_16 = l_lean_parser_list_cons_tokens___rarg(x_14, x_10); -x_17 = l_lean_parser_tokens___rarg(x_16); -x_18 = lean::mk_string(")"); -x_19 = l_lean_parser_symbol_tokens___rarg(x_18, x_1); -lean::inc(x_10); -x_21 = l_lean_parser_list_cons_tokens___rarg(x_19, x_10); -lean::inc(x_10); -x_23 = l_lean_parser_list_cons_tokens___rarg(x_10, x_21); -x_24 = l_lean_parser_list_cons_tokens___rarg(x_17, x_23); -x_25 = l_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens; -lean::inc(x_25); -x_27 = l_lean_parser_list_cons_tokens___rarg(x_25, x_24); -x_28 = l_lean_parser_list_cons_tokens___rarg(x_3, x_27); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_9, x_10); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_6, x_11); +x_13 = l_lean_parser_tokens___rarg(x_12); +x_14 = l_lean_parser_list_cons_tokens___rarg(x_13, x_10); +x_15 = l_lean_parser_tokens___rarg(x_14); +x_16 = lean::mk_string(")"); +x_17 = l_lean_parser_symbol_tokens___rarg(x_16, x_1); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_17, x_10); +x_19 = l_lean_parser_list_cons_tokens___rarg(x_10, x_18); +x_20 = l_lean_parser_list_cons_tokens___rarg(x_15, x_19); +x_21 = l_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens; +lean::inc(x_21); +x_23 = l_lean_parser_list_cons_tokens___rarg(x_21, x_20); +x_24 = l_lean_parser_list_cons_tokens___rarg(x_3, x_23); +x_25 = l_lean_parser_tokens___rarg(x_24); +x_26 = l_lean_parser_list_cons_tokens___rarg(x_25, x_10); +lean::inc(x_21); +x_28 = l_lean_parser_list_cons_tokens___rarg(x_21, x_26); x_29 = l_lean_parser_tokens___rarg(x_28); -lean::inc(x_10); -x_31 = l_lean_parser_list_cons_tokens___rarg(x_29, x_10); -lean::inc(x_25); -x_33 = l_lean_parser_list_cons_tokens___rarg(x_25, x_31); -x_34 = l_lean_parser_tokens___rarg(x_33); -x_35 = l_lean_parser_list_cons_tokens___rarg(x_34, x_10); -x_36 = l_lean_parser_tokens___rarg(x_35); -return x_36; +x_30 = l_lean_parser_list_cons_tokens___rarg(x_29, x_10); +x_31 = l_lean_parser_tokens___rarg(x_30); +return x_31; } } obj* _init_l_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_65; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; 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_27; obj* x_28; obj* x_29; 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_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_61; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -3898,93 +3876,89 @@ lean::closure_set(x_18, 0, x_14); lean::closure_set(x_18, 1, x_4); lean::closure_set(x_18, 2, x_16); x_19 = lean::box(0); -lean::inc(x_19); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_18); +lean::cnstr_set(x_20, 1, x_19); x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_18); -lean::cnstr_set(x_21, 1, x_19); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_12); -lean::cnstr_set(x_22, 1, x_21); +lean::cnstr_set(x_21, 0, x_12); +lean::cnstr_set(x_21, 1, x_20); lean::inc(x_4); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_24, 0, x_22); -lean::closure_set(x_24, 1, x_4); -lean::inc(x_19); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_19); -x_27 = l_lean_parser_command_notation__spec_precedence__offset__op; -lean::inc(x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_29, 0, x_27); -lean::closure_set(x_29, 1, x_26); -x_30 = lean::mk_string(")"); -x_31 = l_string_trim(x_30); -lean::inc(x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_33, 0, x_31); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_23, 0, x_21); +lean::closure_set(x_23, 1, x_4); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_19); +x_25 = l_lean_parser_command_notation__spec_precedence__offset__op; +lean::inc(x_25); +x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_27, 0, x_25); +lean::closure_set(x_27, 1, x_24); +x_28 = lean::mk_string(")"); +x_29 = l_string_trim(x_28); +lean::inc(x_29); +x_31 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_31, 0, x_29); lean::inc(x_4); -x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_35, 0, x_31); -lean::closure_set(x_35, 1, x_4); -lean::closure_set(x_35, 2, x_33); -lean::inc(x_19); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_33, 0, x_29); +lean::closure_set(x_33, 1, x_4); +lean::closure_set(x_33, 2, x_31); +x_34 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_34, 0, x_33); +lean::cnstr_set(x_34, 1, x_19); +x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1), 1, 0); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_35); +lean::cnstr_set(x_36, 1, x_34); x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set(x_37, 1, x_19); -x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1), 1, 0); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_37); +lean::cnstr_set(x_37, 0, x_27); +lean::cnstr_set(x_37, 1, x_36); +x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_precedence__lit_parser), 5, 0); +lean::inc(x_38); x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_29); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_precedence__lit_parser), 5, 0); -lean::inc(x_41); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set(x_43, 1, x_40); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_6); -lean::cnstr_set(x_44, 1, x_43); -x_45 = l_lean_parser_command_notation__spec_precedence__offset; -lean::inc(x_45); -x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_47, 0, x_45); -lean::closure_set(x_47, 1, x_44); -lean::inc(x_19); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_47); -lean::cnstr_set(x_49, 1, x_19); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_41); -lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_51, 0, x_50); -lean::closure_set(x_51, 1, x_4); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_19); -x_53 = l_lean_parser_term__parser__m_monad; -x_54 = l_lean_parser_term__parser__m_monad__except; -x_55 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_56 = l_lean_parser_term__parser__m_alternative; -x_57 = l_lean_parser_command_notation__spec_precedence__term; -x_58 = l_lean_parser_command_notation__spec_precedence__term_has__view; -lean::inc(x_58); -lean::inc(x_57); -lean::inc(x_56); -lean::inc(x_55); +lean::cnstr_set(x_40, 0, x_38); +lean::cnstr_set(x_40, 1, x_37); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_6); +lean::cnstr_set(x_41, 1, x_40); +x_42 = l_lean_parser_command_notation__spec_precedence__offset; +lean::inc(x_42); +x_44 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_44, 0, x_42); +lean::closure_set(x_44, 1, x_41); +x_45 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_45, 0, x_44); +lean::cnstr_set(x_45, 1, x_19); +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_38); +lean::cnstr_set(x_46, 1, x_45); +x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_47, 0, x_46); +lean::closure_set(x_47, 1, x_4); +x_48 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_48, 0, x_47); +lean::cnstr_set(x_48, 1, x_19); +x_49 = l_lean_parser_term__parser__m_monad; +x_50 = l_lean_parser_term__parser__m_monad__except; +x_51 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_52 = l_lean_parser_term__parser__m_alternative; +x_53 = l_lean_parser_command_notation__spec_precedence__term; +x_54 = l_lean_parser_command_notation__spec_precedence__term_has__view; lean::inc(x_54); lean::inc(x_53); -x_65 = l_lean_parser_combinators_node_view___rarg(x_53, x_54, x_55, x_56, x_57, x_52, x_58); -return x_65; +lean::inc(x_52); +lean::inc(x_51); +lean::inc(x_50); +lean::inc(x_49); +x_61 = l_lean_parser_combinators_node_view___rarg(x_49, x_50, x_51, x_52, x_53, x_48, x_54); +return x_61; } } obj* _init_l_lean_parser_command_notation__spec_precedence__term_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_52; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; 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_27; obj* x_28; obj* x_29; 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_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -4017,74 +3991,70 @@ lean::closure_set(x_18, 0, x_14); lean::closure_set(x_18, 1, x_4); lean::closure_set(x_18, 2, x_16); x_19 = lean::box(0); -lean::inc(x_19); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_18); +lean::cnstr_set(x_20, 1, x_19); x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_18); -lean::cnstr_set(x_21, 1, x_19); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_12); -lean::cnstr_set(x_22, 1, x_21); +lean::cnstr_set(x_21, 0, x_12); +lean::cnstr_set(x_21, 1, x_20); lean::inc(x_4); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_24, 0, x_22); -lean::closure_set(x_24, 1, x_4); -lean::inc(x_19); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_19); -x_27 = l_lean_parser_command_notation__spec_precedence__offset__op; -lean::inc(x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_29, 0, x_27); -lean::closure_set(x_29, 1, x_26); -x_30 = lean::mk_string(")"); -x_31 = l_string_trim(x_30); -lean::inc(x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_33, 0, x_31); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_23, 0, x_21); +lean::closure_set(x_23, 1, x_4); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_19); +x_25 = l_lean_parser_command_notation__spec_precedence__offset__op; +lean::inc(x_25); +x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_27, 0, x_25); +lean::closure_set(x_27, 1, x_24); +x_28 = lean::mk_string(")"); +x_29 = l_string_trim(x_28); +lean::inc(x_29); +x_31 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_31, 0, x_29); lean::inc(x_4); -x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_35, 0, x_31); -lean::closure_set(x_35, 1, x_4); -lean::closure_set(x_35, 2, x_33); -lean::inc(x_19); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_33, 0, x_29); +lean::closure_set(x_33, 1, x_4); +lean::closure_set(x_33, 2, x_31); +x_34 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_34, 0, x_33); +lean::cnstr_set(x_34, 1, x_19); +x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1), 1, 0); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_35); +lean::cnstr_set(x_36, 1, x_34); x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set(x_37, 1, x_19); -x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1), 1, 0); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_37); +lean::cnstr_set(x_37, 0, x_27); +lean::cnstr_set(x_37, 1, x_36); +x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_precedence__lit_parser), 5, 0); +lean::inc(x_38); x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_29); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_precedence__lit_parser), 5, 0); -lean::inc(x_41); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_41); -lean::cnstr_set(x_43, 1, x_40); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_6); -lean::cnstr_set(x_44, 1, x_43); -x_45 = l_lean_parser_command_notation__spec_precedence__offset; -lean::inc(x_45); -x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_47, 0, x_45); -lean::closure_set(x_47, 1, x_44); -lean::inc(x_19); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_47); -lean::cnstr_set(x_49, 1, x_19); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_41); -lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_51, 0, x_50); -lean::closure_set(x_51, 1, x_4); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_19); -return x_52; +lean::cnstr_set(x_40, 0, x_38); +lean::cnstr_set(x_40, 1, x_37); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_6); +lean::cnstr_set(x_41, 1, x_40); +x_42 = l_lean_parser_command_notation__spec_precedence__offset; +lean::inc(x_42); +x_44 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_44, 0, x_42); +lean::closure_set(x_44, 1, x_41); +x_45 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_45, 0, x_44); +lean::cnstr_set(x_45, 1, x_19); +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_38); +lean::cnstr_set(x_46, 1, x_45); +x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_47, 0, x_46); +lean::closure_set(x_47, 1, x_4); +x_48 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_48, 0, x_47); +lean::cnstr_set(x_48, 1, x_19); +return x_48; } } obj* l_lean_parser_command_notation__spec_precedence__term_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -5779,7 +5749,7 @@ return x_136; obj* l_lean_parser_command_notation__spec_symbol__quote_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_19; obj* x_21; obj* x_22; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -5793,68 +5763,65 @@ x_10 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_10); x_12 = l_option_map___rarg(x_10, x_1); x_13 = lean::box(3); -lean::inc(x_13); -x_15 = l_option_get__or__else___main___rarg(x_12, x_13); +x_14 = l_option_get__or__else___main___rarg(x_12, x_13); lean::inc(x_10); -x_17 = l_option_map___rarg(x_10, x_3); -lean::inc(x_13); -x_19 = l_option_get__or__else___main___rarg(x_17, x_13); +x_16 = l_option_map___rarg(x_10, x_3); +x_17 = l_option_get__or__else___main___rarg(x_16, x_13); lean::inc(x_10); -x_21 = l_option_map___rarg(x_10, x_5); -x_22 = l_option_get__or__else___main___rarg(x_21, x_13); +x_19 = l_option_map___rarg(x_10, x_5); +x_20 = l_option_get__or__else___main___rarg(x_19, x_13); if (lean::obj_tag(x_7) == 0) { -obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; -x_23 = l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; -lean::inc(x_23); +obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_28; +x_21 = l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; +lean::inc(x_21); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_20); +lean::cnstr_set(x_23, 1, x_21); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_17); +lean::cnstr_set(x_24, 1, x_23); x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_22); -lean::cnstr_set(x_25, 1, x_23); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_19); -lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_15); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_lean_parser_command_notation__spec_symbol__quote; -lean::inc(x_28); -x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); -return x_30; +lean::cnstr_set(x_25, 0, x_14); +lean::cnstr_set(x_25, 1, x_24); +x_26 = l_lean_parser_command_notation__spec_symbol__quote; +lean::inc(x_26); +x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); +return x_28; } else { -obj* x_31; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_50; -x_31 = lean::cnstr_get(x_7, 0); -lean::inc(x_31); +obj* x_29; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_47; +x_29 = lean::cnstr_get(x_7, 0); +lean::inc(x_29); lean::dec(x_7); -x_34 = lean::box(0); -x_35 = l_lean_parser_command_notation__spec_precedence_has__view; -x_36 = lean::cnstr_get(x_35, 1); -lean::inc(x_36); -x_38 = lean::apply_1(x_36, x_31); +x_32 = lean::box(0); +x_33 = l_lean_parser_command_notation__spec_precedence_has__view; +x_34 = lean::cnstr_get(x_33, 1); lean::inc(x_34); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_38); -lean::cnstr_set(x_40, 1, x_34); -x_41 = l_lean_parser_no__kind; -lean::inc(x_41); -x_43 = l_lean_parser_syntax_mk__node(x_41, x_40); +x_36 = lean::apply_1(x_34, x_29); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_36); +lean::cnstr_set(x_37, 1, x_32); +x_38 = l_lean_parser_no__kind; +lean::inc(x_38); +x_40 = l_lean_parser_syntax_mk__node(x_38, x_37); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_40); +lean::cnstr_set(x_41, 1, x_32); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_20); +lean::cnstr_set(x_42, 1, x_41); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_17); +lean::cnstr_set(x_43, 1, x_42); x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_34); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_22); -lean::cnstr_set(x_45, 1, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_19); -lean::cnstr_set(x_46, 1, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_15); -lean::cnstr_set(x_47, 1, x_46); -x_48 = l_lean_parser_command_notation__spec_symbol__quote; -lean::inc(x_48); -x_50 = l_lean_parser_syntax_mk__node(x_48, x_47); -return x_50; +lean::cnstr_set(x_44, 0, x_14); +lean::cnstr_set(x_44, 1, x_43); +x_45 = l_lean_parser_command_notation__spec_symbol__quote; +lean::inc(x_45); +x_47 = l_lean_parser_syntax_mk__node(x_45, x_44); +return x_47; } } } @@ -6401,7 +6368,7 @@ goto lbl_12; } else { -obj* x_38; uint8 x_40; obj* x_41; obj* x_42; obj* x_44; obj* x_46; obj* x_48; obj* x_51; obj* x_53; obj* x_54; obj* x_56; obj* x_57; obj* x_58; +obj* x_38; uint8 x_40; obj* x_41; obj* x_42; obj* x_44; obj* x_46; obj* x_48; obj* x_51; obj* x_52; obj* x_53; obj* x_55; obj* x_56; obj* x_57; x_38 = lean::cnstr_get(x_15, 0); lean::inc(x_38); x_40 = lean::cnstr_get_scalar(x_15, sizeof(void*)*1); @@ -6422,48 +6389,47 @@ x_48 = lean::cnstr_get(x_38, 3); lean::inc(x_48); lean::dec(x_38); x_51 = l_option_get___main___at_lean_parser_run___spec__2(x_48); -lean::inc(x_9); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_51); -lean::cnstr_set(x_53, 1, x_9); -x_54 = l_lean_parser_no__kind; -lean::inc(x_54); -x_56 = l_lean_parser_syntax_mk__node(x_54, x_53); -x_57 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_57, 0, x_56); -x_58 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_58, 0, x_42); -lean::cnstr_set(x_58, 1, x_44); -lean::cnstr_set(x_58, 2, x_46); -lean::cnstr_set(x_58, 3, x_57); +x_52 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_52, 0, x_51); +lean::cnstr_set(x_52, 1, x_9); +x_53 = l_lean_parser_no__kind; +lean::inc(x_53); +x_55 = l_lean_parser_syntax_mk__node(x_53, x_52); +x_56 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_56, 0, x_55); +x_57 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_57, 0, x_42); +lean::cnstr_set(x_57, 1, x_44); +lean::cnstr_set(x_57, 2, x_46); +lean::cnstr_set(x_57, 3, x_56); if (x_40 == 0) { -uint8 x_59; obj* x_60; obj* x_61; -x_59 = 0; +uint8 x_58; obj* x_59; obj* x_60; +x_58 = 0; if (lean::is_scalar(x_41)) { - x_60 = lean::alloc_cnstr(1, 1, 1); + x_59 = lean::alloc_cnstr(1, 1, 1); } else { - x_60 = x_41; + x_59 = x_41; } -lean::cnstr_set(x_60, 0, x_58); -lean::cnstr_set_scalar(x_60, sizeof(void*)*1, x_59); -x_61 = x_60; -x_10 = x_61; +lean::cnstr_set(x_59, 0, x_57); +lean::cnstr_set_scalar(x_59, sizeof(void*)*1, x_58); +x_60 = x_59; +x_10 = x_60; x_11 = x_17; goto lbl_12; } else { -obj* x_62; obj* x_63; +obj* x_61; obj* x_62; if (lean::is_scalar(x_41)) { - x_62 = lean::alloc_cnstr(1, 1, 1); + x_61 = lean::alloc_cnstr(1, 1, 1); } else { - x_62 = x_41; + x_61 = x_41; } -lean::cnstr_set(x_62, 0, x_58); -lean::cnstr_set_scalar(x_62, sizeof(void*)*1, x_40); -x_63 = x_62; -x_10 = x_63; +lean::cnstr_set(x_61, 0, x_57); +lean::cnstr_set_scalar(x_61, sizeof(void*)*1, x_40); +x_62 = x_61; +x_10 = x_62; x_11 = x_17; goto lbl_12; } @@ -6472,105 +6438,104 @@ lbl_8: { if (lean::obj_tag(x_6) == 0) { -obj* x_64; obj* x_66; obj* x_68; obj* x_70; -x_64 = lean::cnstr_get(x_6, 0); -lean::inc(x_64); -x_66 = lean::cnstr_get(x_6, 1); -lean::inc(x_66); -x_68 = lean::cnstr_get(x_6, 2); -lean::inc(x_68); +obj* x_63; obj* x_65; obj* x_67; obj* x_69; +x_63 = lean::cnstr_get(x_6, 0); +lean::inc(x_63); +x_65 = lean::cnstr_get(x_6, 1); +lean::inc(x_65); +x_67 = lean::cnstr_get(x_6, 2); +lean::inc(x_67); if (lean::is_shared(x_6)) { lean::dec(x_6); - x_70 = lean::box(0); + x_69 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); lean::cnstr_release(x_6, 2); - x_70 = x_6; + x_69 = x_6; } -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -obj* x_71; obj* x_72; obj* x_75; obj* x_76; obj* x_77; -x_71 = l_lean_parser_combinators_many___rarg___closed__1; -x_72 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_72); +obj* x_70; obj* x_71; obj* x_74; obj* x_75; obj* x_76; +x_70 = l_lean_parser_combinators_many___rarg___closed__1; +x_71 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_71); -if (lean::is_scalar(x_70)) { - x_75 = lean::alloc_cnstr(0, 3, 0); +lean::inc(x_70); +if (lean::is_scalar(x_69)) { + x_74 = lean::alloc_cnstr(0, 3, 0); } else { - x_75 = x_70; + x_74 = x_69; } -lean::cnstr_set(x_75, 0, x_71); -lean::cnstr_set(x_75, 1, x_66); -lean::cnstr_set(x_75, 2, x_72); -x_76 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_68, x_75); -x_77 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_7); -return x_77; +lean::cnstr_set(x_74, 0, x_70); +lean::cnstr_set(x_74, 1, x_65); +lean::cnstr_set(x_74, 2, x_71); +x_75 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_67, x_74); +x_76 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_76, 0, x_75); +lean::cnstr_set(x_76, 1, x_7); +return x_76; } else { -obj* x_78; obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_86; obj* x_88; obj* x_89; obj* x_90; -x_78 = lean::cnstr_get(x_64, 0); -lean::inc(x_78); -lean::dec(x_64); -x_81 = lean::box(0); -x_82 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_82, 0, x_78); -lean::cnstr_set(x_82, 1, x_81); -x_83 = l_lean_parser_no__kind; -lean::inc(x_83); -x_85 = l_lean_parser_syntax_mk__node(x_83, x_82); -x_86 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_86); -if (lean::is_scalar(x_70)) { - x_88 = lean::alloc_cnstr(0, 3, 0); +obj* x_77; obj* x_80; obj* x_81; obj* x_82; obj* x_84; obj* x_85; obj* x_87; obj* x_88; obj* x_89; +x_77 = lean::cnstr_get(x_63, 0); +lean::inc(x_77); +lean::dec(x_63); +x_80 = lean::box(0); +x_81 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_81, 0, x_77); +lean::cnstr_set(x_81, 1, x_80); +x_82 = l_lean_parser_no__kind; +lean::inc(x_82); +x_84 = l_lean_parser_syntax_mk__node(x_82, x_81); +x_85 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_85); +if (lean::is_scalar(x_69)) { + x_87 = lean::alloc_cnstr(0, 3, 0); } else { - x_88 = x_70; + x_87 = x_69; } -lean::cnstr_set(x_88, 0, x_85); -lean::cnstr_set(x_88, 1, x_66); -lean::cnstr_set(x_88, 2, x_86); -x_89 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_68, x_88); -x_90 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_7); -return x_90; +lean::cnstr_set(x_87, 0, x_84); +lean::cnstr_set(x_87, 1, x_65); +lean::cnstr_set(x_87, 2, x_85); +x_88 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_67, x_87); +x_89 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_89, 0, x_88); +lean::cnstr_set(x_89, 1, x_7); +return x_89; } } else { -obj* x_91; uint8 x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; -x_91 = lean::cnstr_get(x_6, 0); -lean::inc(x_91); -x_93 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); +obj* x_90; uint8 x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; +x_90 = lean::cnstr_get(x_6, 0); +lean::inc(x_90); +x_92 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); if (lean::is_shared(x_6)) { lean::dec(x_6); - x_94 = lean::box(0); + x_93 = lean::box(0); } else { lean::cnstr_release(x_6, 0); - x_94 = x_6; + x_93 = x_6; } -if (lean::is_scalar(x_94)) { - x_95 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_93)) { + x_94 = lean::alloc_cnstr(1, 1, 1); } else { - x_95 = x_94; + x_94 = x_93; } -lean::cnstr_set(x_95, 0, x_91); -lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_93); -x_96 = x_95; -x_97 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_97, 0, x_96); -lean::cnstr_set(x_97, 1, x_7); -return x_97; +lean::cnstr_set(x_94, 0, x_90); +lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_92); +x_95 = x_94; +x_96 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_96, 0, x_95); +lean::cnstr_set(x_96, 1, x_7); +return x_96; } } lbl_12: { if (lean::obj_tag(x_10) == 0) { -lean::dec(x_9); lean::dec(x_4); x_6 = x_10; x_7 = x_11; @@ -6578,37 +6543,36 @@ goto lbl_8; } else { -obj* x_100; uint8 x_102; -x_100 = lean::cnstr_get(x_10, 0); -lean::inc(x_100); -x_102 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); -if (x_102 == 0) +obj* x_98; uint8 x_100; +x_98 = lean::cnstr_get(x_10, 0); +lean::inc(x_98); +x_100 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); +if (x_100 == 0) { -obj* x_104; obj* x_107; obj* x_109; obj* x_110; obj* x_111; +obj* x_102; obj* x_105; obj* x_107; obj* x_108; obj* x_109; lean::dec(x_10); -x_104 = lean::cnstr_get(x_100, 2); -lean::inc(x_104); -lean::dec(x_100); -x_107 = l_mjoin___rarg___closed__1; -lean::inc(x_107); -x_109 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_109, 0, x_104); -lean::closure_set(x_109, 1, x_107); -x_110 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_110, 0, x_109); -x_111 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_111, 0, x_9); -lean::cnstr_set(x_111, 1, x_4); -lean::cnstr_set(x_111, 2, x_110); -x_6 = x_111; +x_102 = lean::cnstr_get(x_98, 2); +lean::inc(x_102); +lean::dec(x_98); +x_105 = l_mjoin___rarg___closed__1; +lean::inc(x_105); +x_107 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_107, 0, x_102); +lean::closure_set(x_107, 1, x_105); +x_108 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_108, 0, x_107); +x_109 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_109, 0, x_9); +lean::cnstr_set(x_109, 1, x_4); +lean::cnstr_set(x_109, 2, x_108); +x_6 = x_109; x_7 = x_11; goto lbl_8; } else { -lean::dec(x_9); lean::dec(x_4); -lean::dec(x_100); +lean::dec(x_98); x_6 = x_10; x_7 = x_11; goto lbl_8; @@ -6620,21 +6584,19 @@ goto lbl_8; obj* _init_l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; x_0 = lean::box(0); x_1 = l_lean_parser_command_notation__spec_precedence_parser_lean_parser_has__tokens; lean::inc(x_1); x_3 = l_lean_parser_tokens___rarg(x_1); -lean::inc(x_0); -x_5 = l_lean_parser_list_cons_tokens___rarg(x_3, x_0); -lean::inc(x_0); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_0, x_5); -x_8 = l_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens; -lean::inc(x_8); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_8, x_7); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_0, x_10); -x_12 = l_lean_parser_tokens___rarg(x_11); -return x_12; +x_4 = l_lean_parser_list_cons_tokens___rarg(x_3, x_0); +x_5 = l_lean_parser_list_cons_tokens___rarg(x_0, x_4); +x_6 = l_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens; +lean::inc(x_6); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_6, x_5); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_0, x_8); +x_10 = l_lean_parser_tokens___rarg(x_9); +return x_10; } } obj* _init_l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___lambda__1___closed__1() { @@ -7281,50 +7243,49 @@ lean::inc(x_43); lean::dec(x_31); x_46 = lean::box(0); x_47 = lean_name_dec_eq(x_43, x_46); -lean::dec(x_46); lean::dec(x_43); if (x_47 == 0) { -obj* x_51; +obj* x_50; lean::dec(x_33); -x_51 = l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1___closed__1; -lean::inc(x_51); -return x_51; +x_50 = l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1___closed__1; +lean::inc(x_50); +return x_50; } else { if (lean::obj_tag(x_33) == 0) { -obj* x_53; -x_53 = l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1___closed__1; -lean::inc(x_53); -return x_53; +obj* x_52; +x_52 = l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1___closed__1; +lean::inc(x_52); +return x_52; } else { -obj* x_55; obj* x_57; -x_55 = lean::cnstr_get(x_33, 0); -lean::inc(x_55); -x_57 = lean::cnstr_get(x_33, 1); -lean::inc(x_57); +obj* x_54; obj* x_56; +x_54 = lean::cnstr_get(x_33, 0); +lean::inc(x_54); +x_56 = lean::cnstr_get(x_33, 1); +lean::inc(x_56); lean::dec(x_33); -if (lean::obj_tag(x_57) == 0) +if (lean::obj_tag(x_56) == 0) { -obj* x_60; obj* x_61; obj* x_63; -x_60 = l_lean_parser_command_notation__spec_symbol__quote_has__view; -x_61 = lean::cnstr_get(x_60, 0); -lean::inc(x_61); -x_63 = lean::apply_1(x_61, x_55); -return x_63; +obj* x_59; obj* x_60; obj* x_62; +x_59 = l_lean_parser_command_notation__spec_symbol__quote_has__view; +x_60 = lean::cnstr_get(x_59, 0); +lean::inc(x_60); +x_62 = lean::apply_1(x_60, x_54); +return x_62; } else { -obj* x_66; -lean::dec(x_55); -lean::dec(x_57); -x_66 = l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1___closed__1; -lean::inc(x_66); -return x_66; +obj* x_65; +lean::dec(x_54); +lean::dec(x_56); +x_65 = l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1___closed__1; +lean::inc(x_65); +return x_65; } } } @@ -7334,12 +7295,12 @@ return x_66; } else { -obj* x_70; +obj* x_69; lean::dec(x_20); lean::dec(x_22); -x_70 = l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -7349,26 +7310,25 @@ return x_70; obj* l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; +obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; x_1 = lean::box(0); x_2 = l_lean_parser_command_notation__spec_symbol__quote_has__view; x_3 = lean::cnstr_get(x_2, 1); lean::inc(x_3); x_5 = lean::apply_1(x_3, x_0); -lean::inc(x_1); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_1); -x_8 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_8); -x_10 = l_lean_parser_syntax_mk__node(x_8, x_7); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_1); -x_12 = l_lean_parser_command_notation__spec_notation__symbol; -lean::inc(x_12); -x_14 = l_lean_parser_syntax_mk__node(x_12, x_11); -return x_14; +x_6 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_1); +x_7 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_7); +x_9 = l_lean_parser_syntax_mk__node(x_7, x_6); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_1); +x_11 = l_lean_parser_command_notation__spec_notation__symbol; +lean::inc(x_11); +x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); +return x_13; } } obj* _init_l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27() { @@ -7395,69 +7355,66 @@ return x_0; obj* _init_l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_6; obj* x_7; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens; -lean::inc(x_0); lean::inc(x_1); -x_4 = l_lean_parser_list_cons_tokens___rarg(x_1, x_0); -x_5 = l_lean_parser_tokens___rarg(x_4); -x_6 = l_lean_parser_list_cons_tokens___rarg(x_5, x_0); -x_7 = l_lean_parser_tokens___rarg(x_6); -return x_7; +x_3 = l_lean_parser_list_cons_tokens___rarg(x_1, x_0); +x_4 = l_lean_parser_tokens___rarg(x_3); +x_5 = l_lean_parser_list_cons_tokens___rarg(x_4, x_0); +x_6 = l_lean_parser_tokens___rarg(x_5); +return x_6; } } obj* _init_l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_19; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_18; x_0 = lean::box(0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_symbol__quote_parser), 5, 0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_5, 0, x_3); -lean::closure_set(x_5, 1, x_4); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_0); -x_7 = l_lean_parser_term__parser__m_monad; -x_8 = l_lean_parser_term__parser__m_monad__except; -x_9 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_10 = l_lean_parser_term__parser__m_alternative; -x_11 = l_lean_parser_command_notation__spec_notation__symbol; -x_12 = l_lean_parser_command_notation__spec_notation__symbol_has__view; -lean::inc(x_12); +x_2 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::mk_nat_obj(0u); +x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_4, 0, x_2); +lean::closure_set(x_4, 1, x_3); +x_5 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_5, 0, x_4); +lean::cnstr_set(x_5, 1, x_0); +x_6 = l_lean_parser_term__parser__m_monad; +x_7 = l_lean_parser_term__parser__m_monad__except; +x_8 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_9 = l_lean_parser_term__parser__m_alternative; +x_10 = l_lean_parser_command_notation__spec_notation__symbol; +x_11 = l_lean_parser_command_notation__spec_notation__symbol_has__view; lean::inc(x_11); lean::inc(x_10); lean::inc(x_9); lean::inc(x_8); lean::inc(x_7); -x_19 = l_lean_parser_combinators_node_view___rarg(x_7, x_8, x_9, x_10, x_11, x_6, x_12); -return x_19; +lean::inc(x_6); +x_18 = l_lean_parser_combinators_node_view___rarg(x_6, x_7, x_8, x_9, x_10, x_5, x_11); +return x_18; } } obj* _init_l_lean_parser_command_notation__spec_notation__symbol_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::box(0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_symbol__quote_parser), 5, 0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_5, 0, x_3); -lean::closure_set(x_5, 1, x_4); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_0); -return x_6; +x_2 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::mk_nat_obj(0u); +x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_4, 0, x_2); +lean::closure_set(x_4, 1, x_3); +x_5 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_5, 0, x_4); +lean::cnstr_set(x_5, 1, x_0); +return x_5; } } obj* l_lean_parser_command_notation__spec_notation__symbol_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -7681,50 +7638,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__2; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__2; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__2; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__2; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__2; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__2; +lean::inc(x_69); +return x_69; } } } @@ -7734,65 +7690,65 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__2; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__2; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { switch (lean::obj_tag(x_1)) { case 0: { -obj* x_80; obj* x_83; obj* x_84; -x_80 = lean::cnstr_get(x_1, 0); -lean::inc(x_80); +obj* x_79; obj* x_82; obj* x_83; +x_79 = lean::cnstr_get(x_1, 0); +lean::inc(x_79); lean::dec(x_1); +x_82 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_82, 0, x_79); x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_80); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +lean::cnstr_set(x_83, 0, x_82); +return x_83; } case 3: { -obj* x_85; -x_85 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__1; -lean::inc(x_85); -return x_85; +obj* x_84; +x_84 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__1; +lean::inc(x_84); +return x_84; } default: { -obj* x_88; +obj* x_87; lean::dec(x_1); -x_88 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__1; -lean::inc(x_88); -return x_88; +x_87 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__1; +lean::inc(x_87); +return x_87; } } } else { -obj* x_90; obj* x_91; obj* x_93; obj* x_94; -x_90 = l_lean_parser_command_notation__spec_symbol__quote_has__view; -x_91 = lean::cnstr_get(x_90, 0); -lean::inc(x_91); -x_93 = lean::apply_1(x_91, x_1); -x_94 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_94, 0, x_93); -return x_94; +obj* x_89; obj* x_90; obj* x_92; obj* x_93; +x_89 = l_lean_parser_command_notation__spec_symbol__quote_has__view; +x_90 = lean::cnstr_get(x_89, 0); +lean::inc(x_90); +x_92 = lean::apply_1(x_90, x_1); +x_93 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_93, 0, x_92); +return x_93; } } } @@ -7804,7 +7760,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -7812,46 +7768,44 @@ x_5 = l_lean_parser_command_notation__spec_symbol__quote_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_command_notation__spec_mixfix__symbol; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_command_notation__spec_mixfix__symbol; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_32; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_21); -x_23 = l_option_map___rarg(x_21, x_18); -x_24 = lean::box(3); -x_25 = l_option_get__or__else___main___rarg(x_23, x_24); -lean::inc(x_1); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_1); -x_28 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_28); -x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_1); -x_32 = l_lean_parser_command_notation__spec_mixfix__symbol; -lean::inc(x_32); -x_34 = l_lean_parser_syntax_mk__node(x_32, x_31); -return x_34; +x_20 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_20); +x_22 = l_option_map___rarg(x_20, x_17); +x_23 = lean::box(3); +x_24 = l_option_get__or__else___main___rarg(x_22, x_23); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_1); +x_26 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_26); +x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_1); +x_30 = l_lean_parser_command_notation__spec_mixfix__symbol; +lean::inc(x_30); +x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); +return x_32; } } } @@ -7879,80 +7833,77 @@ return x_0; obj* _init_l_lean_parser_command_notation__spec_mixfix__symbol_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; x_0 = lean::box(0); x_1 = l_lean_parser_command_notation__spec_unquoted__symbol_tokens; -lean::inc(x_0); lean::inc(x_1); -x_4 = l_lean_parser_list_cons_tokens___rarg(x_1, x_0); -x_5 = l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens; -lean::inc(x_5); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_4); -x_8 = l_lean_parser_tokens___rarg(x_7); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_8, x_0); -x_10 = l_lean_parser_tokens___rarg(x_9); -return x_10; +x_3 = l_lean_parser_list_cons_tokens___rarg(x_1, x_0); +x_4 = l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens; +lean::inc(x_4); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_4, x_3); +x_7 = l_lean_parser_tokens___rarg(x_6); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_7, x_0); +x_9 = l_lean_parser_tokens___rarg(x_8); +return x_9; } } obj* _init_l_lean_parser_command_notation__spec_mixfix__symbol_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_21; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_20; x_0 = lean::box(0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_unquoted__symbol_parser), 5, 0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_symbol__quote_parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_0); -x_9 = l_lean_parser_term__parser__m_monad; -x_10 = l_lean_parser_term__parser__m_monad__except; -x_11 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_12 = l_lean_parser_term__parser__m_alternative; -x_13 = l_lean_parser_command_notation__spec_mixfix__symbol; -x_14 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view; -lean::inc(x_14); +x_2 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_symbol__quote_parser), 5, 0); +x_4 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_4, 0, x_3); +lean::cnstr_set(x_4, 1, x_2); +x_5 = lean::mk_nat_obj(0u); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_6, 0, x_4); +lean::closure_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_0); +x_8 = l_lean_parser_term__parser__m_monad; +x_9 = l_lean_parser_term__parser__m_monad__except; +x_10 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_11 = l_lean_parser_term__parser__m_alternative; +x_12 = l_lean_parser_command_notation__spec_mixfix__symbol; +x_13 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view; lean::inc(x_13); lean::inc(x_12); lean::inc(x_11); lean::inc(x_10); lean::inc(x_9); -x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x_8, x_14); -return x_21; +lean::inc(x_8); +x_20 = l_lean_parser_combinators_node_view___rarg(x_8, x_9, x_10, x_11, x_12, x_7, x_13); +return x_20; } } obj* _init_l_lean_parser_command_notation__spec_mixfix__symbol_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_unquoted__symbol_parser), 5, 0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_symbol__quote_parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_0); -return x_8; +x_2 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_symbol__quote_parser), 5, 0); +x_4 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_4, 0, x_3); +lean::cnstr_set(x_4, 1, x_2); +x_5 = lean::mk_nat_obj(0u); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_6, 0, x_4); +lean::closure_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_0); +return x_7; } } obj* l_lean_parser_command_notation__spec_mixfix__symbol_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -8823,7 +8774,7 @@ return x_136; obj* l_lean_parser_command_notation__spec_fold__action__folder_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_38; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_36; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -8841,42 +8792,40 @@ x_14 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_14); x_16 = l_option_map___rarg(x_14, x_1); x_17 = lean::box(3); -lean::inc(x_17); -x_19 = l_option_get__or__else___main___rarg(x_16, x_17); +x_18 = l_option_get__or__else___main___rarg(x_16, x_17); +x_19 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_19, 0, x_3); x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_3); -x_21 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_21, 0, x_5); +lean::cnstr_set(x_20, 0, x_5); lean::inc(x_14); -x_23 = l_option_map___rarg(x_14, x_7); -lean::inc(x_17); -x_25 = l_option_get__or__else___main___rarg(x_23, x_17); +x_22 = l_option_map___rarg(x_14, x_7); +x_23 = l_option_get__or__else___main___rarg(x_22, x_17); lean::inc(x_14); -x_27 = l_option_map___rarg(x_14, x_11); -x_28 = l_option_get__or__else___main___rarg(x_27, x_17); -x_29 = lean::box(0); +x_25 = l_option_map___rarg(x_14, x_11); +x_26 = l_option_get__or__else___main___rarg(x_25, x_17); +x_27 = lean::box(0); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_26); +lean::cnstr_set(x_28, 1, x_27); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_9); +lean::cnstr_set(x_29, 1, x_28); x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_28); +lean::cnstr_set(x_30, 0, x_23); lean::cnstr_set(x_30, 1, x_29); x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_9); +lean::cnstr_set(x_31, 0, x_20); lean::cnstr_set(x_31, 1, x_30); x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_25); +lean::cnstr_set(x_32, 0, x_19); lean::cnstr_set(x_32, 1, x_31); x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_21); +lean::cnstr_set(x_33, 0, x_18); lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_20); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_19); -lean::cnstr_set(x_35, 1, x_34); -x_36 = l_lean_parser_command_notation__spec_fold__action__folder; -lean::inc(x_36); -x_38 = l_lean_parser_syntax_mk__node(x_36, x_35); -return x_38; +x_34 = l_lean_parser_command_notation__spec_fold__action__folder; +lean::inc(x_34); +x_36 = l_lean_parser_syntax_mk__node(x_34, x_33); +return x_36; } } obj* _init_l_lean_parser_command_notation__spec_fold__action__folder_has__view_x_27() { @@ -9592,7 +9541,7 @@ return x_117; obj* l_lean_parser_command_notation__spec_fold__action_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_13; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_26; obj* x_27; obj* x_28; obj* 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_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_13; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_44; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -9612,47 +9561,46 @@ x_16 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_16); x_18 = l_option_map___rarg(x_16, x_1); x_19 = lean::box(3); -lean::inc(x_19); -x_21 = l_option_get__or__else___main___rarg(x_18, x_19); -x_22 = l_lean_parser_command_notation__spec_notation__symbol_has__view; -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -lean::inc(x_23); -x_26 = lean::apply_1(x_23, x_5); -x_27 = l_lean_parser_command_notation__spec_fold__action__folder_has__view; -x_28 = lean::cnstr_get(x_27, 1); -lean::inc(x_28); -x_30 = lean::apply_1(x_28, x_7); -x_31 = lean::apply_1(x_23, x_11); +x_20 = l_option_get__or__else___main___rarg(x_18, x_19); +x_21 = l_lean_parser_command_notation__spec_notation__symbol_has__view; +x_22 = lean::cnstr_get(x_21, 1); +lean::inc(x_22); +lean::inc(x_22); +x_25 = lean::apply_1(x_22, x_5); +x_26 = l_lean_parser_command_notation__spec_fold__action__folder_has__view; +x_27 = lean::cnstr_get(x_26, 1); +lean::inc(x_27); +x_29 = lean::apply_1(x_27, x_7); +x_30 = lean::apply_1(x_22, x_11); lean::inc(x_16); -x_33 = l_option_map___rarg(x_16, x_13); -x_34 = l_option_get__or__else___main___rarg(x_33, x_19); -x_35 = lean::box(0); +x_32 = l_option_map___rarg(x_16, x_13); +x_33 = l_option_get__or__else___main___rarg(x_32, x_19); +x_34 = lean::box(0); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_33); +lean::cnstr_set(x_35, 1, x_34); x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_34); +lean::cnstr_set(x_36, 0, x_30); lean::cnstr_set(x_36, 1, x_35); x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_31); +lean::cnstr_set(x_37, 0, x_9); lean::cnstr_set(x_37, 1, x_36); x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_9); +lean::cnstr_set(x_38, 0, x_29); lean::cnstr_set(x_38, 1, x_37); x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_30); +lean::cnstr_set(x_39, 0, x_25); lean::cnstr_set(x_39, 1, x_38); x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_26); +lean::cnstr_set(x_40, 0, x_3); lean::cnstr_set(x_40, 1, x_39); x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_3); +lean::cnstr_set(x_41, 0, x_20); lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_21); -lean::cnstr_set(x_42, 1, x_41); -x_43 = l_lean_parser_command_notation__spec_fold__action; -lean::inc(x_43); -x_45 = l_lean_parser_syntax_mk__node(x_43, x_42); -return x_45; +x_42 = l_lean_parser_command_notation__spec_fold__action; +lean::inc(x_42); +x_44 = l_lean_parser_syntax_mk__node(x_42, x_41); +return x_44; } } obj* _init_l_lean_parser_command_notation__spec_fold__action_has__view_x_27() { @@ -9801,26 +9749,25 @@ _start: { if (lean::obj_tag(x_0) == 0) { -obj* x_6; obj* x_7; obj* x_8; obj* x_12; +obj* x_6; obj* x_7; obj* x_8; obj* x_11; x_6 = lean::box(0); x_7 = l_lean_parser_combinators_any__of___rarg___closed__1; x_8 = l_mjoin___rarg___closed__1; -lean::inc(x_6); lean::inc(x_8); lean::inc(x_7); -x_12 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_7, x_8, x_6, x_6, x_1, x_2, x_3, x_4, x_5); -return x_12; +x_11 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_7, x_8, x_6, x_6, x_1, x_2, x_3, x_4, x_5); +return x_11; } else { -obj* x_13; obj* x_15; obj* x_18; -x_13 = lean::cnstr_get(x_0, 0); -lean::inc(x_13); -x_15 = lean::cnstr_get(x_0, 1); -lean::inc(x_15); +obj* x_12; obj* x_14; obj* x_17; +x_12 = lean::cnstr_get(x_0, 0); +lean::inc(x_12); +x_14 = lean::cnstr_get(x_0, 1); +lean::inc(x_14); lean::dec(x_0); -x_18 = l_list_foldl___main___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__3(x_13, x_15, x_1, x_2, x_3, x_4, x_5); -return x_18; +x_17 = l_list_foldl___main___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__3(x_12, x_14, x_1, x_2, x_3, x_4, x_5); +return x_17; } } } @@ -10006,54 +9953,49 @@ return x_2; obj* _init_l_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_34; x_0 = lean::mk_string("("); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_4 = lean::box(0); -lean::inc(x_4); -lean::inc(x_4); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_4, x_4); -lean::inc(x_4); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_4, x_7); -x_10 = l_lean_parser_tokens___rarg(x_9); -x_11 = lean::mk_string(","); +x_5 = l_lean_parser_list_cons_tokens___rarg(x_4, x_4); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_4, x_5); +x_7 = l_lean_parser_tokens___rarg(x_6); +x_8 = lean::mk_string(","); lean::inc(x_1); -x_13 = l_lean_parser_symbol_tokens___rarg(x_11, x_1); -x_14 = lean::mk_string(")"); -x_15 = l_lean_parser_symbol_tokens___rarg(x_14, x_1); -lean::inc(x_4); -x_17 = l_lean_parser_list_cons_tokens___rarg(x_15, x_4); -x_18 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_17); -lean::inc(x_18); -x_21 = l_lean_parser_list_cons_tokens___rarg(x_18, x_17); -x_22 = l_lean_parser_list_cons_tokens___rarg(x_13, x_21); -lean::inc(x_4); -x_24 = l_lean_parser_list_cons_tokens___rarg(x_4, x_22); -x_25 = l_lean_parser_list_cons_tokens___rarg(x_4, x_24); +x_10 = l_lean_parser_symbol_tokens___rarg(x_8, x_1); +x_11 = lean::mk_string(")"); +x_12 = l_lean_parser_symbol_tokens___rarg(x_11, x_1); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_12, x_4); +x_14 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_13); +lean::inc(x_14); +x_17 = l_lean_parser_list_cons_tokens___rarg(x_14, x_13); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_10, x_17); +x_19 = l_lean_parser_list_cons_tokens___rarg(x_4, x_18); +x_20 = l_lean_parser_list_cons_tokens___rarg(x_4, x_19); lean::inc(x_3); -x_27 = l_lean_parser_list_cons_tokens___rarg(x_3, x_25); -x_28 = l_lean_parser_tokens___rarg(x_27); -x_29 = l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__tokens; -lean::inc(x_29); -x_31 = l_lean_parser_list_cons_tokens___rarg(x_29, x_17); -lean::inc(x_18); -x_33 = l_lean_parser_list_cons_tokens___rarg(x_18, x_31); -x_34 = l_lean_parser_list_cons_tokens___rarg(x_28, x_33); -lean::inc(x_29); -x_36 = l_lean_parser_list_cons_tokens___rarg(x_29, x_34); -x_37 = l_lean_parser_list_cons_tokens___rarg(x_10, x_36); -x_38 = l_lean_parser_list_cons_tokens___rarg(x_3, x_37); -x_39 = l_lean_parser_tokens___rarg(x_38); -return x_39; +x_22 = l_lean_parser_list_cons_tokens___rarg(x_3, x_20); +x_23 = l_lean_parser_tokens___rarg(x_22); +x_24 = l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__tokens; +lean::inc(x_24); +x_26 = l_lean_parser_list_cons_tokens___rarg(x_24, x_13); +lean::inc(x_14); +x_28 = l_lean_parser_list_cons_tokens___rarg(x_14, x_26); +x_29 = l_lean_parser_list_cons_tokens___rarg(x_23, x_28); +lean::inc(x_24); +x_31 = l_lean_parser_list_cons_tokens___rarg(x_24, x_29); +x_32 = l_lean_parser_list_cons_tokens___rarg(x_7, x_31); +x_33 = l_lean_parser_list_cons_tokens___rarg(x_3, x_32); +x_34 = l_lean_parser_tokens___rarg(x_33); +return x_34; } } obj* _init_l_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; 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_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_63; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_41; obj* x_42; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_62; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -10072,105 +10014,104 @@ x_9 = lean::mk_string("foldr"); x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__2), 6, 1); lean::closure_set(x_10, 0, x_9); x_11 = lean::box(0); -lean::inc(x_11); +x_12 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_12, 0, x_10); +lean::cnstr_set(x_12, 1, x_11); x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_11); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_8); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_any__of___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__1), 6, 1); -lean::closure_set(x_15, 0, x_14); -x_16 = lean::mk_string(","); -x_17 = l_string_trim(x_16); -lean::inc(x_17); -x_19 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_19, 0, x_17); +lean::cnstr_set(x_13, 0, x_8); +lean::cnstr_set(x_13, 1, x_12); +x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_any__of___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__1), 6, 1); +lean::closure_set(x_14, 0, x_13); +x_15 = lean::mk_string(","); +x_16 = l_string_trim(x_15); +lean::inc(x_16); +x_18 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_18, 0, x_16); lean::inc(x_4); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_21, 0, x_17); -lean::closure_set(x_21, 1, x_4); -lean::closure_set(x_21, 2, x_19); +x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_20, 0, x_16); +lean::closure_set(x_20, 1, x_4); +lean::closure_set(x_20, 2, x_18); lean::inc(x_4); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_23, 0, x_4); -x_24 = lean::mk_string(")"); -x_25 = l_string_trim(x_24); -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_27, 0, x_25); -x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_28, 0, x_25); -lean::closure_set(x_28, 1, x_4); -lean::closure_set(x_28, 2, x_27); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_11); -lean::inc(x_29); -lean::inc(x_23); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_22, 0, x_4); +x_23 = lean::mk_string(")"); +x_24 = l_string_trim(x_23); +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_26, 0, x_24); +x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_27, 0, x_24); +lean::closure_set(x_27, 1, x_4); +lean::closure_set(x_27, 2, x_26); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_11); +lean::inc(x_28); +lean::inc(x_22); +x_31 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_31, 0, x_22); +lean::cnstr_set(x_31, 1, x_28); x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_23); -lean::cnstr_set(x_32, 1, x_29); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_21); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); -lean::inc(x_34); +lean::cnstr_set(x_32, 0, x_20); +lean::cnstr_set(x_32, 1, x_31); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); +lean::inc(x_33); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_33); +lean::cnstr_set(x_35, 1, x_32); x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set(x_36, 1, x_33); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_34); -lean::cnstr_set(x_37, 1, x_36); +lean::cnstr_set(x_36, 0, x_33); +lean::cnstr_set(x_36, 1, x_35); lean::inc(x_6); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_6); -lean::cnstr_set(x_39, 1, x_37); -x_40 = l_lean_parser_command_notation__spec_fold__action__folder; -lean::inc(x_40); -x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_42, 0, x_40); -lean::closure_set(x_42, 1, x_39); -x_43 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_notation__symbol_parser), 5, 0); -lean::inc(x_43); +x_38 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_38, 0, x_6); +lean::cnstr_set(x_38, 1, x_36); +x_39 = l_lean_parser_command_notation__spec_fold__action__folder; +lean::inc(x_39); +x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_41, 0, x_39); +lean::closure_set(x_41, 1, x_38); +x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_notation__symbol_parser), 5, 0); +lean::inc(x_42); +x_44 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_44, 0, x_42); +lean::cnstr_set(x_44, 1, x_28); x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_29); +lean::cnstr_set(x_45, 0, x_22); +lean::cnstr_set(x_45, 1, x_44); x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_23); +lean::cnstr_set(x_46, 0, x_41); lean::cnstr_set(x_46, 1, x_45); x_47 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_47, 0, x_42); lean::cnstr_set(x_47, 1, x_46); x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_43); +lean::cnstr_set(x_48, 0, x_14); lean::cnstr_set(x_48, 1, x_47); x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_15); +lean::cnstr_set(x_49, 0, x_6); lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_6); -lean::cnstr_set(x_50, 1, x_49); -x_51 = l_lean_parser_term__parser__m_monad; -x_52 = l_lean_parser_term__parser__m_monad__except; -x_53 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_54 = l_lean_parser_term__parser__m_alternative; -x_55 = l_lean_parser_command_notation__spec_fold__action; -x_56 = l_lean_parser_command_notation__spec_fold__action_has__view; -lean::inc(x_56); +x_50 = l_lean_parser_term__parser__m_monad; +x_51 = l_lean_parser_term__parser__m_monad__except; +x_52 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_53 = l_lean_parser_term__parser__m_alternative; +x_54 = l_lean_parser_command_notation__spec_fold__action; +x_55 = l_lean_parser_command_notation__spec_fold__action_has__view; lean::inc(x_55); lean::inc(x_54); lean::inc(x_53); lean::inc(x_52); lean::inc(x_51); -x_63 = l_lean_parser_combinators_node_view___rarg(x_51, x_52, x_53, x_54, x_55, x_50, x_56); -return x_63; +lean::inc(x_50); +x_62 = l_lean_parser_combinators_node_view___rarg(x_50, x_51, x_52, x_53, x_54, x_49, x_55); +return x_62; } } obj* _init_l_lean_parser_command_notation__spec_fold__action_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; 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_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_41; obj* x_42; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -10189,86 +10130,85 @@ x_9 = lean::mk_string("foldr"); x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__2), 6, 1); lean::closure_set(x_10, 0, x_9); x_11 = lean::box(0); -lean::inc(x_11); +x_12 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_12, 0, x_10); +lean::cnstr_set(x_12, 1, x_11); x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_11); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_8); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_any__of___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__1), 6, 1); -lean::closure_set(x_15, 0, x_14); -x_16 = lean::mk_string(","); -x_17 = l_string_trim(x_16); -lean::inc(x_17); -x_19 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_19, 0, x_17); +lean::cnstr_set(x_13, 0, x_8); +lean::cnstr_set(x_13, 1, x_12); +x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_any__of___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__1), 6, 1); +lean::closure_set(x_14, 0, x_13); +x_15 = lean::mk_string(","); +x_16 = l_string_trim(x_15); +lean::inc(x_16); +x_18 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_18, 0, x_16); lean::inc(x_4); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_21, 0, x_17); -lean::closure_set(x_21, 1, x_4); -lean::closure_set(x_21, 2, x_19); +x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_20, 0, x_16); +lean::closure_set(x_20, 1, x_4); +lean::closure_set(x_20, 2, x_18); lean::inc(x_4); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_23, 0, x_4); -x_24 = lean::mk_string(")"); -x_25 = l_string_trim(x_24); -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_27, 0, x_25); -x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_28, 0, x_25); -lean::closure_set(x_28, 1, x_4); -lean::closure_set(x_28, 2, x_27); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_11); -lean::inc(x_29); -lean::inc(x_23); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_22, 0, x_4); +x_23 = lean::mk_string(")"); +x_24 = l_string_trim(x_23); +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_26, 0, x_24); +x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_27, 0, x_24); +lean::closure_set(x_27, 1, x_4); +lean::closure_set(x_27, 2, x_26); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_11); +lean::inc(x_28); +lean::inc(x_22); +x_31 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_31, 0, x_22); +lean::cnstr_set(x_31, 1, x_28); x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_23); -lean::cnstr_set(x_32, 1, x_29); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_21); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); -lean::inc(x_34); +lean::cnstr_set(x_32, 0, x_20); +lean::cnstr_set(x_32, 1, x_31); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); +lean::inc(x_33); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_33); +lean::cnstr_set(x_35, 1, x_32); x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set(x_36, 1, x_33); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_34); -lean::cnstr_set(x_37, 1, x_36); +lean::cnstr_set(x_36, 0, x_33); +lean::cnstr_set(x_36, 1, x_35); lean::inc(x_6); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_6); -lean::cnstr_set(x_39, 1, x_37); -x_40 = l_lean_parser_command_notation__spec_fold__action__folder; -lean::inc(x_40); -x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_42, 0, x_40); -lean::closure_set(x_42, 1, x_39); -x_43 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_notation__symbol_parser), 5, 0); -lean::inc(x_43); +x_38 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_38, 0, x_6); +lean::cnstr_set(x_38, 1, x_36); +x_39 = l_lean_parser_command_notation__spec_fold__action__folder; +lean::inc(x_39); +x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_41, 0, x_39); +lean::closure_set(x_41, 1, x_38); +x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_notation__symbol_parser), 5, 0); +lean::inc(x_42); +x_44 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_44, 0, x_42); +lean::cnstr_set(x_44, 1, x_28); x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_29); +lean::cnstr_set(x_45, 0, x_22); +lean::cnstr_set(x_45, 1, x_44); x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_23); +lean::cnstr_set(x_46, 0, x_41); lean::cnstr_set(x_46, 1, x_45); x_47 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_47, 0, x_42); lean::cnstr_set(x_47, 1, x_46); x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_43); +lean::cnstr_set(x_48, 0, x_14); lean::cnstr_set(x_48, 1, x_47); x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_15); +lean::cnstr_set(x_49, 0, x_6); lean::cnstr_set(x_49, 1, x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_6); -lean::cnstr_set(x_50, 1, x_49); -return x_50; +return x_49; } } obj* l_lean_parser_command_notation__spec_fold__action_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -11352,7 +11292,7 @@ return x_188; obj* l_lean_parser_command_notation__spec_scoped__action_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_13; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_33; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_41; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_13; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -11372,83 +11312,78 @@ x_16 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_16); x_18 = l_option_map___rarg(x_16, x_1); x_19 = lean::box(3); -lean::inc(x_19); -x_21 = l_option_get__or__else___main___rarg(x_18, x_19); -x_22 = lean::box(0); -lean::inc(x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_3); -lean::cnstr_set(x_24, 1, x_22); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_21); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_lean_parser_no__kind; -lean::inc(x_26); -x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_7); +x_20 = l_option_get__or__else___main___rarg(x_18, x_19); +x_21 = lean::box(0); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_3); +lean::cnstr_set(x_22, 1, x_21); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_20); +lean::cnstr_set(x_23, 1, x_22); +x_24 = l_lean_parser_no__kind; +lean::inc(x_24); +x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); +x_27 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_27, 0, x_7); lean::inc(x_16); -x_31 = l_option_map___rarg(x_16, x_9); -lean::inc(x_19); -x_33 = l_option_get__or__else___main___rarg(x_31, x_19); +x_29 = l_option_map___rarg(x_16, x_9); +x_30 = l_option_get__or__else___main___rarg(x_29, x_19); lean::inc(x_16); -x_35 = l_option_map___rarg(x_16, x_13); -x_36 = l_option_get__or__else___main___rarg(x_35, x_19); -lean::inc(x_22); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set(x_38, 1, x_22); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_11); -lean::cnstr_set(x_39, 1, x_38); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_33); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_29); -lean::cnstr_set(x_41, 1, x_40); +x_32 = l_option_map___rarg(x_16, x_13); +x_33 = l_option_get__or__else___main___rarg(x_32, x_19); +x_34 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_34, 0, x_33); +lean::cnstr_set(x_34, 1, x_21); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_11); +lean::cnstr_set(x_35, 1, x_34); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_30); +lean::cnstr_set(x_36, 1, x_35); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_27); +lean::cnstr_set(x_37, 1, x_36); if (lean::obj_tag(x_5) == 0) { -obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; -lean::dec(x_22); -x_43 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_41); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_28); -lean::cnstr_set(x_46, 1, x_45); -x_47 = l_lean_parser_command_notation__spec_scoped__action; -lean::inc(x_47); -x_49 = l_lean_parser_syntax_mk__node(x_47, x_46); -return x_49; +obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_44; +x_38 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_38); +x_40 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_40, 0, x_38); +lean::cnstr_set(x_40, 1, x_37); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_26); +lean::cnstr_set(x_41, 1, x_40); +x_42 = l_lean_parser_command_notation__spec_scoped__action; +lean::inc(x_42); +x_44 = l_lean_parser_syntax_mk__node(x_42, x_41); +return x_44; } else { -obj* x_50; obj* x_53; obj* x_54; obj* x_56; obj* x_57; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_64; -x_50 = lean::cnstr_get(x_5, 0); -lean::inc(x_50); +obj* x_45; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_59; +x_45 = lean::cnstr_get(x_5, 0); +lean::inc(x_45); lean::dec(x_5); -x_53 = l_lean_parser_command_notation__spec_precedence_has__view; -x_54 = lean::cnstr_get(x_53, 1); -lean::inc(x_54); -x_56 = lean::apply_1(x_54, x_50); -x_57 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_22); -lean::inc(x_26); -x_59 = l_lean_parser_syntax_mk__node(x_26, x_57); -x_60 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_41); -x_61 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_61, 0, x_28); -lean::cnstr_set(x_61, 1, x_60); -x_62 = l_lean_parser_command_notation__spec_scoped__action; -lean::inc(x_62); -x_64 = l_lean_parser_syntax_mk__node(x_62, x_61); -return x_64; +x_48 = l_lean_parser_command_notation__spec_precedence_has__view; +x_49 = lean::cnstr_get(x_48, 1); +lean::inc(x_49); +x_51 = lean::apply_1(x_49, x_45); +x_52 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_52, 0, x_51); +lean::cnstr_set(x_52, 1, x_21); +lean::inc(x_24); +x_54 = l_lean_parser_syntax_mk__node(x_24, x_52); +x_55 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_55, 0, x_54); +lean::cnstr_set(x_55, 1, x_37); +x_56 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_56, 0, x_26); +lean::cnstr_set(x_56, 1, x_55); +x_57 = l_lean_parser_command_notation__spec_scoped__action; +lean::inc(x_57); +x_59 = l_lean_parser_syntax_mk__node(x_57, x_56); +return x_59; } } } @@ -11685,50 +11620,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_notation__spec_action__kind_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_notation__spec_action__kind_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_notation__spec_action__kind_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_notation__spec_action__kind_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_notation__spec_action__kind_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_notation__spec_action__kind_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -11738,78 +11672,78 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_notation__spec_action__kind_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_notation__spec_action__kind_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); -if (x_77 == 0) +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); +if (x_76 == 0) { -obj* x_79; uint8 x_80; -x_79 = lean::mk_nat_obj(1u); -x_80 = lean::nat_dec_eq(x_2, x_79); -lean::dec(x_79); -if (x_80 == 0) +obj* x_78; uint8 x_79; +x_78 = lean::mk_nat_obj(1u); +x_79 = lean::nat_dec_eq(x_2, x_78); +lean::dec(x_78); +if (x_79 == 0) { -obj* x_82; uint8 x_83; -x_82 = lean::mk_nat_obj(2u); -x_83 = lean::nat_dec_eq(x_2, x_82); -lean::dec(x_82); +obj* x_81; uint8 x_82; +x_81 = lean::mk_nat_obj(2u); +x_82 = lean::nat_dec_eq(x_2, x_81); +lean::dec(x_81); lean::dec(x_2); -if (x_83 == 0) +if (x_82 == 0) { -obj* x_86; obj* x_87; obj* x_89; obj* x_90; -x_86 = l_lean_parser_command_notation__spec_fold__action_has__view; -x_87 = lean::cnstr_get(x_86, 0); -lean::inc(x_87); -x_89 = lean::apply_1(x_87, x_1); -x_90 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_90, 0, x_89); -return x_90; +obj* x_85; obj* x_86; obj* x_88; obj* x_89; +x_85 = l_lean_parser_command_notation__spec_fold__action_has__view; +x_86 = lean::cnstr_get(x_85, 0); +lean::inc(x_86); +x_88 = lean::apply_1(x_86, x_1); +x_89 = lean::alloc_cnstr(3, 1, 0); +lean::cnstr_set(x_89, 0, x_88); +return x_89; } else { -obj* x_91; obj* x_92; obj* x_94; obj* x_95; -x_91 = l_lean_parser_command_notation__spec_scoped__action_has__view; -x_92 = lean::cnstr_get(x_91, 0); -lean::inc(x_92); -x_94 = lean::apply_1(x_92, x_1); -x_95 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_95, 0, x_94); -return x_95; +obj* x_90; obj* x_91; obj* x_93; obj* x_94; +x_90 = l_lean_parser_command_notation__spec_scoped__action_has__view; +x_91 = lean::cnstr_get(x_90, 0); +lean::inc(x_91); +x_93 = lean::apply_1(x_91, x_1); +x_94 = lean::alloc_cnstr(2, 1, 0); +lean::cnstr_set(x_94, 0, x_93); +return x_94; } } else { -obj* x_97; +obj* x_96; lean::dec(x_2); -x_97 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_97, 0, x_1); -return x_97; +x_96 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_96, 0, x_1); +return x_96; } } else { -obj* x_99; obj* x_100; obj* x_102; obj* x_103; +obj* x_98; obj* x_99; obj* x_101; obj* x_102; lean::dec(x_2); -x_99 = l_lean_parser_command_notation__spec_precedence__term_has__view; -x_100 = lean::cnstr_get(x_99, 0); -lean::inc(x_100); -x_102 = lean::apply_1(x_100, x_1); -x_103 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_103, 0, x_102); -return x_103; +x_98 = l_lean_parser_command_notation__spec_precedence__term_has__view; +x_99 = lean::cnstr_get(x_98, 0); +lean::inc(x_99); +x_101 = lean::apply_1(x_99, x_1); +x_102 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_102, 0, x_101); +return x_102; } } } @@ -11822,7 +11756,7 @@ x_1 = lean::box(0); switch (lean::obj_tag(x_0)) { case 0: { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -11830,91 +11764,87 @@ x_5 = l_lean_parser_command_notation__spec_precedence__term_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_command_notation__spec_action__kind; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_command_notation__spec_action__kind; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } case 1: { -obj* x_18; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -lean::inc(x_1); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_18); -lean::cnstr_set(x_22, 1, x_1); -x_23 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_23); -x_25 = l_lean_parser_syntax_mk__node(x_23, x_22); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_command_notation__spec_action__kind; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -return x_29; +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_17); +lean::cnstr_set(x_20, 1, x_1); +x_21 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_21); +x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_command_notation__spec_action__kind; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +return x_27; } case 2: { -obj* x_30; obj* x_33; obj* x_34; obj* x_36; obj* x_38; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_45; -x_30 = lean::cnstr_get(x_0, 0); -lean::inc(x_30); +obj* x_28; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; +x_28 = lean::cnstr_get(x_0, 0); +lean::inc(x_28); lean::dec(x_0); -x_33 = l_lean_parser_command_notation__spec_scoped__action_has__view; -x_34 = lean::cnstr_get(x_33, 1); -lean::inc(x_34); -x_36 = lean::apply_1(x_34, x_30); -lean::inc(x_1); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set(x_38, 1, x_1); -x_39 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; -lean::inc(x_39); -x_41 = l_lean_parser_syntax_mk__node(x_39, x_38); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_1); -x_43 = l_lean_parser_command_notation__spec_action__kind; -lean::inc(x_43); -x_45 = l_lean_parser_syntax_mk__node(x_43, x_42); -return x_45; +x_31 = l_lean_parser_command_notation__spec_scoped__action_has__view; +x_32 = lean::cnstr_get(x_31, 1); +lean::inc(x_32); +x_34 = lean::apply_1(x_32, x_28); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_34); +lean::cnstr_set(x_35, 1, x_1); +x_36 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; +lean::inc(x_36); +x_38 = l_lean_parser_syntax_mk__node(x_36, x_35); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_1); +x_40 = l_lean_parser_command_notation__spec_action__kind; +lean::inc(x_40); +x_42 = l_lean_parser_syntax_mk__node(x_40, x_39); +return x_42; } default: { -obj* x_46; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_61; -x_46 = lean::cnstr_get(x_0, 0); -lean::inc(x_46); +obj* x_43; obj* x_46; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_57; +x_43 = lean::cnstr_get(x_0, 0); +lean::inc(x_43); lean::dec(x_0); -x_49 = l_lean_parser_command_notation__spec_fold__action_has__view; -x_50 = lean::cnstr_get(x_49, 1); -lean::inc(x_50); -x_52 = lean::apply_1(x_50, x_46); -lean::inc(x_1); +x_46 = l_lean_parser_command_notation__spec_fold__action_has__view; +x_47 = lean::cnstr_get(x_46, 1); +lean::inc(x_47); +x_49 = lean::apply_1(x_47, x_43); +x_50 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_50, 0, x_49); +lean::cnstr_set(x_50, 1, x_1); +x_51 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +lean::inc(x_51); +x_53 = l_lean_parser_syntax_mk__node(x_51, x_50); x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_52); +lean::cnstr_set(x_54, 0, x_53); lean::cnstr_set(x_54, 1, x_1); -x_55 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +x_55 = l_lean_parser_command_notation__spec_action__kind; lean::inc(x_55); x_57 = l_lean_parser_syntax_mk__node(x_55, x_54); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_1); -x_59 = l_lean_parser_command_notation__spec_action__kind; -lean::inc(x_59); -x_61 = l_lean_parser_syntax_mk__node(x_59, x_58); -return x_61; +return x_57; } } } @@ -12280,7 +12210,7 @@ return x_0; obj* _init_l_lean_parser_command_notation__spec_action_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; x_0 = lean::mk_string(":"); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -12292,47 +12222,40 @@ x_7 = lean::box(0); x_8 = lean::mk_string("("); lean::inc(x_1); x_10 = l_lean_parser_symbol_tokens___rarg(x_8, x_1); -lean::inc(x_7); -lean::inc(x_7); -x_13 = l_lean_parser_list_cons_tokens___rarg(x_7, x_7); -x_14 = l_lean_parser_list_cons_tokens___rarg(x_10, x_13); -x_15 = l_lean_parser_tokens___rarg(x_14); -x_16 = l_lean_parser_tokens___rarg(x_15); -x_17 = l_lean_parser_command_notation__spec_precedence_parser_lean_parser_has__tokens; -lean::inc(x_17); -x_19 = l_lean_parser_tokens___rarg(x_17); -x_20 = lean::mk_string(", "); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_7, x_7); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_10, x_11); +x_13 = l_lean_parser_tokens___rarg(x_12); +x_14 = l_lean_parser_tokens___rarg(x_13); +x_15 = l_lean_parser_command_notation__spec_precedence_parser_lean_parser_has__tokens; +lean::inc(x_15); +x_17 = l_lean_parser_tokens___rarg(x_15); +x_18 = lean::mk_string(", "); lean::inc(x_1); -x_22 = l_lean_parser_symbol_tokens___rarg(x_20, x_1); -x_23 = lean::mk_string(")"); -x_24 = l_lean_parser_symbol_tokens___rarg(x_23, x_1); -lean::inc(x_7); -x_26 = l_lean_parser_list_cons_tokens___rarg(x_24, x_7); -x_27 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_27); -x_29 = l_lean_parser_list_cons_tokens___rarg(x_27, x_26); -x_30 = l_lean_parser_list_cons_tokens___rarg(x_22, x_29); -lean::inc(x_7); -x_32 = l_lean_parser_list_cons_tokens___rarg(x_7, x_30); -x_33 = l_lean_parser_list_cons_tokens___rarg(x_19, x_32); -x_34 = l_lean_parser_list_cons_tokens___rarg(x_16, x_33); -x_35 = l_lean_parser_tokens___rarg(x_34); -x_36 = l_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens; -lean::inc(x_7); -lean::inc(x_36); -x_39 = l_lean_parser_list_cons_tokens___rarg(x_36, x_7); -x_40 = l_lean_parser_list_cons_tokens___rarg(x_35, x_39); -lean::inc(x_7); -x_42 = l_lean_parser_list_cons_tokens___rarg(x_7, x_40); -x_43 = l_lean_parser_list_cons_tokens___rarg(x_6, x_42); -x_44 = l_lean_parser_tokens___rarg(x_43); -lean::inc(x_7); -x_46 = l_lean_parser_list_cons_tokens___rarg(x_44, x_7); -x_47 = l_lean_parser_tokens___rarg(x_46); -x_48 = l_lean_parser_list_cons_tokens___rarg(x_47, x_7); -x_49 = l_lean_parser_list_cons_tokens___rarg(x_3, x_48); -x_50 = l_lean_parser_tokens___rarg(x_49); -return x_50; +x_20 = l_lean_parser_symbol_tokens___rarg(x_18, x_1); +x_21 = lean::mk_string(")"); +x_22 = l_lean_parser_symbol_tokens___rarg(x_21, x_1); +x_23 = l_lean_parser_list_cons_tokens___rarg(x_22, x_7); +x_24 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_24); +x_26 = l_lean_parser_list_cons_tokens___rarg(x_24, x_23); +x_27 = l_lean_parser_list_cons_tokens___rarg(x_20, x_26); +x_28 = l_lean_parser_list_cons_tokens___rarg(x_7, x_27); +x_29 = l_lean_parser_list_cons_tokens___rarg(x_17, x_28); +x_30 = l_lean_parser_list_cons_tokens___rarg(x_14, x_29); +x_31 = l_lean_parser_tokens___rarg(x_30); +x_32 = l_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens; +lean::inc(x_32); +x_34 = l_lean_parser_list_cons_tokens___rarg(x_32, x_7); +x_35 = l_lean_parser_list_cons_tokens___rarg(x_31, x_34); +x_36 = l_lean_parser_list_cons_tokens___rarg(x_7, x_35); +x_37 = l_lean_parser_list_cons_tokens___rarg(x_6, x_36); +x_38 = l_lean_parser_tokens___rarg(x_37); +x_39 = l_lean_parser_list_cons_tokens___rarg(x_38, x_7); +x_40 = l_lean_parser_tokens___rarg(x_39); +x_41 = l_lean_parser_list_cons_tokens___rarg(x_40, x_7); +x_42 = l_lean_parser_list_cons_tokens___rarg(x_3, x_41); +x_43 = l_lean_parser_tokens___rarg(x_42); +return x_43; } } obj* l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -12400,7 +12323,7 @@ return x_15; obj* _init_l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_76; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; 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; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_72; x_0 = lean::mk_string(":"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -12429,119 +12352,115 @@ x_15 = lean::mk_string("scoped"); x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__2), 6, 1); lean::closure_set(x_16, 0, x_15); x_17 = lean::box(0); -lean::inc(x_17); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_16); +lean::cnstr_set(x_18, 1, x_17); x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_14); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); -lean::closure_set(x_21, 0, x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_precedence_parser), 5, 0); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_23, 0, x_22); -x_24 = lean::mk_string(", "); -x_25 = l_string_trim(x_24); -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_27, 0, x_25); +lean::cnstr_set(x_19, 0, x_14); +lean::cnstr_set(x_19, 1, x_18); +x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); +lean::closure_set(x_20, 0, x_19); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_precedence_parser), 5, 0); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); +lean::closure_set(x_22, 0, x_21); +x_23 = lean::mk_string(", "); +x_24 = l_string_trim(x_23); +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_26, 0, x_24); lean::inc(x_4); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_29, 0, x_25); -lean::closure_set(x_29, 1, x_4); -lean::closure_set(x_29, 2, x_27); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_28, 0, x_24); +lean::closure_set(x_28, 1, x_4); +lean::closure_set(x_28, 2, x_26); lean::inc(x_4); -x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_31, 0, x_4); -x_32 = lean::mk_string(")"); -x_33 = l_string_trim(x_32); -lean::inc(x_33); -x_35 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_35, 0, x_33); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_30, 0, x_4); +x_31 = lean::mk_string(")"); +x_32 = l_string_trim(x_31); +lean::inc(x_32); +x_34 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_34, 0, x_32); lean::inc(x_4); -x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_37, 0, x_33); -lean::closure_set(x_37, 1, x_4); -lean::closure_set(x_37, 2, x_35); -lean::inc(x_17); +x_36 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_36, 0, x_32); +lean::closure_set(x_36, 1, x_4); +lean::closure_set(x_36, 2, x_34); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_36); +lean::cnstr_set(x_37, 1, x_17); +x_38 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_38, 0, x_30); +lean::cnstr_set(x_38, 1, x_37); x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_37); -lean::cnstr_set(x_39, 1, x_17); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_31); -lean::cnstr_set(x_40, 1, x_39); +lean::cnstr_set(x_39, 0, x_28); +lean::cnstr_set(x_39, 1, x_38); +x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_29); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); +lean::cnstr_set(x_41, 0, x_40); +lean::cnstr_set(x_41, 1, x_39); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_22); +lean::cnstr_set(x_42, 1, x_41); x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_41); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_23); -lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_21); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_lean_parser_command_notation__spec_scoped__action; -lean::inc(x_46); -x_48 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_48, 0, x_46); -lean::closure_set(x_48, 1, x_45); -x_49 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_fold__action_parser), 5, 0); -lean::inc(x_17); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_49); -lean::cnstr_set(x_51, 1, x_17); +lean::cnstr_set(x_43, 0, x_20); +lean::cnstr_set(x_43, 1, x_42); +x_44 = l_lean_parser_command_notation__spec_scoped__action; +lean::inc(x_44); +x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_46, 0, x_44); +lean::closure_set(x_46, 1, x_43); +x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_fold__action_parser), 5, 0); +x_48 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_48, 0, x_47); +lean::cnstr_set(x_48, 1, x_17); +x_49 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_49, 0, x_46); +lean::cnstr_set(x_49, 1, x_48); +x_50 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_50, 0, x_8); +lean::cnstr_set(x_50, 1, x_49); +x_51 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__1), 5, 0); x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_48); -lean::cnstr_set(x_52, 1, x_51); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_8); -lean::cnstr_set(x_53, 1, x_52); -x_54 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__1), 5, 0); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_53); -x_56 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_56, 0, x_55); -lean::closure_set(x_56, 1, x_4); -lean::inc(x_17); +lean::cnstr_set(x_52, 0, x_51); +lean::cnstr_set(x_52, 1, x_50); +x_53 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_53, 0, x_52); +lean::closure_set(x_53, 1, x_4); +x_54 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_54, 0, x_53); +lean::cnstr_set(x_54, 1, x_17); +x_55 = l_lean_parser_command_notation__spec_action__kind; +lean::inc(x_55); +x_57 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_57, 0, x_55); +lean::closure_set(x_57, 1, x_54); x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_56); +lean::cnstr_set(x_58, 0, x_57); lean::cnstr_set(x_58, 1, x_17); -x_59 = l_lean_parser_command_notation__spec_action__kind; -lean::inc(x_59); -x_61 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_61, 0, x_59); -lean::closure_set(x_61, 1, x_58); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_17); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_6); -lean::cnstr_set(x_63, 1, x_62); -x_64 = l_lean_parser_term__parser__m_monad; -x_65 = l_lean_parser_term__parser__m_monad__except; -x_66 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_67 = l_lean_parser_term__parser__m_alternative; -x_68 = l_lean_parser_command_notation__spec_action; -x_69 = l_lean_parser_command_notation__spec_action_has__view; -lean::inc(x_69); -lean::inc(x_68); -lean::inc(x_67); -lean::inc(x_66); +x_59 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_59, 0, x_6); +lean::cnstr_set(x_59, 1, x_58); +x_60 = l_lean_parser_term__parser__m_monad; +x_61 = l_lean_parser_term__parser__m_monad__except; +x_62 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_63 = l_lean_parser_term__parser__m_alternative; +x_64 = l_lean_parser_command_notation__spec_action; +x_65 = l_lean_parser_command_notation__spec_action_has__view; lean::inc(x_65); lean::inc(x_64); -x_76 = l_lean_parser_combinators_node_view___rarg(x_64, x_65, x_66, x_67, x_68, x_63, x_69); -return x_76; +lean::inc(x_63); +lean::inc(x_62); +lean::inc(x_61); +lean::inc(x_60); +x_72 = l_lean_parser_combinators_node_view___rarg(x_60, x_61, x_62, x_63, x_64, x_59, x_65); +return x_72; } } obj* _init_l_lean_parser_command_notation__spec_action_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_63; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; 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; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; x_0 = lean::mk_string(":"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -12570,100 +12489,96 @@ x_15 = lean::mk_string("scoped"); x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__2), 6, 1); lean::closure_set(x_16, 0, x_15); x_17 = lean::box(0); -lean::inc(x_17); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_16); +lean::cnstr_set(x_18, 1, x_17); x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_14); -lean::cnstr_set(x_20, 1, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); -lean::closure_set(x_21, 0, x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_precedence_parser), 5, 0); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_23, 0, x_22); -x_24 = lean::mk_string(", "); -x_25 = l_string_trim(x_24); -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_27, 0, x_25); +lean::cnstr_set(x_19, 0, x_14); +lean::cnstr_set(x_19, 1, x_18); +x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); +lean::closure_set(x_20, 0, x_19); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_precedence_parser), 5, 0); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); +lean::closure_set(x_22, 0, x_21); +x_23 = lean::mk_string(", "); +x_24 = l_string_trim(x_23); +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_26, 0, x_24); lean::inc(x_4); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_29, 0, x_25); -lean::closure_set(x_29, 1, x_4); -lean::closure_set(x_29, 2, x_27); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_28, 0, x_24); +lean::closure_set(x_28, 1, x_4); +lean::closure_set(x_28, 2, x_26); lean::inc(x_4); -x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_31, 0, x_4); -x_32 = lean::mk_string(")"); -x_33 = l_string_trim(x_32); -lean::inc(x_33); -x_35 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_35, 0, x_33); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_30, 0, x_4); +x_31 = lean::mk_string(")"); +x_32 = l_string_trim(x_31); +lean::inc(x_32); +x_34 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_34, 0, x_32); lean::inc(x_4); -x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_37, 0, x_33); -lean::closure_set(x_37, 1, x_4); -lean::closure_set(x_37, 2, x_35); -lean::inc(x_17); +x_36 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_36, 0, x_32); +lean::closure_set(x_36, 1, x_4); +lean::closure_set(x_36, 2, x_34); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_36); +lean::cnstr_set(x_37, 1, x_17); +x_38 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_38, 0, x_30); +lean::cnstr_set(x_38, 1, x_37); x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_37); -lean::cnstr_set(x_39, 1, x_17); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_31); -lean::cnstr_set(x_40, 1, x_39); +lean::cnstr_set(x_39, 0, x_28); +lean::cnstr_set(x_39, 1, x_38); +x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_29); -lean::cnstr_set(x_41, 1, x_40); -x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); +lean::cnstr_set(x_41, 0, x_40); +lean::cnstr_set(x_41, 1, x_39); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_22); +lean::cnstr_set(x_42, 1, x_41); x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_41); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_23); -lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_21); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_lean_parser_command_notation__spec_scoped__action; -lean::inc(x_46); -x_48 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_48, 0, x_46); -lean::closure_set(x_48, 1, x_45); -x_49 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_fold__action_parser), 5, 0); -lean::inc(x_17); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_49); -lean::cnstr_set(x_51, 1, x_17); +lean::cnstr_set(x_43, 0, x_20); +lean::cnstr_set(x_43, 1, x_42); +x_44 = l_lean_parser_command_notation__spec_scoped__action; +lean::inc(x_44); +x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_46, 0, x_44); +lean::closure_set(x_46, 1, x_43); +x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_fold__action_parser), 5, 0); +x_48 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_48, 0, x_47); +lean::cnstr_set(x_48, 1, x_17); +x_49 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_49, 0, x_46); +lean::cnstr_set(x_49, 1, x_48); +x_50 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_50, 0, x_8); +lean::cnstr_set(x_50, 1, x_49); +x_51 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__1), 5, 0); x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_48); -lean::cnstr_set(x_52, 1, x_51); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_8); -lean::cnstr_set(x_53, 1, x_52); -x_54 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__1), 5, 0); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_53); -x_56 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_56, 0, x_55); -lean::closure_set(x_56, 1, x_4); -lean::inc(x_17); +lean::cnstr_set(x_52, 0, x_51); +lean::cnstr_set(x_52, 1, x_50); +x_53 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_53, 0, x_52); +lean::closure_set(x_53, 1, x_4); +x_54 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_54, 0, x_53); +lean::cnstr_set(x_54, 1, x_17); +x_55 = l_lean_parser_command_notation__spec_action__kind; +lean::inc(x_55); +x_57 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_57, 0, x_55); +lean::closure_set(x_57, 1, x_54); x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_56); +lean::cnstr_set(x_58, 0, x_57); lean::cnstr_set(x_58, 1, x_17); -x_59 = l_lean_parser_command_notation__spec_action__kind; -lean::inc(x_59); -x_61 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_61, 0, x_59); -lean::closure_set(x_61, 1, x_58); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_17); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_6); -lean::cnstr_set(x_63, 1, x_62); -return x_63; +x_59 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_59, 0, x_6); +lean::cnstr_set(x_59, 1, x_58); +return x_59; } } obj* l_lean_parser_command_notation__spec_action_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -13113,7 +13028,7 @@ return x_11; } else { -obj* x_12; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; +obj* x_12; obj* x_15; obj* 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_28; x_12 = lean::cnstr_get(x_3, 0); lean::inc(x_12); lean::dec(x_3); @@ -13122,23 +13037,22 @@ x_16 = l_lean_parser_command_notation__spec_precedence_has__view; x_17 = lean::cnstr_get(x_16, 1); lean::inc(x_17); x_19 = lean::apply_1(x_17, x_12); -lean::inc(x_15); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_15); -x_22 = l_lean_parser_no__kind; -lean::inc(x_22); -x_24 = l_lean_parser_syntax_mk__node(x_22, x_21); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_19); +lean::cnstr_set(x_20, 1, x_15); +x_21 = l_lean_parser_no__kind; +lean::inc(x_21); +x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_15); x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_15); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_1); -lean::cnstr_set(x_26, 1, x_25); -x_27 = l_lean_parser_command_notation__spec_binder; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -return x_29; +lean::cnstr_set(x_25, 0, x_1); +lean::cnstr_set(x_25, 1, x_24); +x_26 = l_lean_parser_command_notation__spec_binder; +lean::inc(x_26); +x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); +return x_28; } } } @@ -13598,7 +13512,7 @@ return x_11; } else { -obj* x_12; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; +obj* x_12; obj* x_15; obj* 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_28; x_12 = lean::cnstr_get(x_3, 0); lean::inc(x_12); lean::dec(x_3); @@ -13607,23 +13521,22 @@ x_16 = l_lean_parser_command_notation__spec_precedence_has__view; x_17 = lean::cnstr_get(x_16, 1); lean::inc(x_17); x_19 = lean::apply_1(x_17, x_12); -lean::inc(x_15); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_15); -x_22 = l_lean_parser_no__kind; -lean::inc(x_22); -x_24 = l_lean_parser_syntax_mk__node(x_22, x_21); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_19); +lean::cnstr_set(x_20, 1, x_15); +x_21 = l_lean_parser_no__kind; +lean::inc(x_21); +x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_15); x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_15); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_1); -lean::cnstr_set(x_26, 1, x_25); -x_27 = l_lean_parser_command_notation__spec_binders; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -return x_29; +lean::cnstr_set(x_25, 0, x_1); +lean::cnstr_set(x_25, 1, x_24); +x_26 = l_lean_parser_command_notation__spec_binders; +lean::inc(x_26); +x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); +return x_28; } } } @@ -13669,57 +13582,50 @@ return x_10; obj* _init_l_lean_parser_command_notation__spec_argument_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -x_8 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_8, 0, x_0); -lean::cnstr_set(x_8, 1, x_3); -lean::cnstr_set(x_8, 2, x_5); -lean::cnstr_set(x_8, 3, x_0); -lean::cnstr_set(x_8, 4, x_0); -x_9 = l_lean_parser_command_notation__spec_action_has__view; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_12 = lean::box(3); -x_13 = lean::apply_1(x_10, x_12); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_8); -lean::cnstr_set(x_15, 1, x_14); -return x_15; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = l_lean_parser_command_notation__spec_action_has__view; +x_7 = lean::cnstr_get(x_6, 0); +lean::inc(x_7); +x_9 = lean::box(3); +x_10 = lean::apply_1(x_7, x_9); +x_11 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_11, 0, x_10); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_5); +lean::cnstr_set(x_12, 1, x_11); +return x_12; } } obj* _init_l_lean_parser_command_notation__spec_argument_has__view_x_27___lambda__1___closed__2() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_0); -lean::cnstr_set(x_9, 1, x_3); -lean::cnstr_set(x_9, 2, x_5); -lean::cnstr_set(x_9, 3, x_0); -lean::cnstr_set(x_9, 4, x_0); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_0); -return x_10; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_0); +return x_6; } } obj* _init_l_lean_parser_command_notation__spec_argument_has__view_x_27___lambda__1___closed__3() { @@ -14461,7 +14367,7 @@ return x_12; } else { -obj* x_13; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; +obj* x_13; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; x_13 = lean::cnstr_get(x_3, 0); lean::inc(x_13); lean::dec(x_3); @@ -14470,23 +14376,22 @@ x_17 = l_lean_parser_command_notation__spec_action_has__view; x_18 = lean::cnstr_get(x_17, 1); lean::inc(x_18); x_20 = lean::apply_1(x_18, x_13); -lean::inc(x_16); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); -lean::cnstr_set(x_22, 1, x_16); -x_23 = l_lean_parser_no__kind; -lean::inc(x_23); -x_25 = l_lean_parser_syntax_mk__node(x_23, x_22); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_20); +lean::cnstr_set(x_21, 1, x_16); +x_22 = l_lean_parser_no__kind; +lean::inc(x_22); +x_24 = l_lean_parser_syntax_mk__node(x_22, x_21); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_16); x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_16); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_6); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_lean_parser_command_notation__spec_argument; -lean::inc(x_28); -x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); -return x_30; +lean::cnstr_set(x_26, 0, x_6); +lean::cnstr_set(x_26, 1, x_25); +x_27 = l_lean_parser_command_notation__spec_argument; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +return x_29; } } } @@ -14708,50 +14613,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_notation__spec_transition_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_notation__spec_transition_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_notation__spec_transition_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_notation__spec_transition_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_notation__spec_transition_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_notation__spec_transition_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -14761,63 +14665,63 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_notation__spec_transition_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_notation__spec_transition_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); -if (x_77 == 0) +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); +if (x_76 == 0) { -obj* x_79; uint8 x_80; -x_79 = lean::mk_nat_obj(1u); -x_80 = lean::nat_dec_eq(x_2, x_79); -lean::dec(x_79); +obj* x_78; uint8 x_79; +x_78 = lean::mk_nat_obj(1u); +x_79 = lean::nat_dec_eq(x_2, x_78); +lean::dec(x_78); lean::dec(x_2); -if (x_80 == 0) +if (x_79 == 0) { -obj* x_83; obj* x_84; obj* x_86; obj* x_87; -x_83 = l_lean_parser_command_notation__spec_argument_has__view; -x_84 = lean::cnstr_get(x_83, 0); -lean::inc(x_84); -x_86 = lean::apply_1(x_84, x_1); -x_87 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_87, 0, x_86); -return x_87; +obj* x_82; obj* x_83; obj* x_85; obj* x_86; +x_82 = l_lean_parser_command_notation__spec_argument_has__view; +x_83 = lean::cnstr_get(x_82, 0); +lean::inc(x_83); +x_85 = lean::apply_1(x_83, x_1); +x_86 = lean::alloc_cnstr(2, 1, 0); +lean::cnstr_set(x_86, 0, x_85); +return x_86; } else { -obj* x_88; obj* x_89; obj* x_91; obj* x_92; -x_88 = l_lean_parser_command_notation__spec_binders_has__view; -x_89 = lean::cnstr_get(x_88, 0); -lean::inc(x_89); -x_91 = lean::apply_1(x_89, x_1); -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -return x_92; +obj* x_87; obj* x_88; obj* x_90; obj* x_91; +x_87 = l_lean_parser_command_notation__spec_binders_has__view; +x_88 = lean::cnstr_get(x_87, 0); +lean::inc(x_88); +x_90 = lean::apply_1(x_88, x_1); +x_91 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_91, 0, x_90); +return x_91; } } else { -obj* x_94; obj* x_95; obj* x_97; obj* x_98; +obj* x_93; obj* x_94; obj* x_96; obj* x_97; lean::dec(x_2); -x_94 = l_lean_parser_command_notation__spec_binder_has__view; -x_95 = lean::cnstr_get(x_94, 0); -lean::inc(x_95); -x_97 = lean::apply_1(x_95, x_1); -x_98 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_98, 0, x_97); -return x_98; +x_93 = l_lean_parser_command_notation__spec_binder_has__view; +x_94 = lean::cnstr_get(x_93, 0); +lean::inc(x_94); +x_96 = lean::apply_1(x_94, x_1); +x_97 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_97, 0, x_96); +return x_97; } } } @@ -14830,7 +14734,7 @@ x_1 = lean::box(0); switch (lean::obj_tag(x_0)) { case 0: { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -14838,70 +14742,67 @@ x_5 = l_lean_parser_command_notation__spec_binder_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_command_notation__spec_transition; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_command_notation__spec_transition; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } case 1: { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_command_notation__spec_binders_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_command_notation__spec_transition; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_command_notation__spec_binders_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_command_notation__spec_transition; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } default: { -obj* x_34; obj* x_37; obj* x_38; obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; -x_34 = lean::cnstr_get(x_0, 0); -lean::inc(x_34); +obj* x_32; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_46; +x_32 = lean::cnstr_get(x_0, 0); +lean::inc(x_32); lean::dec(x_0); -x_37 = l_lean_parser_command_notation__spec_argument_has__view; -x_38 = lean::cnstr_get(x_37, 1); -lean::inc(x_38); -x_40 = lean::apply_1(x_38, x_34); -lean::inc(x_1); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_1); -x_43 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; -lean::inc(x_43); -x_45 = l_lean_parser_syntax_mk__node(x_43, x_42); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_1); -x_47 = l_lean_parser_command_notation__spec_transition; -lean::inc(x_47); -x_49 = l_lean_parser_syntax_mk__node(x_47, x_46); -return x_49; +x_35 = l_lean_parser_command_notation__spec_argument_has__view; +x_36 = lean::cnstr_get(x_35, 1); +lean::inc(x_36); +x_38 = lean::apply_1(x_36, x_32); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_1); +x_40 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; +lean::inc(x_40); +x_42 = l_lean_parser_syntax_mk__node(x_40, x_39); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_1); +x_44 = l_lean_parser_command_notation__spec_transition; +lean::inc(x_44); +x_46 = l_lean_parser_syntax_mk__node(x_44, x_43); +return x_46; } } } @@ -14930,39 +14831,34 @@ return x_0; obj* _init_l_lean_parser_command_notation__spec_transition_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; x_0 = lean::box(0); x_1 = l_lean_parser_command_notation__spec_precedence_parser_lean_parser_has__tokens; lean::inc(x_1); x_3 = l_lean_parser_tokens___rarg(x_1); -lean::inc(x_0); -x_5 = l_lean_parser_list_cons_tokens___rarg(x_3, x_0); -lean::inc(x_0); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_0, x_5); -x_8 = l_lean_parser_tokens___rarg(x_7); -x_9 = l_lean_parser_command_notation__spec_action_parser_lean_parser_has__tokens; -lean::inc(x_9); -x_11 = l_lean_parser_tokens___rarg(x_9); -lean::inc(x_0); -x_13 = l_lean_parser_list_cons_tokens___rarg(x_11, x_0); -lean::inc(x_0); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_0, x_13); -x_16 = l_lean_parser_tokens___rarg(x_15); -lean::inc(x_0); -x_18 = l_lean_parser_list_cons_tokens___rarg(x_16, x_0); -lean::inc(x_8); -x_20 = l_lean_parser_list_cons_tokens___rarg(x_8, x_18); -x_21 = l_lean_parser_list_cons_tokens___rarg(x_8, x_20); -x_22 = l_lean_parser_tokens___rarg(x_21); -x_23 = l_lean_parser_list_cons_tokens___rarg(x_22, x_0); -x_24 = l_lean_parser_tokens___rarg(x_23); -return x_24; +x_4 = l_lean_parser_list_cons_tokens___rarg(x_3, x_0); +x_5 = l_lean_parser_list_cons_tokens___rarg(x_0, x_4); +x_6 = l_lean_parser_tokens___rarg(x_5); +x_7 = l_lean_parser_command_notation__spec_action_parser_lean_parser_has__tokens; +lean::inc(x_7); +x_9 = l_lean_parser_tokens___rarg(x_7); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_9, x_0); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_0, x_10); +x_12 = l_lean_parser_tokens___rarg(x_11); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_12, x_0); +lean::inc(x_6); +x_15 = l_lean_parser_list_cons_tokens___rarg(x_6, x_13); +x_16 = l_lean_parser_list_cons_tokens___rarg(x_6, x_15); +x_17 = l_lean_parser_tokens___rarg(x_16); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_17, x_0); +x_19 = l_lean_parser_tokens___rarg(x_18); +return x_19; } } obj* _init_l_lean_parser_command_notation__spec_transition_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_46; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_43; x_0 = lean::mk_string("binder"); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__2), 6, 1); lean::closure_set(x_1, 0, x_0); @@ -14970,83 +14866,80 @@ x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); lean::closure_set(x_3, 0, x_2); x_4 = lean::box(0); -lean::inc(x_4); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_3); -lean::cnstr_set(x_6, 1, x_4); -lean::inc(x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_1); -lean::cnstr_set(x_8, 1, x_6); -x_9 = l_lean_parser_command_notation__spec_binder; -lean::inc(x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_8); -x_12 = lean::mk_string("binders"); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__2), 6, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_6); -x_15 = l_lean_parser_command_notation__spec_binders; -lean::inc(x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_14); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser), 5, 0); -x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_19, 0, x_18); -lean::inc(x_4); +x_5 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_5, 0, x_3); +lean::cnstr_set(x_5, 1, x_4); +lean::inc(x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_1); +lean::cnstr_set(x_7, 1, x_5); +x_8 = l_lean_parser_command_notation__spec_binder; +lean::inc(x_8); +x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_10, 0, x_8); +lean::closure_set(x_10, 1, x_7); +x_11 = lean::mk_string("binders"); +x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__2), 6, 1); +lean::closure_set(x_12, 0, x_11); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_5); +x_14 = l_lean_parser_command_notation__spec_binders; +lean::inc(x_14); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_16, 0, x_14); +lean::closure_set(x_16, 1, x_13); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser), 5, 0); +x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); +lean::closure_set(x_18, 0, x_17); +x_19 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_19, 0, x_18); +lean::cnstr_set(x_19, 1, x_4); +x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_4); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_21); -x_24 = l_lean_parser_command_notation__spec_argument; -lean::inc(x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_26, 0, x_24); -lean::closure_set(x_26, 1, x_23); -lean::inc(x_4); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_4); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_17); -lean::cnstr_set(x_29, 1, x_28); +lean::cnstr_set(x_21, 0, x_20); +lean::cnstr_set(x_21, 1, x_19); +x_22 = l_lean_parser_command_notation__spec_argument; +lean::inc(x_22); +x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_24, 0, x_22); +lean::closure_set(x_24, 1, x_21); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_4); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_16); +lean::cnstr_set(x_26, 1, x_25); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_10); +lean::cnstr_set(x_27, 1, x_26); +x_28 = lean::mk_nat_obj(0u); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_29, 0, x_27); +lean::closure_set(x_29, 1, x_28); x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_11); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::mk_nat_obj(0u); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_32, 0, x_30); -lean::closure_set(x_32, 1, x_31); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_4); -x_34 = l_lean_parser_term__parser__m_monad; -x_35 = l_lean_parser_term__parser__m_monad__except; -x_36 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_37 = l_lean_parser_term__parser__m_alternative; -x_38 = l_lean_parser_command_notation__spec_transition; -x_39 = l_lean_parser_command_notation__spec_transition_has__view; -lean::inc(x_39); -lean::inc(x_38); -lean::inc(x_37); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_4); +x_31 = l_lean_parser_term__parser__m_monad; +x_32 = l_lean_parser_term__parser__m_monad__except; +x_33 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_34 = l_lean_parser_term__parser__m_alternative; +x_35 = l_lean_parser_command_notation__spec_transition; +x_36 = l_lean_parser_command_notation__spec_transition_has__view; lean::inc(x_36); lean::inc(x_35); lean::inc(x_34); -x_46 = l_lean_parser_combinators_node_view___rarg(x_34, x_35, x_36, x_37, x_38, x_33, x_39); -return x_46; +lean::inc(x_33); +lean::inc(x_32); +lean::inc(x_31); +x_43 = l_lean_parser_combinators_node_view___rarg(x_31, x_32, x_33, x_34, x_35, x_30, x_36); +return x_43; } } obj* _init_l_lean_parser_command_notation__spec_transition_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; x_0 = lean::mk_string("binder"); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__2), 6, 1); lean::closure_set(x_1, 0, x_0); @@ -15054,64 +14947,61 @@ x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); lean::closure_set(x_3, 0, x_2); x_4 = lean::box(0); -lean::inc(x_4); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_3); -lean::cnstr_set(x_6, 1, x_4); -lean::inc(x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_1); -lean::cnstr_set(x_8, 1, x_6); -x_9 = l_lean_parser_command_notation__spec_binder; -lean::inc(x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_11, 0, x_9); -lean::closure_set(x_11, 1, x_8); -x_12 = lean::mk_string("binders"); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__2), 6, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_6); -x_15 = l_lean_parser_command_notation__spec_binders; -lean::inc(x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_14); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser), 5, 0); -x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_19, 0, x_18); -lean::inc(x_4); +x_5 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_5, 0, x_3); +lean::cnstr_set(x_5, 1, x_4); +lean::inc(x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_1); +lean::cnstr_set(x_7, 1, x_5); +x_8 = l_lean_parser_command_notation__spec_binder; +lean::inc(x_8); +x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_10, 0, x_8); +lean::closure_set(x_10, 1, x_7); +x_11 = lean::mk_string("binders"); +x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__2), 6, 1); +lean::closure_set(x_12, 0, x_11); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_5); +x_14 = l_lean_parser_command_notation__spec_binders; +lean::inc(x_14); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_16, 0, x_14); +lean::closure_set(x_16, 1, x_13); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser), 5, 0); +x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); +lean::closure_set(x_18, 0, x_17); +x_19 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_19, 0, x_18); +lean::cnstr_set(x_19, 1, x_4); +x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_4); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_21); -x_24 = l_lean_parser_command_notation__spec_argument; -lean::inc(x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_26, 0, x_24); -lean::closure_set(x_26, 1, x_23); -lean::inc(x_4); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_4); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_17); -lean::cnstr_set(x_29, 1, x_28); +lean::cnstr_set(x_21, 0, x_20); +lean::cnstr_set(x_21, 1, x_19); +x_22 = l_lean_parser_command_notation__spec_argument; +lean::inc(x_22); +x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_24, 0, x_22); +lean::closure_set(x_24, 1, x_21); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_4); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_16); +lean::cnstr_set(x_26, 1, x_25); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_10); +lean::cnstr_set(x_27, 1, x_26); +x_28 = lean::mk_nat_obj(0u); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_29, 0, x_27); +lean::closure_set(x_29, 1, x_28); x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_11); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::mk_nat_obj(0u); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_32, 0, x_30); -lean::closure_set(x_32, 1, x_31); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_4); -return x_33; +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_4); +return x_30; } } obj* l_lean_parser_command_notation__spec_transition_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -15589,7 +15479,7 @@ return x_15; } else { -obj* x_16; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_33; +obj* x_16; 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_29; obj* x_30; obj* x_32; x_16 = lean::cnstr_get(x_3, 0); lean::inc(x_16); lean::dec(x_3); @@ -15598,23 +15488,22 @@ x_20 = l_lean_parser_command_notation__spec_transition_has__view; x_21 = lean::cnstr_get(x_20, 1); lean::inc(x_21); x_23 = lean::apply_1(x_21, x_16); -lean::inc(x_19); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_19); -x_26 = l_lean_parser_no__kind; -lean::inc(x_26); -x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_19); +x_25 = l_lean_parser_no__kind; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_19); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_19); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_9); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_lean_parser_command_notation__spec_rule; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +lean::cnstr_set(x_29, 0, x_9); +lean::cnstr_set(x_29, 1, x_28); +x_30 = l_lean_parser_command_notation__spec_rule; +lean::inc(x_30); +x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); +return x_32; } } } @@ -15761,56 +15650,53 @@ return x_1; obj* _init_l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__3() { _start: { -obj* x_0; obj* x_2; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_11; +obj* x_0; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; x_2 = lean::box(0); x_3 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_3); x_5 = l_lean_parser_substring_of__string(x_3); -lean::inc(x_2); -x_7 = lean_name_mk_string(x_2, x_3); -lean::inc(x_2); -lean::inc(x_2); -x_10 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_10, 0, x_2); -lean::cnstr_set(x_10, 1, x_5); -lean::cnstr_set(x_10, 2, x_7); -lean::cnstr_set(x_10, 3, x_2); -lean::cnstr_set(x_10, 4, x_2); -x_11 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_11, 0, x_10); -x_0 = x_11; +x_6 = lean_name_mk_string(x_2, x_3); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_2); +lean::cnstr_set(x_7, 1, x_5); +lean::cnstr_set(x_7, 2, x_6); +lean::cnstr_set(x_7, 3, x_2); +lean::cnstr_set(x_7, 4, x_2); +x_8 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_8, 0, x_7); +x_0 = x_8; goto lbl_1; lbl_1: { -obj* x_12; obj* x_13; -x_12 = lean::box(3); -x_13 = l_lean_parser_syntax_as__node___main(x_12); -if (lean::obj_tag(x_13) == 0) +obj* x_9; obj* x_10; +x_9 = lean::box(3); +x_10 = l_lean_parser_syntax_as__node___main(x_9); +if (lean::obj_tag(x_10) == 0) { -obj* x_14; obj* x_16; -x_14 = l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__1; -lean::inc(x_14); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_0); -lean::cnstr_set(x_16, 1, x_14); -return x_16; +obj* x_11; obj* x_13; +x_11 = l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__1; +lean::inc(x_11); +x_13 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_13, 0, x_0); +lean::cnstr_set(x_13, 1, x_11); +return x_13; } else { -obj* x_17; obj* x_20; obj* x_23; obj* x_25; obj* x_26; -x_17 = lean::cnstr_get(x_13, 0); +obj* x_14; obj* x_17; obj* x_20; obj* x_22; obj* x_23; +x_14 = lean::cnstr_get(x_10, 0); +lean::inc(x_14); +lean::dec(x_10); +x_17 = lean::cnstr_get(x_14, 1); lean::inc(x_17); -lean::dec(x_13); -x_20 = lean::cnstr_get(x_17, 1); +lean::dec(x_14); +x_20 = l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__2; lean::inc(x_20); -lean::dec(x_17); -x_23 = l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__2; -lean::inc(x_23); -x_25 = l_list_map___main___rarg(x_23, x_20); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_0); -lean::cnstr_set(x_26, 1, x_25); -return x_26; +x_22 = l_list_map___main___rarg(x_20, x_17); +x_23 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_23, 0, x_0); +lean::cnstr_set(x_23, 1, x_22); +return x_23; } } } @@ -15818,24 +15704,21 @@ return x_26; obj* _init_l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__4() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_9; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -x_8 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_8, 0, x_0); -lean::cnstr_set(x_8, 1, x_3); -lean::cnstr_set(x_8, 2, x_5); -lean::cnstr_set(x_8, 3, x_0); -lean::cnstr_set(x_8, 4, x_0); -x_9 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -return x_9; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_6, 0, x_5); +return x_6; } } obj* _init_l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__5() { @@ -16478,7 +16361,7 @@ return x_1; obj* l_lean_parser_command_notation__spec_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; +obj* x_1; obj* x_3; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -16491,44 +16374,42 @@ x_9 = l_lean_parser_no__kind; lean::inc(x_9); x_11 = l_lean_parser_syntax_mk__node(x_9, x_8); x_12 = lean::box(0); -lean::inc(x_12); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_12); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_11); +lean::cnstr_set(x_13, 1, x_12); if (lean::obj_tag(x_1) == 0) { -obj* x_16; obj* x_18; obj* x_19; obj* x_21; -lean::dec(x_12); -x_16 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_14); -x_19 = l_lean_parser_command_notation__spec; -lean::inc(x_19); -x_21 = l_lean_parser_syntax_mk__node(x_19, x_18); -return x_21; +obj* x_14; obj* x_16; obj* x_17; obj* x_19; +x_14 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_14); +x_16 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_16, 0, x_14); +lean::cnstr_set(x_16, 1, x_13); +x_17 = l_lean_parser_command_notation__spec; +lean::inc(x_17); +x_19 = l_lean_parser_syntax_mk__node(x_17, x_16); +return x_19; } else { -obj* x_22; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_32; -x_22 = lean::cnstr_get(x_1, 0); -lean::inc(x_22); +obj* x_20; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_30; +x_20 = lean::cnstr_get(x_1, 0); +lean::inc(x_20); lean::dec(x_1); -x_25 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_25, 0, x_22); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_12); +x_23 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_23, 0, x_20); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_12); lean::inc(x_9); -x_28 = l_lean_parser_syntax_mk__node(x_9, x_26); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_14); -x_30 = l_lean_parser_command_notation__spec; -lean::inc(x_30); -x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); -return x_32; +x_26 = l_lean_parser_syntax_mk__node(x_9, x_24); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_26); +lean::cnstr_set(x_27, 1, x_13); +x_28 = l_lean_parser_command_notation__spec; +lean::inc(x_28); +x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); +return x_30; } } } @@ -16808,18 +16689,17 @@ return x_114; } else { -obj* x_118; obj* x_119; obj* x_120; obj* x_124; +obj* x_118; obj* x_119; obj* x_120; obj* x_123; lean::dec(x_1); lean::dec(x_0); lean::dec(x_2); x_118 = lean::box(0); x_119 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_120 = l_mjoin___rarg___closed__1; -lean::inc(x_118); lean::inc(x_120); lean::inc(x_119); -x_124 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_119, x_120, x_118, x_118, x_3, x_4, x_5, x_6, x_7); -return x_124; +x_123 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_119, x_120, x_118, x_118, x_3, x_4, x_5, x_6, x_7); +return x_123; } } } @@ -16945,17 +16825,16 @@ return x_32; obj* _init_l_lean_parser_command_notation__spec_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); -lean::inc(x_0); -x_2 = l_lean_parser_tokens___rarg(x_0); -x_3 = l_lean_parser_command_notation__spec_rule_parser_lean_parser_has__tokens; -lean::inc(x_3); -x_5 = l_lean_parser_tokens___rarg(x_3); -x_6 = l_lean_parser_list_cons_tokens___rarg(x_5, x_0); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_2, x_6); -x_8 = l_lean_parser_tokens___rarg(x_7); -return x_8; +x_1 = l_lean_parser_tokens___rarg(x_0); +x_2 = l_lean_parser_command_notation__spec_rule_parser_lean_parser_has__tokens; +lean::inc(x_2); +x_4 = l_lean_parser_tokens___rarg(x_2); +x_5 = l_lean_parser_list_cons_tokens___rarg(x_4, x_0); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_1, x_5); +x_7 = l_lean_parser_tokens___rarg(x_6); +return x_7; } } obj* _init_l_lean_parser_command_notation__spec_parser_lean_parser_has__view() { @@ -17826,7 +17705,7 @@ return x_146; obj* l_lean_parser_command_notation_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; 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_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -17842,79 +17721,73 @@ x_12 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_12); x_14 = l_option_map___rarg(x_12, x_3); x_15 = lean::box(3); -lean::inc(x_15); -x_17 = l_option_get__or__else___main___rarg(x_14, x_15); -x_18 = lean::box(0); -lean::inc(x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_17); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_lean_parser_command_notation__spec_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_5); +x_16 = l_option_get__or__else___main___rarg(x_14, x_15); +x_17 = lean::box(0); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_16); +lean::cnstr_set(x_18, 1, x_17); +x_19 = l_lean_parser_command_notation__spec_has__view; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +x_22 = lean::apply_1(x_20, x_5); lean::inc(x_12); -x_26 = l_option_map___rarg(x_12, x_7); -lean::inc(x_15); -x_28 = l_option_get__or__else___main___rarg(x_26, x_15); -lean::inc(x_18); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_9); -lean::cnstr_set(x_30, 1, x_18); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_28); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_24); -lean::cnstr_set(x_32, 1, x_31); +x_24 = l_option_map___rarg(x_12, x_7); +x_25 = l_option_get__or__else___main___rarg(x_24, x_15); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_9); +lean::cnstr_set(x_26, 1, x_17); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_25); +lean::cnstr_set(x_27, 1, x_26); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_22); +lean::cnstr_set(x_28, 1, x_27); if (lean::obj_tag(x_1) == 0) { -obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_44; -lean::dec(x_15); -lean::dec(x_18); -x_35 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set(x_37, 1, x_20); -x_38 = l_lean_parser_no__kind; -lean::inc(x_38); -x_40 = l_lean_parser_syntax_mk__node(x_38, x_37); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_32); -x_42 = l_lean_parser_command_notation; -lean::inc(x_42); -x_44 = l_lean_parser_syntax_mk__node(x_42, x_41); -return x_44; +obj* x_29; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_38; +x_29 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_29); +x_31 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_31, 0, x_29); +lean::cnstr_set(x_31, 1, x_18); +x_32 = l_lean_parser_no__kind; +lean::inc(x_32); +x_34 = l_lean_parser_syntax_mk__node(x_32, x_31); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_34); +lean::cnstr_set(x_35, 1, x_28); +x_36 = l_lean_parser_command_notation; +lean::inc(x_36); +x_38 = l_lean_parser_syntax_mk__node(x_36, x_35); +return x_38; } else { -obj* x_45; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_61; -x_45 = lean::cnstr_get(x_1, 0); -lean::inc(x_45); +obj* x_39; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_55; +x_39 = lean::cnstr_get(x_1, 0); +lean::inc(x_39); lean::dec(x_1); lean::inc(x_12); -x_49 = l_option_map___rarg(x_12, x_45); -x_50 = l_option_get__or__else___main___rarg(x_49, x_15); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_18); -x_52 = l_lean_parser_no__kind; -lean::inc(x_52); -x_54 = l_lean_parser_syntax_mk__node(x_52, x_51); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_20); -lean::inc(x_52); -x_57 = l_lean_parser_syntax_mk__node(x_52, x_55); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_32); -x_59 = l_lean_parser_command_notation; -lean::inc(x_59); -x_61 = l_lean_parser_syntax_mk__node(x_59, x_58); -return x_61; +x_43 = l_option_map___rarg(x_12, x_39); +x_44 = l_option_get__or__else___main___rarg(x_43, x_15); +x_45 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_45, 0, x_44); +lean::cnstr_set(x_45, 1, x_17); +x_46 = l_lean_parser_no__kind; +lean::inc(x_46); +x_48 = l_lean_parser_syntax_mk__node(x_46, x_45); +x_49 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_49, 0, x_48); +lean::cnstr_set(x_49, 1, x_18); +lean::inc(x_46); +x_51 = l_lean_parser_syntax_mk__node(x_46, x_49); +x_52 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_52, 0, x_51); +lean::cnstr_set(x_52, 1, x_28); +x_53 = l_lean_parser_command_notation; +lean::inc(x_53); +x_55 = l_lean_parser_syntax_mk__node(x_53, x_52); +return x_55; } } } @@ -17942,7 +17815,7 @@ return x_0; obj* _init_l_lean_parser_command_notation_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_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; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; x_0 = lean::mk_string("local "); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -17952,29 +17825,28 @@ x_5 = lean::mk_string("notation"); lean::inc(x_1); x_7 = l_lean_parser_symbol_tokens___rarg(x_5, x_1); x_8 = lean::box(0); -lean::inc(x_8); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_7, x_8); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_4, x_10); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_7, x_8); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_4, x_9); +x_11 = l_lean_parser_tokens___rarg(x_10); x_12 = l_lean_parser_tokens___rarg(x_11); -x_13 = l_lean_parser_tokens___rarg(x_12); -x_14 = lean::mk_string(":="); -x_15 = l_lean_parser_symbol_tokens___rarg(x_14, x_1); -x_16 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_16); -x_18 = l_lean_parser_list_cons_tokens___rarg(x_16, x_8); -x_19 = l_lean_parser_list_cons_tokens___rarg(x_15, x_18); -x_20 = l_lean_parser_command_notation__spec_parser_lean_parser_has__tokens; -lean::inc(x_20); -x_22 = l_lean_parser_list_cons_tokens___rarg(x_20, x_19); -x_23 = l_lean_parser_list_cons_tokens___rarg(x_13, x_22); -x_24 = l_lean_parser_tokens___rarg(x_23); -return x_24; +x_13 = lean::mk_string(":="); +x_14 = l_lean_parser_symbol_tokens___rarg(x_13, x_1); +x_15 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_15); +x_17 = l_lean_parser_list_cons_tokens___rarg(x_15, x_8); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_14, x_17); +x_19 = l_lean_parser_command_notation__spec_parser_lean_parser_has__tokens; +lean::inc(x_19); +x_21 = l_lean_parser_list_cons_tokens___rarg(x_19, x_18); +x_22 = l_lean_parser_list_cons_tokens___rarg(x_12, x_21); +x_23 = l_lean_parser_tokens___rarg(x_22); +return x_23; } } obj* _init_l_lean_parser_command_notation_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_43; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; 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_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_42; x_0 = lean::mk_string("local "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -17999,60 +17871,59 @@ lean::closure_set(x_13, 0, x_9); lean::closure_set(x_13, 1, x_4); lean::closure_set(x_13, 2, x_11); x_14 = lean::box(0); -lean::inc(x_14); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_13); +lean::cnstr_set(x_15, 1, x_14); x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_13); -lean::cnstr_set(x_16, 1, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_7); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); -lean::closure_set(x_18, 0, x_17); -x_19 = lean::mk_string(":="); -x_20 = l_string_trim(x_19); -lean::inc(x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_22, 0, x_20); +lean::cnstr_set(x_16, 0, x_7); +lean::cnstr_set(x_16, 1, x_15); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); +lean::closure_set(x_17, 0, x_16); +x_18 = lean::mk_string(":="); +x_19 = l_string_trim(x_18); +lean::inc(x_19); +x_21 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_21, 0, x_19); lean::inc(x_4); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_24, 0, x_20); -lean::closure_set(x_24, 1, x_4); -lean::closure_set(x_24, 2, x_22); -x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_25, 0, x_4); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_23, 0, x_19); +lean::closure_set(x_23, 1, x_4); +lean::closure_set(x_23, 2, x_21); +x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_24, 0, x_4); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_14); x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_14); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_24); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_parser), 5, 0); +lean::cnstr_set(x_26, 0, x_23); +lean::cnstr_set(x_26, 1, x_25); +x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_parser), 5, 0); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_26); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_27); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_18); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_lean_parser_term__parser__m_monad; -x_32 = l_lean_parser_term__parser__m_monad__except; -x_33 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_34 = l_lean_parser_term__parser__m_alternative; -x_35 = l_lean_parser_command_notation; -x_36 = l_lean_parser_command_notation_has__view; -lean::inc(x_36); +lean::cnstr_set(x_29, 0, x_17); +lean::cnstr_set(x_29, 1, x_28); +x_30 = l_lean_parser_term__parser__m_monad; +x_31 = l_lean_parser_term__parser__m_monad__except; +x_32 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_33 = l_lean_parser_term__parser__m_alternative; +x_34 = l_lean_parser_command_notation; +x_35 = l_lean_parser_command_notation_has__view; lean::inc(x_35); lean::inc(x_34); lean::inc(x_33); lean::inc(x_32); lean::inc(x_31); -x_43 = l_lean_parser_combinators_node_view___rarg(x_31, x_32, x_33, x_34, x_35, x_30, x_36); -return x_43; +lean::inc(x_30); +x_42 = l_lean_parser_combinators_node_view___rarg(x_30, x_31, x_32, x_33, x_34, x_29, x_35); +return x_42; } } obj* _init_l_lean_parser_command_notation_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; x_0 = lean::mk_string("local "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -18077,41 +17948,40 @@ lean::closure_set(x_13, 0, x_9); lean::closure_set(x_13, 1, x_4); lean::closure_set(x_13, 2, x_11); x_14 = lean::box(0); -lean::inc(x_14); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_13); +lean::cnstr_set(x_15, 1, x_14); x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_13); -lean::cnstr_set(x_16, 1, x_14); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_7); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); -lean::closure_set(x_18, 0, x_17); -x_19 = lean::mk_string(":="); -x_20 = l_string_trim(x_19); -lean::inc(x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_22, 0, x_20); +lean::cnstr_set(x_16, 0, x_7); +lean::cnstr_set(x_16, 1, x_15); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); +lean::closure_set(x_17, 0, x_16); +x_18 = lean::mk_string(":="); +x_19 = l_string_trim(x_18); +lean::inc(x_19); +x_21 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_21, 0, x_19); lean::inc(x_4); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_24, 0, x_20); -lean::closure_set(x_24, 1, x_4); -lean::closure_set(x_24, 2, x_22); -x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_25, 0, x_4); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_23, 0, x_19); +lean::closure_set(x_23, 1, x_4); +lean::closure_set(x_23, 2, x_21); +x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_24, 0, x_4); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_14); x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_14); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_24); -lean::cnstr_set(x_27, 1, x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_parser), 5, 0); +lean::cnstr_set(x_26, 0, x_23); +lean::cnstr_set(x_26, 1, x_25); +x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_parser), 5, 0); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_26); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_27); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_18); -lean::cnstr_set(x_30, 1, x_29); -return x_30; +lean::cnstr_set(x_29, 0, x_17); +lean::cnstr_set(x_29, 1, x_28); +return x_29; } } obj* l_lean_parser_command_notation_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -18603,7 +18473,7 @@ return x_101; obj* l_lean_parser_command_reserve__notation_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_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_29; obj* x_30; obj* x_32; +obj* x_1; obj* x_3; obj* x_5; 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_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -18615,36 +18485,34 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); lean::inc(x_8); -x_15 = l_option_map___rarg(x_8, x_3); -x_16 = l_option_get__or__else___main___rarg(x_15, x_11); -x_17 = lean::box(0); -lean::inc(x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_13); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_lean_parser_no__kind; -lean::inc(x_21); -x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); -x_24 = l_lean_parser_command_notation__spec_has__view; -x_25 = lean::cnstr_get(x_24, 1); -lean::inc(x_25); -x_27 = lean::apply_1(x_25, x_5); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_17); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_23); -lean::cnstr_set(x_29, 1, x_28); -x_30 = l_lean_parser_command_reserve__notation; -lean::inc(x_30); -x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); -return x_32; +x_14 = l_option_map___rarg(x_8, x_3); +x_15 = l_option_get__or__else___main___rarg(x_14, x_11); +x_16 = lean::box(0); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_15); +lean::cnstr_set(x_17, 1, x_16); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_12); +lean::cnstr_set(x_18, 1, x_17); +x_19 = l_lean_parser_no__kind; +lean::inc(x_19); +x_21 = l_lean_parser_syntax_mk__node(x_19, x_18); +x_22 = l_lean_parser_command_notation__spec_has__view; +x_23 = lean::cnstr_get(x_22, 1); +lean::inc(x_23); +x_25 = lean::apply_1(x_23, x_5); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_16); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_21); +lean::cnstr_set(x_27, 1, x_26); +x_28 = l_lean_parser_command_reserve__notation; +lean::inc(x_28); +x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); +return x_30; } } obj* _init_l_lean_parser_command_reserve__notation_has__view_x_27() { @@ -18671,7 +18539,7 @@ return x_0; obj* _init_l_lean_parser_command_reserve__notation_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; x_0 = lean::mk_string("reserve"); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -18679,23 +18547,22 @@ x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_4 = lean::mk_string("notation"); x_5 = l_lean_parser_symbol_tokens___rarg(x_4, x_1); x_6 = lean::box(0); -lean::inc(x_6); -x_8 = l_lean_parser_list_cons_tokens___rarg(x_5, x_6); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_3, x_8); +x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_6); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_3, x_7); +x_9 = l_lean_parser_tokens___rarg(x_8); x_10 = l_lean_parser_tokens___rarg(x_9); -x_11 = l_lean_parser_tokens___rarg(x_10); -x_12 = l_lean_parser_command_notation__spec_parser_lean_parser_has__tokens; -lean::inc(x_12); -x_14 = l_lean_parser_list_cons_tokens___rarg(x_12, x_6); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_11, x_14); -x_16 = l_lean_parser_tokens___rarg(x_15); -return x_16; +x_11 = l_lean_parser_command_notation__spec_parser_lean_parser_has__tokens; +lean::inc(x_11); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_11, x_6); +x_14 = l_lean_parser_list_cons_tokens___rarg(x_10, x_13); +x_15 = l_lean_parser_tokens___rarg(x_14); +return x_15; } } obj* _init_l_lean_parser_command_reserve__notation_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* 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; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_32; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_31; x_0 = lean::mk_string("reserve"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -18717,42 +18584,41 @@ lean::closure_set(x_11, 0, x_8); lean::closure_set(x_11, 1, x_4); lean::closure_set(x_11, 2, x_10); x_12 = lean::box(0); -lean::inc(x_12); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_11); +lean::cnstr_set(x_13, 1, x_12); x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_12); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_6); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_parser), 5, 0); +lean::cnstr_set(x_14, 0, x_6); +lean::cnstr_set(x_14, 1, x_13); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); +lean::closure_set(x_15, 0, x_14); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_parser), 5, 0); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_16); +lean::cnstr_set(x_17, 1, x_12); x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_12); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_18); -x_20 = l_lean_parser_term__parser__m_monad; -x_21 = l_lean_parser_term__parser__m_monad__except; -x_22 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_23 = l_lean_parser_term__parser__m_alternative; -x_24 = l_lean_parser_command_reserve__notation; -x_25 = l_lean_parser_command_reserve__notation_has__view; -lean::inc(x_25); +lean::cnstr_set(x_18, 0, x_15); +lean::cnstr_set(x_18, 1, x_17); +x_19 = l_lean_parser_term__parser__m_monad; +x_20 = l_lean_parser_term__parser__m_monad__except; +x_21 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_22 = l_lean_parser_term__parser__m_alternative; +x_23 = l_lean_parser_command_reserve__notation; +x_24 = l_lean_parser_command_reserve__notation_has__view; lean::inc(x_24); lean::inc(x_23); lean::inc(x_22); lean::inc(x_21); lean::inc(x_20); -x_32 = l_lean_parser_combinators_node_view___rarg(x_20, x_21, x_22, x_23, x_24, x_19, x_25); -return x_32; +lean::inc(x_19); +x_31 = l_lean_parser_combinators_node_view___rarg(x_19, x_20, x_21, x_22, x_23, x_18, x_24); +return x_31; } } obj* _init_l_lean_parser_command_reserve__notation_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* 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_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; x_0 = lean::mk_string("reserve"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -18774,23 +18640,22 @@ lean::closure_set(x_11, 0, x_8); lean::closure_set(x_11, 1, x_4); lean::closure_set(x_11, 2, x_10); x_12 = lean::box(0); -lean::inc(x_12); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_11); +lean::cnstr_set(x_13, 1, x_12); x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_12); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_6); -lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); -lean::closure_set(x_16, 0, x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_parser), 5, 0); +lean::cnstr_set(x_14, 0, x_6); +lean::cnstr_set(x_14, 1, x_13); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); +lean::closure_set(x_15, 0, x_14); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_parser), 5, 0); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_16); +lean::cnstr_set(x_17, 1, x_12); x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_12); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_18); -return x_19; +lean::cnstr_set(x_18, 0, x_15); +lean::cnstr_set(x_18, 1, x_17); +return x_18; } } obj* l_lean_parser_command_reserve__notation_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -19195,50 +19060,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__6; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__6; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__6; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__6; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__6; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__6; +lean::inc(x_69); +return x_69; } } } @@ -19248,70 +19112,70 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__6; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__6; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); -if (x_77 == 0) +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); +if (x_76 == 0) { -obj* x_79; uint8 x_80; -x_79 = lean::mk_nat_obj(1u); -x_80 = lean::nat_dec_eq(x_2, x_79); -lean::dec(x_79); -if (x_80 == 0) +obj* x_78; uint8 x_79; +x_78 = lean::mk_nat_obj(1u); +x_79 = lean::nat_dec_eq(x_2, x_78); +lean::dec(x_78); +if (x_79 == 0) { -obj* x_82; uint8 x_83; -x_82 = lean::mk_nat_obj(2u); -x_83 = lean::nat_dec_eq(x_2, x_82); -lean::dec(x_82); -if (x_83 == 0) +obj* x_81; uint8 x_82; +x_81 = lean::mk_nat_obj(2u); +x_82 = lean::nat_dec_eq(x_2, x_81); +lean::dec(x_81); +if (x_82 == 0) { -obj* x_85; uint8 x_86; -x_85 = lean::mk_nat_obj(3u); -x_86 = lean::nat_dec_eq(x_2, x_85); -lean::dec(x_85); +obj* x_84; uint8 x_85; +x_84 = lean::mk_nat_obj(3u); +x_85 = lean::nat_dec_eq(x_2, x_84); +lean::dec(x_84); lean::dec(x_2); -if (x_86 == 0) +if (x_85 == 0) { switch (lean::obj_tag(x_1)) { case 0: { -obj* x_89; obj* x_92; obj* x_93; -x_89 = lean::cnstr_get(x_1, 0); -lean::inc(x_89); +obj* x_88; obj* x_91; obj* x_92; +x_88 = lean::cnstr_get(x_1, 0); +lean::inc(x_88); lean::dec(x_1); -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_89); -x_93 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_93, 0, x_92); +x_91 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_91, 0, x_88); +x_92 = lean::alloc_cnstr(4, 1, 0); +lean::cnstr_set(x_92, 0, x_91); +return x_92; +} +case 3: +{ +obj* x_93; +x_93 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__1; +lean::inc(x_93); return x_93; } -case 3: -{ -obj* x_94; -x_94 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__1; -lean::inc(x_94); -return x_94; -} default: { -obj* x_97; +obj* x_96; lean::dec(x_1); -x_97 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__1; -lean::inc(x_97); -return x_97; +x_96 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__1; +lean::inc(x_96); +return x_96; } } } @@ -19320,30 +19184,30 @@ else switch (lean::obj_tag(x_1)) { case 0: { -obj* x_99; obj* x_102; obj* x_103; -x_99 = lean::cnstr_get(x_1, 0); -lean::inc(x_99); +obj* x_98; obj* x_101; obj* x_102; +x_98 = lean::cnstr_get(x_1, 0); +lean::inc(x_98); lean::dec(x_1); -x_102 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_102, 0, x_99); -x_103 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_103, 0, x_102); +x_101 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_101, 0, x_98); +x_102 = lean::alloc_cnstr(3, 1, 0); +lean::cnstr_set(x_102, 0, x_101); +return x_102; +} +case 3: +{ +obj* x_103; +x_103 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__2; +lean::inc(x_103); return x_103; } -case 3: -{ -obj* x_104; -x_104 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__2; -lean::inc(x_104); -return x_104; -} default: { -obj* x_107; +obj* x_106; lean::dec(x_1); -x_107 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__2; -lean::inc(x_107); -return x_107; +x_106 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__2; +lean::inc(x_106); +return x_106; } } } @@ -19354,30 +19218,30 @@ lean::dec(x_2); switch (lean::obj_tag(x_1)) { case 0: { -obj* x_110; obj* x_113; obj* x_114; -x_110 = lean::cnstr_get(x_1, 0); -lean::inc(x_110); +obj* x_109; obj* x_112; obj* x_113; +x_109 = lean::cnstr_get(x_1, 0); +lean::inc(x_109); lean::dec(x_1); -x_113 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_113, 0, x_110); -x_114 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_114, 0, x_113); +x_112 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_112, 0, x_109); +x_113 = lean::alloc_cnstr(2, 1, 0); +lean::cnstr_set(x_113, 0, x_112); +return x_113; +} +case 3: +{ +obj* x_114; +x_114 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__3; +lean::inc(x_114); return x_114; } -case 3: -{ -obj* x_115; -x_115 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__3; -lean::inc(x_115); -return x_115; -} default: { -obj* x_118; +obj* x_117; lean::dec(x_1); -x_118 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__3; -lean::inc(x_118); -return x_118; +x_117 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__3; +lean::inc(x_117); +return x_117; } } } @@ -19388,30 +19252,30 @@ lean::dec(x_2); switch (lean::obj_tag(x_1)) { case 0: { -obj* x_121; obj* x_124; obj* x_125; -x_121 = lean::cnstr_get(x_1, 0); -lean::inc(x_121); +obj* x_120; obj* x_123; obj* x_124; +x_120 = lean::cnstr_get(x_1, 0); +lean::inc(x_120); lean::dec(x_1); +x_123 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_123, 0, x_120); x_124 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_124, 0, x_121); -x_125 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_125, 0, x_124); +lean::cnstr_set(x_124, 0, x_123); +return x_124; +} +case 3: +{ +obj* x_125; +x_125 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__4; +lean::inc(x_125); return x_125; } -case 3: -{ -obj* x_126; -x_126 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__4; -lean::inc(x_126); -return x_126; -} default: { -obj* x_129; +obj* x_128; lean::dec(x_1); -x_129 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__4; -lean::inc(x_129); -return x_129; +x_128 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__4; +lean::inc(x_128); +return x_128; } } } @@ -19422,30 +19286,30 @@ lean::dec(x_2); switch (lean::obj_tag(x_1)) { case 0: { -obj* x_132; obj* x_135; obj* x_136; -x_132 = lean::cnstr_get(x_1, 0); -lean::inc(x_132); +obj* x_131; obj* x_134; obj* x_135; +x_131 = lean::cnstr_get(x_1, 0); +lean::inc(x_131); lean::dec(x_1); -x_135 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_135, 0, x_132); -x_136 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_136, 0, x_135); -return x_136; +x_134 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_134, 0, x_131); +x_135 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_135, 0, x_134); +return x_135; } case 3: { -obj* x_137; -x_137 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__5; -lean::inc(x_137); -return x_137; +obj* x_136; +x_136 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__5; +lean::inc(x_136); +return x_136; } default: { -obj* x_140; +obj* x_139; lean::dec(x_1); -x_140 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__5; -lean::inc(x_140); -return x_140; +x_139 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__5; +lean::inc(x_139); +return x_139; } } } @@ -19470,7 +19334,7 @@ x_1 = lean::box(0); switch (lean::obj_tag(x_0)) { case 0: { -obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; +obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -19479,124 +19343,119 @@ lean::inc(x_5); x_7 = l_option_map___rarg(x_5, x_2); x_8 = lean::box(3); x_9 = l_option_get__or__else___main___rarg(x_7, x_8); -lean::inc(x_1); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_1); -x_12 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_12); -x_14 = l_lean_parser_syntax_mk__node(x_12, x_11); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_1); -x_16 = l_lean_parser_command_mixfix_kind; -lean::inc(x_16); -x_18 = l_lean_parser_syntax_mk__node(x_16, x_15); -return x_18; +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_1); +x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_11); +x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_1); +x_15 = l_lean_parser_command_mixfix_kind; +lean::inc(x_15); +x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); +return x_17; } case 1: { -obj* x_19; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; -x_19 = lean::cnstr_get(x_0, 0); -lean::inc(x_19); +obj* x_18; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; +x_18 = lean::cnstr_get(x_0, 0); +lean::inc(x_18); lean::dec(x_0); -x_22 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_22); -x_24 = l_option_map___rarg(x_22, x_19); -x_25 = lean::box(3); -x_26 = l_option_get__or__else___main___rarg(x_24, x_25); -lean::inc(x_1); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_1); -x_29 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_29); -x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_1); -x_33 = l_lean_parser_command_mixfix_kind; -lean::inc(x_33); -x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); -return x_35; +x_21 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_21); +x_23 = l_option_map___rarg(x_21, x_18); +x_24 = lean::box(3); +x_25 = l_option_get__or__else___main___rarg(x_23, x_24); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_1); +x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_1); +x_31 = l_lean_parser_command_mixfix_kind; +lean::inc(x_31); +x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); +return x_33; } case 2: { -obj* x_36; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_52; -x_36 = lean::cnstr_get(x_0, 0); -lean::inc(x_36); +obj* x_34; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; +x_34 = lean::cnstr_get(x_0, 0); +lean::inc(x_34); lean::dec(x_0); -x_39 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_39); -x_41 = l_option_map___rarg(x_39, x_36); -x_42 = lean::box(3); -x_43 = l_option_get__or__else___main___rarg(x_41, x_42); -lean::inc(x_1); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_1); -x_46 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; -lean::inc(x_46); -x_48 = l_lean_parser_syntax_mk__node(x_46, x_45); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_1); -x_50 = l_lean_parser_command_mixfix_kind; -lean::inc(x_50); -x_52 = l_lean_parser_syntax_mk__node(x_50, x_49); -return x_52; +x_37 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_37); +x_39 = l_option_map___rarg(x_37, x_34); +x_40 = lean::box(3); +x_41 = l_option_get__or__else___main___rarg(x_39, x_40); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_41); +lean::cnstr_set(x_42, 1, x_1); +x_43 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; +lean::inc(x_43); +x_45 = l_lean_parser_syntax_mk__node(x_43, x_42); +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_45); +lean::cnstr_set(x_46, 1, x_1); +x_47 = l_lean_parser_command_mixfix_kind; +lean::inc(x_47); +x_49 = l_lean_parser_syntax_mk__node(x_47, x_46); +return x_49; } case 3: { -obj* x_53; obj* x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_69; -x_53 = lean::cnstr_get(x_0, 0); -lean::inc(x_53); +obj* x_50; obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_65; +x_50 = lean::cnstr_get(x_0, 0); +lean::inc(x_50); lean::dec(x_0); -x_56 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_56); -x_58 = l_option_map___rarg(x_56, x_53); -x_59 = lean::box(3); -x_60 = l_option_get__or__else___main___rarg(x_58, x_59); -lean::inc(x_1); +x_53 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_53); +x_55 = l_option_map___rarg(x_53, x_50); +x_56 = lean::box(3); +x_57 = l_option_get__or__else___main___rarg(x_55, x_56); +x_58 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_58, 0, x_57); +lean::cnstr_set(x_58, 1, x_1); +x_59 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +lean::inc(x_59); +x_61 = l_lean_parser_syntax_mk__node(x_59, x_58); x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_60); +lean::cnstr_set(x_62, 0, x_61); lean::cnstr_set(x_62, 1, x_1); -x_63 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +x_63 = l_lean_parser_command_mixfix_kind; lean::inc(x_63); x_65 = l_lean_parser_syntax_mk__node(x_63, x_62); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_1); -x_67 = l_lean_parser_command_mixfix_kind; -lean::inc(x_67); -x_69 = l_lean_parser_syntax_mk__node(x_67, x_66); -return x_69; +return x_65; } default: { -obj* x_70; obj* x_73; obj* x_75; obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_82; obj* x_83; obj* x_84; obj* x_86; -x_70 = lean::cnstr_get(x_0, 0); -lean::inc(x_70); +obj* x_66; obj* x_69; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_77; obj* x_78; obj* x_79; obj* x_81; +x_66 = lean::cnstr_get(x_0, 0); +lean::inc(x_66); lean::dec(x_0); -x_73 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_73); -x_75 = l_option_map___rarg(x_73, x_70); -x_76 = lean::box(3); -x_77 = l_option_get__or__else___main___rarg(x_75, x_76); -lean::inc(x_1); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_77); -lean::cnstr_set(x_79, 1, x_1); -x_80 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__2___closed__1; -lean::inc(x_80); -x_82 = l_lean_parser_syntax_mk__node(x_80, x_79); -x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_82); -lean::cnstr_set(x_83, 1, x_1); -x_84 = l_lean_parser_command_mixfix_kind; -lean::inc(x_84); -x_86 = l_lean_parser_syntax_mk__node(x_84, x_83); -return x_86; +x_69 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_69); +x_71 = l_option_map___rarg(x_69, x_66); +x_72 = lean::box(3); +x_73 = l_option_get__or__else___main___rarg(x_71, x_72); +x_74 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_74, 0, x_73); +lean::cnstr_set(x_74, 1, x_1); +x_75 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__2___closed__1; +lean::inc(x_75); +x_77 = l_lean_parser_syntax_mk__node(x_75, x_74); +x_78 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_78, 0, x_77); +lean::cnstr_set(x_78, 1, x_1); +x_79 = l_lean_parser_command_mixfix_kind; +lean::inc(x_79); +x_81 = l_lean_parser_syntax_mk__node(x_79, x_78); +return x_81; } } } @@ -19625,7 +19484,7 @@ return x_0; obj* _init_l_lean_parser_command_mixfix_kind_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; x_0 = lean::mk_string("prefix"); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -19642,22 +19501,21 @@ x_12 = l_lean_parser_symbol_tokens___rarg(x_10, x_1); x_13 = lean::mk_string("postfix"); x_14 = l_lean_parser_symbol_tokens___rarg(x_13, x_1); x_15 = lean::box(0); -lean::inc(x_15); -x_17 = l_lean_parser_list_cons_tokens___rarg(x_14, x_15); -x_18 = l_lean_parser_list_cons_tokens___rarg(x_12, x_17); -x_19 = l_lean_parser_list_cons_tokens___rarg(x_9, x_18); -x_20 = l_lean_parser_list_cons_tokens___rarg(x_6, x_19); -x_21 = l_lean_parser_list_cons_tokens___rarg(x_3, x_20); -x_22 = l_lean_parser_tokens___rarg(x_21); -x_23 = l_lean_parser_list_cons_tokens___rarg(x_22, x_15); -x_24 = l_lean_parser_tokens___rarg(x_23); -return x_24; +x_16 = l_lean_parser_list_cons_tokens___rarg(x_14, x_15); +x_17 = l_lean_parser_list_cons_tokens___rarg(x_12, x_16); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_9, x_17); +x_19 = l_lean_parser_list_cons_tokens___rarg(x_6, x_18); +x_20 = l_lean_parser_list_cons_tokens___rarg(x_3, x_19); +x_21 = l_lean_parser_tokens___rarg(x_20); +x_22 = l_lean_parser_list_cons_tokens___rarg(x_21, x_15); +x_23 = l_lean_parser_tokens___rarg(x_22); +return x_23; } } obj* _init_l_lean_parser_command_mixfix_kind_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* 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_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_52; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_51; x_0 = lean::mk_string("prefix"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -19710,48 +19568,47 @@ lean::closure_set(x_30, 0, x_26); lean::closure_set(x_30, 1, x_4); lean::closure_set(x_30, 2, x_28); x_31 = lean::box(0); -lean::inc(x_31); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_30); +lean::cnstr_set(x_32, 1, x_31); x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_30); -lean::cnstr_set(x_33, 1, x_31); +lean::cnstr_set(x_33, 0, x_24); +lean::cnstr_set(x_33, 1, x_32); x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_24); +lean::cnstr_set(x_34, 0, x_18); lean::cnstr_set(x_34, 1, x_33); x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_18); +lean::cnstr_set(x_35, 0, x_12); lean::cnstr_set(x_35, 1, x_34); x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_12); +lean::cnstr_set(x_36, 0, x_6); lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_6); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_38, 0, x_37); -lean::closure_set(x_38, 1, x_4); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_31); -x_40 = l_lean_parser_term__parser__m_monad; -x_41 = l_lean_parser_term__parser__m_monad__except; -x_42 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_43 = l_lean_parser_term__parser__m_alternative; -x_44 = l_lean_parser_command_mixfix_kind; -x_45 = l_lean_parser_command_mixfix_kind_has__view; -lean::inc(x_45); +x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_37, 0, x_36); +lean::closure_set(x_37, 1, x_4); +x_38 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_38, 0, x_37); +lean::cnstr_set(x_38, 1, x_31); +x_39 = l_lean_parser_term__parser__m_monad; +x_40 = l_lean_parser_term__parser__m_monad__except; +x_41 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_42 = l_lean_parser_term__parser__m_alternative; +x_43 = l_lean_parser_command_mixfix_kind; +x_44 = l_lean_parser_command_mixfix_kind_has__view; lean::inc(x_44); lean::inc(x_43); lean::inc(x_42); lean::inc(x_41); lean::inc(x_40); -x_52 = l_lean_parser_combinators_node_view___rarg(x_40, x_41, x_42, x_43, x_44, x_39, x_45); -return x_52; +lean::inc(x_39); +x_51 = l_lean_parser_combinators_node_view___rarg(x_39, x_40, x_41, x_42, x_43, x_38, x_44); +return x_51; } } obj* _init_l_lean_parser_command_mixfix_kind_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* 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_39; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; x_0 = lean::mk_string("prefix"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -19804,29 +19661,28 @@ lean::closure_set(x_30, 0, x_26); lean::closure_set(x_30, 1, x_4); lean::closure_set(x_30, 2, x_28); x_31 = lean::box(0); -lean::inc(x_31); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_30); +lean::cnstr_set(x_32, 1, x_31); x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_30); -lean::cnstr_set(x_33, 1, x_31); +lean::cnstr_set(x_33, 0, x_24); +lean::cnstr_set(x_33, 1, x_32); x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_24); +lean::cnstr_set(x_34, 0, x_18); lean::cnstr_set(x_34, 1, x_33); x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_18); +lean::cnstr_set(x_35, 0, x_12); lean::cnstr_set(x_35, 1, x_34); x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_12); +lean::cnstr_set(x_36, 0, x_6); lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_6); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_38, 0, x_37); -lean::closure_set(x_38, 1, x_4); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_31); -return x_39; +x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_37, 0, x_36); +lean::closure_set(x_37, 1, x_4); +x_38 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_38, 0, x_37); +lean::cnstr_set(x_38, 1, x_31); +return x_38; } } obj* l_lean_parser_command_mixfix_kind_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -20578,7 +20434,7 @@ return x_141; obj* l_lean_parser_command_mixfix_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -20595,78 +20451,73 @@ x_13 = lean::cnstr_get(x_12, 1); lean::inc(x_13); x_15 = lean::apply_1(x_13, x_3); x_16 = lean::box(0); -lean::inc(x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_15); -lean::cnstr_set(x_18, 1, x_16); -x_19 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view; -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -x_22 = lean::apply_1(x_20, x_5); -x_23 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_23); -x_25 = l_option_map___rarg(x_23, x_7); -x_26 = lean::box(3); -lean::inc(x_26); -x_28 = l_option_get__or__else___main___rarg(x_25, x_26); -lean::inc(x_16); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_9); -lean::cnstr_set(x_30, 1, x_16); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_28); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_22); -lean::cnstr_set(x_32, 1, x_31); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_15); +lean::cnstr_set(x_17, 1, x_16); +x_18 = l_lean_parser_command_notation__spec_mixfix__symbol_has__view; +x_19 = lean::cnstr_get(x_18, 1); +lean::inc(x_19); +x_21 = lean::apply_1(x_19, x_5); +x_22 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_22); +x_24 = l_option_map___rarg(x_22, x_7); +x_25 = lean::box(3); +x_26 = l_option_get__or__else___main___rarg(x_24, x_25); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_9); +lean::cnstr_set(x_27, 1, x_16); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_26); +lean::cnstr_set(x_28, 1, x_27); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_21); +lean::cnstr_set(x_29, 1, x_28); if (lean::obj_tag(x_1) == 0) { -obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_44; -lean::dec(x_16); -lean::dec(x_26); -x_35 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_35); -lean::cnstr_set(x_37, 1, x_18); -x_38 = l_lean_parser_no__kind; -lean::inc(x_38); -x_40 = l_lean_parser_syntax_mk__node(x_38, x_37); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_32); -x_42 = l_lean_parser_command_mixfix; -lean::inc(x_42); -x_44 = l_lean_parser_syntax_mk__node(x_42, x_41); -return x_44; +obj* x_30; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; +x_30 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_30); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_30); +lean::cnstr_set(x_32, 1, x_17); +x_33 = l_lean_parser_no__kind; +lean::inc(x_33); +x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_35); +lean::cnstr_set(x_36, 1, x_29); +x_37 = l_lean_parser_command_mixfix; +lean::inc(x_37); +x_39 = l_lean_parser_syntax_mk__node(x_37, x_36); +return x_39; } else { -obj* x_45; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_61; -x_45 = lean::cnstr_get(x_1, 0); -lean::inc(x_45); +obj* x_40; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_56; +x_40 = lean::cnstr_get(x_1, 0); +lean::inc(x_40); lean::dec(x_1); -lean::inc(x_23); -x_49 = l_option_map___rarg(x_23, x_45); -x_50 = l_option_get__or__else___main___rarg(x_49, x_26); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_16); -x_52 = l_lean_parser_no__kind; -lean::inc(x_52); -x_54 = l_lean_parser_syntax_mk__node(x_52, x_51); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_18); -lean::inc(x_52); -x_57 = l_lean_parser_syntax_mk__node(x_52, x_55); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_32); -x_59 = l_lean_parser_command_mixfix; -lean::inc(x_59); -x_61 = l_lean_parser_syntax_mk__node(x_59, x_58); -return x_61; +lean::inc(x_22); +x_44 = l_option_map___rarg(x_22, x_40); +x_45 = l_option_get__or__else___main___rarg(x_44, x_25); +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_45); +lean::cnstr_set(x_46, 1, x_16); +x_47 = l_lean_parser_no__kind; +lean::inc(x_47); +x_49 = l_lean_parser_syntax_mk__node(x_47, x_46); +x_50 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_50, 0, x_49); +lean::cnstr_set(x_50, 1, x_17); +lean::inc(x_47); +x_52 = l_lean_parser_syntax_mk__node(x_47, x_50); +x_53 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_53, 0, x_52); +lean::cnstr_set(x_53, 1, x_29); +x_54 = l_lean_parser_command_mixfix; +lean::inc(x_54); +x_56 = l_lean_parser_syntax_mk__node(x_54, x_53); +return x_56; } } } @@ -20694,7 +20545,7 @@ return x_0; obj* _init_l_lean_parser_command_mixfix_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; x_0 = lean::mk_string("local "); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -20702,30 +20553,29 @@ x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_4 = l_lean_parser_tokens___rarg(x_3); x_5 = lean::box(0); x_6 = l_lean_parser_command_mixfix_kind_parser_lean_parser_has__tokens; -lean::inc(x_5); lean::inc(x_6); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_6, x_5); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_4, x_9); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_6, x_5); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_4, x_8); +x_10 = l_lean_parser_tokens___rarg(x_9); x_11 = l_lean_parser_tokens___rarg(x_10); -x_12 = l_lean_parser_tokens___rarg(x_11); -x_13 = lean::mk_string(":="); -x_14 = l_lean_parser_symbol_tokens___rarg(x_13, x_1); -x_15 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_15); -x_17 = l_lean_parser_list_cons_tokens___rarg(x_15, x_5); -x_18 = l_lean_parser_list_cons_tokens___rarg(x_14, x_17); -x_19 = l_lean_parser_command_notation__spec_mixfix__symbol_parser_lean_parser_has__tokens; -lean::inc(x_19); -x_21 = l_lean_parser_list_cons_tokens___rarg(x_19, x_18); -x_22 = l_lean_parser_list_cons_tokens___rarg(x_12, x_21); -x_23 = l_lean_parser_tokens___rarg(x_22); -return x_23; +x_12 = lean::mk_string(":="); +x_13 = l_lean_parser_symbol_tokens___rarg(x_12, x_1); +x_14 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_14); +x_16 = l_lean_parser_list_cons_tokens___rarg(x_14, x_5); +x_17 = l_lean_parser_list_cons_tokens___rarg(x_13, x_16); +x_18 = l_lean_parser_command_notation__spec_mixfix__symbol_parser_lean_parser_has__tokens; +lean::inc(x_18); +x_20 = l_lean_parser_list_cons_tokens___rarg(x_18, x_17); +x_21 = l_lean_parser_list_cons_tokens___rarg(x_11, x_20); +x_22 = l_lean_parser_tokens___rarg(x_21); +return x_22; } } obj* _init_l_lean_parser_command_mixfix_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_38; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_37; x_0 = lean::mk_string("local "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -20741,60 +20591,59 @@ x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_opti lean::closure_set(x_7, 0, x_6); x_8 = lean::box(0); x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_mixfix_kind_parser), 5, 0); -lean::inc(x_8); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_8); x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_8); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_7); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::mk_string(":="); -x_15 = l_string_trim(x_14); -lean::inc(x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_17, 0, x_15); +lean::cnstr_set(x_11, 0, x_7); +lean::cnstr_set(x_11, 1, x_10); +x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); +lean::closure_set(x_12, 0, x_11); +x_13 = lean::mk_string(":="); +x_14 = l_string_trim(x_13); +lean::inc(x_14); +x_16 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_16, 0, x_14); lean::inc(x_4); -x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_19, 0, x_15); -lean::closure_set(x_19, 1, x_4); -lean::closure_set(x_19, 2, x_17); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_20, 0, x_4); +x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_18, 0, x_14); +lean::closure_set(x_18, 1, x_4); +lean::closure_set(x_18, 2, x_16); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_19, 0, x_4); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_19); +lean::cnstr_set(x_20, 1, x_8); x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_8); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_19); -lean::cnstr_set(x_22, 1, x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_mixfix__symbol_parser), 5, 0); +lean::cnstr_set(x_21, 0, x_18); +lean::cnstr_set(x_21, 1, x_20); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_mixfix__symbol_parser), 5, 0); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_22); +lean::cnstr_set(x_23, 1, x_21); x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_22); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_13); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_lean_parser_term__parser__m_monad; -x_27 = l_lean_parser_term__parser__m_monad__except; -x_28 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_29 = l_lean_parser_term__parser__m_alternative; -x_30 = l_lean_parser_command_mixfix; -x_31 = l_lean_parser_command_mixfix_has__view; -lean::inc(x_31); +lean::cnstr_set(x_24, 0, x_12); +lean::cnstr_set(x_24, 1, x_23); +x_25 = l_lean_parser_term__parser__m_monad; +x_26 = l_lean_parser_term__parser__m_monad__except; +x_27 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_28 = l_lean_parser_term__parser__m_alternative; +x_29 = l_lean_parser_command_mixfix; +x_30 = l_lean_parser_command_mixfix_has__view; lean::inc(x_30); lean::inc(x_29); lean::inc(x_28); lean::inc(x_27); lean::inc(x_26); -x_38 = l_lean_parser_combinators_node_view___rarg(x_26, x_27, x_28, x_29, x_30, x_25, x_31); -return x_38; +lean::inc(x_25); +x_37 = l_lean_parser_combinators_node_view___rarg(x_25, x_26, x_27, x_28, x_29, x_24, x_30); +return x_37; } } obj* _init_l_lean_parser_command_mixfix_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; x_0 = lean::mk_string("local "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -20810,41 +20659,40 @@ x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_opti lean::closure_set(x_7, 0, x_6); x_8 = lean::box(0); x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_mixfix_kind_parser), 5, 0); -lean::inc(x_8); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_8); x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_8); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_7); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::mk_string(":="); -x_15 = l_string_trim(x_14); -lean::inc(x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_17, 0, x_15); +lean::cnstr_set(x_11, 0, x_7); +lean::cnstr_set(x_11, 1, x_10); +x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); +lean::closure_set(x_12, 0, x_11); +x_13 = lean::mk_string(":="); +x_14 = l_string_trim(x_13); +lean::inc(x_14); +x_16 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_16, 0, x_14); lean::inc(x_4); -x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_19, 0, x_15); -lean::closure_set(x_19, 1, x_4); -lean::closure_set(x_19, 2, x_17); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_20, 0, x_4); +x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_18, 0, x_14); +lean::closure_set(x_18, 1, x_4); +lean::closure_set(x_18, 2, x_16); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_19, 0, x_4); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_19); +lean::cnstr_set(x_20, 1, x_8); x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_8); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_19); -lean::cnstr_set(x_22, 1, x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_mixfix__symbol_parser), 5, 0); +lean::cnstr_set(x_21, 0, x_18); +lean::cnstr_set(x_21, 1, x_20); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_mixfix__symbol_parser), 5, 0); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_22); +lean::cnstr_set(x_23, 1, x_21); x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_23); -lean::cnstr_set(x_24, 1, x_22); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_13); -lean::cnstr_set(x_25, 1, x_24); -return x_25; +lean::cnstr_set(x_24, 0, x_12); +lean::cnstr_set(x_24, 1, x_23); +return x_24; } } obj* l_lean_parser_command_mixfix_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -21033,50 +20881,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_command_notation__like_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_command_notation__like_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_command_notation__like_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_command_notation__like_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_command_notation__like_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_command_notation__like_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -21086,44 +20933,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_command_notation__like_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_command_notation__like_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_command_mixfix_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_command_mixfix_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_command_notation_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_command_notation_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -21135,7 +20982,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -21143,45 +20990,43 @@ x_5 = l_lean_parser_command_notation_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_command_notation__like; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_command_notation__like; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_command_mixfix_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_command_notation__like; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_command_mixfix_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_command_notation__like; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -21209,80 +21054,77 @@ return x_0; obj* _init_l_lean_parser_command_notation__like_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; x_0 = lean::box(0); x_1 = l_lean_parser_command_mixfix_parser_lean_parser_has__tokens; -lean::inc(x_0); lean::inc(x_1); -x_4 = l_lean_parser_list_cons_tokens___rarg(x_1, x_0); -x_5 = l_lean_parser_command_notation_parser_lean_parser_has__tokens; -lean::inc(x_5); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_4); -x_8 = l_lean_parser_tokens___rarg(x_7); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_8, x_0); -x_10 = l_lean_parser_tokens___rarg(x_9); -return x_10; +x_3 = l_lean_parser_list_cons_tokens___rarg(x_1, x_0); +x_4 = l_lean_parser_command_notation_parser_lean_parser_has__tokens; +lean::inc(x_4); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_4, x_3); +x_7 = l_lean_parser_tokens___rarg(x_6); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_7, x_0); +x_9 = l_lean_parser_tokens___rarg(x_8); +return x_9; } } obj* _init_l_lean_parser_command_notation__like_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_21; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_20; x_0 = lean::box(0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_mixfix_parser), 5, 0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation_parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_0); -x_9 = l_lean_parser_term__parser__m_monad; -x_10 = l_lean_parser_term__parser__m_monad__except; -x_11 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_12 = l_lean_parser_term__parser__m_alternative; -x_13 = l_lean_parser_command_notation__like; -x_14 = l_lean_parser_command_notation__like_has__view; -lean::inc(x_14); +x_2 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation_parser), 5, 0); +x_4 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_4, 0, x_3); +lean::cnstr_set(x_4, 1, x_2); +x_5 = lean::mk_nat_obj(0u); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_6, 0, x_4); +lean::closure_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_0); +x_8 = l_lean_parser_term__parser__m_monad; +x_9 = l_lean_parser_term__parser__m_monad__except; +x_10 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_11 = l_lean_parser_term__parser__m_alternative; +x_12 = l_lean_parser_command_notation__like; +x_13 = l_lean_parser_command_notation__like_has__view; lean::inc(x_13); lean::inc(x_12); lean::inc(x_11); lean::inc(x_10); lean::inc(x_9); -x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x_8, x_14); -return x_21; +lean::inc(x_8); +x_20 = l_lean_parser_combinators_node_view___rarg(x_8, x_9, x_10, x_11, x_12, x_7, x_13); +return x_20; } } obj* _init_l_lean_parser_command_notation__like_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_mixfix_parser), 5, 0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation_parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_0); -return x_8; +x_2 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation_parser), 5, 0); +x_4 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_4, 0, x_3); +lean::cnstr_set(x_4, 1, x_2); +x_5 = lean::mk_nat_obj(0u); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_6, 0, x_4); +lean::closure_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_0); +return x_7; } } obj* l_lean_parser_command_notation__like_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -21748,7 +21590,7 @@ return x_101; obj* l_lean_parser_command_reserve__mixfix_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* 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_29; obj* x_30; obj* x_32; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_31; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -21766,30 +21608,29 @@ x_14 = lean::cnstr_get(x_13, 1); lean::inc(x_14); x_16 = lean::apply_1(x_14, x_3); x_17 = lean::box(0); -lean::inc(x_17); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_16); +lean::cnstr_set(x_18, 1, x_17); x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_17); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_12); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_lean_parser_no__kind; -lean::inc(x_21); -x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); -x_24 = l_lean_parser_command_notation__spec_notation__symbol_has__view; -x_25 = lean::cnstr_get(x_24, 1); -lean::inc(x_25); -x_27 = lean::apply_1(x_25, x_5); +lean::cnstr_set(x_19, 0, x_12); +lean::cnstr_set(x_19, 1, x_18); +x_20 = l_lean_parser_no__kind; +lean::inc(x_20); +x_22 = l_lean_parser_syntax_mk__node(x_20, x_19); +x_23 = l_lean_parser_command_notation__spec_notation__symbol_has__view; +x_24 = lean::cnstr_get(x_23, 1); +lean::inc(x_24); +x_26 = lean::apply_1(x_24, x_5); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_26); +lean::cnstr_set(x_27, 1, x_17); x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_17); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_23); -lean::cnstr_set(x_29, 1, x_28); -x_30 = l_lean_parser_command_reserve__mixfix; -lean::inc(x_30); -x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); -return x_32; +lean::cnstr_set(x_28, 0, x_22); +lean::cnstr_set(x_28, 1, x_27); +x_29 = l_lean_parser_command_reserve__mixfix; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } obj* _init_l_lean_parser_command_reserve__mixfix_has__view_x_27() { @@ -21816,30 +21657,29 @@ return x_0; obj* _init_l_lean_parser_command_reserve__mixfix_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; x_0 = lean::mk_string("reserve"); x_1 = lean::mk_nat_obj(0u); x_2 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_3 = lean::box(0); x_4 = l_lean_parser_command_mixfix_kind_parser_lean_parser_has__tokens; -lean::inc(x_3); lean::inc(x_4); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_4, x_3); -x_8 = l_lean_parser_list_cons_tokens___rarg(x_2, x_7); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_4, x_3); +x_7 = l_lean_parser_list_cons_tokens___rarg(x_2, x_6); +x_8 = l_lean_parser_tokens___rarg(x_7); x_9 = l_lean_parser_tokens___rarg(x_8); -x_10 = l_lean_parser_tokens___rarg(x_9); -x_11 = l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__tokens; -lean::inc(x_11); -x_13 = l_lean_parser_list_cons_tokens___rarg(x_11, x_3); -x_14 = l_lean_parser_list_cons_tokens___rarg(x_10, x_13); -x_15 = l_lean_parser_tokens___rarg(x_14); -return x_15; +x_10 = l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__tokens; +lean::inc(x_10); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_10, x_3); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_9, x_12); +x_14 = l_lean_parser_tokens___rarg(x_13); +return x_14; } } obj* _init_l_lean_parser_command_reserve__mixfix_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_27; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_26; x_0 = lean::mk_string("reserve"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -21852,42 +21692,41 @@ lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); x_6 = lean::box(0); x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_mixfix_kind_parser), 5, 0); -lean::inc(x_6); +x_8 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_8, 0, x_7); +lean::cnstr_set(x_8, 1, x_6); x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_6); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_notation__symbol_parser), 5, 0); +lean::cnstr_set(x_9, 0, x_5); +lean::cnstr_set(x_9, 1, x_8); +x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); +lean::closure_set(x_10, 0, x_9); +x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_notation__symbol_parser), 5, 0); +x_12 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_12, 0, x_11); +lean::cnstr_set(x_12, 1, x_6); x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_6); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_lean_parser_term__parser__m_monad; -x_16 = l_lean_parser_term__parser__m_monad__except; -x_17 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_18 = l_lean_parser_term__parser__m_alternative; -x_19 = l_lean_parser_command_reserve__mixfix; -x_20 = l_lean_parser_command_reserve__mixfix_has__view; -lean::inc(x_20); +lean::cnstr_set(x_13, 0, x_10); +lean::cnstr_set(x_13, 1, x_12); +x_14 = l_lean_parser_term__parser__m_monad; +x_15 = l_lean_parser_term__parser__m_monad__except; +x_16 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_17 = l_lean_parser_term__parser__m_alternative; +x_18 = l_lean_parser_command_reserve__mixfix; +x_19 = l_lean_parser_command_reserve__mixfix_has__view; lean::inc(x_19); lean::inc(x_18); lean::inc(x_17); lean::inc(x_16); lean::inc(x_15); -x_27 = l_lean_parser_combinators_node_view___rarg(x_15, x_16, x_17, x_18, x_19, x_14, x_20); -return x_27; +lean::inc(x_14); +x_26 = l_lean_parser_combinators_node_view___rarg(x_14, x_15, x_16, x_17, x_18, x_13, x_19); +return x_26; } } obj* _init_l_lean_parser_command_reserve__mixfix_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; x_0 = lean::mk_string("reserve"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -21900,23 +21739,22 @@ lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); x_6 = lean::box(0); x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_mixfix_kind_parser), 5, 0); -lean::inc(x_6); +x_8 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_8, 0, x_7); +lean::cnstr_set(x_8, 1, x_6); x_9 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_6); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); -lean::closure_set(x_11, 0, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_notation__symbol_parser), 5, 0); +lean::cnstr_set(x_9, 0, x_5); +lean::cnstr_set(x_9, 1, x_8); +x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2), 6, 1); +lean::closure_set(x_10, 0, x_9); +x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_notation__symbol_parser), 5, 0); +x_12 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_12, 0, x_11); +lean::cnstr_set(x_12, 1, x_6); x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_6); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_13); -return x_14; +lean::cnstr_set(x_13, 0, x_10); +lean::cnstr_set(x_13, 1, x_12); +return x_13; } } obj* l_lean_parser_command_reserve__mixfix_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { diff --git a/src/boot/init/lean/parser/parsec.cpp b/src/boot/init/lean/parser/parsec.cpp index f7639cb879..4e2463ff94 100644 --- a/src/boot/init/lean/parser/parsec.cpp +++ b/src/boot/init/lean/parser/parsec.cpp @@ -692,19 +692,18 @@ return x_0; obj* _init_l_lean_parser_parsec_message_text___rarg___closed__3() { _start: { -obj* x_0; obj* x_2; obj* x_3; obj* x_4; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; x_0 = lean::box(0); -lean::inc(x_0); -x_2 = l_list_append___rarg(x_0, x_0); -x_3 = lean::mk_string("\n"); -x_4 = l_string_intercalate(x_3, x_2); -return x_4; +x_1 = l_list_append___rarg(x_0, x_0); +x_2 = lean::mk_string("\n"); +x_3 = l_string_intercalate(x_2, x_1); +return x_3; } } obj* l_lean_parser_parsec_message_text___rarg(obj* x_0) { _start: { -obj* x_1; obj* x_3; uint8 x_4; obj* x_5; obj* x_8; obj* x_9; uint8 x_12; +obj* x_1; obj* x_3; uint8 x_4; obj* x_5; obj* x_8; obj* x_9; uint8 x_11; x_1 = lean::cnstr_get(x_0, 1); lean::inc(x_1); x_3 = l_string_join___closed__1; @@ -714,77 +713,73 @@ lean::inc(x_5); lean::dec(x_0); x_8 = l_dlist_to__list___main___rarg(x_5); x_9 = lean::box(0); -lean::inc(x_9); lean::inc(x_8); -x_12 = l_list_has__dec__eq___main___at_lean_parser_parsec_message_text___spec__1(x_8, x_9); +x_11 = l_list_has__dec__eq___main___at_lean_parser_parsec_message_text___spec__1(x_8, x_9); if (x_4 == 0) { -obj* x_13; obj* x_15; obj* x_18; -x_13 = l_lean_parser_parsec_message_text___rarg___closed__1; -lean::inc(x_13); -x_15 = lean::string_append(x_13, x_1); +obj* x_12; obj* x_14; obj* x_16; +x_12 = l_lean_parser_parsec_message_text___rarg___closed__1; +lean::inc(x_12); +x_14 = lean::string_append(x_12, x_1); lean::dec(x_1); -lean::inc(x_9); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_15); -lean::cnstr_set(x_18, 1, x_9); -if (x_12 == 0) +x_16 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_16, 0, x_14); +lean::cnstr_set(x_16, 1, x_9); +if (x_11 == 0) { -obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; -x_19 = l_lean_parser_parsec_expected_to__string___main(x_8); -x_20 = l_lean_parser_parsec_message_text___rarg___closed__2; -lean::inc(x_20); -x_22 = lean::string_append(x_20, x_19); -lean::dec(x_19); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_9); -x_25 = l_list_append___rarg(x_18, x_24); -x_26 = l_lean_format_be___main___closed__1; -lean::inc(x_26); -x_28 = l_string_intercalate(x_26, x_25); -return x_28; +obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; +x_17 = l_lean_parser_parsec_expected_to__string___main(x_8); +x_18 = l_lean_parser_parsec_message_text___rarg___closed__2; +lean::inc(x_18); +x_20 = lean::string_append(x_18, x_17); +lean::dec(x_17); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 1, x_9); +x_23 = l_list_append___rarg(x_16, x_22); +x_24 = l_lean_format_be___main___closed__1; +lean::inc(x_24); +x_26 = l_string_intercalate(x_24, x_23); +return x_26; } else { -obj* x_30; obj* x_31; obj* x_33; +obj* x_28; obj* x_29; obj* x_31; lean::dec(x_8); -x_30 = l_list_append___rarg(x_18, x_9); -x_31 = l_lean_format_be___main___closed__1; -lean::inc(x_31); -x_33 = l_string_intercalate(x_31, x_30); -return x_33; +x_28 = l_list_append___rarg(x_16, x_9); +x_29 = l_lean_format_be___main___closed__1; +lean::inc(x_29); +x_31 = l_string_intercalate(x_29, x_28); +return x_31; } } else { lean::dec(x_1); -if (x_12 == 0) +if (x_11 == 0) { -obj* x_35; obj* x_36; obj* x_38; obj* x_41; obj* x_42; obj* x_43; obj* x_45; -x_35 = l_lean_parser_parsec_expected_to__string___main(x_8); -x_36 = l_lean_parser_parsec_message_text___rarg___closed__2; -lean::inc(x_36); -x_38 = lean::string_append(x_36, x_35); -lean::dec(x_35); -lean::inc(x_9); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_38); -lean::cnstr_set(x_41, 1, x_9); -x_42 = l_list_append___rarg(x_9, x_41); -x_43 = l_lean_format_be___main___closed__1; -lean::inc(x_43); -x_45 = l_string_intercalate(x_43, x_42); -return x_45; +obj* x_33; obj* x_34; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; +x_33 = l_lean_parser_parsec_expected_to__string___main(x_8); +x_34 = l_lean_parser_parsec_message_text___rarg___closed__2; +lean::inc(x_34); +x_36 = lean::string_append(x_34, x_33); +lean::dec(x_33); +x_38 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_38, 0, x_36); +lean::cnstr_set(x_38, 1, x_9); +x_39 = l_list_append___rarg(x_9, x_38); +x_40 = l_lean_format_be___main___closed__1; +lean::inc(x_40); +x_42 = l_string_intercalate(x_40, x_39); +return x_42; } else { -obj* x_48; +obj* x_44; lean::dec(x_8); -lean::dec(x_9); -x_48 = l_lean_parser_parsec_message_text___rarg___closed__3; -lean::inc(x_48); -return x_48; +x_44 = l_lean_parser_parsec_message_text___rarg___closed__3; +lean::inc(x_44); +return x_44; } } } @@ -3462,7 +3457,7 @@ return x_30; } else { -obj* x_32; obj* x_33; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_42; +obj* x_32; obj* x_33; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_41; lean::dec(x_0); x_32 = l_char_quote__core(x_16); x_33 = l_char_has__repr___closed__1; @@ -3472,10 +3467,9 @@ lean::dec(x_32); x_37 = lean::string_append(x_35, x_33); x_38 = lean::box(0); x_39 = l_mjoin___rarg___closed__1; -lean::inc(x_38); lean::inc(x_39); -x_42 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_not__followed__by__sat___spec__1___rarg(x_2, lean::box(0), x_37, x_39, x_38, x_38); -return x_42; +x_41 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_not__followed__by__sat___spec__1___rarg(x_2, lean::box(0), x_37, x_39, x_38, x_38); +return x_41; } } } @@ -3729,56 +3723,54 @@ lean::dec(x_0); x_6 = lean::string_iterator_has_next(x_4); if (x_6 == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_16; +obj* x_10; obj* x_11; obj* x_12; obj* x_15; lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); x_10 = lean::box(0); x_11 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_12 = l_mjoin___rarg___closed__1; -lean::inc(x_10); lean::inc(x_12); lean::inc(x_11); -x_16 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_satisfy___spec__1___rarg(x_1, lean::box(0), x_11, x_12, x_10, x_10); -return x_16; +x_15 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_satisfy___spec__1___rarg(x_1, lean::box(0), x_11, x_12, x_10, x_10); +return x_15; } else { -uint32 x_17; obj* x_18; obj* x_20; uint8 x_21; -x_17 = lean::string_iterator_curr(x_4); -x_18 = lean::box_uint32(x_17); -lean::inc(x_18); -x_20 = lean::apply_1(x_2, x_18); -x_21 = lean::unbox(x_20); -lean::dec(x_20); -if (x_21 == 0) +uint32 x_16; obj* x_17; obj* x_19; uint8 x_20; +x_16 = lean::string_iterator_curr(x_4); +x_17 = lean::box_uint32(x_16); +lean::inc(x_17); +x_19 = lean::apply_1(x_2, x_17); +x_20 = lean::unbox(x_19); +lean::dec(x_19); +if (x_20 == 0) { -obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_36; -lean::dec(x_18); +obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; lean::dec(x_4); lean::dec(x_3); -x_26 = l_char_quote__core(x_17); -x_27 = l_char_has__repr___closed__1; -lean::inc(x_27); -x_29 = lean::string_append(x_27, x_26); -lean::dec(x_26); -x_31 = lean::string_append(x_29, x_27); -x_32 = lean::box(0); -x_33 = l_mjoin___rarg___closed__1; +lean::dec(x_17); +x_25 = l_char_quote__core(x_16); +x_26 = l_char_has__repr___closed__1; +lean::inc(x_26); +x_28 = lean::string_append(x_26, x_25); +lean::dec(x_25); +x_30 = lean::string_append(x_28, x_26); +x_31 = lean::box(0); +x_32 = l_mjoin___rarg___closed__1; lean::inc(x_32); -lean::inc(x_33); -x_36 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_satisfy___spec__2___rarg(x_1, lean::box(0), x_31, x_33, x_32, x_32); -return x_36; +x_34 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_satisfy___spec__2___rarg(x_1, lean::box(0), x_30, x_32, x_31, x_31); +return x_34; } else { -obj* x_38; obj* x_39; +obj* x_36; obj* x_37; lean::dec(x_1); -x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_38, 0, x_4); -lean::closure_set(x_38, 1, x_18); -x_39 = lean::apply_2(x_3, lean::box(0), x_38); -return x_39; +x_36 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_36, 0, x_4); +lean::closure_set(x_36, 1, x_17); +x_37 = lean::apply_2(x_3, lean::box(0), x_36); +return x_37; } } } @@ -3887,51 +3879,49 @@ lean::dec(x_0); x_6 = lean::string_iterator_has_next(x_4); if (x_6 == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_15; +obj* x_9; obj* x_10; obj* x_11; obj* x_14; lean::dec(x_4); lean::dec(x_3); x_9 = lean::box(0); x_10 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_11 = l_mjoin___rarg___closed__1; -lean::inc(x_9); lean::inc(x_11); lean::inc(x_10); -x_15 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_ch___spec__1___rarg(x_1, lean::box(0), x_10, x_11, x_9, x_9); -return x_15; +x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_ch___spec__1___rarg(x_1, lean::box(0), x_10, x_11, x_9, x_9); +return x_14; } else { -uint32 x_16; uint8 x_17; -x_16 = lean::string_iterator_curr(x_4); -x_17 = x_16 == x_2; -if (x_17 == 0) +uint32 x_15; uint8 x_16; +x_15 = lean::string_iterator_curr(x_4); +x_16 = x_15 == x_2; +if (x_16 == 0) { -obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_30; +obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; lean::dec(x_4); lean::dec(x_3); -x_20 = l_char_quote__core(x_16); -x_21 = l_char_has__repr___closed__1; -lean::inc(x_21); -x_23 = lean::string_append(x_21, x_20); -lean::dec(x_20); -x_25 = lean::string_append(x_23, x_21); -x_26 = lean::box(0); -x_27 = l_mjoin___rarg___closed__1; +x_19 = l_char_quote__core(x_15); +x_20 = l_char_has__repr___closed__1; +lean::inc(x_20); +x_22 = lean::string_append(x_20, x_19); +lean::dec(x_19); +x_24 = lean::string_append(x_22, x_20); +x_25 = lean::box(0); +x_26 = l_mjoin___rarg___closed__1; lean::inc(x_26); -lean::inc(x_27); -x_30 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_ch___spec__2___rarg(x_1, lean::box(0), x_25, x_27, x_26, x_26); -return x_30; +x_28 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_ch___spec__2___rarg(x_1, lean::box(0), x_24, x_26, x_25, x_25); +return x_28; } else { -obj* x_32; obj* x_33; obj* x_34; +obj* x_30; obj* x_31; obj* x_32; lean::dec(x_1); -x_32 = lean::box_uint32(x_16); -x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_33, 0, x_4); -lean::closure_set(x_33, 1, x_32); -x_34 = lean::apply_2(x_3, lean::box(0), x_33); -return x_34; +x_30 = lean::box_uint32(x_15); +x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_31, 0, x_4); +lean::closure_set(x_31, 1, x_30); +x_32 = lean::apply_2(x_3, lean::box(0), x_31); +return x_32; } } } @@ -4050,51 +4040,49 @@ lean::dec(x_0); x_5 = lean::string_iterator_has_next(x_3); if (x_5 == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_3); lean::dec(x_2); x_8 = lean::box(0); x_9 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_alpha___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_alpha___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); +return x_13; } else { -uint32 x_15; uint8 x_16; -x_15 = lean::string_iterator_curr(x_3); -x_16 = l_char_is__alpha(x_15); -if (x_16 == 0) +uint32 x_14; uint8 x_15; +x_14 = lean::string_iterator_curr(x_3); +x_15 = l_char_is__alpha(x_14); +if (x_15 == 0) { -obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_29; +obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; lean::dec(x_3); lean::dec(x_2); -x_19 = l_char_quote__core(x_15); -x_20 = l_char_has__repr___closed__1; -lean::inc(x_20); -x_22 = lean::string_append(x_20, x_19); -lean::dec(x_19); -x_24 = lean::string_append(x_22, x_20); -x_25 = lean::box(0); -x_26 = l_mjoin___rarg___closed__1; +x_18 = l_char_quote__core(x_14); +x_19 = l_char_has__repr___closed__1; +lean::inc(x_19); +x_21 = lean::string_append(x_19, x_18); +lean::dec(x_18); +x_23 = lean::string_append(x_21, x_19); +x_24 = lean::box(0); +x_25 = l_mjoin___rarg___closed__1; lean::inc(x_25); -lean::inc(x_26); -x_29 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_alpha___spec__2___rarg(x_1, lean::box(0), x_24, x_26, x_25, x_25); -return x_29; +x_27 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_alpha___spec__2___rarg(x_1, lean::box(0), x_23, x_25, x_24, x_24); +return x_27; } else { -obj* x_31; obj* x_32; obj* x_33; +obj* x_29; obj* x_30; obj* x_31; lean::dec(x_1); -x_31 = lean::box_uint32(x_15); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_32, 0, x_3); -lean::closure_set(x_32, 1, x_31); -x_33 = lean::apply_2(x_2, lean::box(0), x_32); -return x_33; +x_29 = lean::box_uint32(x_14); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_30, 0, x_3); +lean::closure_set(x_30, 1, x_29); +x_31 = lean::apply_2(x_2, lean::box(0), x_30); +return x_31; } } } @@ -4193,51 +4181,49 @@ lean::dec(x_0); x_5 = lean::string_iterator_has_next(x_3); if (x_5 == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_3); lean::dec(x_2); x_8 = lean::box(0); x_9 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_digit___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_digit___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); +return x_13; } else { -uint32 x_15; uint8 x_16; -x_15 = lean::string_iterator_curr(x_3); -x_16 = l_char_is__digit(x_15); -if (x_16 == 0) +uint32 x_14; uint8 x_15; +x_14 = lean::string_iterator_curr(x_3); +x_15 = l_char_is__digit(x_14); +if (x_15 == 0) { -obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_29; +obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; lean::dec(x_3); lean::dec(x_2); -x_19 = l_char_quote__core(x_15); -x_20 = l_char_has__repr___closed__1; -lean::inc(x_20); -x_22 = lean::string_append(x_20, x_19); -lean::dec(x_19); -x_24 = lean::string_append(x_22, x_20); -x_25 = lean::box(0); -x_26 = l_mjoin___rarg___closed__1; +x_18 = l_char_quote__core(x_14); +x_19 = l_char_has__repr___closed__1; +lean::inc(x_19); +x_21 = lean::string_append(x_19, x_18); +lean::dec(x_18); +x_23 = lean::string_append(x_21, x_19); +x_24 = lean::box(0); +x_25 = l_mjoin___rarg___closed__1; lean::inc(x_25); -lean::inc(x_26); -x_29 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_digit___spec__2___rarg(x_1, lean::box(0), x_24, x_26, x_25, x_25); -return x_29; +x_27 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_digit___spec__2___rarg(x_1, lean::box(0), x_23, x_25, x_24, x_24); +return x_27; } else { -obj* x_31; obj* x_32; obj* x_33; +obj* x_29; obj* x_30; obj* x_31; lean::dec(x_1); -x_31 = lean::box_uint32(x_15); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_32, 0, x_3); -lean::closure_set(x_32, 1, x_31); -x_33 = lean::apply_2(x_2, lean::box(0), x_32); -return x_33; +x_29 = lean::box_uint32(x_14); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_30, 0, x_3); +lean::closure_set(x_30, 1, x_29); +x_31 = lean::apply_2(x_2, lean::box(0), x_30); +return x_31; } } } @@ -4336,51 +4322,49 @@ lean::dec(x_0); x_5 = lean::string_iterator_has_next(x_3); if (x_5 == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_3); lean::dec(x_2); x_8 = lean::box(0); x_9 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_upper___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_upper___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); +return x_13; } else { -uint32 x_15; uint8 x_16; -x_15 = lean::string_iterator_curr(x_3); -x_16 = l_char_is__upper(x_15); -if (x_16 == 0) +uint32 x_14; uint8 x_15; +x_14 = lean::string_iterator_curr(x_3); +x_15 = l_char_is__upper(x_14); +if (x_15 == 0) { -obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_29; +obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; lean::dec(x_3); lean::dec(x_2); -x_19 = l_char_quote__core(x_15); -x_20 = l_char_has__repr___closed__1; -lean::inc(x_20); -x_22 = lean::string_append(x_20, x_19); -lean::dec(x_19); -x_24 = lean::string_append(x_22, x_20); -x_25 = lean::box(0); -x_26 = l_mjoin___rarg___closed__1; +x_18 = l_char_quote__core(x_14); +x_19 = l_char_has__repr___closed__1; +lean::inc(x_19); +x_21 = lean::string_append(x_19, x_18); +lean::dec(x_18); +x_23 = lean::string_append(x_21, x_19); +x_24 = lean::box(0); +x_25 = l_mjoin___rarg___closed__1; lean::inc(x_25); -lean::inc(x_26); -x_29 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_upper___spec__2___rarg(x_1, lean::box(0), x_24, x_26, x_25, x_25); -return x_29; +x_27 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_upper___spec__2___rarg(x_1, lean::box(0), x_23, x_25, x_24, x_24); +return x_27; } else { -obj* x_31; obj* x_32; obj* x_33; +obj* x_29; obj* x_30; obj* x_31; lean::dec(x_1); -x_31 = lean::box_uint32(x_15); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_32, 0, x_3); -lean::closure_set(x_32, 1, x_31); -x_33 = lean::apply_2(x_2, lean::box(0), x_32); -return x_33; +x_29 = lean::box_uint32(x_14); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_30, 0, x_3); +lean::closure_set(x_30, 1, x_29); +x_31 = lean::apply_2(x_2, lean::box(0), x_30); +return x_31; } } } @@ -4479,51 +4463,49 @@ lean::dec(x_0); x_5 = lean::string_iterator_has_next(x_3); if (x_5 == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_3); lean::dec(x_2); x_8 = lean::box(0); x_9 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_lower___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_lower___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); +return x_13; } else { -uint32 x_15; uint8 x_16; -x_15 = lean::string_iterator_curr(x_3); -x_16 = l_char_is__lower(x_15); -if (x_16 == 0) +uint32 x_14; uint8 x_15; +x_14 = lean::string_iterator_curr(x_3); +x_15 = l_char_is__lower(x_14); +if (x_15 == 0) { -obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_29; +obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; lean::dec(x_3); lean::dec(x_2); -x_19 = l_char_quote__core(x_15); -x_20 = l_char_has__repr___closed__1; -lean::inc(x_20); -x_22 = lean::string_append(x_20, x_19); -lean::dec(x_19); -x_24 = lean::string_append(x_22, x_20); -x_25 = lean::box(0); -x_26 = l_mjoin___rarg___closed__1; +x_18 = l_char_quote__core(x_14); +x_19 = l_char_has__repr___closed__1; +lean::inc(x_19); +x_21 = lean::string_append(x_19, x_18); +lean::dec(x_18); +x_23 = lean::string_append(x_21, x_19); +x_24 = lean::box(0); +x_25 = l_mjoin___rarg___closed__1; lean::inc(x_25); -lean::inc(x_26); -x_29 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_lower___spec__2___rarg(x_1, lean::box(0), x_24, x_26, x_25, x_25); -return x_29; +x_27 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_lower___spec__2___rarg(x_1, lean::box(0), x_23, x_25, x_24, x_24); +return x_27; } else { -obj* x_31; obj* x_32; obj* x_33; +obj* x_29; obj* x_30; obj* x_31; lean::dec(x_1); -x_31 = lean::box_uint32(x_15); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_32, 0, x_3); -lean::closure_set(x_32, 1, x_31); -x_33 = lean::apply_2(x_2, lean::box(0), x_32); -return x_33; +x_29 = lean::box_uint32(x_14); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_30, 0, x_3); +lean::closure_set(x_30, 1, x_29); +x_31 = lean::apply_2(x_2, lean::box(0), x_30); +return x_31; } } } @@ -4622,51 +4604,49 @@ lean::dec(x_0); x_5 = lean::string_iterator_has_next(x_3); if (x_5 == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_3); lean::dec(x_2); x_8 = lean::box(0); x_9 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_any___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_any___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); +return x_13; } else { -uint32 x_15; uint8 x_16; -x_15 = lean::string_iterator_curr(x_3); -x_16 = l_true_decidable; -if (x_16 == 0) +uint32 x_14; uint8 x_15; +x_14 = lean::string_iterator_curr(x_3); +x_15 = l_true_decidable; +if (x_15 == 0) { -obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_29; +obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; lean::dec(x_3); lean::dec(x_2); -x_19 = l_char_quote__core(x_15); -x_20 = l_char_has__repr___closed__1; -lean::inc(x_20); -x_22 = lean::string_append(x_20, x_19); -lean::dec(x_19); -x_24 = lean::string_append(x_22, x_20); -x_25 = lean::box(0); -x_26 = l_mjoin___rarg___closed__1; +x_18 = l_char_quote__core(x_14); +x_19 = l_char_has__repr___closed__1; +lean::inc(x_19); +x_21 = lean::string_append(x_19, x_18); +lean::dec(x_18); +x_23 = lean::string_append(x_21, x_19); +x_24 = lean::box(0); +x_25 = l_mjoin___rarg___closed__1; lean::inc(x_25); -lean::inc(x_26); -x_29 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_any___spec__2___rarg(x_1, lean::box(0), x_24, x_26, x_25, x_25); -return x_29; +x_27 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_any___spec__2___rarg(x_1, lean::box(0), x_23, x_25, x_24, x_24); +return x_27; } else { -obj* x_31; obj* x_32; obj* x_33; +obj* x_29; obj* x_30; obj* x_31; lean::dec(x_1); -x_31 = lean::box_uint32(x_15); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_32, 0, x_3); -lean::closure_set(x_32, 1, x_31); -x_33 = lean::apply_2(x_2, lean::box(0), x_32); -return x_33; +x_29 = lean::box_uint32(x_14); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_30, 0, x_3); +lean::closure_set(x_30, 1, x_29); +x_31 = lean::apply_2(x_2, lean::box(0), x_30); +return x_31; } } } @@ -5269,56 +5249,54 @@ lean::dec(x_0); x_6 = lean::string_iterator_has_next(x_4); if (x_6 == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_16; +obj* x_10; obj* x_11; obj* x_12; obj* x_15; lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); x_10 = lean::box(0); x_11 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_12 = l_mjoin___rarg___closed__1; -lean::inc(x_10); lean::inc(x_12); lean::inc(x_11); -x_16 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_take__while1___spec__1___rarg(x_1, lean::box(0), x_11, x_12, x_10, x_10); -return x_16; +x_15 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_take__while1___spec__1___rarg(x_1, lean::box(0), x_11, x_12, x_10, x_10); +return x_15; } else { -uint32 x_17; obj* x_18; obj* x_20; uint8 x_21; -x_17 = lean::string_iterator_curr(x_4); -x_18 = lean::box_uint32(x_17); -lean::inc(x_18); -x_20 = lean::apply_1(x_2, x_18); -x_21 = lean::unbox(x_20); -lean::dec(x_20); -if (x_21 == 0) +uint32 x_16; obj* x_17; obj* x_19; uint8 x_20; +x_16 = lean::string_iterator_curr(x_4); +x_17 = lean::box_uint32(x_16); +lean::inc(x_17); +x_19 = lean::apply_1(x_2, x_17); +x_20 = lean::unbox(x_19); +lean::dec(x_19); +if (x_20 == 0) { -obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_36; -lean::dec(x_18); +obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; lean::dec(x_4); lean::dec(x_3); -x_26 = l_char_quote__core(x_17); -x_27 = l_char_has__repr___closed__1; -lean::inc(x_27); -x_29 = lean::string_append(x_27, x_26); -lean::dec(x_26); -x_31 = lean::string_append(x_29, x_27); -x_32 = lean::box(0); -x_33 = l_mjoin___rarg___closed__1; +lean::dec(x_17); +x_25 = l_char_quote__core(x_16); +x_26 = l_char_has__repr___closed__1; +lean::inc(x_26); +x_28 = lean::string_append(x_26, x_25); +lean::dec(x_25); +x_30 = lean::string_append(x_28, x_26); +x_31 = lean::box(0); +x_32 = l_mjoin___rarg___closed__1; lean::inc(x_32); -lean::inc(x_33); -x_36 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_take__while1___spec__2___rarg(x_1, lean::box(0), x_31, x_33, x_32, x_32); -return x_36; +x_34 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_take__while1___spec__2___rarg(x_1, lean::box(0), x_30, x_32, x_31, x_31); +return x_34; } else { -obj* x_38; obj* x_39; +obj* x_36; obj* x_37; lean::dec(x_1); -x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_38, 0, x_4); -lean::closure_set(x_38, 1, x_18); -x_39 = lean::apply_2(x_3, lean::box(0), x_38); -return x_39; +x_36 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_36, 0, x_4); +lean::closure_set(x_36, 1, x_17); +x_37 = lean::apply_2(x_3, lean::box(0), x_36); +return x_37; } } } @@ -5678,56 +5656,54 @@ lean::dec(x_0); x_6 = lean::string_iterator_has_next(x_4); if (x_6 == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_16; +obj* x_10; obj* x_11; obj* x_12; obj* x_15; lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); x_10 = lean::box(0); x_11 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_12 = l_mjoin___rarg___closed__1; -lean::inc(x_10); lean::inc(x_12); lean::inc(x_11); -x_16 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_take__until1___spec__2___rarg(x_1, lean::box(0), x_11, x_12, x_10, x_10); -return x_16; +x_15 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_take__until1___spec__2___rarg(x_1, lean::box(0), x_11, x_12, x_10, x_10); +return x_15; } else { -uint32 x_17; obj* x_18; obj* x_20; uint8 x_21; -x_17 = lean::string_iterator_curr(x_4); -x_18 = lean::box_uint32(x_17); -lean::inc(x_18); -x_20 = lean::apply_1(x_2, x_18); -x_21 = lean::unbox(x_20); -lean::dec(x_20); -if (x_21 == 0) +uint32 x_16; obj* x_17; obj* x_19; uint8 x_20; +x_16 = lean::string_iterator_curr(x_4); +x_17 = lean::box_uint32(x_16); +lean::inc(x_17); +x_19 = lean::apply_1(x_2, x_17); +x_20 = lean::unbox(x_19); +lean::dec(x_19); +if (x_20 == 0) { -obj* x_24; obj* x_25; +obj* x_23; obj* x_24; lean::dec(x_1); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_24, 0, x_4); -lean::closure_set(x_24, 1, x_18); -x_25 = lean::apply_2(x_3, lean::box(0), x_24); -return x_25; +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_23, 0, x_4); +lean::closure_set(x_23, 1, x_17); +x_24 = lean::apply_2(x_3, lean::box(0), x_23); +return x_24; } else { -obj* x_29; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_39; -lean::dec(x_18); +obj* x_28; obj* x_29; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_37; lean::dec(x_4); lean::dec(x_3); -x_29 = l_char_quote__core(x_17); -x_30 = l_char_has__repr___closed__1; -lean::inc(x_30); -x_32 = lean::string_append(x_30, x_29); -lean::dec(x_29); -x_34 = lean::string_append(x_32, x_30); -x_35 = lean::box(0); -x_36 = l_mjoin___rarg___closed__1; +lean::dec(x_17); +x_28 = l_char_quote__core(x_16); +x_29 = l_char_has__repr___closed__1; +lean::inc(x_29); +x_31 = lean::string_append(x_29, x_28); +lean::dec(x_28); +x_33 = lean::string_append(x_31, x_29); +x_34 = lean::box(0); +x_35 = l_mjoin___rarg___closed__1; lean::inc(x_35); -lean::inc(x_36); -x_39 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_take__until1___spec__3___rarg(x_1, lean::box(0), x_34, x_36, x_35, x_35); -return x_39; +x_37 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_take__until1___spec__3___rarg(x_1, lean::box(0), x_33, x_35, x_34, x_34); +return x_37; } } } @@ -5814,14 +5790,13 @@ return x_5; } else { -obj* x_6; obj* x_8; +obj* x_6; obj* x_7; x_6 = lean::box(0); -lean::inc(x_6); -x_8 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_8, 0, x_6); -lean::cnstr_set(x_8, 1, x_1); -lean::cnstr_set(x_8, 2, x_6); -return x_8; +x_7 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_1); +lean::cnstr_set(x_7, 2, x_6); +return x_7; } } } @@ -6047,56 +6022,54 @@ lean::dec(x_0); x_6 = lean::string_iterator_has_next(x_4); if (x_6 == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_16; +obj* x_10; obj* x_11; obj* x_12; obj* x_15; lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); x_10 = lean::box(0); x_11 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_12 = l_mjoin___rarg___closed__1; -lean::inc(x_10); lean::inc(x_12); lean::inc(x_11); -x_16 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_take__while1_x_27___spec__1___rarg(x_1, lean::box(0), x_11, x_12, x_10, x_10); -return x_16; +x_15 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_take__while1_x_27___spec__1___rarg(x_1, lean::box(0), x_11, x_12, x_10, x_10); +return x_15; } else { -uint32 x_17; obj* x_18; obj* x_20; uint8 x_21; -x_17 = lean::string_iterator_curr(x_4); -x_18 = lean::box_uint32(x_17); -lean::inc(x_18); -x_20 = lean::apply_1(x_2, x_18); -x_21 = lean::unbox(x_20); -lean::dec(x_20); -if (x_21 == 0) +uint32 x_16; obj* x_17; obj* x_19; uint8 x_20; +x_16 = lean::string_iterator_curr(x_4); +x_17 = lean::box_uint32(x_16); +lean::inc(x_17); +x_19 = lean::apply_1(x_2, x_17); +x_20 = lean::unbox(x_19); +lean::dec(x_19); +if (x_20 == 0) { -obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_36; -lean::dec(x_18); +obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; lean::dec(x_4); lean::dec(x_3); -x_26 = l_char_quote__core(x_17); -x_27 = l_char_has__repr___closed__1; -lean::inc(x_27); -x_29 = lean::string_append(x_27, x_26); -lean::dec(x_26); -x_31 = lean::string_append(x_29, x_27); -x_32 = lean::box(0); -x_33 = l_mjoin___rarg___closed__1; +lean::dec(x_17); +x_25 = l_char_quote__core(x_16); +x_26 = l_char_has__repr___closed__1; +lean::inc(x_26); +x_28 = lean::string_append(x_26, x_25); +lean::dec(x_25); +x_30 = lean::string_append(x_28, x_26); +x_31 = lean::box(0); +x_32 = l_mjoin___rarg___closed__1; lean::inc(x_32); -lean::inc(x_33); -x_36 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_take__while1_x_27___spec__2___rarg(x_1, lean::box(0), x_31, x_33, x_32, x_32); -return x_36; +x_34 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_take__while1_x_27___spec__2___rarg(x_1, lean::box(0), x_30, x_32, x_31, x_31); +return x_34; } else { -obj* x_38; obj* x_39; +obj* x_36; obj* x_37; lean::dec(x_1); -x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_38, 0, x_4); -lean::closure_set(x_38, 1, x_18); -x_39 = lean::apply_2(x_3, lean::box(0), x_38); -return x_39; +x_36 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_36, 0, x_4); +lean::closure_set(x_36, 1, x_17); +x_37 = lean::apply_2(x_3, lean::box(0), x_36); +return x_37; } } } @@ -6464,51 +6437,49 @@ lean::dec(x_0); x_5 = lean::string_iterator_has_next(x_3); if (x_5 == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_3); lean::dec(x_2); x_8 = lean::box(0); x_9 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_num___spec__2___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_num___spec__2___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); +return x_13; } else { -uint32 x_15; uint8 x_16; -x_15 = lean::string_iterator_curr(x_3); -x_16 = l_char_is__digit(x_15); -if (x_16 == 0) +uint32 x_14; uint8 x_15; +x_14 = lean::string_iterator_curr(x_3); +x_15 = l_char_is__digit(x_14); +if (x_15 == 0) { -obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_29; +obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; lean::dec(x_3); lean::dec(x_2); -x_19 = l_char_quote__core(x_15); -x_20 = l_char_has__repr___closed__1; -lean::inc(x_20); -x_22 = lean::string_append(x_20, x_19); -lean::dec(x_19); -x_24 = lean::string_append(x_22, x_20); -x_25 = lean::box(0); -x_26 = l_mjoin___rarg___closed__1; +x_18 = l_char_quote__core(x_14); +x_19 = l_char_has__repr___closed__1; +lean::inc(x_19); +x_21 = lean::string_append(x_19, x_18); +lean::dec(x_18); +x_23 = lean::string_append(x_21, x_19); +x_24 = lean::box(0); +x_25 = l_mjoin___rarg___closed__1; lean::inc(x_25); -lean::inc(x_26); -x_29 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_num___spec__3___rarg(x_1, lean::box(0), x_24, x_26, x_25, x_25); -return x_29; +x_27 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_num___spec__3___rarg(x_1, lean::box(0), x_23, x_25, x_24, x_24); +return x_27; } else { -obj* x_31; obj* x_32; obj* x_33; +obj* x_29; obj* x_30; obj* x_31; lean::dec(x_1); -x_31 = lean::box_uint32(x_15); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_32, 0, x_3); -lean::closure_set(x_32, 1, x_31); -x_33 = lean::apply_2(x_2, lean::box(0), x_32); -return x_33; +x_29 = lean::box_uint32(x_14); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_30, 0, x_3); +lean::closure_set(x_30, 1, x_29); +x_31 = lean::apply_2(x_2, lean::box(0), x_30); +return x_31; } } } @@ -6648,7 +6619,7 @@ x_6 = lean::nat_dec_le(x_0, x_4); lean::dec(x_4); if (x_6 == 0) { -obj* x_9; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_21; +obj* x_9; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_20; lean::dec(x_1); x_9 = l_nat_repr(x_0); x_10 = l_lean_parser_monad__parsec_ensure___rarg___lambda__1___closed__1; @@ -6661,25 +6632,24 @@ x_16 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_16, 0, x_15); x_17 = lean::box(0); x_18 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; -lean::inc(x_17); lean::inc(x_18); -x_21 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_ensure___spec__1___rarg(x_2, lean::box(0), x_18, x_16, x_17, x_17); -return x_21; +x_20 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_ensure___spec__1___rarg(x_2, lean::box(0), x_18, x_16, x_17, x_17); +return x_20; } else { -obj* x_24; obj* x_27; obj* x_30; obj* x_31; +obj* x_23; obj* x_26; obj* x_29; obj* x_30; lean::dec(x_0); lean::dec(x_2); -x_24 = lean::cnstr_get(x_1, 0); -lean::inc(x_24); +x_23 = lean::cnstr_get(x_1, 0); +lean::inc(x_23); lean::dec(x_1); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -lean::dec(x_24); -x_30 = lean::box(0); -x_31 = lean::apply_2(x_27, lean::box(0), x_30); -return x_31; +x_26 = lean::cnstr_get(x_23, 1); +lean::inc(x_26); +lean::dec(x_23); +x_29 = lean::box(0); +x_30 = lean::apply_2(x_26, lean::box(0), x_29); +return x_30; } } } @@ -6952,7 +6922,7 @@ lean::dec(x_4); lean::dec(x_3); if (x_5 == 0) { -uint32 x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_21; +uint32 x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_20; lean::dec(x_0); x_9 = lean::string_iterator_curr(x_2); lean::dec(x_2); @@ -6964,25 +6934,24 @@ lean::dec(x_11); x_16 = lean::string_append(x_14, x_12); x_17 = lean::box(0); x_18 = l_lean_parser_monad__parsec_eoi___rarg___lambda__1___closed__1; -lean::inc(x_17); lean::inc(x_18); -x_21 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_eoi___spec__1___rarg(x_1, lean::box(0), x_16, x_18, x_17, x_17); -return x_21; +x_20 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_eoi___spec__1___rarg(x_1, lean::box(0), x_16, x_18, x_17, x_17); +return x_20; } else { -obj* x_24; obj* x_27; obj* x_30; obj* x_31; +obj* x_23; obj* x_26; obj* x_29; obj* x_30; lean::dec(x_1); lean::dec(x_2); -x_24 = lean::cnstr_get(x_0, 0); -lean::inc(x_24); +x_23 = lean::cnstr_get(x_0, 0); +lean::inc(x_23); lean::dec(x_0); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -lean::dec(x_24); -x_30 = lean::box(0); -x_31 = lean::apply_2(x_27, lean::box(0), x_30); -return x_31; +x_26 = lean::cnstr_get(x_23, 1); +lean::inc(x_26); +lean::dec(x_23); +x_29 = lean::box(0); +x_30 = lean::apply_2(x_26, lean::box(0), x_29); +return x_30; } } } @@ -7536,18 +7505,17 @@ return x_15; } else { -obj* x_19; obj* x_20; obj* x_21; obj* x_25; +obj* x_19; obj* x_20; obj* x_21; obj* x_24; lean::dec(x_4); lean::dec(x_3); lean::dec(x_0); x_19 = lean::box(0); x_20 = l_lean_parser_monad__parsec_fix__aux___main___rarg___closed__1; x_21 = l_mjoin___rarg___closed__1; -lean::inc(x_19); lean::inc(x_21); lean::inc(x_20); -x_25 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_fix__aux___main___spec__1___rarg(x_1, lean::box(0), x_20, x_21, x_19, x_19); -return x_25; +x_24 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_fix__aux___main___spec__1___rarg(x_1, lean::box(0), x_20, x_21, x_19, x_19); +return x_24; } } } @@ -7941,15 +7909,14 @@ return x_6; obj* l_lean_parser_monad__parsec_unexpected___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { -obj* x_6; obj* x_7; obj* x_10; +obj* x_6; obj* x_7; obj* x_9; lean::dec(x_2); lean::dec(x_0); x_6 = lean::box(0); x_7 = l_mjoin___rarg___closed__1; -lean::inc(x_6); lean::inc(x_7); -x_10 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_unexpected___spec__1___rarg(x_1, lean::box(0), x_3, x_7, x_6, x_6); -return x_10; +x_9 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_unexpected___spec__1___rarg(x_1, lean::box(0), x_3, x_7, x_6, x_6); +return x_9; } } obj* l_lean_parser_monad__parsec_unexpected(obj* x_0, obj* x_1) { @@ -8139,19 +8106,18 @@ goto lbl_11; } lbl_11: { -obj* x_48; obj* x_50; obj* x_51; obj* x_52; +obj* x_48; obj* x_49; obj* x_50; obj* x_51; lean::dec(x_10); x_48 = lean::box(0); -lean::inc(x_48); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_1); -lean::cnstr_set(x_50, 1, x_48); -x_51 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_3); -lean::cnstr_set(x_51, 2, x_48); -x_52 = lean::apply_2(x_7, lean::box(0), x_51); -return x_52; +x_49 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_49, 0, x_1); +lean::cnstr_set(x_49, 1, x_48); +x_50 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_50, 0, x_49); +lean::cnstr_set(x_50, 1, x_3); +lean::cnstr_set(x_50, 2, x_48); +x_51 = lean::apply_2(x_7, lean::box(0), x_50); +return x_51; } } } @@ -8310,56 +8276,55 @@ _start: lean::dec(x_2); if (lean::obj_tag(x_5) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_15; obj* x_16; obj* x_19; obj* x_22; +obj* x_9; obj* x_10; obj* x_11; obj* x_14; obj* x_15; obj* x_18; obj* x_21; lean::dec(x_1); lean::dec(x_3); x_9 = lean::box(0); x_10 = l_list_mfoldr___main___at_lean_parser_monad__parsec_longest__match___spec__2___rarg___closed__1; x_11 = l_mjoin___rarg___closed__1; -lean::inc(x_9); lean::inc(x_11); lean::inc(x_10); -x_15 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_longest__match___spec__1___rarg(x_10, x_11, x_9, x_9, x_4); -x_16 = lean::cnstr_get(x_0, 0); -lean::inc(x_16); +x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_monad__parsec_longest__match___spec__1___rarg(x_10, x_11, x_9, x_9, x_4); +x_15 = lean::cnstr_get(x_0, 0); +lean::inc(x_15); lean::dec(x_0); -x_19 = lean::cnstr_get(x_16, 1); -lean::inc(x_19); -lean::dec(x_16); -x_22 = lean::apply_2(x_19, lean::box(0), x_15); -return x_22; +x_18 = lean::cnstr_get(x_15, 1); +lean::inc(x_18); +lean::dec(x_15); +x_21 = lean::apply_2(x_18, lean::box(0), x_14); +return x_21; } else { -obj* x_23; obj* x_25; obj* x_28; obj* x_30; obj* x_32; obj* x_34; obj* x_39; obj* x_41; obj* x_42; -x_23 = lean::cnstr_get(x_5, 0); -lean::inc(x_23); -x_25 = lean::cnstr_get(x_5, 1); -lean::inc(x_25); +obj* x_22; obj* x_24; obj* x_27; obj* x_29; obj* x_31; obj* x_33; obj* x_38; obj* x_40; obj* x_41; +x_22 = lean::cnstr_get(x_5, 0); +lean::inc(x_22); +x_24 = lean::cnstr_get(x_5, 1); +lean::inc(x_24); lean::dec(x_5); -x_28 = lean::cnstr_get(x_0, 1); -lean::inc(x_28); -x_30 = lean::cnstr_get(x_1, 0); -lean::inc(x_30); -x_32 = l_lean_parser_monad__parsec_left__over___rarg___closed__1; -lean::inc(x_32); -x_34 = lean::apply_2(x_30, lean::box(0), x_32); +x_27 = lean::cnstr_get(x_0, 1); +lean::inc(x_27); +x_29 = lean::cnstr_get(x_1, 0); +lean::inc(x_29); +x_31 = l_lean_parser_monad__parsec_left__over___rarg___closed__1; +lean::inc(x_31); +x_33 = lean::apply_2(x_29, lean::box(0), x_31); lean::inc(x_4); lean::inc(x_3); lean::inc(x_1); lean::inc(x_0); -x_39 = l_list_mfoldr___main___at_lean_parser_monad__parsec_longest__match___spec__2___rarg(x_0, x_1, lean::box(0), x_3, x_4, x_25); -lean::inc(x_28); -x_41 = lean::alloc_closure(reinterpret_cast(l_list_mfoldr___main___at_lean_parser_monad__parsec_longest__match___spec__2___rarg___lambda__4), 8, 7); -lean::closure_set(x_41, 0, x_3); -lean::closure_set(x_41, 1, x_0); -lean::closure_set(x_41, 2, x_28); -lean::closure_set(x_41, 3, x_34); -lean::closure_set(x_41, 4, x_23); -lean::closure_set(x_41, 5, x_4); -lean::closure_set(x_41, 6, x_1); -x_42 = lean::apply_4(x_28, lean::box(0), lean::box(0), x_39, x_41); -return x_42; +x_38 = l_list_mfoldr___main___at_lean_parser_monad__parsec_longest__match___spec__2___rarg(x_0, x_1, lean::box(0), x_3, x_4, x_24); +lean::inc(x_27); +x_40 = lean::alloc_closure(reinterpret_cast(l_list_mfoldr___main___at_lean_parser_monad__parsec_longest__match___spec__2___rarg___lambda__4), 8, 7); +lean::closure_set(x_40, 0, x_3); +lean::closure_set(x_40, 1, x_0); +lean::closure_set(x_40, 2, x_27); +lean::closure_set(x_40, 3, x_33); +lean::closure_set(x_40, 4, x_22); +lean::closure_set(x_40, 5, x_4); +lean::closure_set(x_40, 6, x_1); +x_41 = lean::apply_4(x_27, lean::box(0), lean::box(0), x_38, x_40); +return x_41; } } } @@ -8569,7 +8534,7 @@ lean::dec(x_20); lean::dec(x_19); if (x_21 == 0) { -uint32 x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_39; obj* x_40; +uint32 x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_39; lean::dec(x_3); lean::dec(x_11); lean::dec(x_2); @@ -8583,57 +8548,56 @@ lean::dec(x_29); x_34 = lean::string_append(x_32, x_30); x_35 = lean::box(0); x_36 = l_lean_parser_monad__parsec_eoi___rarg___lambda__1___closed__1; -lean::inc(x_35); lean::inc(x_36); -x_39 = l_lean_parser_monad__parsec_error___at_lean_parser_parsec__t_parse__with__eoi___spec__2___rarg(x_1, lean::box(0), x_34, x_36, x_35, x_35, x_7); -x_40 = lean::apply_4(x_15, lean::box(0), lean::box(0), x_18, x_39); -return x_40; +x_38 = l_lean_parser_monad__parsec_error___at_lean_parser_parsec__t_parse__with__eoi___spec__2___rarg(x_1, lean::box(0), x_34, x_36, x_35, x_35, x_7); +x_39 = lean::apply_4(x_15, lean::box(0), lean::box(0), x_18, x_38); +return x_39; } else { -obj* x_43; obj* x_44; obj* x_45; obj* x_46; +obj* x_42; obj* x_43; obj* x_44; obj* x_45; lean::dec(x_5); lean::dec(x_1); -x_43 = lean::box(0); +x_42 = lean::box(0); if (lean::is_scalar(x_11)) { - x_44 = lean::alloc_cnstr(0, 3, 0); + x_43 = lean::alloc_cnstr(0, 3, 0); } else { - x_44 = x_11; + x_43 = x_11; } -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_7); -lean::cnstr_set(x_44, 2, x_2); -x_45 = lean::apply_2(x_3, lean::box(0), x_44); -x_46 = lean::apply_4(x_15, lean::box(0), lean::box(0), x_18, x_45); -return x_46; +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_7); +lean::cnstr_set(x_43, 2, x_2); +x_44 = lean::apply_2(x_3, lean::box(0), x_43); +x_45 = lean::apply_4(x_15, lean::box(0), lean::box(0), x_18, x_44); +return x_45; } } else { -obj* x_50; uint8 x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; +obj* x_49; uint8 x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; lean::dec(x_1); lean::dec(x_0); lean::dec(x_2); -x_50 = lean::cnstr_get(x_4, 0); -lean::inc(x_50); -x_52 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); +x_49 = lean::cnstr_get(x_4, 0); +lean::inc(x_49); +x_51 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); if (lean::is_shared(x_4)) { lean::dec(x_4); - x_53 = lean::box(0); + x_52 = lean::box(0); } else { lean::cnstr_release(x_4, 0); - x_53 = x_4; + x_52 = x_4; } -if (lean::is_scalar(x_53)) { - x_54 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_52)) { + x_53 = lean::alloc_cnstr(1, 1, 1); } else { - x_54 = x_53; + x_53 = x_52; } -lean::cnstr_set(x_54, 0, x_50); -lean::cnstr_set_scalar(x_54, sizeof(void*)*1, x_52); -x_55 = x_54; -x_56 = lean::apply_2(x_3, lean::box(0), x_55); -return x_56; +lean::cnstr_set(x_53, 0, x_49); +lean::cnstr_set_scalar(x_53, sizeof(void*)*1, x_51); +x_54 = x_53; +x_55 = lean::apply_2(x_3, lean::box(0), x_54); +return x_55; } } } diff --git a/src/boot/init/lean/parser/pratt.cpp b/src/boot/init/lean/parser/pratt.cpp index bf048d842c..f378d065c5 100644 --- a/src/boot/init/lean/parser/pratt.cpp +++ b/src/boot/init/lean/parser/pratt.cpp @@ -183,33 +183,32 @@ _start: lean::dec(x_0); if (lean::obj_tag(x_4) == 0) { -obj* x_7; obj* x_8; obj* x_9; obj* x_13; +obj* x_7; obj* x_8; obj* x_9; obj* x_12; lean::dec(x_3); x_7 = lean::box(0); x_8 = l_lean_parser_curr__lbp___rarg___lambda__1___closed__1; x_9 = l_mjoin___rarg___closed__1; -lean::inc(x_7); lean::inc(x_9); lean::inc(x_8); -x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_curr__lbp___spec__1___rarg(x_1, lean::box(0), x_8, x_9, x_7, x_7, x_2); -return x_13; +x_12 = l_lean_parser_monad__parsec_error___at_lean_parser_curr__lbp___spec__1___rarg(x_1, lean::box(0), x_8, x_9, x_7, x_7, x_2); +return x_12; } else { -obj* x_16; obj* x_19; obj* x_22; obj* x_25; +obj* x_15; obj* x_18; obj* x_21; obj* x_24; lean::dec(x_1); lean::dec(x_2); -x_16 = lean::cnstr_get(x_4, 0); -lean::inc(x_16); +x_15 = lean::cnstr_get(x_4, 0); +lean::inc(x_15); lean::dec(x_4); -x_19 = lean::cnstr_get(x_16, 1); -lean::inc(x_19); -lean::dec(x_16); -x_22 = lean::cnstr_get(x_19, 1); -lean::inc(x_22); -lean::dec(x_19); -x_25 = lean::apply_2(x_3, lean::box(0), x_22); -return x_25; +x_18 = lean::cnstr_get(x_15, 1); +lean::inc(x_18); +lean::dec(x_15); +x_21 = lean::cnstr_get(x_18, 1); +lean::inc(x_21); +lean::dec(x_18); +x_24 = lean::apply_2(x_3, lean::box(0), x_21); +return x_24; } } } @@ -347,66 +346,64 @@ x_56 = lean_name_dec_eq(x_50, x_55); lean::dec(x_50); if (x_56 == 0) { -obj* x_59; obj* x_60; obj* x_61; obj* x_65; +obj* x_59; obj* x_60; obj* x_61; obj* x_64; lean::dec(x_0); x_59 = lean::box(0); x_60 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__2; x_61 = l_mjoin___rarg___closed__1; -lean::inc(x_59); lean::inc(x_61); lean::inc(x_60); -x_65 = l_lean_parser_monad__parsec_error___at_lean_parser_curr__lbp___spec__2___rarg(x_1, lean::box(0), x_60, x_61, x_59, x_59, x_2); -return x_65; +x_64 = l_lean_parser_monad__parsec_error___at_lean_parser_curr__lbp___spec__2___rarg(x_1, lean::box(0), x_60, x_61, x_59, x_59, x_2); +return x_64; } else { -obj* x_68; obj* x_71; obj* x_74; obj* x_76; +obj* x_67; obj* x_70; obj* x_73; obj* x_75; lean::dec(x_1); lean::dec(x_2); -x_68 = lean::cnstr_get(x_0, 0); -lean::inc(x_68); +x_67 = lean::cnstr_get(x_0, 0); +lean::inc(x_67); lean::dec(x_0); -x_71 = lean::cnstr_get(x_68, 1); -lean::inc(x_71); -lean::dec(x_68); -x_74 = l_lean_parser_max__prec; -lean::inc(x_74); -x_76 = lean::apply_2(x_71, lean::box(0), x_74); -return x_76; +x_70 = lean::cnstr_get(x_67, 1); +lean::inc(x_70); +lean::dec(x_67); +x_73 = l_lean_parser_max__prec; +lean::inc(x_73); +x_75 = lean::apply_2(x_70, lean::box(0), x_73); +return x_75; } } else { -obj* x_80; obj* x_83; obj* x_86; obj* x_88; +obj* x_79; obj* x_82; obj* x_85; obj* x_87; lean::dec(x_1); lean::dec(x_2); lean::dec(x_50); -x_80 = lean::cnstr_get(x_0, 0); -lean::inc(x_80); +x_79 = lean::cnstr_get(x_0, 0); +lean::inc(x_79); lean::dec(x_0); -x_83 = lean::cnstr_get(x_80, 1); -lean::inc(x_83); -lean::dec(x_80); -x_86 = l_lean_parser_max__prec; -lean::inc(x_86); -x_88 = lean::apply_2(x_83, lean::box(0), x_86); -return x_88; +x_82 = lean::cnstr_get(x_79, 1); +lean::inc(x_82); +lean::dec(x_79); +x_85 = l_lean_parser_max__prec; +lean::inc(x_85); +x_87 = lean::apply_2(x_82, lean::box(0), x_85); +return x_87; } } default: { -obj* x_92; obj* x_93; obj* x_94; obj* x_98; +obj* x_91; obj* x_92; obj* x_93; obj* x_96; lean::dec(x_4); lean::dec(x_3); lean::dec(x_0); -x_92 = lean::box(0); -x_93 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__2; -x_94 = l_mjoin___rarg___closed__1; -lean::inc(x_92); -lean::inc(x_94); +x_91 = lean::box(0); +x_92 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__2; +x_93 = l_mjoin___rarg___closed__1; lean::inc(x_93); -x_98 = l_lean_parser_monad__parsec_error___at_lean_parser_curr__lbp___spec__3___rarg(x_1, lean::box(0), x_93, x_94, x_92, x_92, x_2); -return x_98; +lean::inc(x_92); +x_96 = l_lean_parser_monad__parsec_error___at_lean_parser_curr__lbp___spec__3___rarg(x_1, lean::box(0), x_92, x_93, x_91, x_91, x_2); +return x_96; } } } @@ -562,7 +559,7 @@ return x_26; } else { -obj* x_34; obj* x_35; obj* x_36; obj* x_40; +obj* x_34; obj* x_35; obj* x_36; obj* x_39; lean::dec(x_5); lean::dec(x_7); lean::dec(x_4); @@ -573,11 +570,10 @@ lean::dec(x_0); x_34 = lean::box(0); x_35 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_36 = l_mjoin___rarg___closed__1; -lean::inc(x_34); lean::inc(x_36); lean::inc(x_35); -x_40 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_pratt_1__trailing__loop___main___spec__1___rarg(x_2, lean::box(0), x_35, x_36, x_34, x_34, x_8); -return x_40; +x_39 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_pratt_1__trailing__loop___main___spec__1___rarg(x_2, lean::box(0), x_35, x_36, x_34, x_34, x_8); +return x_39; } } } @@ -659,17 +655,16 @@ return x_4; obj* l_lean_parser_rec__t_run__parsec___at_lean_parser_pratt__parser___spec__1___rarg___lambda__1(obj* x_0, obj* x_1, obj* x_2) { _start: { -obj* x_5; obj* x_6; obj* x_7; obj* x_11; +obj* x_5; obj* x_6; obj* x_7; obj* x_10; lean::dec(x_2); lean::dec(x_0); x_5 = lean::box(0); x_6 = l_lean_parser_rec__t_run__parsec___rarg___lambda__1___closed__1; x_7 = l_mjoin___rarg___closed__1; -lean::inc(x_5); lean::inc(x_7); lean::inc(x_6); -x_11 = l_lean_parser_monad__parsec_error___at_lean_parser_pratt__parser___spec__2___rarg(x_1, lean::box(0), x_6, x_7, x_5, x_5); -return x_11; +x_10 = l_lean_parser_monad__parsec_error___at_lean_parser_pratt__parser___spec__2___rarg(x_1, lean::box(0), x_6, x_7, x_5, x_5); +return x_10; } } obj* l_lean_parser_rec__t_run__parsec___at_lean_parser_pratt__parser___spec__1___rarg___lambda__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { diff --git a/src/boot/init/lean/parser/rec.cpp b/src/boot/init/lean/parser/rec.cpp index 45c08436b9..6b682b4b31 100644 --- a/src/boot/init/lean/parser/rec.cpp +++ b/src/boot/init/lean/parser/rec.cpp @@ -269,17 +269,16 @@ return x_0; obj* l_lean_parser_rec__t_run__parsec___rarg___lambda__1(obj* x_0, obj* x_1, obj* x_2) { _start: { -obj* x_5; obj* x_6; obj* x_7; obj* x_11; +obj* x_5; obj* x_6; obj* x_7; obj* x_10; lean::dec(x_2); lean::dec(x_0); x_5 = lean::box(0); x_6 = l_lean_parser_rec__t_run__parsec___rarg___lambda__1___closed__1; x_7 = l_mjoin___rarg___closed__1; -lean::inc(x_5); lean::inc(x_7); lean::inc(x_6); -x_11 = l_lean_parser_monad__parsec_error___at_lean_parser_rec__t_run__parsec___spec__1___rarg(x_1, lean::box(0), x_6, x_7, x_5, x_5); -return x_11; +x_10 = l_lean_parser_monad__parsec_error___at_lean_parser_rec__t_run__parsec___spec__1___rarg(x_1, lean::box(0), x_6, x_7, x_5, x_5); +return x_10; } } obj* l_lean_parser_rec__t_run__parsec___rarg___lambda__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { diff --git a/src/boot/init/lean/parser/string_literal.cpp b/src/boot/init/lean/parser/string_literal.cpp index 2bf8a8c25c..d5008b82e2 100644 --- a/src/boot/init/lean/parser/string_literal.cpp +++ b/src/boot/init/lean/parser/string_literal.cpp @@ -367,102 +367,98 @@ lean::dec(x_0); x_5 = lean::string_iterator_has_next(x_3); if (x_5 == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_3); lean::dec(x_2); x_8 = lean::box(0); x_9 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__1___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); +return x_13; } else { -uint32 x_15; uint32 x_16; uint8 x_17; uint8 x_19; -x_15 = lean::string_iterator_curr(x_3); -x_16 = 97; -x_19 = x_16 <= x_15; -if (x_19 == 0) +uint32 x_14; uint32 x_15; uint8 x_16; uint8 x_18; +x_14 = lean::string_iterator_curr(x_3); +x_15 = 97; +x_18 = x_15 <= x_14; +if (x_18 == 0) { -obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_32; +obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_30; lean::dec(x_3); lean::dec(x_2); -x_22 = l_char_quote__core(x_15); -x_23 = l_char_has__repr___closed__1; -lean::inc(x_23); -x_25 = lean::string_append(x_23, x_22); -lean::dec(x_22); -x_27 = lean::string_append(x_25, x_23); -x_28 = lean::box(0); -x_29 = l_mjoin___rarg___closed__1; +x_21 = l_char_quote__core(x_14); +x_22 = l_char_has__repr___closed__1; +lean::inc(x_22); +x_24 = lean::string_append(x_22, x_21); +lean::dec(x_21); +x_26 = lean::string_append(x_24, x_22); +x_27 = lean::box(0); +x_28 = l_mjoin___rarg___closed__1; lean::inc(x_28); -lean::inc(x_29); -x_32 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__4___rarg(x_1, lean::box(0), x_27, x_29, x_28, x_28); -return x_32; +x_30 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__4___rarg(x_1, lean::box(0), x_26, x_28, x_27, x_27); +return x_30; } else { -uint8 x_33; -x_33 = 1; -x_17 = x_33; -goto lbl_18; +uint8 x_31; +x_31 = 1; +x_16 = x_31; +goto lbl_17; } -lbl_18: +lbl_17: { -uint32 x_34; uint8 x_35; -x_34 = 102; -x_35 = x_15 <= x_34; -if (x_35 == 0) +uint32 x_32; uint8 x_33; +x_32 = 102; +x_33 = x_14 <= x_32; +if (x_33 == 0) { -obj* x_38; obj* x_39; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_48; +obj* x_36; obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_45; lean::dec(x_3); lean::dec(x_2); -x_38 = l_char_quote__core(x_15); -x_39 = l_char_has__repr___closed__1; -lean::inc(x_39); -x_41 = lean::string_append(x_39, x_38); -lean::dec(x_38); -x_43 = lean::string_append(x_41, x_39); -x_44 = lean::box(0); -x_45 = l_mjoin___rarg___closed__1; -lean::inc(x_44); -lean::inc(x_45); -x_48 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__2___rarg(x_1, lean::box(0), x_43, x_45, x_44, x_44); -return x_48; +x_36 = l_char_quote__core(x_14); +x_37 = l_char_has__repr___closed__1; +lean::inc(x_37); +x_39 = lean::string_append(x_37, x_36); +lean::dec(x_36); +x_41 = lean::string_append(x_39, x_37); +x_42 = lean::box(0); +x_43 = l_mjoin___rarg___closed__1; +lean::inc(x_43); +x_45 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__2___rarg(x_1, lean::box(0), x_41, x_43, x_42, x_42); +return x_45; } else { -if (x_17 == 0) +if (x_16 == 0) { -obj* x_51; obj* x_52; obj* x_54; obj* x_56; obj* x_57; obj* x_58; obj* x_61; +obj* x_48; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_57; lean::dec(x_3); lean::dec(x_2); -x_51 = l_char_quote__core(x_15); -x_52 = l_char_has__repr___closed__1; -lean::inc(x_52); -x_54 = lean::string_append(x_52, x_51); -lean::dec(x_51); -x_56 = lean::string_append(x_54, x_52); -x_57 = lean::box(0); -x_58 = l_mjoin___rarg___closed__1; -lean::inc(x_57); -lean::inc(x_58); -x_61 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__3___rarg(x_1, lean::box(0), x_56, x_58, x_57, x_57); -return x_61; +x_48 = l_char_quote__core(x_14); +x_49 = l_char_has__repr___closed__1; +lean::inc(x_49); +x_51 = lean::string_append(x_49, x_48); +lean::dec(x_48); +x_53 = lean::string_append(x_51, x_49); +x_54 = lean::box(0); +x_55 = l_mjoin___rarg___closed__1; +lean::inc(x_55); +x_57 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__3___rarg(x_1, lean::box(0), x_53, x_55, x_54, x_54); +return x_57; } else { -obj* x_63; obj* x_64; obj* x_65; +obj* x_59; obj* x_60; obj* x_61; lean::dec(x_1); -x_63 = lean::box_uint32(x_15); -x_64 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_64, 0, x_3); -lean::closure_set(x_64, 1, x_63); -x_65 = lean::apply_2(x_2, lean::box(0), x_64); -return x_65; +x_59 = lean::box_uint32(x_14); +x_60 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_60, 0, x_3); +lean::closure_set(x_60, 1, x_59); +x_61 = lean::apply_2(x_2, lean::box(0), x_60); +return x_61; } } } @@ -508,102 +504,98 @@ lean::dec(x_0); x_5 = lean::string_iterator_has_next(x_3); if (x_5 == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; lean::dec(x_3); lean::dec(x_2); x_8 = lean::box(0); x_9 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__5___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); -return x_14; +x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__5___rarg(x_1, lean::box(0), x_9, x_10, x_8, x_8); +return x_13; } else { -uint32 x_15; uint32 x_16; uint8 x_17; uint8 x_19; -x_15 = lean::string_iterator_curr(x_3); -x_16 = 65; -x_19 = x_16 <= x_15; -if (x_19 == 0) +uint32 x_14; uint32 x_15; uint8 x_16; uint8 x_18; +x_14 = lean::string_iterator_curr(x_3); +x_15 = 65; +x_18 = x_15 <= x_14; +if (x_18 == 0) { -obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_32; +obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_30; lean::dec(x_3); lean::dec(x_2); -x_22 = l_char_quote__core(x_15); -x_23 = l_char_has__repr___closed__1; -lean::inc(x_23); -x_25 = lean::string_append(x_23, x_22); -lean::dec(x_22); -x_27 = lean::string_append(x_25, x_23); -x_28 = lean::box(0); -x_29 = l_mjoin___rarg___closed__1; +x_21 = l_char_quote__core(x_14); +x_22 = l_char_has__repr___closed__1; +lean::inc(x_22); +x_24 = lean::string_append(x_22, x_21); +lean::dec(x_21); +x_26 = lean::string_append(x_24, x_22); +x_27 = lean::box(0); +x_28 = l_mjoin___rarg___closed__1; lean::inc(x_28); -lean::inc(x_29); -x_32 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__8___rarg(x_1, lean::box(0), x_27, x_29, x_28, x_28); -return x_32; +x_30 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__8___rarg(x_1, lean::box(0), x_26, x_28, x_27, x_27); +return x_30; } else { -uint8 x_33; -x_33 = 1; -x_17 = x_33; -goto lbl_18; +uint8 x_31; +x_31 = 1; +x_16 = x_31; +goto lbl_17; } -lbl_18: +lbl_17: { -uint32 x_34; uint8 x_35; -x_34 = 70; -x_35 = x_15 <= x_34; -if (x_35 == 0) +uint32 x_32; uint8 x_33; +x_32 = 70; +x_33 = x_14 <= x_32; +if (x_33 == 0) { -obj* x_38; obj* x_39; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_48; +obj* x_36; obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_45; lean::dec(x_3); lean::dec(x_2); -x_38 = l_char_quote__core(x_15); -x_39 = l_char_has__repr___closed__1; -lean::inc(x_39); -x_41 = lean::string_append(x_39, x_38); -lean::dec(x_38); -x_43 = lean::string_append(x_41, x_39); -x_44 = lean::box(0); -x_45 = l_mjoin___rarg___closed__1; -lean::inc(x_44); -lean::inc(x_45); -x_48 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__6___rarg(x_1, lean::box(0), x_43, x_45, x_44, x_44); -return x_48; +x_36 = l_char_quote__core(x_14); +x_37 = l_char_has__repr___closed__1; +lean::inc(x_37); +x_39 = lean::string_append(x_37, x_36); +lean::dec(x_36); +x_41 = lean::string_append(x_39, x_37); +x_42 = lean::box(0); +x_43 = l_mjoin___rarg___closed__1; +lean::inc(x_43); +x_45 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__6___rarg(x_1, lean::box(0), x_41, x_43, x_42, x_42); +return x_45; } else { -if (x_17 == 0) +if (x_16 == 0) { -obj* x_51; obj* x_52; obj* x_54; obj* x_56; obj* x_57; obj* x_58; obj* x_61; +obj* x_48; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_57; lean::dec(x_3); lean::dec(x_2); -x_51 = l_char_quote__core(x_15); -x_52 = l_char_has__repr___closed__1; -lean::inc(x_52); -x_54 = lean::string_append(x_52, x_51); -lean::dec(x_51); -x_56 = lean::string_append(x_54, x_52); -x_57 = lean::box(0); -x_58 = l_mjoin___rarg___closed__1; -lean::inc(x_57); -lean::inc(x_58); -x_61 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__7___rarg(x_1, lean::box(0), x_56, x_58, x_57, x_57); -return x_61; +x_48 = l_char_quote__core(x_14); +x_49 = l_char_has__repr___closed__1; +lean::inc(x_49); +x_51 = lean::string_append(x_49, x_48); +lean::dec(x_48); +x_53 = lean::string_append(x_51, x_49); +x_54 = lean::box(0); +x_55 = l_mjoin___rarg___closed__1; +lean::inc(x_55); +x_57 = l_lean_parser_monad__parsec_error___at_lean_parser_parse__hex__digit___spec__7___rarg(x_1, lean::box(0), x_53, x_55, x_54, x_54); +return x_57; } else { -obj* x_63; obj* x_64; obj* x_65; +obj* x_59; obj* x_60; obj* x_61; lean::dec(x_1); -x_63 = lean::box_uint32(x_15); -x_64 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); -lean::closure_set(x_64, 0, x_3); -lean::closure_set(x_64, 1, x_63); -x_65 = lean::apply_2(x_2, lean::box(0), x_64); -return x_65; +x_59 = lean::box_uint32(x_14); +x_60 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_satisfy___rarg___lambda__1___boxed), 3, 2); +lean::closure_set(x_60, 0, x_3); +lean::closure_set(x_60, 1, x_59); +x_61 = lean::apply_2(x_2, lean::box(0), x_60); +return x_61; } } } diff --git a/src/boot/init/lean/parser/term.cpp b/src/boot/init/lean/parser/term.cpp index a7901b7a5a..3e2aff35c9 100644 --- a/src/boot/init/lean/parser/term.cpp +++ b/src/boot/init/lean/parser/term.cpp @@ -1506,7 +1506,7 @@ return x_85; obj* l_lean_parser_ident__univ__spec_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -1518,29 +1518,28 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); -x_14 = l_list_map___main___at_lean_parser_ident__univ__spec_has__view_x_27___spec__2(x_3); -x_15 = l_lean_parser_no__kind; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); +x_13 = l_list_map___main___at_lean_parser_ident__univ__spec_has__view_x_27___spec__2(x_3); +x_14 = l_lean_parser_no__kind; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); lean::inc(x_8); -x_19 = l_option_map___rarg(x_8, x_5); -x_20 = l_option_get__or__else___main___rarg(x_19, x_11); -x_21 = lean::box(0); +x_18 = l_option_map___rarg(x_8, x_5); +x_19 = l_option_get__or__else___main___rarg(x_18, x_11); +x_20 = lean::box(0); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_19); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 0, x_16); lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_17); +lean::cnstr_set(x_23, 0, x_12); lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_13); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_ident__univ__spec; -lean::inc(x_25); -x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); -return x_27; +x_24 = l_lean_parser_ident__univ__spec; +lean::inc(x_24); +x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); +return x_26; } } obj* _init_l_lean_parser_ident__univ__spec_has__view_x_27() { @@ -1815,18 +1814,17 @@ return x_108; } else { -obj* x_112; obj* x_113; obj* x_114; obj* x_118; +obj* x_112; obj* x_113; obj* x_114; obj* x_117; lean::dec(x_1); lean::dec(x_0); lean::dec(x_2); x_112 = lean::box(0); x_113 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_114 = l_mjoin___rarg___closed__1; -lean::inc(x_112); lean::inc(x_114); lean::inc(x_113); -x_118 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_113, x_114, x_112, x_112, x_3, x_4, x_5); -return x_118; +x_117 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_113, x_114, x_112, x_112, x_3, x_4, x_5); +return x_117; } } } @@ -2018,57 +2016,50 @@ return x_6; obj* _init_l_lean_parser_ident__univs_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -x_8 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_8, 0, x_0); -lean::cnstr_set(x_8, 1, x_3); -lean::cnstr_set(x_8, 2, x_5); -lean::cnstr_set(x_8, 3, x_0); -lean::cnstr_set(x_8, 4, x_0); -x_9 = l_lean_parser_ident__univ__spec_has__view; -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_12 = lean::box(3); -x_13 = lean::apply_1(x_10, x_12); -x_14 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_14, 0, x_13); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_8); -lean::cnstr_set(x_15, 1, x_14); -return x_15; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = l_lean_parser_ident__univ__spec_has__view; +x_7 = lean::cnstr_get(x_6, 0); +lean::inc(x_7); +x_9 = lean::box(3); +x_10 = lean::apply_1(x_7, x_9); +x_11 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_11, 0, x_10); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_5); +lean::cnstr_set(x_12, 1, x_11); +return x_12; } } obj* _init_l_lean_parser_ident__univs_has__view_x_27___lambda__1___closed__2() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_0); -lean::cnstr_set(x_9, 1, x_3); -lean::cnstr_set(x_9, 2, x_5); -lean::cnstr_set(x_9, 3, x_0); -lean::cnstr_set(x_9, 4, x_0); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_0); -return x_10; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_0); +return x_6; } } obj* _init_l_lean_parser_ident__univs_has__view_x_27___lambda__1___closed__3() { @@ -2810,7 +2801,7 @@ return x_12; } else { -obj* x_13; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; +obj* x_13; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; x_13 = lean::cnstr_get(x_3, 0); lean::inc(x_13); lean::dec(x_3); @@ -2819,23 +2810,22 @@ x_17 = l_lean_parser_ident__univ__spec_has__view; x_18 = lean::cnstr_get(x_17, 1); lean::inc(x_18); x_20 = lean::apply_1(x_18, x_13); -lean::inc(x_16); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); -lean::cnstr_set(x_22, 1, x_16); -x_23 = l_lean_parser_no__kind; -lean::inc(x_23); -x_25 = l_lean_parser_syntax_mk__node(x_23, x_22); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_20); +lean::cnstr_set(x_21, 1, x_16); +x_22 = l_lean_parser_no__kind; +lean::inc(x_22); +x_24 = l_lean_parser_syntax_mk__node(x_22, x_21); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_16); x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_16); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_6); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_lean_parser_ident__univs; -lean::inc(x_28); -x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); -return x_30; +lean::cnstr_set(x_26, 0, x_6); +lean::cnstr_set(x_26, 1, x_25); +x_27 = l_lean_parser_ident__univs; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +return x_29; } } } @@ -2863,17 +2853,16 @@ return x_0; obj* _init_l_lean_parser_ident__univs_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = l_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens; lean::inc(x_1); x_3 = l_lean_parser_tokens___rarg(x_1); x_4 = l_lean_parser_tokens___rarg(x_3); -lean::inc(x_0); -x_6 = l_lean_parser_list_cons_tokens___rarg(x_4, x_0); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_0, x_6); -x_8 = l_lean_parser_tokens___rarg(x_7); -return x_8; +x_5 = l_lean_parser_list_cons_tokens___rarg(x_4, x_0); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_0, x_5); +x_7 = l_lean_parser_tokens___rarg(x_6); +return x_7; } } obj* l_lean_parser_ident__univs_parser_lean_parser_has__view___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -3035,87 +3024,86 @@ if (lean::is_shared(x_0)) { } if (lean::obj_tag(x_4) == 0) { -obj* x_7; obj* x_9; obj* x_10; +obj* x_7; obj* x_8; obj* x_9; x_7 = lean::box(0); -lean::inc(x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_7); +x_8 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_8, 0, x_2); +lean::cnstr_set(x_8, 1, x_7); if (lean::is_scalar(x_6)) { - x_10 = lean::alloc_cnstr(1, 2, 0); + x_9 = lean::alloc_cnstr(1, 2, 0); } else { - x_10 = x_6; + x_9 = x_6; } -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_7); -return x_10; +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_7); +return x_9; } else { -obj* x_11; obj* x_13; obj* x_16; -x_11 = lean::cnstr_get(x_4, 0); -lean::inc(x_11); -x_13 = lean::cnstr_get(x_4, 1); -lean::inc(x_13); +obj* x_10; obj* x_12; obj* x_15; +x_10 = lean::cnstr_get(x_4, 0); +lean::inc(x_10); +x_12 = lean::cnstr_get(x_4, 1); +lean::inc(x_12); lean::dec(x_4); -x_16 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_tuple_has__view_x_27___spec__1(x_13); -switch (lean::obj_tag(x_11)) { +x_15 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_tuple_has__view_x_27___spec__1(x_12); +switch (lean::obj_tag(x_10)) { case 0: { -obj* x_17; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_17 = lean::cnstr_get(x_11, 0); -lean::inc(x_17); -lean::dec(x_11); +obj* x_16; obj* x_19; obj* x_20; obj* x_21; obj* x_22; +x_16 = lean::cnstr_get(x_10, 0); +lean::inc(x_16); +lean::dec(x_10); +x_19 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_19, 0, x_16); x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_17); -x_21 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_2); -lean::cnstr_set(x_22, 1, x_21); +lean::cnstr_set(x_20, 0, x_19); +x_21 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_21, 0, x_2); +lean::cnstr_set(x_21, 1, x_20); if (lean::is_scalar(x_6)) { - x_23 = lean::alloc_cnstr(1, 2, 0); + x_22 = lean::alloc_cnstr(1, 2, 0); } else { - x_23 = x_6; + x_22 = x_6; } -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_16); -return x_23; +lean::cnstr_set(x_22, 0, x_21); +lean::cnstr_set(x_22, 1, x_15); +return x_22; } case 3: { -obj* x_24; obj* x_26; obj* x_27; -x_24 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_24); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_2); -lean::cnstr_set(x_26, 1, x_24); +obj* x_23; obj* x_25; obj* x_26; +x_23 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_23); +x_25 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_25, 0, x_2); +lean::cnstr_set(x_25, 1, x_23); if (lean::is_scalar(x_6)) { - x_27 = lean::alloc_cnstr(1, 2, 0); + x_26 = lean::alloc_cnstr(1, 2, 0); } else { - x_27 = x_6; + x_26 = x_6; } -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_16); -return x_27; +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_15); +return x_26; } default: { -obj* x_29; obj* x_31; obj* x_32; -lean::dec(x_11); -x_29 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_29); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_2); -lean::cnstr_set(x_31, 1, x_29); +obj* x_28; obj* x_30; obj* x_31; +lean::dec(x_10); +x_28 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_28); +x_30 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_30, 0, x_2); +lean::cnstr_set(x_30, 1, x_28); if (lean::is_scalar(x_6)) { - x_32 = lean::alloc_cnstr(1, 2, 0); + x_31 = lean::alloc_cnstr(1, 2, 0); } else { - x_32 = x_6; + x_31 = x_6; } -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_16); -return x_32; +lean::cnstr_set(x_31, 0, x_30); +lean::cnstr_set(x_31, 1, x_15); +return x_31; } } } @@ -3201,17 +3189,16 @@ return x_27; obj* _init_l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; x_0 = lean::box(0); x_1 = lean::box(3); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_3, 0, x_1); +x_2 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_3, 0, x_2); lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_4, 0, x_3); -lean::cnstr_set(x_4, 1, x_0); -return x_4; +return x_3; } } obj* _init_l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__2() { @@ -4024,50 +4011,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_paren__special_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_paren__special_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_paren__special_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_paren__special_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_paren__special_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_paren__special_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -4077,44 +4063,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_paren__special_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_paren__special_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_term_typed_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_term_typed_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_term_tuple_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_term_tuple_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -4126,7 +4112,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -4134,45 +4120,43 @@ x_5 = l_lean_parser_term_tuple_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_term_paren__special; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_term_paren__special; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_term_typed_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_term_paren__special; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_term_typed_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_term_paren__special; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -4644,7 +4628,7 @@ return x_11; } else { -obj* x_12; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; +obj* x_12; obj* x_15; obj* 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_28; x_12 = lean::cnstr_get(x_3, 0); lean::inc(x_12); lean::dec(x_3); @@ -4653,23 +4637,22 @@ x_16 = l_lean_parser_term_paren__special_has__view; x_17 = lean::cnstr_get(x_16, 1); lean::inc(x_17); x_19 = lean::apply_1(x_17, x_12); -lean::inc(x_15); -x_21 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_21, 0, x_19); -lean::cnstr_set(x_21, 1, x_15); -x_22 = l_lean_parser_no__kind; -lean::inc(x_22); -x_24 = l_lean_parser_syntax_mk__node(x_22, x_21); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_19); +lean::cnstr_set(x_20, 1, x_15); +x_21 = l_lean_parser_no__kind; +lean::inc(x_21); +x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_15); x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_15); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_1); -lean::cnstr_set(x_26, 1, x_25); -x_27 = l_lean_parser_term_paren__content; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -return x_29; +lean::cnstr_set(x_25, 0, x_1); +lean::cnstr_set(x_25, 1, x_24); +x_26 = l_lean_parser_term_paren__content; +lean::inc(x_26); +x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); +return x_28; } } } @@ -4880,94 +4863,93 @@ lean::dec(x_48); x_53 = lean::box(0); if (lean::obj_tag(x_17) == 0) { -obj* x_55; -lean::inc(x_53); -x_55 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_55, 0, x_5); -lean::cnstr_set(x_55, 1, x_53); -lean::cnstr_set(x_55, 2, x_53); -return x_55; +obj* x_54; +x_54 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_54, 0, x_5); +lean::cnstr_set(x_54, 1, x_53); +lean::cnstr_set(x_54, 2, x_53); +return x_54; } else { -obj* x_56; -x_56 = lean::cnstr_get(x_17, 0); -lean::inc(x_56); +obj* x_55; +x_55 = lean::cnstr_get(x_17, 0); +lean::inc(x_55); lean::dec(x_17); x_14 = x_53; -x_15 = x_56; +x_15 = x_55; goto lbl_16; } } else { -obj* x_59; obj* x_61; -x_59 = lean::cnstr_get(x_49, 0); -lean::inc(x_59); -x_61 = lean::cnstr_get(x_49, 1); -lean::inc(x_61); +obj* x_58; obj* x_60; +x_58 = lean::cnstr_get(x_49, 0); +lean::inc(x_58); +x_60 = lean::cnstr_get(x_49, 1); +lean::inc(x_60); lean::dec(x_49); -if (lean::obj_tag(x_61) == 0) +if (lean::obj_tag(x_60) == 0) { -obj* x_64; obj* x_65; obj* x_67; obj* x_68; -x_64 = l_lean_parser_term_paren__content_has__view; -x_65 = lean::cnstr_get(x_64, 0); -lean::inc(x_65); -x_67 = lean::apply_1(x_65, x_59); +obj* x_63; obj* x_64; obj* x_66; obj* x_67; +x_63 = l_lean_parser_term_paren__content_has__view; +x_64 = lean::cnstr_get(x_63, 0); +lean::inc(x_64); +x_66 = lean::apply_1(x_64, x_58); if (lean::is_scalar(x_48)) { - x_68 = lean::alloc_cnstr(1, 1, 0); + x_67 = lean::alloc_cnstr(1, 1, 0); } else { - x_68 = x_48; + x_67 = x_48; } -lean::cnstr_set(x_68, 0, x_67); +lean::cnstr_set(x_67, 0, x_66); if (lean::obj_tag(x_17) == 0) { -obj* x_69; obj* x_70; -x_69 = lean::box(0); -x_70 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_70, 0, x_5); -lean::cnstr_set(x_70, 1, x_68); -lean::cnstr_set(x_70, 2, x_69); -return x_70; +obj* x_68; obj* x_69; +x_68 = lean::box(0); +x_69 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_69, 0, x_5); +lean::cnstr_set(x_69, 1, x_67); +lean::cnstr_set(x_69, 2, x_68); +return x_69; } else { -obj* x_71; -x_71 = lean::cnstr_get(x_17, 0); -lean::inc(x_71); +obj* x_70; +x_70 = lean::cnstr_get(x_17, 0); +lean::inc(x_70); lean::dec(x_17); -x_14 = x_68; -x_15 = x_71; +x_14 = x_67; +x_15 = x_70; goto lbl_16; } } else { lean::dec(x_48); -lean::dec(x_61); -lean::dec(x_59); +lean::dec(x_58); +lean::dec(x_60); if (lean::obj_tag(x_17) == 0) { -obj* x_77; obj* x_78; obj* x_80; -x_77 = lean::box(0); -x_78 = l_lean_parser_term_paren_has__view_x_27___lambda__1___closed__1; -lean::inc(x_78); -x_80 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_80, 0, x_5); -lean::cnstr_set(x_80, 1, x_78); -lean::cnstr_set(x_80, 2, x_77); -return x_80; +obj* x_76; obj* x_77; obj* x_79; +x_76 = lean::box(0); +x_77 = l_lean_parser_term_paren_has__view_x_27___lambda__1___closed__1; +lean::inc(x_77); +x_79 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_79, 0, x_5); +lean::cnstr_set(x_79, 1, x_77); +lean::cnstr_set(x_79, 2, x_76); +return x_79; } else { -obj* x_81; obj* x_84; -x_81 = lean::cnstr_get(x_17, 0); -lean::inc(x_81); +obj* x_80; obj* x_83; +x_80 = lean::cnstr_get(x_17, 0); +lean::inc(x_80); lean::dec(x_17); -x_84 = l_lean_parser_term_paren_has__view_x_27___lambda__1___closed__1; -lean::inc(x_84); -x_14 = x_84; -x_15 = x_81; +x_83 = l_lean_parser_term_paren_has__view_x_27___lambda__1___closed__1; +lean::inc(x_83); +x_14 = x_83; +x_15 = x_80; goto lbl_16; } } @@ -5167,94 +5149,93 @@ lean::dec(x_62); x_67 = lean::box(0); if (lean::obj_tag(x_31) == 0) { -obj* x_69; -lean::inc(x_67); -x_69 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_69, 0, x_19); -lean::cnstr_set(x_69, 1, x_67); -lean::cnstr_set(x_69, 2, x_67); -return x_69; +obj* x_68; +x_68 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_68, 0, x_19); +lean::cnstr_set(x_68, 1, x_67); +lean::cnstr_set(x_68, 2, x_67); +return x_68; } else { -obj* x_70; -x_70 = lean::cnstr_get(x_31, 0); -lean::inc(x_70); +obj* x_69; +x_69 = lean::cnstr_get(x_31, 0); +lean::inc(x_69); lean::dec(x_31); x_28 = x_67; -x_29 = x_70; +x_29 = x_69; goto lbl_30; } } else { -obj* x_73; obj* x_75; -x_73 = lean::cnstr_get(x_63, 0); -lean::inc(x_73); -x_75 = lean::cnstr_get(x_63, 1); -lean::inc(x_75); +obj* x_72; obj* x_74; +x_72 = lean::cnstr_get(x_63, 0); +lean::inc(x_72); +x_74 = lean::cnstr_get(x_63, 1); +lean::inc(x_74); lean::dec(x_63); -if (lean::obj_tag(x_75) == 0) +if (lean::obj_tag(x_74) == 0) { -obj* x_78; obj* x_79; obj* x_81; obj* x_82; -x_78 = l_lean_parser_term_paren__content_has__view; -x_79 = lean::cnstr_get(x_78, 0); -lean::inc(x_79); -x_81 = lean::apply_1(x_79, x_73); +obj* x_77; obj* x_78; obj* x_80; obj* x_81; +x_77 = l_lean_parser_term_paren__content_has__view; +x_78 = lean::cnstr_get(x_77, 0); +lean::inc(x_78); +x_80 = lean::apply_1(x_78, x_72); if (lean::is_scalar(x_62)) { - x_82 = lean::alloc_cnstr(1, 1, 0); + x_81 = lean::alloc_cnstr(1, 1, 0); } else { - x_82 = x_62; + x_81 = x_62; } -lean::cnstr_set(x_82, 0, x_81); +lean::cnstr_set(x_81, 0, x_80); if (lean::obj_tag(x_31) == 0) { -obj* x_83; obj* x_84; -x_83 = lean::box(0); -x_84 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_84, 0, x_19); -lean::cnstr_set(x_84, 1, x_82); -lean::cnstr_set(x_84, 2, x_83); -return x_84; +obj* x_82; obj* x_83; +x_82 = lean::box(0); +x_83 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_83, 0, x_19); +lean::cnstr_set(x_83, 1, x_81); +lean::cnstr_set(x_83, 2, x_82); +return x_83; } else { -obj* x_85; -x_85 = lean::cnstr_get(x_31, 0); -lean::inc(x_85); +obj* x_84; +x_84 = lean::cnstr_get(x_31, 0); +lean::inc(x_84); lean::dec(x_31); -x_28 = x_82; -x_29 = x_85; +x_28 = x_81; +x_29 = x_84; goto lbl_30; } } else { lean::dec(x_62); -lean::dec(x_73); -lean::dec(x_75); +lean::dec(x_74); +lean::dec(x_72); if (lean::obj_tag(x_31) == 0) { -obj* x_91; obj* x_92; obj* x_94; -x_91 = lean::box(0); -x_92 = l_lean_parser_term_paren_has__view_x_27___lambda__1___closed__1; -lean::inc(x_92); -x_94 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_94, 0, x_19); -lean::cnstr_set(x_94, 1, x_92); -lean::cnstr_set(x_94, 2, x_91); -return x_94; +obj* x_90; obj* x_91; obj* x_93; +x_90 = lean::box(0); +x_91 = l_lean_parser_term_paren_has__view_x_27___lambda__1___closed__1; +lean::inc(x_91); +x_93 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_93, 0, x_19); +lean::cnstr_set(x_93, 1, x_91); +lean::cnstr_set(x_93, 2, x_90); +return x_93; } else { -obj* x_95; obj* x_98; -x_95 = lean::cnstr_get(x_31, 0); -lean::inc(x_95); +obj* x_94; obj* x_97; +x_94 = lean::cnstr_get(x_31, 0); +lean::inc(x_94); lean::dec(x_31); -x_98 = l_lean_parser_term_paren_has__view_x_27___lambda__1___closed__1; -lean::inc(x_98); -x_28 = x_98; -x_29 = x_95; +x_97 = l_lean_parser_term_paren_has__view_x_27___lambda__1___closed__1; +lean::inc(x_97); +x_28 = x_97; +x_29 = x_94; goto lbl_30; } } @@ -5268,7 +5249,7 @@ goto lbl_30; obj* l_lean_parser_term_paren_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -5280,59 +5261,56 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); lean::inc(x_8); -x_15 = l_option_map___rarg(x_8, x_5); -x_16 = l_option_get__or__else___main___rarg(x_15, x_11); -x_17 = lean::box(0); -lean::inc(x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_17); +x_14 = l_option_map___rarg(x_8, x_5); +x_15 = l_option_get__or__else___main___rarg(x_14, x_11); +x_16 = lean::box(0); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_15); +lean::cnstr_set(x_17, 1, x_16); if (lean::obj_tag(x_3) == 0) { -obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; -lean::dec(x_17); -x_21 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_19); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_13); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_term_paren; -lean::inc(x_25); -x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); -return x_27; +obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; +x_18 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_18); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_18); +lean::cnstr_set(x_20, 1, x_17); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_12); +lean::cnstr_set(x_21, 1, x_20); +x_22 = l_lean_parser_term_paren; +lean::inc(x_22); +x_24 = l_lean_parser_syntax_mk__node(x_22, x_21); +return x_24; } else { -obj* x_28; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_43; -x_28 = lean::cnstr_get(x_3, 0); -lean::inc(x_28); +obj* x_25; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_40; +x_25 = lean::cnstr_get(x_3, 0); +lean::inc(x_25); lean::dec(x_3); -x_31 = l_lean_parser_term_paren__content_has__view; -x_32 = lean::cnstr_get(x_31, 1); -lean::inc(x_32); -x_34 = lean::apply_1(x_32, x_28); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_17); -x_36 = l_lean_parser_no__kind; -lean::inc(x_36); -x_38 = l_lean_parser_syntax_mk__node(x_36, x_35); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_19); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_13); -lean::cnstr_set(x_40, 1, x_39); -x_41 = l_lean_parser_term_paren; -lean::inc(x_41); -x_43 = l_lean_parser_syntax_mk__node(x_41, x_40); -return x_43; +x_28 = l_lean_parser_term_paren__content_has__view; +x_29 = lean::cnstr_get(x_28, 1); +lean::inc(x_29); +x_31 = lean::apply_1(x_29, x_25); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_31); +lean::cnstr_set(x_32, 1, x_16); +x_33 = l_lean_parser_no__kind; +lean::inc(x_33); +x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_35); +lean::cnstr_set(x_36, 1, x_17); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_12); +lean::cnstr_set(x_37, 1, x_36); +x_38 = l_lean_parser_term_paren; +lean::inc(x_38); +x_40 = l_lean_parser_syntax_mk__node(x_38, x_37); +return x_40; } } } @@ -5620,44 +5598,42 @@ x_127 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_120, x_126); if (lean::obj_tag(x_127) == 0) { lean::dec(x_9); -lean::dec(x_115); x_21 = x_127; x_22 = x_112; goto lbl_23; } else { -obj* x_130; uint8 x_132; -x_130 = lean::cnstr_get(x_127, 0); -lean::inc(x_130); -x_132 = lean::cnstr_get_scalar(x_127, sizeof(void*)*1); -if (x_132 == 0) +obj* x_129; uint8 x_131; +x_129 = lean::cnstr_get(x_127, 0); +lean::inc(x_129); +x_131 = lean::cnstr_get_scalar(x_127, sizeof(void*)*1); +if (x_131 == 0) { -obj* x_134; obj* x_137; obj* x_139; obj* x_140; obj* x_141; +obj* x_133; obj* x_136; obj* x_138; obj* x_139; obj* x_140; lean::dec(x_127); -x_134 = lean::cnstr_get(x_130, 2); -lean::inc(x_134); -lean::dec(x_130); -x_137 = l_mjoin___rarg___closed__1; -lean::inc(x_137); -x_139 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_139, 0, x_134); -lean::closure_set(x_139, 1, x_137); -x_140 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_140, 0, x_139); -x_141 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_141, 0, x_115); -lean::cnstr_set(x_141, 1, x_9); -lean::cnstr_set(x_141, 2, x_140); -x_21 = x_141; +x_133 = lean::cnstr_get(x_129, 2); +lean::inc(x_133); +lean::dec(x_129); +x_136 = l_mjoin___rarg___closed__1; +lean::inc(x_136); +x_138 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_138, 0, x_133); +lean::closure_set(x_138, 1, x_136); +x_139 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_139, 0, x_138); +x_140 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_140, 0, x_115); +lean::cnstr_set(x_140, 1, x_9); +lean::cnstr_set(x_140, 2, x_139); +x_21 = x_140; x_22 = x_112; goto lbl_23; } else { lean::dec(x_9); -lean::dec(x_115); -lean::dec(x_130); +lean::dec(x_129); x_21 = x_127; x_22 = x_112; goto lbl_23; @@ -5666,53 +5642,52 @@ goto lbl_23; } else { -obj* x_145; uint8 x_147; obj* x_148; -x_145 = lean::cnstr_get(x_110, 0); -lean::inc(x_145); -x_147 = lean::cnstr_get_scalar(x_110, sizeof(void*)*1); +obj* x_143; uint8 x_145; obj* x_146; +x_143 = lean::cnstr_get(x_110, 0); +lean::inc(x_143); +x_145 = lean::cnstr_get_scalar(x_110, sizeof(void*)*1); if (lean::is_shared(x_110)) { lean::dec(x_110); - x_148 = lean::box(0); + x_146 = lean::box(0); } else { lean::cnstr_release(x_110, 0); - x_148 = x_110; + x_146 = x_110; } -if (x_147 == 0) +if (x_145 == 0) { -obj* x_150; obj* x_153; obj* x_155; obj* x_156; obj* x_157; -lean::dec(x_148); -x_150 = lean::cnstr_get(x_145, 2); -lean::inc(x_150); -lean::dec(x_145); -x_153 = l_mjoin___rarg___closed__1; -lean::inc(x_153); -x_155 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_155, 0, x_150); -lean::closure_set(x_155, 1, x_153); -x_156 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_156, 0, x_155); -x_157 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_157, 0, x_115); -lean::cnstr_set(x_157, 1, x_9); -lean::cnstr_set(x_157, 2, x_156); -x_21 = x_157; +obj* x_148; obj* x_151; obj* x_153; obj* x_154; obj* x_155; +lean::dec(x_146); +x_148 = lean::cnstr_get(x_143, 2); +lean::inc(x_148); +lean::dec(x_143); +x_151 = l_mjoin___rarg___closed__1; +lean::inc(x_151); +x_153 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_153, 0, x_148); +lean::closure_set(x_153, 1, x_151); +x_154 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_154, 0, x_153); +x_155 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_155, 0, x_115); +lean::cnstr_set(x_155, 1, x_9); +lean::cnstr_set(x_155, 2, x_154); +x_21 = x_155; x_22 = x_112; goto lbl_23; } else { -obj* x_160; obj* x_161; +obj* x_157; obj* x_158; lean::dec(x_9); -lean::dec(x_115); -if (lean::is_scalar(x_148)) { - x_160 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_146)) { + x_157 = lean::alloc_cnstr(1, 1, 1); } else { - x_160 = x_148; + x_157 = x_146; } -lean::cnstr_set(x_160, 0, x_145); -lean::cnstr_set_scalar(x_160, sizeof(void*)*1, x_147); -x_161 = x_160; -x_21 = x_161; +lean::cnstr_set(x_157, 0, x_143); +lean::cnstr_set_scalar(x_157, sizeof(void*)*1, x_145); +x_158 = x_157; +x_21 = x_158; x_22 = x_112; goto lbl_23; } @@ -5722,341 +5697,338 @@ lbl_20: { if (lean::obj_tag(x_18) == 0) { -obj* x_162; obj* x_164; obj* x_166; obj* x_168; -x_162 = lean::cnstr_get(x_18, 0); -lean::inc(x_162); -x_164 = lean::cnstr_get(x_18, 1); -lean::inc(x_164); -x_166 = lean::cnstr_get(x_18, 2); -lean::inc(x_166); +obj* x_159; obj* x_161; obj* x_163; obj* x_165; +x_159 = lean::cnstr_get(x_18, 0); +lean::inc(x_159); +x_161 = lean::cnstr_get(x_18, 1); +lean::inc(x_161); +x_163 = lean::cnstr_get(x_18, 2); +lean::inc(x_163); if (lean::is_shared(x_18)) { lean::dec(x_18); - x_168 = lean::box(0); + x_165 = lean::box(0); } else { lean::cnstr_release(x_18, 0); lean::cnstr_release(x_18, 1); lean::cnstr_release(x_18, 2); - x_168 = x_18; + x_165 = x_18; } -if (lean::obj_tag(x_162) == 0) +if (lean::obj_tag(x_159) == 0) { -obj* x_175; obj* x_176; obj* x_178; obj* x_179; obj* x_181; obj* x_182; obj* x_183; +obj* x_172; obj* x_173; obj* x_175; obj* x_176; obj* x_178; obj* x_179; obj* x_180; lean::dec(x_8); lean::dec(x_7); lean::dec(x_1); lean::dec(x_6); lean::dec(x_0); lean::dec(x_15); -x_175 = l_list_reverse___rarg(x_4); -x_176 = l_lean_parser_no__kind; +x_172 = l_list_reverse___rarg(x_4); +x_173 = l_lean_parser_no__kind; +lean::inc(x_173); +x_175 = l_lean_parser_syntax_mk__node(x_173, x_172); +x_176 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_176); -x_178 = l_lean_parser_syntax_mk__node(x_176, x_175); -x_179 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_179); -if (lean::is_scalar(x_168)) { - x_181 = lean::alloc_cnstr(0, 3, 0); +if (lean::is_scalar(x_165)) { + x_178 = lean::alloc_cnstr(0, 3, 0); } else { - x_181 = x_168; + x_178 = x_165; } -lean::cnstr_set(x_181, 0, x_178); -lean::cnstr_set(x_181, 1, x_164); -lean::cnstr_set(x_181, 2, x_179); -x_182 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_166, x_181); -x_183 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_183, 0, x_182); -lean::cnstr_set(x_183, 1, x_19); -return x_183; +lean::cnstr_set(x_178, 0, x_175); +lean::cnstr_set(x_178, 1, x_161); +lean::cnstr_set(x_178, 2, x_176); +x_179 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_163, x_178); +x_180 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_180, 0, x_179); +lean::cnstr_set(x_180, 1, x_19); +return x_180; } else { -obj* x_184; obj* x_186; obj* x_187; obj* x_188; obj* x_195; obj* x_196; obj* x_198; obj* x_201; obj* x_202; -x_184 = lean::cnstr_get(x_162, 0); -lean::inc(x_184); -if (lean::is_shared(x_162)) { - lean::dec(x_162); - x_186 = lean::box(0); +obj* x_181; obj* x_183; obj* x_184; obj* x_185; obj* x_192; obj* x_193; obj* x_195; obj* x_198; obj* x_199; +x_181 = lean::cnstr_get(x_159, 0); +lean::inc(x_181); +if (lean::is_shared(x_159)) { + lean::dec(x_159); + x_183 = lean::box(0); } else { - lean::cnstr_release(x_162, 0); - x_186 = x_162; + lean::cnstr_release(x_159, 0); + x_183 = x_159; } -lean::inc(x_164); +lean::inc(x_161); lean::inc(x_8); lean::inc(x_7); lean::inc(x_6); lean::inc(x_1); -x_195 = lean::apply_5(x_1, x_6, x_7, x_8, x_164, x_19); -x_196 = lean::cnstr_get(x_195, 0); -lean::inc(x_196); -x_198 = lean::cnstr_get(x_195, 1); -lean::inc(x_198); -lean::dec(x_195); -x_201 = lean::box(0); -x_202 = l_lean_parser_parsec__t_try__mk__res___rarg(x_196); -if (lean::obj_tag(x_202) == 0) +x_192 = lean::apply_5(x_1, x_6, x_7, x_8, x_161, x_19); +x_193 = lean::cnstr_get(x_192, 0); +lean::inc(x_193); +x_195 = lean::cnstr_get(x_192, 1); +lean::inc(x_195); +lean::dec(x_192); +x_198 = lean::box(0); +x_199 = l_lean_parser_parsec__t_try__mk__res___rarg(x_193); +if (lean::obj_tag(x_199) == 0) { -obj* x_203; obj* x_205; obj* x_207; obj* x_209; obj* x_210; obj* x_211; obj* x_213; obj* x_214; -x_203 = lean::cnstr_get(x_202, 0); -lean::inc(x_203); -x_205 = lean::cnstr_get(x_202, 1); -lean::inc(x_205); -x_207 = lean::cnstr_get(x_202, 2); -lean::inc(x_207); -if (lean::is_shared(x_202)) { - lean::dec(x_202); - x_209 = lean::box(0); +obj* x_200; obj* x_202; obj* x_204; obj* x_206; obj* x_207; obj* x_208; obj* x_210; obj* x_211; +x_200 = lean::cnstr_get(x_199, 0); +lean::inc(x_200); +x_202 = lean::cnstr_get(x_199, 1); +lean::inc(x_202); +x_204 = lean::cnstr_get(x_199, 2); +lean::inc(x_204); +if (lean::is_shared(x_199)) { + lean::dec(x_199); + x_206 = lean::box(0); } else { - lean::cnstr_release(x_202, 0); - lean::cnstr_release(x_202, 1); - lean::cnstr_release(x_202, 2); - x_209 = x_202; + lean::cnstr_release(x_199, 0); + lean::cnstr_release(x_199, 1); + lean::cnstr_release(x_199, 2); + x_206 = x_199; } -if (lean::is_scalar(x_186)) { - x_210 = lean::alloc_cnstr(1, 1, 0); +if (lean::is_scalar(x_183)) { + x_207 = lean::alloc_cnstr(1, 1, 0); } else { - x_210 = x_186; + x_207 = x_183; } -lean::cnstr_set(x_210, 0, x_203); -x_211 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_211); -if (lean::is_scalar(x_209)) { - x_213 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_207, 0, x_200); +x_208 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_208); +if (lean::is_scalar(x_206)) { + x_210 = lean::alloc_cnstr(0, 3, 0); } else { - x_213 = x_209; + x_210 = x_206; } -lean::cnstr_set(x_213, 0, x_210); -lean::cnstr_set(x_213, 1, x_205); -lean::cnstr_set(x_213, 2, x_211); -x_214 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_207, x_213); -if (lean::obj_tag(x_214) == 0) +lean::cnstr_set(x_210, 0, x_207); +lean::cnstr_set(x_210, 1, x_202); +lean::cnstr_set(x_210, 2, x_208); +x_211 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_204, x_210); +if (lean::obj_tag(x_211) == 0) { -lean::dec(x_201); -lean::dec(x_164); -x_187 = x_214; -x_188 = x_198; -goto lbl_189; +lean::dec(x_161); +x_184 = x_211; +x_185 = x_195; +goto lbl_186; } else { -obj* x_217; uint8 x_219; -x_217 = lean::cnstr_get(x_214, 0); +obj* x_213; uint8 x_215; +x_213 = lean::cnstr_get(x_211, 0); +lean::inc(x_213); +x_215 = lean::cnstr_get_scalar(x_211, sizeof(void*)*1); +if (x_215 == 0) +{ +obj* x_217; obj* x_220; obj* x_222; obj* x_223; obj* x_224; +lean::dec(x_211); +x_217 = lean::cnstr_get(x_213, 2); lean::inc(x_217); -x_219 = lean::cnstr_get_scalar(x_214, sizeof(void*)*1); -if (x_219 == 0) -{ -obj* x_221; obj* x_224; obj* x_226; obj* x_227; obj* x_228; -lean::dec(x_214); -x_221 = lean::cnstr_get(x_217, 2); -lean::inc(x_221); -lean::dec(x_217); -x_224 = l_mjoin___rarg___closed__1; -lean::inc(x_224); -x_226 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_226, 0, x_221); -lean::closure_set(x_226, 1, x_224); -x_227 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_227, 0, x_226); -x_228 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_228, 0, x_201); -lean::cnstr_set(x_228, 1, x_164); -lean::cnstr_set(x_228, 2, x_227); -x_187 = x_228; -x_188 = x_198; -goto lbl_189; +lean::dec(x_213); +x_220 = l_mjoin___rarg___closed__1; +lean::inc(x_220); +x_222 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_222, 0, x_217); +lean::closure_set(x_222, 1, x_220); +x_223 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_223, 0, x_222); +x_224 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_224, 0, x_198); +lean::cnstr_set(x_224, 1, x_161); +lean::cnstr_set(x_224, 2, x_223); +x_184 = x_224; +x_185 = x_195; +goto lbl_186; } else { -lean::dec(x_201); -lean::dec(x_164); -lean::dec(x_217); -x_187 = x_214; -x_188 = x_198; -goto lbl_189; +lean::dec(x_161); +lean::dec(x_213); +x_184 = x_211; +x_185 = x_195; +goto lbl_186; } } } else { -obj* x_232; uint8 x_234; obj* x_235; -x_232 = lean::cnstr_get(x_202, 0); +obj* x_227; uint8 x_229; obj* x_230; +x_227 = lean::cnstr_get(x_199, 0); +lean::inc(x_227); +x_229 = lean::cnstr_get_scalar(x_199, sizeof(void*)*1); +if (lean::is_shared(x_199)) { + lean::dec(x_199); + x_230 = lean::box(0); +} else { + lean::cnstr_release(x_199, 0); + x_230 = x_199; +} +if (x_229 == 0) +{ +obj* x_232; obj* x_235; obj* x_237; obj* x_238; obj* x_239; +lean::dec(x_230); +x_232 = lean::cnstr_get(x_227, 2); lean::inc(x_232); -x_234 = lean::cnstr_get_scalar(x_202, sizeof(void*)*1); -if (lean::is_shared(x_202)) { - lean::dec(x_202); - x_235 = lean::box(0); +lean::dec(x_227); +x_235 = l_mjoin___rarg___closed__1; +lean::inc(x_235); +x_237 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_237, 0, x_232); +lean::closure_set(x_237, 1, x_235); +if (lean::is_scalar(x_183)) { + x_238 = lean::alloc_cnstr(1, 1, 0); } else { - lean::cnstr_release(x_202, 0); - x_235 = x_202; + x_238 = x_183; } -if (x_234 == 0) -{ -obj* x_237; obj* x_240; obj* x_242; obj* x_243; obj* x_244; -lean::dec(x_235); -x_237 = lean::cnstr_get(x_232, 2); -lean::inc(x_237); -lean::dec(x_232); -x_240 = l_mjoin___rarg___closed__1; -lean::inc(x_240); -x_242 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_242, 0, x_237); -lean::closure_set(x_242, 1, x_240); -if (lean::is_scalar(x_186)) { - x_243 = lean::alloc_cnstr(1, 1, 0); -} else { - x_243 = x_186; -} -lean::cnstr_set(x_243, 0, x_242); -x_244 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_244, 0, x_201); -lean::cnstr_set(x_244, 1, x_164); -lean::cnstr_set(x_244, 2, x_243); -x_187 = x_244; -x_188 = x_198; -goto lbl_189; +lean::cnstr_set(x_238, 0, x_237); +x_239 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_239, 0, x_198); +lean::cnstr_set(x_239, 1, x_161); +lean::cnstr_set(x_239, 2, x_238); +x_184 = x_239; +x_185 = x_195; +goto lbl_186; } else { -obj* x_248; obj* x_249; -lean::dec(x_186); -lean::dec(x_201); -lean::dec(x_164); -if (lean::is_scalar(x_235)) { - x_248 = lean::alloc_cnstr(1, 1, 1); +obj* x_242; obj* x_243; +lean::dec(x_183); +lean::dec(x_161); +if (lean::is_scalar(x_230)) { + x_242 = lean::alloc_cnstr(1, 1, 1); } else { - x_248 = x_235; + x_242 = x_230; } -lean::cnstr_set(x_248, 0, x_232); -lean::cnstr_set_scalar(x_248, sizeof(void*)*1, x_234); -x_249 = x_248; -x_187 = x_249; -x_188 = x_198; -goto lbl_189; +lean::cnstr_set(x_242, 0, x_227); +lean::cnstr_set_scalar(x_242, sizeof(void*)*1, x_229); +x_243 = x_242; +x_184 = x_243; +x_185 = x_195; +goto lbl_186; } } -lbl_189: +lbl_186: { -if (lean::obj_tag(x_187) == 0) +if (lean::obj_tag(x_184) == 0) { -obj* x_250; obj* x_252; obj* x_254; -x_250 = lean::cnstr_get(x_187, 0); -lean::inc(x_250); -x_252 = lean::cnstr_get(x_187, 1); -lean::inc(x_252); -x_254 = lean::cnstr_get(x_187, 2); -lean::inc(x_254); -lean::dec(x_187); -if (lean::obj_tag(x_250) == 0) -{ -obj* x_263; obj* x_264; obj* x_265; obj* x_267; obj* x_268; obj* x_270; obj* x_271; obj* x_272; obj* x_273; -lean::dec(x_8); -lean::dec(x_7); -lean::dec(x_1); -lean::dec(x_6); -lean::dec(x_0); -lean::dec(x_15); -x_263 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_263, 0, x_184); -lean::cnstr_set(x_263, 1, x_4); -x_264 = l_list_reverse___rarg(x_263); -x_265 = l_lean_parser_no__kind; -lean::inc(x_265); -x_267 = l_lean_parser_syntax_mk__node(x_265, x_264); -x_268 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_268); -if (lean::is_scalar(x_168)) { - x_270 = lean::alloc_cnstr(0, 3, 0); -} else { - x_270 = x_168; -} -lean::cnstr_set(x_270, 0, x_267); -lean::cnstr_set(x_270, 1, x_252); -lean::cnstr_set(x_270, 2, x_268); -x_271 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_254, x_270); -x_272 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_166, x_271); -x_273 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_273, 0, x_272); -lean::cnstr_set(x_273, 1, x_188); -return x_273; -} -else -{ -obj* x_275; obj* x_278; obj* x_279; obj* x_280; obj* x_281; obj* x_283; obj* x_285; obj* x_286; obj* x_287; obj* x_288; -lean::dec(x_168); -x_275 = lean::cnstr_get(x_250, 0); -lean::inc(x_275); -lean::dec(x_250); -x_278 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_278, 0, x_184); -lean::cnstr_set(x_278, 1, x_4); -x_279 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_279, 0, x_275); -lean::cnstr_set(x_279, 1, x_278); -x_280 = l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_term_paren_parser_lean_parser_has__tokens___spec__2(x_0, x_1, x_2, x_2, x_279, x_15, x_6, x_7, x_8, x_252, x_188); -x_281 = lean::cnstr_get(x_280, 0); -lean::inc(x_281); -x_283 = lean::cnstr_get(x_280, 1); -lean::inc(x_283); -if (lean::is_shared(x_280)) { - lean::dec(x_280); - x_285 = lean::box(0); -} else { - lean::cnstr_release(x_280, 0); - lean::cnstr_release(x_280, 1); - x_285 = x_280; -} -x_286 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_254, x_281); -x_287 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_166, x_286); -if (lean::is_scalar(x_285)) { - x_288 = lean::alloc_cnstr(0, 2, 0); -} else { - x_288 = x_285; -} -lean::cnstr_set(x_288, 0, x_287); -lean::cnstr_set(x_288, 1, x_283); -return x_288; -} -} -else -{ -obj* x_298; uint8 x_300; obj* x_301; obj* x_302; obj* x_303; obj* x_304; obj* x_305; +obj* x_244; obj* x_246; obj* x_248; +x_244 = lean::cnstr_get(x_184, 0); +lean::inc(x_244); +x_246 = lean::cnstr_get(x_184, 1); +lean::inc(x_246); +x_248 = lean::cnstr_get(x_184, 2); +lean::inc(x_248); lean::dec(x_184); +if (lean::obj_tag(x_244) == 0) +{ +obj* x_257; obj* x_258; obj* x_259; obj* x_261; obj* x_262; obj* x_264; obj* x_265; obj* x_266; obj* x_267; +lean::dec(x_8); +lean::dec(x_7); +lean::dec(x_1); +lean::dec(x_6); +lean::dec(x_0); +lean::dec(x_15); +x_257 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_257, 0, x_181); +lean::cnstr_set(x_257, 1, x_4); +x_258 = l_list_reverse___rarg(x_257); +x_259 = l_lean_parser_no__kind; +lean::inc(x_259); +x_261 = l_lean_parser_syntax_mk__node(x_259, x_258); +x_262 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_262); +if (lean::is_scalar(x_165)) { + x_264 = lean::alloc_cnstr(0, 3, 0); +} else { + x_264 = x_165; +} +lean::cnstr_set(x_264, 0, x_261); +lean::cnstr_set(x_264, 1, x_246); +lean::cnstr_set(x_264, 2, x_262); +x_265 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_248, x_264); +x_266 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_163, x_265); +x_267 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_267, 0, x_266); +lean::cnstr_set(x_267, 1, x_185); +return x_267; +} +else +{ +obj* x_269; obj* x_272; obj* x_273; obj* x_274; obj* x_275; obj* x_277; obj* x_279; obj* x_280; obj* x_281; obj* x_282; +lean::dec(x_165); +x_269 = lean::cnstr_get(x_244, 0); +lean::inc(x_269); +lean::dec(x_244); +x_272 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_272, 0, x_181); +lean::cnstr_set(x_272, 1, x_4); +x_273 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_273, 0, x_269); +lean::cnstr_set(x_273, 1, x_272); +x_274 = l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_term_paren_parser_lean_parser_has__tokens___spec__2(x_0, x_1, x_2, x_2, x_273, x_15, x_6, x_7, x_8, x_246, x_185); +x_275 = lean::cnstr_get(x_274, 0); +lean::inc(x_275); +x_277 = lean::cnstr_get(x_274, 1); +lean::inc(x_277); +if (lean::is_shared(x_274)) { + lean::dec(x_274); + x_279 = lean::box(0); +} else { + lean::cnstr_release(x_274, 0); + lean::cnstr_release(x_274, 1); + x_279 = x_274; +} +x_280 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_248, x_275); +x_281 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_163, x_280); +if (lean::is_scalar(x_279)) { + x_282 = lean::alloc_cnstr(0, 2, 0); +} else { + x_282 = x_279; +} +lean::cnstr_set(x_282, 0, x_281); +lean::cnstr_set(x_282, 1, x_277); +return x_282; +} +} +else +{ +obj* x_292; uint8 x_294; obj* x_295; obj* x_296; obj* x_297; obj* x_298; obj* x_299; +lean::dec(x_181); lean::dec(x_8); lean::dec(x_7); lean::dec(x_4); lean::dec(x_1); lean::dec(x_6); lean::dec(x_0); -lean::dec(x_168); +lean::dec(x_165); lean::dec(x_15); -x_298 = lean::cnstr_get(x_187, 0); -lean::inc(x_298); -x_300 = lean::cnstr_get_scalar(x_187, sizeof(void*)*1); -if (lean::is_shared(x_187)) { - lean::dec(x_187); - x_301 = lean::box(0); +x_292 = lean::cnstr_get(x_184, 0); +lean::inc(x_292); +x_294 = lean::cnstr_get_scalar(x_184, sizeof(void*)*1); +if (lean::is_shared(x_184)) { + lean::dec(x_184); + x_295 = lean::box(0); } else { - lean::cnstr_release(x_187, 0); - x_301 = x_187; + lean::cnstr_release(x_184, 0); + x_295 = x_184; } -if (lean::is_scalar(x_301)) { - x_302 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_295)) { + x_296 = lean::alloc_cnstr(1, 1, 1); } else { - x_302 = x_301; + x_296 = x_295; } -lean::cnstr_set(x_302, 0, x_298); -lean::cnstr_set_scalar(x_302, sizeof(void*)*1, x_300); -x_303 = x_302; -x_304 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_166, x_303); -x_305 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_305, 0, x_304); -lean::cnstr_set(x_305, 1, x_188); -return x_305; +lean::cnstr_set(x_296, 0, x_292); +lean::cnstr_set_scalar(x_296, sizeof(void*)*1, x_294); +x_297 = x_296; +x_298 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_163, x_297); +x_299 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_299, 0, x_298); +lean::cnstr_set(x_299, 1, x_185); +return x_299; } } } } else { -obj* x_313; uint8 x_315; obj* x_316; obj* x_317; obj* x_318; obj* x_319; +obj* x_307; uint8 x_309; obj* x_310; obj* x_311; obj* x_312; obj* x_313; lean::dec(x_8); lean::dec(x_7); lean::dec(x_4); @@ -6064,28 +6036,28 @@ lean::dec(x_1); lean::dec(x_6); lean::dec(x_0); lean::dec(x_15); -x_313 = lean::cnstr_get(x_18, 0); -lean::inc(x_313); -x_315 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); +x_307 = lean::cnstr_get(x_18, 0); +lean::inc(x_307); +x_309 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); if (lean::is_shared(x_18)) { lean::dec(x_18); - x_316 = lean::box(0); + x_310 = lean::box(0); } else { lean::cnstr_release(x_18, 0); - x_316 = x_18; + x_310 = x_18; } -if (lean::is_scalar(x_316)) { - x_317 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_310)) { + x_311 = lean::alloc_cnstr(1, 1, 1); } else { - x_317 = x_316; + x_311 = x_310; } -lean::cnstr_set(x_317, 0, x_313); -lean::cnstr_set_scalar(x_317, sizeof(void*)*1, x_315); -x_318 = x_317; -x_319 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_319, 0, x_318); -lean::cnstr_set(x_319, 1, x_19); -return x_319; +lean::cnstr_set(x_311, 0, x_307); +lean::cnstr_set_scalar(x_311, sizeof(void*)*1, x_309); +x_312 = x_311; +x_313 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_313, 0, x_312); +lean::cnstr_set(x_313, 1, x_19); +return x_313; } } lbl_23: @@ -6098,74 +6070,74 @@ goto lbl_20; } else { -obj* x_320; uint8 x_322; obj* x_323; obj* x_324; obj* x_326; obj* x_328; obj* x_330; obj* x_333; obj* x_335; obj* x_336; obj* x_337; obj* x_338; obj* x_339; obj* x_341; obj* x_342; obj* x_343; -x_320 = lean::cnstr_get(x_21, 0); -lean::inc(x_320); -x_322 = lean::cnstr_get_scalar(x_21, sizeof(void*)*1); +obj* x_314; uint8 x_316; obj* x_317; obj* x_318; obj* x_320; obj* x_322; obj* x_324; obj* x_327; obj* x_329; obj* x_330; obj* x_331; obj* x_332; obj* x_333; obj* x_335; obj* x_336; obj* x_337; +x_314 = lean::cnstr_get(x_21, 0); +lean::inc(x_314); +x_316 = lean::cnstr_get_scalar(x_21, sizeof(void*)*1); if (lean::is_shared(x_21)) { lean::dec(x_21); - x_323 = lean::box(0); + x_317 = lean::box(0); } else { lean::cnstr_release(x_21, 0); - x_323 = x_21; + x_317 = x_21; } -x_324 = lean::cnstr_get(x_320, 0); +x_318 = lean::cnstr_get(x_314, 0); +lean::inc(x_318); +x_320 = lean::cnstr_get(x_314, 1); +lean::inc(x_320); +x_322 = lean::cnstr_get(x_314, 2); +lean::inc(x_322); +x_324 = lean::cnstr_get(x_314, 3); lean::inc(x_324); -x_326 = lean::cnstr_get(x_320, 1); -lean::inc(x_326); -x_328 = lean::cnstr_get(x_320, 2); -lean::inc(x_328); -x_330 = lean::cnstr_get(x_320, 3); -lean::inc(x_330); -lean::dec(x_320); -x_333 = l_option_get___main___at_lean_parser_run___spec__2(x_330); +lean::dec(x_314); +x_327 = l_option_get___main___at_lean_parser_run___spec__2(x_324); lean::inc(x_4); -x_335 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_335, 0, x_333); -lean::cnstr_set(x_335, 1, x_4); -x_336 = lean::box(3); -x_337 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_337, 0, x_336); -lean::cnstr_set(x_337, 1, x_335); -x_338 = l_list_reverse___rarg(x_337); -x_339 = l_lean_parser_no__kind; -lean::inc(x_339); -x_341 = l_lean_parser_syntax_mk__node(x_339, x_338); -x_342 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_342, 0, x_341); -x_343 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_343, 0, x_324); -lean::cnstr_set(x_343, 1, x_326); -lean::cnstr_set(x_343, 2, x_328); -lean::cnstr_set(x_343, 3, x_342); -if (x_322 == 0) +x_329 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_329, 0, x_327); +lean::cnstr_set(x_329, 1, x_4); +x_330 = lean::box(3); +x_331 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_331, 0, x_330); +lean::cnstr_set(x_331, 1, x_329); +x_332 = l_list_reverse___rarg(x_331); +x_333 = l_lean_parser_no__kind; +lean::inc(x_333); +x_335 = l_lean_parser_syntax_mk__node(x_333, x_332); +x_336 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_336, 0, x_335); +x_337 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_337, 0, x_318); +lean::cnstr_set(x_337, 1, x_320); +lean::cnstr_set(x_337, 2, x_322); +lean::cnstr_set(x_337, 3, x_336); +if (x_316 == 0) { -uint8 x_344; obj* x_345; obj* x_346; -x_344 = 0; -if (lean::is_scalar(x_323)) { - x_345 = lean::alloc_cnstr(1, 1, 1); +uint8 x_338; obj* x_339; obj* x_340; +x_338 = 0; +if (lean::is_scalar(x_317)) { + x_339 = lean::alloc_cnstr(1, 1, 1); } else { - x_345 = x_323; + x_339 = x_317; } -lean::cnstr_set(x_345, 0, x_343); -lean::cnstr_set_scalar(x_345, sizeof(void*)*1, x_344); -x_346 = x_345; -x_18 = x_346; +lean::cnstr_set(x_339, 0, x_337); +lean::cnstr_set_scalar(x_339, sizeof(void*)*1, x_338); +x_340 = x_339; +x_18 = x_340; x_19 = x_22; goto lbl_20; } else { -obj* x_347; obj* x_348; -if (lean::is_scalar(x_323)) { - x_347 = lean::alloc_cnstr(1, 1, 1); +obj* x_341; obj* x_342; +if (lean::is_scalar(x_317)) { + x_341 = lean::alloc_cnstr(1, 1, 1); } else { - x_347 = x_323; + x_341 = x_317; } -lean::cnstr_set(x_347, 0, x_343); -lean::cnstr_set_scalar(x_347, sizeof(void*)*1, x_322); -x_348 = x_347; -x_18 = x_348; +lean::cnstr_set(x_341, 0, x_337); +lean::cnstr_set_scalar(x_341, sizeof(void*)*1, x_316); +x_342 = x_341; +x_18 = x_342; x_19 = x_22; goto lbl_20; } @@ -6174,19 +6146,18 @@ goto lbl_20; } else { -obj* x_353; obj* x_354; obj* x_355; obj* x_359; +obj* x_347; obj* x_348; obj* x_349; obj* x_352; lean::dec(x_5); lean::dec(x_4); lean::dec(x_1); lean::dec(x_0); -x_353 = lean::box(0); -x_354 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; -x_355 = l_mjoin___rarg___closed__1; -lean::inc(x_353); -lean::inc(x_355); -lean::inc(x_354); -x_359 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_354, x_355, x_353, x_353, x_6, x_7, x_8, x_9, x_10); -return x_359; +x_347 = lean::box(0); +x_348 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; +x_349 = l_mjoin___rarg___closed__1; +lean::inc(x_349); +lean::inc(x_348); +x_352 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_348, x_349, x_347, x_347, x_6, x_7, x_8, x_9, x_10); +return x_352; } } } @@ -6230,7 +6201,7 @@ return x_24; obj* _init_l_lean_parser_term_paren_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; 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; obj* x_37; obj* x_38; obj* x_39; x_0 = lean::mk_string("("); x_1 = l_lean_parser_max__prec; lean::inc(x_1); @@ -6244,39 +6215,34 @@ lean::inc(x_7); lean::inc(x_8); x_11 = l_lean_parser_combinators_sep__by_tokens___rarg(x_8, x_7); x_12 = lean::box(0); -lean::inc(x_12); -x_14 = l_lean_parser_list_cons_tokens___rarg(x_11, x_12); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_7, x_14); -x_16 = l_lean_parser_tokens___rarg(x_15); -x_17 = lean::mk_string(" : "); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_11, x_12); +x_14 = l_lean_parser_list_cons_tokens___rarg(x_7, x_13); +x_15 = l_lean_parser_tokens___rarg(x_14); +x_16 = lean::mk_string(" : "); lean::inc(x_5); -x_19 = l_lean_parser_symbol_tokens___rarg(x_17, x_5); -lean::inc(x_12); +x_18 = l_lean_parser_symbol_tokens___rarg(x_16, x_5); lean::inc(x_8); -x_22 = l_lean_parser_list_cons_tokens___rarg(x_8, x_12); -x_23 = l_lean_parser_list_cons_tokens___rarg(x_19, x_22); -x_24 = l_lean_parser_tokens___rarg(x_23); -lean::inc(x_12); -x_26 = l_lean_parser_list_cons_tokens___rarg(x_24, x_12); -x_27 = l_lean_parser_list_cons_tokens___rarg(x_16, x_26); +x_20 = l_lean_parser_list_cons_tokens___rarg(x_8, x_12); +x_21 = l_lean_parser_list_cons_tokens___rarg(x_18, x_20); +x_22 = l_lean_parser_tokens___rarg(x_21); +x_23 = l_lean_parser_list_cons_tokens___rarg(x_22, x_12); +x_24 = l_lean_parser_list_cons_tokens___rarg(x_15, x_23); +x_25 = l_lean_parser_tokens___rarg(x_24); +x_26 = l_lean_parser_list_cons_tokens___rarg(x_25, x_12); +x_27 = l_lean_parser_tokens___rarg(x_26); x_28 = l_lean_parser_tokens___rarg(x_27); -lean::inc(x_12); -x_30 = l_lean_parser_list_cons_tokens___rarg(x_28, x_12); -x_31 = l_lean_parser_tokens___rarg(x_30); -x_32 = l_lean_parser_tokens___rarg(x_31); -lean::inc(x_12); -x_34 = l_lean_parser_list_cons_tokens___rarg(x_32, x_12); +x_29 = l_lean_parser_list_cons_tokens___rarg(x_28, x_12); lean::inc(x_8); -x_36 = l_lean_parser_list_cons_tokens___rarg(x_8, x_34); -x_37 = l_lean_parser_tokens___rarg(x_36); -x_38 = l_lean_parser_tokens___rarg(x_37); -x_39 = lean::mk_string(")"); -x_40 = l_lean_parser_symbol_tokens___rarg(x_39, x_5); -x_41 = l_lean_parser_list_cons_tokens___rarg(x_40, x_12); -x_42 = l_lean_parser_list_cons_tokens___rarg(x_38, x_41); -x_43 = l_lean_parser_list_cons_tokens___rarg(x_3, x_42); -x_44 = l_lean_parser_tokens___rarg(x_43); -return x_44; +x_31 = l_lean_parser_list_cons_tokens___rarg(x_8, x_29); +x_32 = l_lean_parser_tokens___rarg(x_31); +x_33 = l_lean_parser_tokens___rarg(x_32); +x_34 = lean::mk_string(")"); +x_35 = l_lean_parser_symbol_tokens___rarg(x_34, x_5); +x_36 = l_lean_parser_list_cons_tokens___rarg(x_35, x_12); +x_37 = l_lean_parser_list_cons_tokens___rarg(x_33, x_36); +x_38 = l_lean_parser_list_cons_tokens___rarg(x_3, x_37); +x_39 = l_lean_parser_tokens___rarg(x_38); +return x_39; } } obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_term_paren_parser_lean_parser_has__tokens___spec__2___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8, obj* x_9, obj* x_10) { @@ -6301,7 +6267,7 @@ return x_9; obj* _init_l_lean_parser_term_paren_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_15; uint8 x_16; obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_33; obj* x_36; obj* x_37; obj* x_38; obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_47; obj* x_48; obj* x_50; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_79; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_15; uint8 x_16; obj* x_17; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_74; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -6336,115 +6302,110 @@ lean::closure_set(x_20, 0, x_9); lean::closure_set(x_20, 1, x_15); lean::closure_set(x_20, 2, x_17); x_21 = lean::box(0); -lean::inc(x_21); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_21); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_15); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_term_tuple; -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_24); -x_28 = lean::mk_string(" : "); -x_29 = l_string_trim(x_28); -lean::inc(x_29); -x_31 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_31, 0, x_29); +lean::cnstr_set(x_23, 0, x_15); +lean::cnstr_set(x_23, 1, x_22); +x_24 = l_lean_parser_term_tuple; +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_26, 0, x_24); +lean::closure_set(x_26, 1, x_23); +x_27 = lean::mk_string(" : "); +x_28 = l_string_trim(x_27); +lean::inc(x_28); +x_30 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_30, 0, x_28); lean::inc(x_7); -x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_33, 0, x_29); -lean::closure_set(x_33, 1, x_7); -lean::closure_set(x_33, 2, x_31); -lean::inc(x_21); +x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_32, 0, x_28); +lean::closure_set(x_32, 1, x_7); +lean::closure_set(x_32, 2, x_30); lean::inc(x_9); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_9); -lean::cnstr_set(x_36, 1, x_21); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_33); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_lean_parser_term_typed; -lean::inc(x_38); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_40, 0, x_38); -lean::closure_set(x_40, 1, x_37); -lean::inc(x_21); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_21); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_27); -lean::cnstr_set(x_43, 1, x_42); +x_34 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_34, 0, x_9); +lean::cnstr_set(x_34, 1, x_21); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_32); +lean::cnstr_set(x_35, 1, x_34); +x_36 = l_lean_parser_term_typed; +lean::inc(x_36); +x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_38, 0, x_36); +lean::closure_set(x_38, 1, x_35); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_21); +x_40 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_40, 0, x_26); +lean::cnstr_set(x_40, 1, x_39); lean::inc(x_7); -x_45 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_45, 0, x_43); -lean::closure_set(x_45, 1, x_7); -lean::inc(x_21); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set(x_47, 1, x_21); -x_48 = l_lean_parser_term_paren__special; -lean::inc(x_48); -x_50 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_50, 0, x_48); -lean::closure_set(x_50, 1, x_47); -x_51 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_51, 0, x_50); -lean::inc(x_21); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_51); -lean::cnstr_set(x_53, 1, x_21); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_9); -lean::cnstr_set(x_54, 1, x_53); -x_55 = l_lean_parser_term_paren__content; +x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_42, 0, x_40); +lean::closure_set(x_42, 1, x_7); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_21); +x_44 = l_lean_parser_term_paren__special; +lean::inc(x_44); +x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_46, 0, x_44); +lean::closure_set(x_46, 1, x_43); +x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); +lean::closure_set(x_47, 0, x_46); +x_48 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_48, 0, x_47); +lean::cnstr_set(x_48, 1, x_21); +x_49 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_49, 0, x_9); +lean::cnstr_set(x_49, 1, x_48); +x_50 = l_lean_parser_term_paren__content; +lean::inc(x_50); +x_52 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_52, 0, x_50); +lean::closure_set(x_52, 1, x_49); +x_53 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); +lean::closure_set(x_53, 0, x_52); +x_54 = lean::mk_string(")"); +x_55 = l_string_trim(x_54); lean::inc(x_55); -x_57 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +x_57 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_57, 0, x_55); -lean::closure_set(x_57, 1, x_54); -x_58 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_58, 0, x_57); -x_59 = lean::mk_string(")"); -x_60 = l_string_trim(x_59); -lean::inc(x_60); -x_62 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_62, 0, x_60); -x_63 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_63, 0, x_60); -lean::closure_set(x_63, 1, x_7); -lean::closure_set(x_63, 2, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_21); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_58); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_6); -lean::cnstr_set(x_66, 1, x_65); -x_67 = l_lean_parser_term__parser__m_monad; -x_68 = l_lean_parser_term__parser__m_monad__except; -x_69 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_70 = l_lean_parser_term__parser__m_alternative; -x_71 = l_lean_parser_term_paren; -x_72 = l_lean_parser_term_paren_has__view; -lean::inc(x_72); -lean::inc(x_71); -lean::inc(x_70); -lean::inc(x_69); -lean::inc(x_68); +x_58 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_58, 0, x_55); +lean::closure_set(x_58, 1, x_7); +lean::closure_set(x_58, 2, x_57); +x_59 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_59, 0, x_58); +lean::cnstr_set(x_59, 1, x_21); +x_60 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_60, 0, x_53); +lean::cnstr_set(x_60, 1, x_59); +x_61 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_61, 0, x_6); +lean::cnstr_set(x_61, 1, x_60); +x_62 = l_lean_parser_term__parser__m_monad; +x_63 = l_lean_parser_term__parser__m_monad__except; +x_64 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_65 = l_lean_parser_term__parser__m_alternative; +x_66 = l_lean_parser_term_paren; +x_67 = l_lean_parser_term_paren_has__view; lean::inc(x_67); -x_79 = l_lean_parser_combinators_node_view___rarg(x_67, x_68, x_69, x_70, x_71, x_66, x_72); -return x_79; +lean::inc(x_66); +lean::inc(x_65); +lean::inc(x_64); +lean::inc(x_63); +lean::inc(x_62); +x_74 = l_lean_parser_combinators_node_view___rarg(x_62, x_63, x_64, x_65, x_66, x_61, x_67); +return x_74; } } obj* _init_l_lean_parser_term_paren_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_15; uint8 x_16; obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_33; obj* x_36; obj* x_37; obj* x_38; obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_47; obj* x_48; obj* x_50; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_15; uint8 x_16; obj* x_17; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -6479,96 +6440,91 @@ lean::closure_set(x_20, 0, x_9); lean::closure_set(x_20, 1, x_15); lean::closure_set(x_20, 2, x_17); x_21 = lean::box(0); -lean::inc(x_21); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_21); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_15); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_term_tuple; -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_24); -x_28 = lean::mk_string(" : "); -x_29 = l_string_trim(x_28); -lean::inc(x_29); -x_31 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_31, 0, x_29); +lean::cnstr_set(x_23, 0, x_15); +lean::cnstr_set(x_23, 1, x_22); +x_24 = l_lean_parser_term_tuple; +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_26, 0, x_24); +lean::closure_set(x_26, 1, x_23); +x_27 = lean::mk_string(" : "); +x_28 = l_string_trim(x_27); +lean::inc(x_28); +x_30 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_30, 0, x_28); lean::inc(x_7); -x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_33, 0, x_29); -lean::closure_set(x_33, 1, x_7); -lean::closure_set(x_33, 2, x_31); -lean::inc(x_21); +x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_32, 0, x_28); +lean::closure_set(x_32, 1, x_7); +lean::closure_set(x_32, 2, x_30); lean::inc(x_9); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_9); -lean::cnstr_set(x_36, 1, x_21); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_33); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_lean_parser_term_typed; -lean::inc(x_38); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_40, 0, x_38); -lean::closure_set(x_40, 1, x_37); -lean::inc(x_21); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_21); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_27); -lean::cnstr_set(x_43, 1, x_42); +x_34 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_34, 0, x_9); +lean::cnstr_set(x_34, 1, x_21); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_32); +lean::cnstr_set(x_35, 1, x_34); +x_36 = l_lean_parser_term_typed; +lean::inc(x_36); +x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_38, 0, x_36); +lean::closure_set(x_38, 1, x_35); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_21); +x_40 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_40, 0, x_26); +lean::cnstr_set(x_40, 1, x_39); lean::inc(x_7); -x_45 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_45, 0, x_43); -lean::closure_set(x_45, 1, x_7); -lean::inc(x_21); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set(x_47, 1, x_21); -x_48 = l_lean_parser_term_paren__special; -lean::inc(x_48); -x_50 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_50, 0, x_48); -lean::closure_set(x_50, 1, x_47); -x_51 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_51, 0, x_50); -lean::inc(x_21); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_51); -lean::cnstr_set(x_53, 1, x_21); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_9); -lean::cnstr_set(x_54, 1, x_53); -x_55 = l_lean_parser_term_paren__content; +x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_42, 0, x_40); +lean::closure_set(x_42, 1, x_7); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_21); +x_44 = l_lean_parser_term_paren__special; +lean::inc(x_44); +x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_46, 0, x_44); +lean::closure_set(x_46, 1, x_43); +x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); +lean::closure_set(x_47, 0, x_46); +x_48 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_48, 0, x_47); +lean::cnstr_set(x_48, 1, x_21); +x_49 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_49, 0, x_9); +lean::cnstr_set(x_49, 1, x_48); +x_50 = l_lean_parser_term_paren__content; +lean::inc(x_50); +x_52 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_52, 0, x_50); +lean::closure_set(x_52, 1, x_49); +x_53 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); +lean::closure_set(x_53, 0, x_52); +x_54 = lean::mk_string(")"); +x_55 = l_string_trim(x_54); lean::inc(x_55); -x_57 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +x_57 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_57, 0, x_55); -lean::closure_set(x_57, 1, x_54); -x_58 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_58, 0, x_57); -x_59 = lean::mk_string(")"); -x_60 = l_string_trim(x_59); -lean::inc(x_60); -x_62 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_62, 0, x_60); -x_63 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_63, 0, x_60); -lean::closure_set(x_63, 1, x_7); -lean::closure_set(x_63, 2, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_63); -lean::cnstr_set(x_64, 1, x_21); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_58); -lean::cnstr_set(x_65, 1, x_64); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_6); -lean::cnstr_set(x_66, 1, x_65); -return x_66; +x_58 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_58, 0, x_55); +lean::closure_set(x_58, 1, x_7); +lean::closure_set(x_58, 2, x_57); +x_59 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_59, 0, x_58); +lean::cnstr_set(x_59, 1, x_21); +x_60 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_60, 0, x_53); +lean::cnstr_set(x_60, 1, x_59); +x_61 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_61, 0, x_6); +lean::cnstr_set(x_61, 1, x_60); +return x_61; } } obj* l_lean_parser_term_paren_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -6958,50 +6914,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__3; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__3; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__3; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__3; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__3; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__3; +lean::inc(x_69); +return x_69; } } } @@ -7011,52 +6966,52 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__3; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__3; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { switch (lean::obj_tag(x_1)) { case 0: { -obj* x_80; obj* x_83; obj* x_84; -x_80 = lean::cnstr_get(x_1, 0); -lean::inc(x_80); +obj* x_79; obj* x_82; obj* x_83; +x_79 = lean::cnstr_get(x_1, 0); +lean::inc(x_79); lean::dec(x_1); +x_82 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_82, 0, x_79); x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_80); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +lean::cnstr_set(x_83, 0, x_82); +return x_83; } case 3: { -obj* x_85; -x_85 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__1; -lean::inc(x_85); -return x_85; +obj* x_84; +x_84 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__1; +lean::inc(x_84); +return x_84; } default: { -obj* x_88; +obj* x_87; lean::dec(x_1); -x_88 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__1; -lean::inc(x_88); -return x_88; +x_87 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__1; +lean::inc(x_87); +return x_87; } } } @@ -7065,30 +7020,30 @@ else switch (lean::obj_tag(x_1)) { case 0: { -obj* x_90; obj* x_93; obj* x_94; -x_90 = lean::cnstr_get(x_1, 0); -lean::inc(x_90); +obj* x_89; obj* x_92; obj* x_93; +x_89 = lean::cnstr_get(x_1, 0); +lean::inc(x_89); lean::dec(x_1); -x_93 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_93, 0, x_90); -x_94 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_94, 0, x_93); -return x_94; +x_92 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_92, 0, x_89); +x_93 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_93, 0, x_92); +return x_93; } case 3: { -obj* x_95; -x_95 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__2; -lean::inc(x_95); -return x_95; +obj* x_94; +x_94 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__2; +lean::inc(x_94); +return x_94; } default: { -obj* x_98; +obj* x_97; lean::dec(x_1); -x_98 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__2; -lean::inc(x_98); -return x_98; +x_97 = l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__2; +lean::inc(x_97); +return x_97; } } } @@ -7102,7 +7057,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; +obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -7111,46 +7066,44 @@ lean::inc(x_5); x_7 = l_option_map___rarg(x_5, x_2); x_8 = lean::box(3); x_9 = l_option_get__or__else___main___rarg(x_7, x_8); -lean::inc(x_1); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_1); -x_12 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_12); -x_14 = l_lean_parser_syntax_mk__node(x_12, x_11); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_1); -x_16 = l_lean_parser_term_sort; -lean::inc(x_16); -x_18 = l_lean_parser_syntax_mk__node(x_16, x_15); -return x_18; +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_1); +x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_11); +x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_1); +x_15 = l_lean_parser_term_sort; +lean::inc(x_15); +x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); +return x_17; } else { -obj* x_19; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; -x_19 = lean::cnstr_get(x_0, 0); -lean::inc(x_19); +obj* x_18; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; +x_18 = lean::cnstr_get(x_0, 0); +lean::inc(x_18); lean::dec(x_0); -x_22 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_22); -x_24 = l_option_map___rarg(x_22, x_19); -x_25 = lean::box(3); -x_26 = l_option_get__or__else___main___rarg(x_24, x_25); -lean::inc(x_1); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_1); -x_29 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_29); -x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_1); -x_33 = l_lean_parser_term_sort; -lean::inc(x_33); -x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); -return x_35; +x_21 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_21); +x_23 = l_option_map___rarg(x_21, x_18); +x_24 = lean::box(3); +x_25 = l_option_get__or__else___main___rarg(x_23, x_24); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_1); +x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_1); +x_31 = l_lean_parser_term_sort; +lean::inc(x_31); +x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); +return x_33; } } } @@ -7178,7 +7131,7 @@ return x_0; obj* _init_l_lean_parser_term_sort_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; x_0 = lean::mk_string("Sort"); x_1 = l_lean_parser_max__prec; lean::inc(x_1); @@ -7187,19 +7140,18 @@ x_4 = lean::mk_string("Type"); lean::inc(x_1); x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_1); x_7 = lean::box(0); -lean::inc(x_7); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_6, x_7); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_3, x_9); -x_11 = l_lean_parser_tokens___rarg(x_10); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_11, x_7); -x_13 = l_lean_parser_tokens___rarg(x_12); -return x_13; +x_8 = l_lean_parser_list_cons_tokens___rarg(x_6, x_7); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_3, x_8); +x_10 = l_lean_parser_tokens___rarg(x_9); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_10, x_7); +x_12 = l_lean_parser_tokens___rarg(x_11); +return x_12; } } obj* _init_l_lean_parser_term_sort_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_32; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_31; x_0 = lean::mk_string("Sort"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -7222,40 +7174,39 @@ lean::closure_set(x_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); x_13 = lean::box(0); -lean::inc(x_13); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_12); +lean::cnstr_set(x_14, 1, x_13); x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_12); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_6); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::mk_nat_obj(0u); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_13); -x_20 = l_lean_parser_term__parser__m_monad; -x_21 = l_lean_parser_term__parser__m_monad__except; -x_22 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_23 = l_lean_parser_term__parser__m_alternative; -x_24 = l_lean_parser_term_sort; -x_25 = l_lean_parser_term_sort_has__view; -lean::inc(x_25); +lean::cnstr_set(x_15, 0, x_6); +lean::cnstr_set(x_15, 1, x_14); +x_16 = lean::mk_nat_obj(0u); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_17, 0, x_15); +lean::closure_set(x_17, 1, x_16); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_17); +lean::cnstr_set(x_18, 1, x_13); +x_19 = l_lean_parser_term__parser__m_monad; +x_20 = l_lean_parser_term__parser__m_monad__except; +x_21 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_22 = l_lean_parser_term__parser__m_alternative; +x_23 = l_lean_parser_term_sort; +x_24 = l_lean_parser_term_sort_has__view; lean::inc(x_24); lean::inc(x_23); lean::inc(x_22); lean::inc(x_21); lean::inc(x_20); -x_32 = l_lean_parser_combinators_node_view___rarg(x_20, x_21, x_22, x_23, x_24, x_19, x_25); -return x_32; +lean::inc(x_19); +x_31 = l_lean_parser_combinators_node_view___rarg(x_19, x_20, x_21, x_22, x_23, x_18, x_24); +return x_31; } } obj* _init_l_lean_parser_term_sort_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; x_0 = lean::mk_string("Sort"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -7278,21 +7229,20 @@ lean::closure_set(x_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); x_13 = lean::box(0); -lean::inc(x_13); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_12); +lean::cnstr_set(x_14, 1, x_13); x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_12); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_6); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::mk_nat_obj(0u); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_13); -return x_19; +lean::cnstr_set(x_15, 0, x_6); +lean::cnstr_set(x_15, 1, x_14); +x_16 = lean::mk_nat_obj(0u); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_17, 0, x_15); +lean::closure_set(x_17, 1, x_16); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_17); +lean::cnstr_set(x_18, 1, x_13); +return x_18; } } obj* l_lean_parser_term_sort_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -7696,24 +7646,21 @@ return x_8; obj* _init_l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_9; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -x_8 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_8, 0, x_0); -lean::cnstr_set(x_8, 1, x_3); -lean::cnstr_set(x_8, 2, x_5); -lean::cnstr_set(x_8, 3, x_0); -lean::cnstr_set(x_8, 4, x_0); -x_9 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -return x_9; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_6, 0, x_5); +return x_6; } } obj* _init_l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__2() { @@ -7902,50 +7849,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__3; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__3; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__3; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__3; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__3; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__3; +lean::inc(x_69); +return x_69; } } } @@ -7955,61 +7901,61 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__3; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__3; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_term_hole_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_term_hole_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { switch (lean::obj_tag(x_1)) { case 1: { -obj* x_85; obj* x_88; -x_85 = lean::cnstr_get(x_1, 0); -lean::inc(x_85); +obj* x_84; obj* x_87; +x_84 = lean::cnstr_get(x_1, 0); +lean::inc(x_84); lean::dec(x_1); -x_88 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_88, 0, x_85); -return x_88; +x_87 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_87, 0, x_84); +return x_87; } case 3: { -obj* x_89; -x_89 = l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__2; -lean::inc(x_89); -return x_89; +obj* x_88; +x_88 = l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__2; +lean::inc(x_88); +return x_88; } default: { -obj* x_92; +obj* x_91; lean::dec(x_1); -x_92 = l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__2; -lean::inc(x_92); -return x_92; +x_91 = l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__2; +lean::inc(x_91); +return x_91; } } } @@ -8023,51 +7969,49 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; +obj* x_2; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); x_5 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_5, 0, x_2); -lean::inc(x_1); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_1); -x_8 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_8); -x_10 = l_lean_parser_syntax_mk__node(x_8, x_7); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_1); -x_12 = l_lean_parser_term_binder__ident; -lean::inc(x_12); -x_14 = l_lean_parser_syntax_mk__node(x_12, x_11); -return x_14; +x_6 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_1); +x_7 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_7); +x_9 = l_lean_parser_syntax_mk__node(x_7, x_6); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_1); +x_11 = l_lean_parser_term_binder__ident; +lean::inc(x_11); +x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); +return x_13; } else { -obj* x_15; obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_30; -x_15 = lean::cnstr_get(x_0, 0); -lean::inc(x_15); +obj* x_14; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; +x_14 = lean::cnstr_get(x_0, 0); +lean::inc(x_14); lean::dec(x_0); -x_18 = l_lean_parser_term_hole_has__view; -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -x_21 = lean::apply_1(x_19, x_15); -lean::inc(x_1); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_1); -x_24 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_24); -x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_1); -x_28 = l_lean_parser_term_binder__ident; -lean::inc(x_28); -x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); -return x_30; +x_17 = l_lean_parser_term_hole_has__view; +x_18 = lean::cnstr_get(x_17, 1); +lean::inc(x_18); +x_20 = lean::apply_1(x_18, x_14); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_20); +lean::cnstr_set(x_21, 1, x_1); +x_22 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_22); +x_24 = l_lean_parser_syntax_mk__node(x_22, x_21); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_1); +x_26 = l_lean_parser_term_binder__ident; +lean::inc(x_26); +x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); +return x_28; } } } @@ -8095,79 +8039,75 @@ return x_0; obj* _init_l_lean_parser_term_binder__ident_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = l_lean_parser_term_hole_parser_lean_parser_has__tokens; -lean::inc(x_0); lean::inc(x_1); -x_4 = l_lean_parser_list_cons_tokens___rarg(x_1, x_0); -lean::inc(x_0); -x_6 = l_lean_parser_list_cons_tokens___rarg(x_0, x_4); +x_3 = l_lean_parser_list_cons_tokens___rarg(x_1, x_0); +x_4 = l_lean_parser_list_cons_tokens___rarg(x_0, x_3); +x_5 = l_lean_parser_tokens___rarg(x_4); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_5, x_0); x_7 = l_lean_parser_tokens___rarg(x_6); -x_8 = l_lean_parser_list_cons_tokens___rarg(x_7, x_0); -x_9 = l_lean_parser_tokens___rarg(x_8); -return x_9; +return x_7; } } obj* _init_l_lean_parser_term_binder__ident_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_21; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_20; x_0 = lean::box(0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_hole_parser), 5, 0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_0); -x_9 = l_lean_parser_term__parser__m_monad; -x_10 = l_lean_parser_term__parser__m_monad__except; -x_11 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_12 = l_lean_parser_term__parser__m_alternative; -x_13 = l_lean_parser_term_binder__ident; -x_14 = l_lean_parser_term_binder__ident_has__view; -lean::inc(x_14); +x_2 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); +x_4 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_4, 0, x_3); +lean::cnstr_set(x_4, 1, x_2); +x_5 = lean::mk_nat_obj(0u); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_6, 0, x_4); +lean::closure_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_0); +x_8 = l_lean_parser_term__parser__m_monad; +x_9 = l_lean_parser_term__parser__m_monad__except; +x_10 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_11 = l_lean_parser_term__parser__m_alternative; +x_12 = l_lean_parser_term_binder__ident; +x_13 = l_lean_parser_term_binder__ident_has__view; lean::inc(x_13); lean::inc(x_12); lean::inc(x_11); lean::inc(x_10); lean::inc(x_9); -x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x_8, x_14); -return x_21; +lean::inc(x_8); +x_20 = l_lean_parser_combinators_node_view___rarg(x_8, x_9, x_10, x_11, x_12, x_7, x_13); +return x_20; } } obj* _init_l_lean_parser_term_binder__ident_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_hole_parser), 5, 0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_0); -return x_8; +x_2 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); +x_4 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_4, 0, x_3); +lean::cnstr_set(x_4, 1, x_2); +x_5 = lean::mk_nat_obj(0u); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_6, 0, x_4); +lean::closure_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_0); +return x_7; } } obj* l_lean_parser_term_binder__ident_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -8796,50 +8736,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_binder__default_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_binder__default_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_binder__default_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_binder__default_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_binder__default_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_binder__default_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -8849,44 +8788,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_binder__default_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_binder__default_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_term_binder__default__tac_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_term_binder__default__tac_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_term_binder__default__val_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_term_binder__default__val_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -8898,7 +8837,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -8906,45 +8845,43 @@ x_5 = l_lean_parser_term_binder__default__val_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_term_binder__default; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_term_binder__default; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_term_binder__default__tac_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_term_binder__default; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_term_binder__default__tac_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_term_binder__default; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -8972,36 +8909,34 @@ return x_0; obj* _init_l_lean_parser_term_binder__default_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; x_0 = lean::mk_string(":="); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_4 = lean::box(0); x_5 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_4); lean::inc(x_5); -x_8 = l_lean_parser_list_cons_tokens___rarg(x_5, x_4); -lean::inc(x_8); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_3, x_8); -x_11 = l_lean_parser_tokens___rarg(x_10); -x_12 = lean::mk_string("."); -x_13 = l_lean_parser_symbol_tokens___rarg(x_12, x_1); -x_14 = l_lean_parser_list_cons_tokens___rarg(x_13, x_8); -x_15 = l_lean_parser_tokens___rarg(x_14); -lean::inc(x_4); -x_17 = l_lean_parser_list_cons_tokens___rarg(x_15, x_4); -x_18 = l_lean_parser_list_cons_tokens___rarg(x_11, x_17); +x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_4); +lean::inc(x_7); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_3, x_7); +x_10 = l_lean_parser_tokens___rarg(x_9); +x_11 = lean::mk_string("."); +x_12 = l_lean_parser_symbol_tokens___rarg(x_11, x_1); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_12, x_7); +x_14 = l_lean_parser_tokens___rarg(x_13); +x_15 = l_lean_parser_list_cons_tokens___rarg(x_14, x_4); +x_16 = l_lean_parser_list_cons_tokens___rarg(x_10, x_15); +x_17 = l_lean_parser_tokens___rarg(x_16); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_17, x_4); x_19 = l_lean_parser_tokens___rarg(x_18); -x_20 = l_lean_parser_list_cons_tokens___rarg(x_19, x_4); -x_21 = l_lean_parser_tokens___rarg(x_20); -return x_21; +return x_19; } } obj* _init_l_lean_parser_term_binder__default_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_44; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_42; x_0 = lean::mk_string(":="); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -9017,70 +8952,68 @@ lean::inc(x_4); x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); lean::closure_set(x_8, 0, x_4); x_9 = lean::box(0); -lean::inc(x_9); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_9); -lean::inc(x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_6); -lean::cnstr_set(x_13, 1, x_11); -x_14 = l_lean_parser_term_binder__default__val; -lean::inc(x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_13); -x_17 = lean::mk_string("."); -x_18 = l_string_trim(x_17); -lean::inc(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_20, 0, x_18); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_8); +lean::cnstr_set(x_10, 1, x_9); +lean::inc(x_10); +x_12 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_12, 0, x_6); +lean::cnstr_set(x_12, 1, x_10); +x_13 = l_lean_parser_term_binder__default__val; +lean::inc(x_13); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_15, 0, x_13); +lean::closure_set(x_15, 1, x_12); +x_16 = lean::mk_string("."); +x_17 = l_string_trim(x_16); +lean::inc(x_17); +x_19 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_19, 0, x_17); lean::inc(x_4); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_22, 0, x_18); -lean::closure_set(x_22, 1, x_4); -lean::closure_set(x_22, 2, x_20); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_11); -x_24 = l_lean_parser_term_binder__default__tac; -lean::inc(x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_26, 0, x_24); -lean::closure_set(x_26, 1, x_23); -lean::inc(x_9); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_9); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_21, 0, x_17); +lean::closure_set(x_21, 1, x_4); +lean::closure_set(x_21, 2, x_19); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_21); +lean::cnstr_set(x_22, 1, x_10); +x_23 = l_lean_parser_term_binder__default__tac; +lean::inc(x_23); +x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_25, 0, x_23); +lean::closure_set(x_25, 1, x_22); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_9); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_15); +lean::cnstr_set(x_27, 1, x_26); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_28, 0, x_27); +lean::closure_set(x_28, 1, x_4); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_16); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_30, 0, x_29); -lean::closure_set(x_30, 1, x_4); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_9); -x_32 = l_lean_parser_term__parser__m_monad; -x_33 = l_lean_parser_term__parser__m_monad__except; -x_34 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_35 = l_lean_parser_term__parser__m_alternative; -x_36 = l_lean_parser_term_binder__default; -x_37 = l_lean_parser_term_binder__default_has__view; -lean::inc(x_37); -lean::inc(x_36); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_9); +x_30 = l_lean_parser_term__parser__m_monad; +x_31 = l_lean_parser_term__parser__m_monad__except; +x_32 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_33 = l_lean_parser_term__parser__m_alternative; +x_34 = l_lean_parser_term_binder__default; +x_35 = l_lean_parser_term_binder__default_has__view; lean::inc(x_35); lean::inc(x_34); lean::inc(x_33); lean::inc(x_32); -x_44 = l_lean_parser_combinators_node_view___rarg(x_32, x_33, x_34, x_35, x_36, x_31, x_37); -return x_44; +lean::inc(x_31); +lean::inc(x_30); +x_42 = l_lean_parser_combinators_node_view___rarg(x_30, x_31, x_32, x_33, x_34, x_29, x_35); +return x_42; } } obj* _init_l_lean_parser_term_binder__default_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; x_0 = lean::mk_string(":="); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -9096,51 +9029,49 @@ lean::inc(x_4); x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); lean::closure_set(x_8, 0, x_4); x_9 = lean::box(0); -lean::inc(x_9); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_9); -lean::inc(x_11); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_6); -lean::cnstr_set(x_13, 1, x_11); -x_14 = l_lean_parser_term_binder__default__val; -lean::inc(x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_13); -x_17 = lean::mk_string("."); -x_18 = l_string_trim(x_17); -lean::inc(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_20, 0, x_18); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_8); +lean::cnstr_set(x_10, 1, x_9); +lean::inc(x_10); +x_12 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_12, 0, x_6); +lean::cnstr_set(x_12, 1, x_10); +x_13 = l_lean_parser_term_binder__default__val; +lean::inc(x_13); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_15, 0, x_13); +lean::closure_set(x_15, 1, x_12); +x_16 = lean::mk_string("."); +x_17 = l_string_trim(x_16); +lean::inc(x_17); +x_19 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_19, 0, x_17); lean::inc(x_4); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_22, 0, x_18); -lean::closure_set(x_22, 1, x_4); -lean::closure_set(x_22, 2, x_20); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_11); -x_24 = l_lean_parser_term_binder__default__tac; -lean::inc(x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_26, 0, x_24); -lean::closure_set(x_26, 1, x_23); -lean::inc(x_9); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_9); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_21, 0, x_17); +lean::closure_set(x_21, 1, x_4); +lean::closure_set(x_21, 2, x_19); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_21); +lean::cnstr_set(x_22, 1, x_10); +x_23 = l_lean_parser_term_binder__default__tac; +lean::inc(x_23); +x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_25, 0, x_23); +lean::closure_set(x_25, 1, x_22); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_9); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_15); +lean::cnstr_set(x_27, 1, x_26); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_28, 0, x_27); +lean::closure_set(x_28, 1, x_4); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_16); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_30, 0, x_29); -lean::closure_set(x_30, 1, x_4); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_9); -return x_31; +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_9); +return x_29; } } obj* l_lean_parser_term_binder__default_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -9997,20 +9928,19 @@ return x_1; obj* _init_l_lean_parser_term_binder__content_has__view_x_27___lambda__2___closed__2() { _start: { -obj* x_0; obj* x_1; obj* x_4; obj* x_6; obj* x_7; +obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = l_lean_parser_no__kind; -lean::inc(x_0); lean::inc(x_1); -x_4 = l_lean_parser_syntax_mk__node(x_1, x_0); -lean::inc(x_4); +x_3 = l_lean_parser_syntax_mk__node(x_1, x_0); +lean::inc(x_3); +x_5 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_5, 0, x_3); +lean::cnstr_set(x_5, 1, x_0); x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_0); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_6); -return x_7; +lean::cnstr_set(x_6, 0, x_3); +lean::cnstr_set(x_6, 1, x_5); +return x_6; } } obj* l_lean_parser_term_binder__content_has__view_x_27___lambda__2(obj* x_0) { @@ -10035,113 +9965,108 @@ if (lean::obj_tag(x_3) == 0) { if (lean::obj_tag(x_5) == 0) { -obj* x_16; obj* x_18; obj* x_19; obj* x_21; -lean::dec(x_14); -x_16 = l_lean_parser_term_binder__content_has__view_x_27___lambda__2___closed__2; -lean::inc(x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_13); -lean::cnstr_set(x_18, 1, x_16); -x_19 = l_lean_parser_term_binder__content; -lean::inc(x_19); -x_21 = l_lean_parser_syntax_mk__node(x_19, x_18); -return x_21; +obj* x_15; obj* x_17; obj* x_18; obj* x_20; +x_15 = l_lean_parser_term_binder__content_has__view_x_27___lambda__2___closed__2; +lean::inc(x_15); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_13); +lean::cnstr_set(x_17, 1, x_15); +x_18 = l_lean_parser_term_binder__content; +lean::inc(x_18); +x_20 = l_lean_parser_syntax_mk__node(x_18, x_17); +return x_20; } else { -obj* x_22; obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_40; -x_22 = lean::cnstr_get(x_5, 0); -lean::inc(x_22); +obj* x_21; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_38; +x_21 = lean::cnstr_get(x_5, 0); +lean::inc(x_21); lean::dec(x_5); -x_25 = l_lean_parser_term_binder__default_has__view; -x_26 = lean::cnstr_get(x_25, 1); -lean::inc(x_26); -x_28 = lean::apply_1(x_26, x_22); -lean::inc(x_14); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set(x_30, 1, x_14); +x_24 = l_lean_parser_term_binder__default_has__view; +x_25 = lean::cnstr_get(x_24, 1); +lean::inc(x_25); +x_27 = lean::apply_1(x_25, x_21); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_14); lean::inc(x_11); -x_32 = l_lean_parser_syntax_mk__node(x_11, x_30); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_14); -x_34 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set(x_36, 1, x_33); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_13); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_lean_parser_term_binder__content; -lean::inc(x_38); -x_40 = l_lean_parser_syntax_mk__node(x_38, x_37); -return x_40; +x_30 = l_lean_parser_syntax_mk__node(x_11, x_28); +x_31 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_31, 0, x_30); +lean::cnstr_set(x_31, 1, x_14); +x_32 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_32); +x_34 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_34, 0, x_32); +lean::cnstr_set(x_34, 1, x_31); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_13); +lean::cnstr_set(x_35, 1, x_34); +x_36 = l_lean_parser_term_binder__content; +lean::inc(x_36); +x_38 = l_lean_parser_syntax_mk__node(x_36, x_35); +return x_38; } } else { -obj* x_41; obj* x_44; obj* x_45; obj* x_47; obj* x_49; obj* x_51; -x_41 = lean::cnstr_get(x_3, 0); -lean::inc(x_41); +obj* x_39; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_48; +x_39 = lean::cnstr_get(x_3, 0); +lean::inc(x_39); lean::dec(x_3); -x_44 = l_lean_parser_term_type__spec_has__view; -x_45 = lean::cnstr_get(x_44, 1); -lean::inc(x_45); -x_47 = lean::apply_1(x_45, x_41); -lean::inc(x_14); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_47); -lean::cnstr_set(x_49, 1, x_14); +x_42 = l_lean_parser_term_type__spec_has__view; +x_43 = lean::cnstr_get(x_42, 1); +lean::inc(x_43); +x_45 = lean::apply_1(x_43, x_39); +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_45); +lean::cnstr_set(x_46, 1, x_14); lean::inc(x_11); -x_51 = l_lean_parser_syntax_mk__node(x_11, x_49); +x_48 = l_lean_parser_syntax_mk__node(x_11, x_46); if (lean::obj_tag(x_5) == 0) { -obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_59; -lean::dec(x_14); -x_53 = l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; +obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_55; +x_49 = l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; +lean::inc(x_49); +x_51 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_51, 0, x_48); +lean::cnstr_set(x_51, 1, x_49); +x_52 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_52, 0, x_13); +lean::cnstr_set(x_52, 1, x_51); +x_53 = l_lean_parser_term_binder__content; lean::inc(x_53); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_51); -lean::cnstr_set(x_55, 1, x_53); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_13); -lean::cnstr_set(x_56, 1, x_55); -x_57 = l_lean_parser_term_binder__content; -lean::inc(x_57); -x_59 = l_lean_parser_syntax_mk__node(x_57, x_56); -return x_59; +x_55 = l_lean_parser_syntax_mk__node(x_53, x_52); +return x_55; } else { -obj* x_60; obj* x_63; obj* x_64; obj* x_66; obj* x_68; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_76; -x_60 = lean::cnstr_get(x_5, 0); -lean::inc(x_60); +obj* x_56; obj* x_59; obj* x_60; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_71; +x_56 = lean::cnstr_get(x_5, 0); +lean::inc(x_56); lean::dec(x_5); -x_63 = l_lean_parser_term_binder__default_has__view; -x_64 = lean::cnstr_get(x_63, 1); -lean::inc(x_64); -x_66 = lean::apply_1(x_64, x_60); -lean::inc(x_14); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_66); -lean::cnstr_set(x_68, 1, x_14); +x_59 = l_lean_parser_term_binder__default_has__view; +x_60 = lean::cnstr_get(x_59, 1); +lean::inc(x_60); +x_62 = lean::apply_1(x_60, x_56); +x_63 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_63, 0, x_62); +lean::cnstr_set(x_63, 1, x_14); lean::inc(x_11); -x_70 = l_lean_parser_syntax_mk__node(x_11, x_68); -x_71 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_14); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_51); -lean::cnstr_set(x_72, 1, x_71); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_13); -lean::cnstr_set(x_73, 1, x_72); -x_74 = l_lean_parser_term_binder__content; -lean::inc(x_74); -x_76 = l_lean_parser_syntax_mk__node(x_74, x_73); -return x_76; +x_65 = l_lean_parser_syntax_mk__node(x_11, x_63); +x_66 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_66, 0, x_65); +lean::cnstr_set(x_66, 1, x_14); +x_67 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_67, 0, x_48); +lean::cnstr_set(x_67, 1, x_66); +x_68 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_68, 0, x_13); +lean::cnstr_set(x_68, 1, x_67); +x_69 = l_lean_parser_term_binder__content; +lean::inc(x_69); +x_71 = l_lean_parser_syntax_mk__node(x_69, x_68); +return x_71; } } } @@ -10986,7 +10911,7 @@ return x_117; obj* l_lean_parser_term_simple__explicit__binder_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -11002,37 +10927,35 @@ x_12 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_12); x_14 = l_option_map___rarg(x_12, x_1); x_15 = lean::box(3); -lean::inc(x_15); -x_17 = l_option_get__or__else___main___rarg(x_14, x_15); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_3); +x_16 = l_option_get__or__else___main___rarg(x_14, x_15); +x_17 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_17, 0, x_3); lean::inc(x_12); -x_20 = l_option_map___rarg(x_12, x_5); -lean::inc(x_15); -x_22 = l_option_get__or__else___main___rarg(x_20, x_15); +x_19 = l_option_map___rarg(x_12, x_5); +x_20 = l_option_get__or__else___main___rarg(x_19, x_15); lean::inc(x_12); -x_24 = l_option_map___rarg(x_12, x_9); -x_25 = l_option_get__or__else___main___rarg(x_24, x_15); -x_26 = lean::box(0); +x_22 = l_option_map___rarg(x_12, x_9); +x_23 = l_option_get__or__else___main___rarg(x_22, x_15); +x_24 = lean::box(0); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_23); +lean::cnstr_set(x_25, 1, x_24); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_7); +lean::cnstr_set(x_26, 1, x_25); x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); +lean::cnstr_set(x_27, 0, x_20); lean::cnstr_set(x_27, 1, x_26); x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_7); +lean::cnstr_set(x_28, 0, x_17); lean::cnstr_set(x_28, 1, x_27); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_22); +lean::cnstr_set(x_29, 0, x_16); lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_18); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_17); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_lean_parser_term_simple__explicit__binder; -lean::inc(x_32); -x_34 = l_lean_parser_syntax_mk__node(x_32, x_31); -return x_34; +x_30 = l_lean_parser_term_simple__explicit__binder; +lean::inc(x_30); +x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); +return x_32; } } obj* _init_l_lean_parser_term_simple__explicit__binder_has__view_x_27() { @@ -11782,7 +11705,7 @@ return x_117; obj* l_lean_parser_term_simple__implicit__binder_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -11798,37 +11721,35 @@ x_12 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_12); x_14 = l_option_map___rarg(x_12, x_1); x_15 = lean::box(3); -lean::inc(x_15); -x_17 = l_option_get__or__else___main___rarg(x_14, x_15); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_3); +x_16 = l_option_get__or__else___main___rarg(x_14, x_15); +x_17 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_17, 0, x_3); lean::inc(x_12); -x_20 = l_option_map___rarg(x_12, x_5); -lean::inc(x_15); -x_22 = l_option_get__or__else___main___rarg(x_20, x_15); +x_19 = l_option_map___rarg(x_12, x_5); +x_20 = l_option_get__or__else___main___rarg(x_19, x_15); lean::inc(x_12); -x_24 = l_option_map___rarg(x_12, x_9); -x_25 = l_option_get__or__else___main___rarg(x_24, x_15); -x_26 = lean::box(0); +x_22 = l_option_map___rarg(x_12, x_9); +x_23 = l_option_get__or__else___main___rarg(x_22, x_15); +x_24 = lean::box(0); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_23); +lean::cnstr_set(x_25, 1, x_24); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_7); +lean::cnstr_set(x_26, 1, x_25); x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); +lean::cnstr_set(x_27, 0, x_20); lean::cnstr_set(x_27, 1, x_26); x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_7); +lean::cnstr_set(x_28, 0, x_17); lean::cnstr_set(x_28, 1, x_27); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_22); +lean::cnstr_set(x_29, 0, x_16); lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_18); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_17); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_lean_parser_term_simple__implicit__binder; -lean::inc(x_32); -x_34 = l_lean_parser_syntax_mk__node(x_32, x_31); -return x_34; +x_30 = l_lean_parser_term_simple__implicit__binder; +lean::inc(x_30); +x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); +return x_32; } } obj* _init_l_lean_parser_term_simple__implicit__binder_has__view_x_27() { @@ -12578,7 +12499,7 @@ return x_117; obj* l_lean_parser_term_simple__strict__implicit__binder_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -12594,37 +12515,35 @@ x_12 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_12); x_14 = l_option_map___rarg(x_12, x_1); x_15 = lean::box(3); -lean::inc(x_15); -x_17 = l_option_get__or__else___main___rarg(x_14, x_15); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_3); +x_16 = l_option_get__or__else___main___rarg(x_14, x_15); +x_17 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_17, 0, x_3); lean::inc(x_12); -x_20 = l_option_map___rarg(x_12, x_5); -lean::inc(x_15); -x_22 = l_option_get__or__else___main___rarg(x_20, x_15); +x_19 = l_option_map___rarg(x_12, x_5); +x_20 = l_option_get__or__else___main___rarg(x_19, x_15); lean::inc(x_12); -x_24 = l_option_map___rarg(x_12, x_9); -x_25 = l_option_get__or__else___main___rarg(x_24, x_15); -x_26 = lean::box(0); +x_22 = l_option_map___rarg(x_12, x_9); +x_23 = l_option_get__or__else___main___rarg(x_22, x_15); +x_24 = lean::box(0); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_23); +lean::cnstr_set(x_25, 1, x_24); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_7); +lean::cnstr_set(x_26, 1, x_25); x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); +lean::cnstr_set(x_27, 0, x_20); lean::cnstr_set(x_27, 1, x_26); x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_7); +lean::cnstr_set(x_28, 0, x_17); lean::cnstr_set(x_28, 1, x_27); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_22); +lean::cnstr_set(x_29, 0, x_16); lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_18); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_17); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_lean_parser_term_simple__strict__implicit__binder; -lean::inc(x_32); -x_34 = l_lean_parser_syntax_mk__node(x_32, x_31); -return x_34; +x_30 = l_lean_parser_term_simple__strict__implicit__binder; +lean::inc(x_30); +x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); +return x_32; } } obj* _init_l_lean_parser_term_simple__strict__implicit__binder_has__view_x_27() { @@ -13374,7 +13293,7 @@ return x_117; obj* l_lean_parser_term_simple__inst__implicit__binder_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -13390,37 +13309,35 @@ x_12 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_12); x_14 = l_option_map___rarg(x_12, x_1); x_15 = lean::box(3); -lean::inc(x_15); -x_17 = l_option_get__or__else___main___rarg(x_14, x_15); -x_18 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_18, 0, x_3); +x_16 = l_option_get__or__else___main___rarg(x_14, x_15); +x_17 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_17, 0, x_3); lean::inc(x_12); -x_20 = l_option_map___rarg(x_12, x_5); -lean::inc(x_15); -x_22 = l_option_get__or__else___main___rarg(x_20, x_15); +x_19 = l_option_map___rarg(x_12, x_5); +x_20 = l_option_get__or__else___main___rarg(x_19, x_15); lean::inc(x_12); -x_24 = l_option_map___rarg(x_12, x_9); -x_25 = l_option_get__or__else___main___rarg(x_24, x_15); -x_26 = lean::box(0); +x_22 = l_option_map___rarg(x_12, x_9); +x_23 = l_option_get__or__else___main___rarg(x_22, x_15); +x_24 = lean::box(0); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_23); +lean::cnstr_set(x_25, 1, x_24); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_7); +lean::cnstr_set(x_26, 1, x_25); x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); +lean::cnstr_set(x_27, 0, x_20); lean::cnstr_set(x_27, 1, x_26); x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_7); +lean::cnstr_set(x_28, 0, x_17); lean::cnstr_set(x_28, 1, x_27); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_22); +lean::cnstr_set(x_29, 0, x_16); lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_18); -lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_17); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_lean_parser_term_simple__inst__implicit__binder; -lean::inc(x_32); -x_34 = l_lean_parser_syntax_mk__node(x_32, x_31); -return x_34; +x_30 = l_lean_parser_term_simple__inst__implicit__binder; +lean::inc(x_30); +x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); +return x_32; } } obj* _init_l_lean_parser_term_simple__inst__implicit__binder_has__view_x_27() { @@ -13656,50 +13573,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_simple__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_simple__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_simple__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_simple__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_simple__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_simple__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -13709,82 +13625,82 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_simple__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_simple__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); -if (x_77 == 0) +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); +if (x_76 == 0) { -obj* x_79; uint8 x_80; -x_79 = lean::mk_nat_obj(1u); -x_80 = lean::nat_dec_eq(x_2, x_79); -lean::dec(x_79); -if (x_80 == 0) +obj* x_78; uint8 x_79; +x_78 = lean::mk_nat_obj(1u); +x_79 = lean::nat_dec_eq(x_2, x_78); +lean::dec(x_78); +if (x_79 == 0) { -obj* x_82; uint8 x_83; -x_82 = lean::mk_nat_obj(2u); -x_83 = lean::nat_dec_eq(x_2, x_82); -lean::dec(x_82); +obj* x_81; uint8 x_82; +x_81 = lean::mk_nat_obj(2u); +x_82 = lean::nat_dec_eq(x_2, x_81); +lean::dec(x_81); lean::dec(x_2); -if (x_83 == 0) +if (x_82 == 0) { -obj* x_86; obj* x_87; obj* x_89; obj* x_90; -x_86 = l_lean_parser_term_simple__inst__implicit__binder_has__view; -x_87 = lean::cnstr_get(x_86, 0); -lean::inc(x_87); -x_89 = lean::apply_1(x_87, x_1); -x_90 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_90, 0, x_89); -return x_90; +obj* x_85; obj* x_86; obj* x_88; obj* x_89; +x_85 = l_lean_parser_term_simple__inst__implicit__binder_has__view; +x_86 = lean::cnstr_get(x_85, 0); +lean::inc(x_86); +x_88 = lean::apply_1(x_86, x_1); +x_89 = lean::alloc_cnstr(3, 1, 0); +lean::cnstr_set(x_89, 0, x_88); +return x_89; } else { -obj* x_91; obj* x_92; obj* x_94; obj* x_95; -x_91 = l_lean_parser_term_simple__strict__implicit__binder_has__view; -x_92 = lean::cnstr_get(x_91, 0); -lean::inc(x_92); -x_94 = lean::apply_1(x_92, x_1); -x_95 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_95, 0, x_94); -return x_95; +obj* x_90; obj* x_91; obj* x_93; obj* x_94; +x_90 = l_lean_parser_term_simple__strict__implicit__binder_has__view; +x_91 = lean::cnstr_get(x_90, 0); +lean::inc(x_91); +x_93 = lean::apply_1(x_91, x_1); +x_94 = lean::alloc_cnstr(2, 1, 0); +lean::cnstr_set(x_94, 0, x_93); +return x_94; } } else { -obj* x_97; obj* x_98; obj* x_100; obj* x_101; +obj* x_96; obj* x_97; obj* x_99; obj* x_100; lean::dec(x_2); -x_97 = l_lean_parser_term_simple__implicit__binder_has__view; -x_98 = lean::cnstr_get(x_97, 0); -lean::inc(x_98); -x_100 = lean::apply_1(x_98, x_1); -x_101 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_101, 0, x_100); -return x_101; +x_96 = l_lean_parser_term_simple__implicit__binder_has__view; +x_97 = lean::cnstr_get(x_96, 0); +lean::inc(x_97); +x_99 = lean::apply_1(x_97, x_1); +x_100 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_100, 0, x_99); +return x_100; } } else { -obj* x_103; obj* x_104; obj* x_106; obj* x_107; +obj* x_102; obj* x_103; obj* x_105; obj* x_106; lean::dec(x_2); -x_103 = l_lean_parser_term_simple__explicit__binder_has__view; -x_104 = lean::cnstr_get(x_103, 0); -lean::inc(x_104); -x_106 = lean::apply_1(x_104, x_1); -x_107 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_107, 0, x_106); -return x_107; +x_102 = l_lean_parser_term_simple__explicit__binder_has__view; +x_103 = lean::cnstr_get(x_102, 0); +lean::inc(x_103); +x_105 = lean::apply_1(x_103, x_1); +x_106 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_106, 0, x_105); +return x_106; } } } @@ -13797,7 +13713,7 @@ x_1 = lean::box(0); switch (lean::obj_tag(x_0)) { case 0: { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -13805,95 +13721,91 @@ x_5 = l_lean_parser_term_simple__explicit__binder_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_term_simple__binder; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_term_simple__binder; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } case 1: { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_term_simple__implicit__binder_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_term_simple__binder; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_term_simple__implicit__binder_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_term_simple__binder; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } case 2: { -obj* x_34; obj* x_37; obj* x_38; obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; -x_34 = lean::cnstr_get(x_0, 0); -lean::inc(x_34); +obj* x_32; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_46; +x_32 = lean::cnstr_get(x_0, 0); +lean::inc(x_32); lean::dec(x_0); -x_37 = l_lean_parser_term_simple__strict__implicit__binder_has__view; -x_38 = lean::cnstr_get(x_37, 1); -lean::inc(x_38); -x_40 = lean::apply_1(x_38, x_34); -lean::inc(x_1); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_1); -x_43 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; -lean::inc(x_43); -x_45 = l_lean_parser_syntax_mk__node(x_43, x_42); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_1); -x_47 = l_lean_parser_term_simple__binder; -lean::inc(x_47); -x_49 = l_lean_parser_syntax_mk__node(x_47, x_46); -return x_49; +x_35 = l_lean_parser_term_simple__strict__implicit__binder_has__view; +x_36 = lean::cnstr_get(x_35, 1); +lean::inc(x_36); +x_38 = lean::apply_1(x_36, x_32); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_1); +x_40 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; +lean::inc(x_40); +x_42 = l_lean_parser_syntax_mk__node(x_40, x_39); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_1); +x_44 = l_lean_parser_term_simple__binder; +lean::inc(x_44); +x_46 = l_lean_parser_syntax_mk__node(x_44, x_43); +return x_46; } default: { -obj* x_50; obj* x_53; obj* x_54; obj* x_56; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_65; -x_50 = lean::cnstr_get(x_0, 0); -lean::inc(x_50); +obj* x_47; obj* x_50; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_61; +x_47 = lean::cnstr_get(x_0, 0); +lean::inc(x_47); lean::dec(x_0); -x_53 = l_lean_parser_term_simple__inst__implicit__binder_has__view; -x_54 = lean::cnstr_get(x_53, 1); -lean::inc(x_54); -x_56 = lean::apply_1(x_54, x_50); -lean::inc(x_1); +x_50 = l_lean_parser_term_simple__inst__implicit__binder_has__view; +x_51 = lean::cnstr_get(x_50, 1); +lean::inc(x_51); +x_53 = lean::apply_1(x_51, x_47); +x_54 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_54, 0, x_53); +lean::cnstr_set(x_54, 1, x_1); +x_55 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +lean::inc(x_55); +x_57 = l_lean_parser_syntax_mk__node(x_55, x_54); x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_56); +lean::cnstr_set(x_58, 0, x_57); lean::cnstr_set(x_58, 1, x_1); -x_59 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +x_59 = l_lean_parser_term_simple__binder; lean::inc(x_59); x_61 = l_lean_parser_syntax_mk__node(x_59, x_58); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_1); -x_63 = l_lean_parser_term_simple__binder; -lean::inc(x_63); -x_65 = l_lean_parser_syntax_mk__node(x_63, x_62); -return x_65; +return x_61; } } } @@ -13922,7 +13834,7 @@ return x_0; obj* _init_l_lean_parser_term_simple__binder_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_31; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_47; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_56; obj* x_57; obj* x_58; obj* x_60; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_42; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; x_0 = lean::mk_string("("); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -13934,78 +13846,69 @@ x_7 = l_lean_parser_symbol_tokens___rarg(x_5, x_1); x_8 = lean::mk_string(")"); lean::inc(x_1); x_10 = l_lean_parser_symbol_tokens___rarg(x_8, x_1); -lean::inc(x_4); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_10, x_4); -x_13 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_13); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_13, x_12); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_10, x_4); +x_12 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_12); +x_14 = l_lean_parser_list_cons_tokens___rarg(x_12, x_11); lean::inc(x_7); -x_17 = l_lean_parser_list_cons_tokens___rarg(x_7, x_15); -lean::inc(x_4); -x_19 = l_lean_parser_list_cons_tokens___rarg(x_4, x_17); -x_20 = l_lean_parser_list_cons_tokens___rarg(x_3, x_19); -x_21 = l_lean_parser_tokens___rarg(x_20); -x_22 = lean::mk_string("{"); +x_16 = l_lean_parser_list_cons_tokens___rarg(x_7, x_14); +x_17 = l_lean_parser_list_cons_tokens___rarg(x_4, x_16); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_3, x_17); +x_19 = l_lean_parser_tokens___rarg(x_18); +x_20 = lean::mk_string("{"); lean::inc(x_1); -x_24 = l_lean_parser_symbol_tokens___rarg(x_22, x_1); -x_25 = lean::mk_string("}"); +x_22 = l_lean_parser_symbol_tokens___rarg(x_20, x_1); +x_23 = lean::mk_string("}"); lean::inc(x_1); -x_27 = l_lean_parser_symbol_tokens___rarg(x_25, x_1); -lean::inc(x_4); -x_29 = l_lean_parser_list_cons_tokens___rarg(x_27, x_4); -lean::inc(x_13); -x_31 = l_lean_parser_list_cons_tokens___rarg(x_13, x_29); +x_25 = l_lean_parser_symbol_tokens___rarg(x_23, x_1); +x_26 = l_lean_parser_list_cons_tokens___rarg(x_25, x_4); +lean::inc(x_12); +x_28 = l_lean_parser_list_cons_tokens___rarg(x_12, x_26); lean::inc(x_7); -x_33 = l_lean_parser_list_cons_tokens___rarg(x_7, x_31); -lean::inc(x_4); -x_35 = l_lean_parser_list_cons_tokens___rarg(x_4, x_33); -x_36 = l_lean_parser_list_cons_tokens___rarg(x_24, x_35); -x_37 = l_lean_parser_tokens___rarg(x_36); -x_38 = lean::mk_string("\xe2\xa6\x83"); +x_30 = l_lean_parser_list_cons_tokens___rarg(x_7, x_28); +x_31 = l_lean_parser_list_cons_tokens___rarg(x_4, x_30); +x_32 = l_lean_parser_list_cons_tokens___rarg(x_22, x_31); +x_33 = l_lean_parser_tokens___rarg(x_32); +x_34 = lean::mk_string("\xe2\xa6\x83"); lean::inc(x_1); -x_40 = l_lean_parser_symbol_tokens___rarg(x_38, x_1); -x_41 = lean::mk_string("\xe2\xa6\x84"); +x_36 = l_lean_parser_symbol_tokens___rarg(x_34, x_1); +x_37 = lean::mk_string("\xe2\xa6\x84"); lean::inc(x_1); -x_43 = l_lean_parser_symbol_tokens___rarg(x_41, x_1); -lean::inc(x_4); -x_45 = l_lean_parser_list_cons_tokens___rarg(x_43, x_4); -lean::inc(x_13); -x_47 = l_lean_parser_list_cons_tokens___rarg(x_13, x_45); +x_39 = l_lean_parser_symbol_tokens___rarg(x_37, x_1); +x_40 = l_lean_parser_list_cons_tokens___rarg(x_39, x_4); +lean::inc(x_12); +x_42 = l_lean_parser_list_cons_tokens___rarg(x_12, x_40); lean::inc(x_7); -x_49 = l_lean_parser_list_cons_tokens___rarg(x_7, x_47); -lean::inc(x_4); -x_51 = l_lean_parser_list_cons_tokens___rarg(x_4, x_49); -x_52 = l_lean_parser_list_cons_tokens___rarg(x_40, x_51); -x_53 = l_lean_parser_tokens___rarg(x_52); -x_54 = lean::mk_string("["); +x_44 = l_lean_parser_list_cons_tokens___rarg(x_7, x_42); +x_45 = l_lean_parser_list_cons_tokens___rarg(x_4, x_44); +x_46 = l_lean_parser_list_cons_tokens___rarg(x_36, x_45); +x_47 = l_lean_parser_tokens___rarg(x_46); +x_48 = lean::mk_string("["); lean::inc(x_1); -x_56 = l_lean_parser_symbol_tokens___rarg(x_54, x_1); -x_57 = lean::mk_string("]"); -x_58 = l_lean_parser_symbol_tokens___rarg(x_57, x_1); -lean::inc(x_4); -x_60 = l_lean_parser_list_cons_tokens___rarg(x_58, x_4); -lean::inc(x_13); -x_62 = l_lean_parser_list_cons_tokens___rarg(x_13, x_60); -x_63 = l_lean_parser_list_cons_tokens___rarg(x_7, x_62); -lean::inc(x_4); -x_65 = l_lean_parser_list_cons_tokens___rarg(x_4, x_63); -x_66 = l_lean_parser_list_cons_tokens___rarg(x_56, x_65); -x_67 = l_lean_parser_tokens___rarg(x_66); -lean::inc(x_4); -x_69 = l_lean_parser_list_cons_tokens___rarg(x_67, x_4); -x_70 = l_lean_parser_list_cons_tokens___rarg(x_53, x_69); -x_71 = l_lean_parser_list_cons_tokens___rarg(x_37, x_70); -x_72 = l_lean_parser_list_cons_tokens___rarg(x_21, x_71); -x_73 = l_lean_parser_tokens___rarg(x_72); -x_74 = l_lean_parser_list_cons_tokens___rarg(x_73, x_4); -x_75 = l_lean_parser_tokens___rarg(x_74); -return x_75; +x_50 = l_lean_parser_symbol_tokens___rarg(x_48, x_1); +x_51 = lean::mk_string("]"); +x_52 = l_lean_parser_symbol_tokens___rarg(x_51, x_1); +x_53 = l_lean_parser_list_cons_tokens___rarg(x_52, x_4); +lean::inc(x_12); +x_55 = l_lean_parser_list_cons_tokens___rarg(x_12, x_53); +x_56 = l_lean_parser_list_cons_tokens___rarg(x_7, x_55); +x_57 = l_lean_parser_list_cons_tokens___rarg(x_4, x_56); +x_58 = l_lean_parser_list_cons_tokens___rarg(x_50, x_57); +x_59 = l_lean_parser_tokens___rarg(x_58); +x_60 = l_lean_parser_list_cons_tokens___rarg(x_59, x_4); +x_61 = l_lean_parser_list_cons_tokens___rarg(x_47, x_60); +x_62 = l_lean_parser_list_cons_tokens___rarg(x_33, x_61); +x_63 = l_lean_parser_list_cons_tokens___rarg(x_19, x_62); +x_64 = l_lean_parser_tokens___rarg(x_63); +x_65 = l_lean_parser_list_cons_tokens___rarg(x_64, x_4); +x_66 = l_lean_parser_tokens___rarg(x_65); +return x_66; } } obj* _init_l_lean_parser_term_simple__binder_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_44; obj* x_46; obj* x_48; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_64; obj* x_65; obj* x_66; obj* x_68; obj* x_70; obj* x_72; obj* x_74; obj* x_76; obj* x_78; obj* x_79; obj* x_80; obj* x_82; obj* x_83; obj* x_84; obj* x_86; obj* x_88; obj* x_89; obj* x_90; obj* x_92; obj* x_94; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_103; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_123; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_46; obj* x_48; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_56; obj* x_57; obj* x_58; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_66; obj* x_68; obj* x_69; obj* x_71; obj* x_73; obj* x_75; obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_81; obj* x_83; obj* x_85; obj* x_86; obj* x_87; obj* x_89; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_118; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -14041,199 +13944,194 @@ lean::closure_set(x_20, 0, x_16); lean::closure_set(x_20, 1, x_4); lean::closure_set(x_20, 2, x_18); x_21 = lean::box(0); -lean::inc(x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_21); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 1, x_21); lean::inc(x_14); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_14); -lean::cnstr_set(x_25, 1, x_23); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_14); +lean::cnstr_set(x_24, 1, x_22); lean::inc(x_12); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_12); -lean::cnstr_set(x_27, 1, x_25); -x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); -lean::inc(x_28); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_12); +lean::cnstr_set(x_26, 1, x_24); +x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); +lean::inc(x_27); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_27); +lean::cnstr_set(x_29, 1, x_26); x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set(x_30, 1, x_27); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_6); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_lean_parser_term_simple__explicit__binder; -lean::inc(x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_34, 0, x_32); -lean::closure_set(x_34, 1, x_31); -x_35 = lean::mk_string("{"); -x_36 = l_string_trim(x_35); -lean::inc(x_36); -x_38 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_38, 0, x_36); +lean::cnstr_set(x_30, 0, x_6); +lean::cnstr_set(x_30, 1, x_29); +x_31 = l_lean_parser_term_simple__explicit__binder; +lean::inc(x_31); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_33, 0, x_31); +lean::closure_set(x_33, 1, x_30); +x_34 = lean::mk_string("{"); +x_35 = l_string_trim(x_34); +lean::inc(x_35); +x_37 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_37, 0, x_35); lean::inc(x_4); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_40, 0, x_36); -lean::closure_set(x_40, 1, x_4); -lean::closure_set(x_40, 2, x_38); -x_41 = lean::mk_string("}"); -x_42 = l_string_trim(x_41); -lean::inc(x_42); -x_44 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_44, 0, x_42); +x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_39, 0, x_35); +lean::closure_set(x_39, 1, x_4); +lean::closure_set(x_39, 2, x_37); +x_40 = lean::mk_string("}"); +x_41 = l_string_trim(x_40); +lean::inc(x_41); +x_43 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_43, 0, x_41); lean::inc(x_4); -x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_46, 0, x_42); -lean::closure_set(x_46, 1, x_4); -lean::closure_set(x_46, 2, x_44); -lean::inc(x_21); +x_45 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_45, 0, x_41); +lean::closure_set(x_45, 1, x_4); +lean::closure_set(x_45, 2, x_43); +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_45); +lean::cnstr_set(x_46, 1, x_21); +lean::inc(x_14); x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_46); -lean::cnstr_set(x_48, 1, x_21); -lean::inc(x_14); +lean::cnstr_set(x_48, 0, x_14); +lean::cnstr_set(x_48, 1, x_46); +lean::inc(x_12); x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_14); +lean::cnstr_set(x_50, 0, x_12); lean::cnstr_set(x_50, 1, x_48); -lean::inc(x_12); +lean::inc(x_27); x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_12); +lean::cnstr_set(x_52, 0, x_27); lean::cnstr_set(x_52, 1, x_50); -lean::inc(x_28); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_28); -lean::cnstr_set(x_54, 1, x_52); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_40); -lean::cnstr_set(x_55, 1, x_54); -x_56 = l_lean_parser_term_simple__implicit__binder; -lean::inc(x_56); -x_58 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_58, 0, x_56); -lean::closure_set(x_58, 1, x_55); -x_59 = lean::mk_string("\xe2\xa6\x83"); -x_60 = l_string_trim(x_59); -lean::inc(x_60); -x_62 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_62, 0, x_60); +x_53 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_53, 0, x_39); +lean::cnstr_set(x_53, 1, x_52); +x_54 = l_lean_parser_term_simple__implicit__binder; +lean::inc(x_54); +x_56 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_56, 0, x_54); +lean::closure_set(x_56, 1, x_53); +x_57 = lean::mk_string("\xe2\xa6\x83"); +x_58 = l_string_trim(x_57); +lean::inc(x_58); +x_60 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_60, 0, x_58); lean::inc(x_4); -x_64 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_64, 0, x_60); -lean::closure_set(x_64, 1, x_4); -lean::closure_set(x_64, 2, x_62); -x_65 = lean::mk_string("\xe2\xa6\x84"); -x_66 = l_string_trim(x_65); -lean::inc(x_66); -x_68 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_68, 0, x_66); +x_62 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_62, 0, x_58); +lean::closure_set(x_62, 1, x_4); +lean::closure_set(x_62, 2, x_60); +x_63 = lean::mk_string("\xe2\xa6\x84"); +x_64 = l_string_trim(x_63); +lean::inc(x_64); +x_66 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_66, 0, x_64); lean::inc(x_4); -x_70 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_70, 0, x_66); -lean::closure_set(x_70, 1, x_4); -lean::closure_set(x_70, 2, x_68); -lean::inc(x_21); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_70); -lean::cnstr_set(x_72, 1, x_21); +x_68 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_68, 0, x_64); +lean::closure_set(x_68, 1, x_4); +lean::closure_set(x_68, 2, x_66); +x_69 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_69, 0, x_68); +lean::cnstr_set(x_69, 1, x_21); lean::inc(x_14); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_14); -lean::cnstr_set(x_74, 1, x_72); +x_71 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_71, 0, x_14); +lean::cnstr_set(x_71, 1, x_69); lean::inc(x_12); +x_73 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_73, 0, x_12); +lean::cnstr_set(x_73, 1, x_71); +lean::inc(x_27); +x_75 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_75, 0, x_27); +lean::cnstr_set(x_75, 1, x_73); x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_12); -lean::cnstr_set(x_76, 1, x_74); -lean::inc(x_28); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_28); -lean::cnstr_set(x_78, 1, x_76); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_64); -lean::cnstr_set(x_79, 1, x_78); -x_80 = l_lean_parser_term_simple__strict__implicit__binder; -lean::inc(x_80); -x_82 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_82, 0, x_80); -lean::closure_set(x_82, 1, x_79); -x_83 = lean::mk_string("["); -x_84 = l_string_trim(x_83); -lean::inc(x_84); -x_86 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_86, 0, x_84); +lean::cnstr_set(x_76, 0, x_62); +lean::cnstr_set(x_76, 1, x_75); +x_77 = l_lean_parser_term_simple__strict__implicit__binder; +lean::inc(x_77); +x_79 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_79, 0, x_77); +lean::closure_set(x_79, 1, x_76); +x_80 = lean::mk_string("["); +x_81 = l_string_trim(x_80); +lean::inc(x_81); +x_83 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_83, 0, x_81); lean::inc(x_4); -x_88 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_88, 0, x_84); -lean::closure_set(x_88, 1, x_4); -lean::closure_set(x_88, 2, x_86); -x_89 = lean::mk_string("]"); -x_90 = l_string_trim(x_89); -lean::inc(x_90); -x_92 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_92, 0, x_90); +x_85 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_85, 0, x_81); +lean::closure_set(x_85, 1, x_4); +lean::closure_set(x_85, 2, x_83); +x_86 = lean::mk_string("]"); +x_87 = l_string_trim(x_86); +lean::inc(x_87); +x_89 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_89, 0, x_87); lean::inc(x_4); -x_94 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_94, 0, x_90); -lean::closure_set(x_94, 1, x_4); -lean::closure_set(x_94, 2, x_92); -lean::inc(x_21); +x_91 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_91, 0, x_87); +lean::closure_set(x_91, 1, x_4); +lean::closure_set(x_91, 2, x_89); +x_92 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_92, 0, x_91); +lean::cnstr_set(x_92, 1, x_21); +x_93 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_93, 0, x_14); +lean::cnstr_set(x_93, 1, x_92); +x_94 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_94, 0, x_12); +lean::cnstr_set(x_94, 1, x_93); +x_95 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_95, 0, x_27); +lean::cnstr_set(x_95, 1, x_94); x_96 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_96, 0, x_94); -lean::cnstr_set(x_96, 1, x_21); -x_97 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_97, 0, x_14); -lean::cnstr_set(x_97, 1, x_96); -x_98 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_98, 0, x_12); -lean::cnstr_set(x_98, 1, x_97); -x_99 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_99, 0, x_28); -lean::cnstr_set(x_99, 1, x_98); +lean::cnstr_set(x_96, 0, x_85); +lean::cnstr_set(x_96, 1, x_95); +x_97 = l_lean_parser_term_simple__inst__implicit__binder; +lean::inc(x_97); +x_99 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_99, 0, x_97); +lean::closure_set(x_99, 1, x_96); x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_88); -lean::cnstr_set(x_100, 1, x_99); -x_101 = l_lean_parser_term_simple__inst__implicit__binder; -lean::inc(x_101); -x_103 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_103, 0, x_101); -lean::closure_set(x_103, 1, x_100); -lean::inc(x_21); +lean::cnstr_set(x_100, 0, x_99); +lean::cnstr_set(x_100, 1, x_21); +x_101 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_101, 0, x_79); +lean::cnstr_set(x_101, 1, x_100); +x_102 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_102, 0, x_56); +lean::cnstr_set(x_102, 1, x_101); +x_103 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_103, 0, x_33); +lean::cnstr_set(x_103, 1, x_102); +x_104 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_104, 0, x_103); +lean::closure_set(x_104, 1, x_4); x_105 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_105, 0, x_103); +lean::cnstr_set(x_105, 0, x_104); lean::cnstr_set(x_105, 1, x_21); -x_106 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_106, 0, x_82); -lean::cnstr_set(x_106, 1, x_105); -x_107 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_107, 0, x_58); -lean::cnstr_set(x_107, 1, x_106); -x_108 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_108, 0, x_34); -lean::cnstr_set(x_108, 1, x_107); -x_109 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_109, 0, x_108); -lean::closure_set(x_109, 1, x_4); -x_110 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_110, 0, x_109); -lean::cnstr_set(x_110, 1, x_21); -x_111 = l_lean_parser_term__parser__m_monad; -x_112 = l_lean_parser_term__parser__m_monad__except; -x_113 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_114 = l_lean_parser_term__parser__m_alternative; -x_115 = l_lean_parser_term_simple__binder; -x_116 = l_lean_parser_term_simple__binder_has__view; -lean::inc(x_116); -lean::inc(x_115); -lean::inc(x_114); -lean::inc(x_113); -lean::inc(x_112); +x_106 = l_lean_parser_term__parser__m_monad; +x_107 = l_lean_parser_term__parser__m_monad__except; +x_108 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_109 = l_lean_parser_term__parser__m_alternative; +x_110 = l_lean_parser_term_simple__binder; +x_111 = l_lean_parser_term_simple__binder_has__view; lean::inc(x_111); -x_123 = l_lean_parser_combinators_node_view___rarg(x_111, x_112, x_113, x_114, x_115, x_110, x_116); -return x_123; +lean::inc(x_110); +lean::inc(x_109); +lean::inc(x_108); +lean::inc(x_107); +lean::inc(x_106); +x_118 = l_lean_parser_combinators_node_view___rarg(x_106, x_107, x_108, x_109, x_110, x_105, x_111); +return x_118; } } obj* _init_l_lean_parser_term_simple__binder_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_44; obj* x_46; obj* x_48; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_64; obj* x_65; obj* x_66; obj* x_68; obj* x_70; obj* x_72; obj* x_74; obj* x_76; obj* x_78; obj* x_79; obj* x_80; obj* x_82; obj* x_83; obj* x_84; obj* x_86; obj* x_88; obj* x_89; obj* x_90; obj* x_92; obj* x_94; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_103; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_46; obj* x_48; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_56; obj* x_57; obj* x_58; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_66; obj* x_68; obj* x_69; obj* x_71; obj* x_73; obj* x_75; obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_81; obj* x_83; obj* x_85; obj* x_86; obj* x_87; obj* x_89; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -14269,180 +14167,175 @@ lean::closure_set(x_20, 0, x_16); lean::closure_set(x_20, 1, x_4); lean::closure_set(x_20, 2, x_18); x_21 = lean::box(0); -lean::inc(x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_21); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 1, x_21); lean::inc(x_14); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_14); -lean::cnstr_set(x_25, 1, x_23); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_14); +lean::cnstr_set(x_24, 1, x_22); lean::inc(x_12); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_12); -lean::cnstr_set(x_27, 1, x_25); -x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); -lean::inc(x_28); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_12); +lean::cnstr_set(x_26, 1, x_24); +x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); +lean::inc(x_27); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_27); +lean::cnstr_set(x_29, 1, x_26); x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set(x_30, 1, x_27); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_6); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_lean_parser_term_simple__explicit__binder; -lean::inc(x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_34, 0, x_32); -lean::closure_set(x_34, 1, x_31); -x_35 = lean::mk_string("{"); -x_36 = l_string_trim(x_35); -lean::inc(x_36); -x_38 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_38, 0, x_36); +lean::cnstr_set(x_30, 0, x_6); +lean::cnstr_set(x_30, 1, x_29); +x_31 = l_lean_parser_term_simple__explicit__binder; +lean::inc(x_31); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_33, 0, x_31); +lean::closure_set(x_33, 1, x_30); +x_34 = lean::mk_string("{"); +x_35 = l_string_trim(x_34); +lean::inc(x_35); +x_37 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_37, 0, x_35); lean::inc(x_4); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_40, 0, x_36); -lean::closure_set(x_40, 1, x_4); -lean::closure_set(x_40, 2, x_38); -x_41 = lean::mk_string("}"); -x_42 = l_string_trim(x_41); -lean::inc(x_42); -x_44 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_44, 0, x_42); +x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_39, 0, x_35); +lean::closure_set(x_39, 1, x_4); +lean::closure_set(x_39, 2, x_37); +x_40 = lean::mk_string("}"); +x_41 = l_string_trim(x_40); +lean::inc(x_41); +x_43 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_43, 0, x_41); lean::inc(x_4); -x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_46, 0, x_42); -lean::closure_set(x_46, 1, x_4); -lean::closure_set(x_46, 2, x_44); -lean::inc(x_21); +x_45 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_45, 0, x_41); +lean::closure_set(x_45, 1, x_4); +lean::closure_set(x_45, 2, x_43); +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_45); +lean::cnstr_set(x_46, 1, x_21); +lean::inc(x_14); x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_46); -lean::cnstr_set(x_48, 1, x_21); -lean::inc(x_14); +lean::cnstr_set(x_48, 0, x_14); +lean::cnstr_set(x_48, 1, x_46); +lean::inc(x_12); x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_14); +lean::cnstr_set(x_50, 0, x_12); lean::cnstr_set(x_50, 1, x_48); -lean::inc(x_12); +lean::inc(x_27); x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_12); +lean::cnstr_set(x_52, 0, x_27); lean::cnstr_set(x_52, 1, x_50); -lean::inc(x_28); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_28); -lean::cnstr_set(x_54, 1, x_52); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_40); -lean::cnstr_set(x_55, 1, x_54); -x_56 = l_lean_parser_term_simple__implicit__binder; -lean::inc(x_56); -x_58 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_58, 0, x_56); -lean::closure_set(x_58, 1, x_55); -x_59 = lean::mk_string("\xe2\xa6\x83"); -x_60 = l_string_trim(x_59); -lean::inc(x_60); -x_62 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_62, 0, x_60); +x_53 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_53, 0, x_39); +lean::cnstr_set(x_53, 1, x_52); +x_54 = l_lean_parser_term_simple__implicit__binder; +lean::inc(x_54); +x_56 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_56, 0, x_54); +lean::closure_set(x_56, 1, x_53); +x_57 = lean::mk_string("\xe2\xa6\x83"); +x_58 = l_string_trim(x_57); +lean::inc(x_58); +x_60 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_60, 0, x_58); lean::inc(x_4); -x_64 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_64, 0, x_60); -lean::closure_set(x_64, 1, x_4); -lean::closure_set(x_64, 2, x_62); -x_65 = lean::mk_string("\xe2\xa6\x84"); -x_66 = l_string_trim(x_65); -lean::inc(x_66); -x_68 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_68, 0, x_66); +x_62 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_62, 0, x_58); +lean::closure_set(x_62, 1, x_4); +lean::closure_set(x_62, 2, x_60); +x_63 = lean::mk_string("\xe2\xa6\x84"); +x_64 = l_string_trim(x_63); +lean::inc(x_64); +x_66 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_66, 0, x_64); lean::inc(x_4); -x_70 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_70, 0, x_66); -lean::closure_set(x_70, 1, x_4); -lean::closure_set(x_70, 2, x_68); -lean::inc(x_21); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_70); -lean::cnstr_set(x_72, 1, x_21); +x_68 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_68, 0, x_64); +lean::closure_set(x_68, 1, x_4); +lean::closure_set(x_68, 2, x_66); +x_69 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_69, 0, x_68); +lean::cnstr_set(x_69, 1, x_21); lean::inc(x_14); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_14); -lean::cnstr_set(x_74, 1, x_72); +x_71 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_71, 0, x_14); +lean::cnstr_set(x_71, 1, x_69); lean::inc(x_12); +x_73 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_73, 0, x_12); +lean::cnstr_set(x_73, 1, x_71); +lean::inc(x_27); +x_75 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_75, 0, x_27); +lean::cnstr_set(x_75, 1, x_73); x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_12); -lean::cnstr_set(x_76, 1, x_74); -lean::inc(x_28); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_28); -lean::cnstr_set(x_78, 1, x_76); -x_79 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_79, 0, x_64); -lean::cnstr_set(x_79, 1, x_78); -x_80 = l_lean_parser_term_simple__strict__implicit__binder; -lean::inc(x_80); -x_82 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_82, 0, x_80); -lean::closure_set(x_82, 1, x_79); -x_83 = lean::mk_string("["); -x_84 = l_string_trim(x_83); -lean::inc(x_84); -x_86 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_86, 0, x_84); +lean::cnstr_set(x_76, 0, x_62); +lean::cnstr_set(x_76, 1, x_75); +x_77 = l_lean_parser_term_simple__strict__implicit__binder; +lean::inc(x_77); +x_79 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_79, 0, x_77); +lean::closure_set(x_79, 1, x_76); +x_80 = lean::mk_string("["); +x_81 = l_string_trim(x_80); +lean::inc(x_81); +x_83 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_83, 0, x_81); lean::inc(x_4); -x_88 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_88, 0, x_84); -lean::closure_set(x_88, 1, x_4); -lean::closure_set(x_88, 2, x_86); -x_89 = lean::mk_string("]"); -x_90 = l_string_trim(x_89); -lean::inc(x_90); -x_92 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_92, 0, x_90); +x_85 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_85, 0, x_81); +lean::closure_set(x_85, 1, x_4); +lean::closure_set(x_85, 2, x_83); +x_86 = lean::mk_string("]"); +x_87 = l_string_trim(x_86); +lean::inc(x_87); +x_89 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_89, 0, x_87); lean::inc(x_4); -x_94 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_94, 0, x_90); -lean::closure_set(x_94, 1, x_4); -lean::closure_set(x_94, 2, x_92); -lean::inc(x_21); +x_91 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_91, 0, x_87); +lean::closure_set(x_91, 1, x_4); +lean::closure_set(x_91, 2, x_89); +x_92 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_92, 0, x_91); +lean::cnstr_set(x_92, 1, x_21); +x_93 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_93, 0, x_14); +lean::cnstr_set(x_93, 1, x_92); +x_94 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_94, 0, x_12); +lean::cnstr_set(x_94, 1, x_93); +x_95 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_95, 0, x_27); +lean::cnstr_set(x_95, 1, x_94); x_96 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_96, 0, x_94); -lean::cnstr_set(x_96, 1, x_21); -x_97 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_97, 0, x_14); -lean::cnstr_set(x_97, 1, x_96); -x_98 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_98, 0, x_12); -lean::cnstr_set(x_98, 1, x_97); -x_99 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_99, 0, x_28); -lean::cnstr_set(x_99, 1, x_98); +lean::cnstr_set(x_96, 0, x_85); +lean::cnstr_set(x_96, 1, x_95); +x_97 = l_lean_parser_term_simple__inst__implicit__binder; +lean::inc(x_97); +x_99 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_99, 0, x_97); +lean::closure_set(x_99, 1, x_96); x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_88); -lean::cnstr_set(x_100, 1, x_99); -x_101 = l_lean_parser_term_simple__inst__implicit__binder; -lean::inc(x_101); -x_103 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_103, 0, x_101); -lean::closure_set(x_103, 1, x_100); -lean::inc(x_21); +lean::cnstr_set(x_100, 0, x_99); +lean::cnstr_set(x_100, 1, x_21); +x_101 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_101, 0, x_79); +lean::cnstr_set(x_101, 1, x_100); +x_102 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_102, 0, x_56); +lean::cnstr_set(x_102, 1, x_101); +x_103 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_103, 0, x_33); +lean::cnstr_set(x_103, 1, x_102); +x_104 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_104, 0, x_103); +lean::closure_set(x_104, 1, x_4); x_105 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_105, 0, x_103); +lean::cnstr_set(x_105, 0, x_104); lean::cnstr_set(x_105, 1, x_21); -x_106 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_106, 0, x_82); -lean::cnstr_set(x_106, 1, x_105); -x_107 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_107, 0, x_58); -lean::cnstr_set(x_107, 1, x_106); -x_108 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_108, 0, x_34); -lean::cnstr_set(x_108, 1, x_107); -x_109 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_109, 0, x_108); -lean::closure_set(x_109, 1, x_4); -x_110 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_110, 0, x_109); -lean::cnstr_set(x_110, 1, x_21); -return x_110; +return x_105; } } obj* l_lean_parser_term_simple__binder_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -14598,87 +14491,86 @@ if (lean::is_shared(x_0)) { } if (lean::obj_tag(x_4) == 0) { -obj* x_7; obj* x_9; obj* x_10; +obj* x_7; obj* x_8; obj* x_9; x_7 = lean::box(0); -lean::inc(x_7); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_2); -lean::cnstr_set(x_9, 1, x_7); +x_8 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_8, 0, x_2); +lean::cnstr_set(x_8, 1, x_7); if (lean::is_scalar(x_6)) { - x_10 = lean::alloc_cnstr(1, 2, 0); + x_9 = lean::alloc_cnstr(1, 2, 0); } else { - x_10 = x_6; + x_9 = x_6; } -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_7); -return x_10; +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_7); +return x_9; } else { -obj* x_11; obj* x_13; obj* x_16; -x_11 = lean::cnstr_get(x_4, 0); -lean::inc(x_11); -x_13 = lean::cnstr_get(x_4, 1); -lean::inc(x_13); +obj* x_10; obj* x_12; obj* x_15; +x_10 = lean::cnstr_get(x_4, 0); +lean::inc(x_10); +x_12 = lean::cnstr_get(x_4, 1); +lean::inc(x_12); lean::dec(x_4); -x_16 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_anonymous__constructor_has__view_x_27___spec__1(x_13); -switch (lean::obj_tag(x_11)) { +x_15 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_anonymous__constructor_has__view_x_27___spec__1(x_12); +switch (lean::obj_tag(x_10)) { case 0: { -obj* x_17; obj* x_20; obj* x_21; obj* x_22; obj* x_23; -x_17 = lean::cnstr_get(x_11, 0); -lean::inc(x_17); -lean::dec(x_11); +obj* x_16; obj* x_19; obj* x_20; obj* x_21; obj* x_22; +x_16 = lean::cnstr_get(x_10, 0); +lean::inc(x_16); +lean::dec(x_10); +x_19 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_19, 0, x_16); x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_17); -x_21 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_21, 0, x_20); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_2); -lean::cnstr_set(x_22, 1, x_21); +lean::cnstr_set(x_20, 0, x_19); +x_21 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_21, 0, x_2); +lean::cnstr_set(x_21, 1, x_20); if (lean::is_scalar(x_6)) { - x_23 = lean::alloc_cnstr(1, 2, 0); + x_22 = lean::alloc_cnstr(1, 2, 0); } else { - x_23 = x_6; + x_22 = x_6; } -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_16); -return x_23; +lean::cnstr_set(x_22, 0, x_21); +lean::cnstr_set(x_22, 1, x_15); +return x_22; } case 3: { -obj* x_24; obj* x_26; obj* x_27; -x_24 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_24); -x_26 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_26, 0, x_2); -lean::cnstr_set(x_26, 1, x_24); +obj* x_23; obj* x_25; obj* x_26; +x_23 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_23); +x_25 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_25, 0, x_2); +lean::cnstr_set(x_25, 1, x_23); if (lean::is_scalar(x_6)) { - x_27 = lean::alloc_cnstr(1, 2, 0); + x_26 = lean::alloc_cnstr(1, 2, 0); } else { - x_27 = x_6; + x_26 = x_6; } -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_16); -return x_27; +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_15); +return x_26; } default: { -obj* x_29; obj* x_31; obj* x_32; -lean::dec(x_11); -x_29 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_29); -x_31 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_31, 0, x_2); -lean::cnstr_set(x_31, 1, x_29); +obj* x_28; obj* x_30; obj* x_31; +lean::dec(x_10); +x_28 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_28); +x_30 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_30, 0, x_2); +lean::cnstr_set(x_30, 1, x_28); if (lean::is_scalar(x_6)) { - x_32 = lean::alloc_cnstr(1, 2, 0); + x_31 = lean::alloc_cnstr(1, 2, 0); } else { - x_32 = x_6; + x_31 = x_6; } -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_16); -return x_32; +lean::cnstr_set(x_31, 0, x_30); +lean::cnstr_set(x_31, 1, x_15); +return x_31; } } } @@ -14852,121 +14744,120 @@ lean::dec(x_14); switch (lean::obj_tag(x_28)) { case 0: { -obj* x_32; obj* x_35; obj* x_36; obj* x_38; -lean::dec(x_24); -x_32 = lean::cnstr_get(x_28, 0); -lean::inc(x_32); +obj* x_31; obj* x_34; obj* x_35; obj* x_37; +x_31 = lean::cnstr_get(x_28, 0); +lean::inc(x_31); lean::dec(x_28); -x_35 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_35, 0, x_32); -x_36 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -lean::inc(x_36); -x_38 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_38, 0, x_5); -lean::cnstr_set(x_38, 1, x_36); -lean::cnstr_set(x_38, 2, x_35); -return x_38; +x_34 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_34, 0, x_31); +x_35 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; +lean::inc(x_35); +x_37 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_37, 0, x_5); +lean::cnstr_set(x_37, 1, x_35); +lean::cnstr_set(x_37, 2, x_34); +return x_37; } case 3: { -obj* x_39; obj* x_41; -x_39 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -lean::inc(x_39); -x_41 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_41, 0, x_5); -lean::cnstr_set(x_41, 1, x_39); -lean::cnstr_set(x_41, 2, x_24); -return x_41; +obj* x_38; obj* x_40; +x_38 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; +lean::inc(x_38); +x_40 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_40, 0, x_5); +lean::cnstr_set(x_40, 1, x_38); +lean::cnstr_set(x_40, 2, x_24); +return x_40; } default: { -obj* x_43; obj* x_45; +obj* x_42; obj* x_44; lean::dec(x_28); -x_43 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -lean::inc(x_43); -x_45 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_45, 0, x_5); -lean::cnstr_set(x_45, 1, x_43); -lean::cnstr_set(x_45, 2, x_24); -return x_45; +x_42 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; +lean::inc(x_42); +x_44 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_44, 0, x_5); +lean::cnstr_set(x_44, 1, x_42); +lean::cnstr_set(x_44, 2, x_24); +return x_44; } } } } else { -obj* x_46; obj* x_48; obj* x_49; obj* x_52; -x_46 = lean::cnstr_get(x_23, 0); -lean::inc(x_46); +obj* x_45; obj* x_47; obj* x_48; obj* x_51; +x_45 = lean::cnstr_get(x_23, 0); +lean::inc(x_45); if (lean::is_shared(x_23)) { lean::dec(x_23); - x_48 = lean::box(0); + x_47 = lean::box(0); } else { lean::cnstr_release(x_23, 0); - x_48 = x_23; + x_47 = x_23; } -x_49 = lean::cnstr_get(x_46, 1); -lean::inc(x_49); -lean::dec(x_46); -x_52 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_anonymous__constructor_has__view_x_27___spec__1(x_49); +x_48 = lean::cnstr_get(x_45, 1); +lean::inc(x_48); +lean::dec(x_45); +x_51 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_anonymous__constructor_has__view_x_27___spec__1(x_48); if (lean::obj_tag(x_14) == 0) { -obj* x_54; obj* x_55; -lean::dec(x_48); -x_54 = lean::box(0); -x_55 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_55, 0, x_5); -lean::cnstr_set(x_55, 1, x_52); -lean::cnstr_set(x_55, 2, x_54); -return x_55; +obj* x_53; obj* x_54; +lean::dec(x_47); +x_53 = lean::box(0); +x_54 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_54, 0, x_5); +lean::cnstr_set(x_54, 1, x_51); +lean::cnstr_set(x_54, 2, x_53); +return x_54; } else { -obj* x_56; -x_56 = lean::cnstr_get(x_14, 0); -lean::inc(x_56); +obj* x_55; +x_55 = lean::cnstr_get(x_14, 0); +lean::inc(x_55); lean::dec(x_14); -switch (lean::obj_tag(x_56)) { +switch (lean::obj_tag(x_55)) { case 0: { -obj* x_59; obj* x_62; obj* x_63; -x_59 = lean::cnstr_get(x_56, 0); -lean::inc(x_59); -lean::dec(x_56); -if (lean::is_scalar(x_48)) { - x_62 = lean::alloc_cnstr(1, 1, 0); +obj* x_58; obj* x_61; obj* x_62; +x_58 = lean::cnstr_get(x_55, 0); +lean::inc(x_58); +lean::dec(x_55); +if (lean::is_scalar(x_47)) { + x_61 = lean::alloc_cnstr(1, 1, 0); } else { - x_62 = x_48; + x_61 = x_47; } -lean::cnstr_set(x_62, 0, x_59); -x_63 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_63, 0, x_5); -lean::cnstr_set(x_63, 1, x_52); -lean::cnstr_set(x_63, 2, x_62); -return x_63; +lean::cnstr_set(x_61, 0, x_58); +x_62 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_62, 0, x_5); +lean::cnstr_set(x_62, 1, x_51); +lean::cnstr_set(x_62, 2, x_61); +return x_62; } case 3: { -obj* x_65; obj* x_66; -lean::dec(x_48); -x_65 = lean::box(0); -x_66 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_66, 0, x_5); -lean::cnstr_set(x_66, 1, x_52); -lean::cnstr_set(x_66, 2, x_65); -return x_66; +obj* x_64; obj* x_65; +lean::dec(x_47); +x_64 = lean::box(0); +x_65 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_65, 0, x_5); +lean::cnstr_set(x_65, 1, x_51); +lean::cnstr_set(x_65, 2, x_64); +return x_65; } default: { -obj* x_69; obj* x_70; -lean::dec(x_56); -lean::dec(x_48); -x_69 = lean::box(0); -x_70 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_70, 0, x_5); -lean::cnstr_set(x_70, 1, x_52); -lean::cnstr_set(x_70, 2, x_69); -return x_70; +obj* x_68; obj* x_69; +lean::dec(x_55); +lean::dec(x_47); +x_68 = lean::box(0); +x_69 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_69, 0, x_5); +lean::cnstr_set(x_69, 1, x_51); +lean::cnstr_set(x_69, 2, x_68); +return x_69; } } } @@ -15100,121 +14991,120 @@ lean::dec(x_28); switch (lean::obj_tag(x_42)) { case 0: { -obj* x_46; obj* x_49; obj* x_50; obj* x_52; -lean::dec(x_38); -x_46 = lean::cnstr_get(x_42, 0); -lean::inc(x_46); +obj* x_45; obj* x_48; obj* x_49; obj* x_51; +x_45 = lean::cnstr_get(x_42, 0); +lean::inc(x_45); lean::dec(x_42); -x_49 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_49, 0, x_46); -x_50 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -lean::inc(x_50); -x_52 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_52, 0, x_19); -lean::cnstr_set(x_52, 1, x_50); -lean::cnstr_set(x_52, 2, x_49); -return x_52; +x_48 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_48, 0, x_45); +x_49 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; +lean::inc(x_49); +x_51 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_51, 0, x_19); +lean::cnstr_set(x_51, 1, x_49); +lean::cnstr_set(x_51, 2, x_48); +return x_51; } case 3: { -obj* x_53; obj* x_55; -x_53 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -lean::inc(x_53); -x_55 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_55, 0, x_19); -lean::cnstr_set(x_55, 1, x_53); -lean::cnstr_set(x_55, 2, x_38); -return x_55; +obj* x_52; obj* x_54; +x_52 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; +lean::inc(x_52); +x_54 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_54, 0, x_19); +lean::cnstr_set(x_54, 1, x_52); +lean::cnstr_set(x_54, 2, x_38); +return x_54; } default: { -obj* x_57; obj* x_59; +obj* x_56; obj* x_58; lean::dec(x_42); -x_57 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -x_59 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_59, 0, x_19); -lean::cnstr_set(x_59, 1, x_57); -lean::cnstr_set(x_59, 2, x_38); -return x_59; +x_56 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +x_58 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_58, 0, x_19); +lean::cnstr_set(x_58, 1, x_56); +lean::cnstr_set(x_58, 2, x_38); +return x_58; } } } } else { -obj* x_60; obj* x_62; obj* x_63; obj* x_66; -x_60 = lean::cnstr_get(x_37, 0); -lean::inc(x_60); +obj* x_59; obj* x_61; obj* x_62; obj* x_65; +x_59 = lean::cnstr_get(x_37, 0); +lean::inc(x_59); if (lean::is_shared(x_37)) { lean::dec(x_37); - x_62 = lean::box(0); + x_61 = lean::box(0); } else { lean::cnstr_release(x_37, 0); - x_62 = x_37; + x_61 = x_37; } -x_63 = lean::cnstr_get(x_60, 1); -lean::inc(x_63); -lean::dec(x_60); -x_66 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_anonymous__constructor_has__view_x_27___spec__1(x_63); +x_62 = lean::cnstr_get(x_59, 1); +lean::inc(x_62); +lean::dec(x_59); +x_65 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_anonymous__constructor_has__view_x_27___spec__1(x_62); if (lean::obj_tag(x_28) == 0) { -obj* x_68; obj* x_69; -lean::dec(x_62); -x_68 = lean::box(0); -x_69 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_69, 0, x_19); -lean::cnstr_set(x_69, 1, x_66); -lean::cnstr_set(x_69, 2, x_68); -return x_69; +obj* x_67; obj* x_68; +lean::dec(x_61); +x_67 = lean::box(0); +x_68 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_68, 0, x_19); +lean::cnstr_set(x_68, 1, x_65); +lean::cnstr_set(x_68, 2, x_67); +return x_68; } else { -obj* x_70; -x_70 = lean::cnstr_get(x_28, 0); -lean::inc(x_70); +obj* x_69; +x_69 = lean::cnstr_get(x_28, 0); +lean::inc(x_69); lean::dec(x_28); -switch (lean::obj_tag(x_70)) { +switch (lean::obj_tag(x_69)) { case 0: { -obj* x_73; obj* x_76; obj* x_77; -x_73 = lean::cnstr_get(x_70, 0); -lean::inc(x_73); -lean::dec(x_70); -if (lean::is_scalar(x_62)) { - x_76 = lean::alloc_cnstr(1, 1, 0); +obj* x_72; obj* x_75; obj* x_76; +x_72 = lean::cnstr_get(x_69, 0); +lean::inc(x_72); +lean::dec(x_69); +if (lean::is_scalar(x_61)) { + x_75 = lean::alloc_cnstr(1, 1, 0); } else { - x_76 = x_62; + x_75 = x_61; } -lean::cnstr_set(x_76, 0, x_73); -x_77 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_77, 0, x_19); -lean::cnstr_set(x_77, 1, x_66); -lean::cnstr_set(x_77, 2, x_76); -return x_77; +lean::cnstr_set(x_75, 0, x_72); +x_76 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_76, 0, x_19); +lean::cnstr_set(x_76, 1, x_65); +lean::cnstr_set(x_76, 2, x_75); +return x_76; } case 3: { -obj* x_79; obj* x_80; -lean::dec(x_62); -x_79 = lean::box(0); -x_80 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_80, 0, x_19); -lean::cnstr_set(x_80, 1, x_66); -lean::cnstr_set(x_80, 2, x_79); -return x_80; +obj* x_78; obj* x_79; +lean::dec(x_61); +x_78 = lean::box(0); +x_79 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_79, 0, x_19); +lean::cnstr_set(x_79, 1, x_65); +lean::cnstr_set(x_79, 2, x_78); +return x_79; } default: { -obj* x_83; obj* x_84; -lean::dec(x_62); -lean::dec(x_70); -x_83 = lean::box(0); -x_84 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_84, 0, x_19); -lean::cnstr_set(x_84, 1, x_66); -lean::cnstr_set(x_84, 2, x_83); -return x_84; +obj* x_82; obj* x_83; +lean::dec(x_61); +lean::dec(x_69); +x_82 = lean::box(0); +x_83 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_83, 0, x_19); +lean::cnstr_set(x_83, 1, x_65); +lean::cnstr_set(x_83, 2, x_82); +return x_83; } } } @@ -15227,7 +15117,7 @@ return x_84; obj* l_lean_parser_term_anonymous__constructor_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_28; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -15239,30 +15129,29 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); -x_14 = l_list_map___main___at_lean_parser_term_anonymous__constructor_has__view_x_27___spec__2(x_3); -x_15 = l_list_join___main___rarg(x_14); -x_16 = l_lean_parser_no__kind; -lean::inc(x_16); -x_18 = l_lean_parser_syntax_mk__node(x_16, x_15); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); +x_13 = l_list_map___main___at_lean_parser_term_anonymous__constructor_has__view_x_27___spec__2(x_3); +x_14 = l_list_join___main___rarg(x_13); +x_15 = l_lean_parser_no__kind; +lean::inc(x_15); +x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); lean::inc(x_8); -x_20 = l_option_map___rarg(x_8, x_5); -x_21 = l_option_get__or__else___main___rarg(x_20, x_11); -x_22 = lean::box(0); +x_19 = l_option_map___rarg(x_8, x_5); +x_20 = l_option_get__or__else___main___rarg(x_19, x_11); +x_21 = lean::box(0); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); +lean::cnstr_set(x_23, 0, x_17); lean::cnstr_set(x_23, 1, x_22); x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_18); +lean::cnstr_set(x_24, 0, x_12); lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_13); -lean::cnstr_set(x_25, 1, x_24); -x_26 = l_lean_parser_term_anonymous__constructor; -lean::inc(x_26); -x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); -return x_28; +x_25 = l_lean_parser_term_anonymous__constructor; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +return x_27; } } obj* _init_l_lean_parser_term_anonymous__constructor_has__view_x_27() { @@ -15624,50 +15513,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_explicit__binder__content_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_explicit__binder__content_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_explicit__binder__content_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_explicit__binder__content_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_explicit__binder__content_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_explicit__binder__content_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -15677,44 +15565,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_explicit__binder__content_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_explicit__binder__content_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_term_binder__content_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_term_binder__content_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_command_notation__like_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_command_notation__like_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -15726,7 +15614,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -15734,45 +15622,43 @@ x_5 = l_lean_parser_command_notation__like_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_term_explicit__binder__content; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_term_explicit__binder__content; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_term_binder__content_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_term_explicit__binder__content; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_term_binder__content_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_term_explicit__binder__content; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -16297,7 +16183,7 @@ return x_88; obj* l_lean_parser_term_explicit__binder_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -16309,29 +16195,28 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); -x_14 = l_lean_parser_term_explicit__binder__content_has__view; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_17 = lean::apply_1(x_15, x_3); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); +x_13 = l_lean_parser_term_explicit__binder__content_has__view; +x_14 = lean::cnstr_get(x_13, 1); +lean::inc(x_14); +x_16 = lean::apply_1(x_14, x_3); lean::inc(x_8); -x_19 = l_option_map___rarg(x_8, x_5); -x_20 = l_option_get__or__else___main___rarg(x_19, x_11); -x_21 = lean::box(0); +x_18 = l_option_map___rarg(x_8, x_5); +x_19 = l_option_get__or__else___main___rarg(x_18, x_11); +x_20 = lean::box(0); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_19); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 0, x_16); lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_17); +lean::cnstr_set(x_23, 0, x_12); lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_13); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_term_explicit__binder; -lean::inc(x_25); -x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); -return x_27; +x_24 = l_lean_parser_term_explicit__binder; +lean::inc(x_24); +x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); +return x_26; } } obj* _init_l_lean_parser_term_explicit__binder_has__view_x_27() { @@ -16855,7 +16740,7 @@ return x_88; obj* l_lean_parser_term_implicit__binder_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -16867,29 +16752,28 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); -x_14 = l_lean_parser_term_binder__content_has__view; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_17 = lean::apply_1(x_15, x_3); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); +x_13 = l_lean_parser_term_binder__content_has__view; +x_14 = lean::cnstr_get(x_13, 1); +lean::inc(x_14); +x_16 = lean::apply_1(x_14, x_3); lean::inc(x_8); -x_19 = l_option_map___rarg(x_8, x_5); -x_20 = l_option_get__or__else___main___rarg(x_19, x_11); -x_21 = lean::box(0); +x_18 = l_option_map___rarg(x_8, x_5); +x_19 = l_option_get__or__else___main___rarg(x_18, x_11); +x_20 = lean::box(0); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_19); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 0, x_16); lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_17); +lean::cnstr_set(x_23, 0, x_12); lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_13); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_term_implicit__binder; -lean::inc(x_25); -x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); -return x_27; +x_24 = l_lean_parser_term_implicit__binder; +lean::inc(x_24); +x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); +return x_26; } } obj* _init_l_lean_parser_term_implicit__binder_has__view_x_27() { @@ -17401,7 +17285,7 @@ return x_88; obj* l_lean_parser_term_strict__implicit__binder_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -17413,29 +17297,28 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); -x_14 = l_lean_parser_term_binder__content_has__view; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_17 = lean::apply_1(x_15, x_3); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); +x_13 = l_lean_parser_term_binder__content_has__view; +x_14 = lean::cnstr_get(x_13, 1); +lean::inc(x_14); +x_16 = lean::apply_1(x_14, x_3); lean::inc(x_8); -x_19 = l_option_map___rarg(x_8, x_5); -x_20 = l_option_get__or__else___main___rarg(x_19, x_11); -x_21 = lean::box(0); +x_18 = l_option_map___rarg(x_8, x_5); +x_19 = l_option_get__or__else___main___rarg(x_18, x_11); +x_20 = lean::box(0); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_19); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 0, x_16); lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_17); +lean::cnstr_set(x_23, 0, x_12); lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_13); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_term_strict__implicit__binder; -lean::inc(x_25); -x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); -return x_27; +x_24 = l_lean_parser_term_strict__implicit__binder; +lean::inc(x_24); +x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); +return x_26; } } obj* _init_l_lean_parser_term_strict__implicit__binder_has__view_x_27() { @@ -17478,28 +17361,24 @@ return x_8; obj* _init_l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_9; obj* x_10; obj* x_11; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_0); -lean::cnstr_set(x_9, 1, x_3); -lean::cnstr_set(x_9, 2, x_5); -lean::cnstr_set(x_9, 3, x_0); -lean::cnstr_set(x_9, 4, x_0); -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_0); -lean::cnstr_set(x_11, 2, x_10); -return x_11; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = lean::box(3); +x_7 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_7, 0, x_5); +lean::cnstr_set(x_7, 1, x_0); +lean::cnstr_set(x_7, 2, x_6); +return x_7; } } obj* _init_l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__2() { @@ -17671,121 +17550,117 @@ if (lean::obj_tag(x_0) == 0) { if (lean::obj_tag(x_0) == 0) { -obj* x_53; -lean::dec(x_51); -x_53 = l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_53); -return x_53; +obj* x_52; +x_52 = l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_52); +return x_52; } else { -obj* x_55; obj* x_58; obj* x_60; -x_55 = lean::cnstr_get(x_0, 0); -lean::inc(x_55); +obj* x_54; obj* x_57; obj* x_59; +x_54 = lean::cnstr_get(x_0, 0); +lean::inc(x_54); lean::dec(x_0); -x_58 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_58); -x_60 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_60, 0, x_58); -lean::cnstr_set(x_60, 1, x_51); -lean::cnstr_set(x_60, 2, x_55); -return x_60; +x_57 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +lean::inc(x_57); +x_59 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_59, 0, x_57); +lean::cnstr_set(x_59, 1, x_51); +lean::cnstr_set(x_59, 2, x_54); +return x_59; } } else { -obj* x_61; obj* x_63; -x_61 = lean::cnstr_get(x_0, 0); -lean::inc(x_61); -x_63 = lean::cnstr_get(x_0, 1); -lean::inc(x_63); +obj* x_60; obj* x_62; +x_60 = lean::cnstr_get(x_0, 0); +lean::inc(x_60); +x_62 = lean::cnstr_get(x_0, 1); +lean::inc(x_62); lean::dec(x_0); -switch (lean::obj_tag(x_61)) { +switch (lean::obj_tag(x_60)) { case 0: { -obj* x_67; obj* x_70; -lean::dec(x_51); -x_67 = lean::cnstr_get(x_61, 0); -lean::inc(x_67); -lean::dec(x_61); -x_70 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_70, 0, x_67); -if (lean::obj_tag(x_63) == 0) +obj* x_65; obj* x_68; +x_65 = lean::cnstr_get(x_60, 0); +lean::inc(x_65); +lean::dec(x_60); +x_68 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_68, 0, x_65); +if (lean::obj_tag(x_62) == 0) { -obj* x_71; obj* x_72; obj* x_74; -x_71 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -x_72 = lean::box(3); -lean::inc(x_71); -x_74 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_74, 0, x_71); -lean::cnstr_set(x_74, 1, x_70); -lean::cnstr_set(x_74, 2, x_72); -return x_74; +obj* x_69; obj* x_70; obj* x_72; +x_69 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +x_70 = lean::box(3); +lean::inc(x_69); +x_72 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_72, 0, x_69); +lean::cnstr_set(x_72, 1, x_68); +lean::cnstr_set(x_72, 2, x_70); +return x_72; } else { -obj* x_75; obj* x_78; obj* x_80; -x_75 = lean::cnstr_get(x_63, 0); -lean::inc(x_75); -lean::dec(x_63); -x_78 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_78); -x_80 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_80, 0, x_78); -lean::cnstr_set(x_80, 1, x_70); -lean::cnstr_set(x_80, 2, x_75); -return x_80; +obj* x_73; obj* x_76; obj* x_78; +x_73 = lean::cnstr_get(x_62, 0); +lean::inc(x_73); +lean::dec(x_62); +x_76 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +lean::inc(x_76); +x_78 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_78, 0, x_76); +lean::cnstr_set(x_78, 1, x_68); +lean::cnstr_set(x_78, 2, x_73); +return x_78; } } case 3: { -if (lean::obj_tag(x_63) == 0) +if (lean::obj_tag(x_62) == 0) { -obj* x_82; -lean::dec(x_51); -x_82 = l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_82); -return x_82; +obj* x_79; +x_79 = l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_79); +return x_79; } else { -obj* x_84; obj* x_87; obj* x_89; -x_84 = lean::cnstr_get(x_63, 0); +obj* x_81; obj* x_84; obj* x_86; +x_81 = lean::cnstr_get(x_62, 0); +lean::inc(x_81); +lean::dec(x_62); +x_84 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; lean::inc(x_84); -lean::dec(x_63); -x_87 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_87); -x_89 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_89, 0, x_87); -lean::cnstr_set(x_89, 1, x_51); -lean::cnstr_set(x_89, 2, x_84); -return x_89; +x_86 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_86, 0, x_84); +lean::cnstr_set(x_86, 1, x_51); +lean::cnstr_set(x_86, 2, x_81); +return x_86; } } default: { -lean::dec(x_61); -if (lean::obj_tag(x_63) == 0) +lean::dec(x_60); +if (lean::obj_tag(x_62) == 0) { -obj* x_92; -lean::dec(x_51); -x_92 = l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_92); -return x_92; +obj* x_88; +x_88 = l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_88); +return x_88; } else { -obj* x_94; obj* x_97; obj* x_99; -x_94 = lean::cnstr_get(x_63, 0); -lean::inc(x_94); -lean::dec(x_63); -x_97 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_97); -x_99 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_99, 0, x_97); -lean::cnstr_set(x_99, 1, x_51); -lean::cnstr_set(x_99, 2, x_94); -return x_99; +obj* x_90; obj* x_93; obj* x_95; +x_90 = lean::cnstr_get(x_62, 0); +lean::inc(x_90); +lean::dec(x_62); +x_93 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +lean::inc(x_93); +x_95 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_95, 0, x_93); +lean::cnstr_set(x_95, 1, x_51); +lean::cnstr_set(x_95, 2, x_90); +return x_95; } } } @@ -17996,121 +17871,117 @@ if (lean::obj_tag(x_1) == 0) { if (lean::obj_tag(x_1) == 0) { -obj* x_67; -lean::dec(x_65); -x_67 = l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_67); -return x_67; +obj* x_66; +x_66 = l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_66); +return x_66; } else { -obj* x_69; obj* x_72; obj* x_74; -x_69 = lean::cnstr_get(x_1, 0); -lean::inc(x_69); +obj* x_68; obj* x_71; obj* x_73; +x_68 = lean::cnstr_get(x_1, 0); +lean::inc(x_68); lean::dec(x_1); -x_72 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_72); -x_74 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_74, 0, x_72); -lean::cnstr_set(x_74, 1, x_65); -lean::cnstr_set(x_74, 2, x_69); -return x_74; +x_71 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +lean::inc(x_71); +x_73 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_73, 0, x_71); +lean::cnstr_set(x_73, 1, x_65); +lean::cnstr_set(x_73, 2, x_68); +return x_73; } } else { -obj* x_75; obj* x_77; -x_75 = lean::cnstr_get(x_1, 0); -lean::inc(x_75); -x_77 = lean::cnstr_get(x_1, 1); -lean::inc(x_77); +obj* x_74; obj* x_76; +x_74 = lean::cnstr_get(x_1, 0); +lean::inc(x_74); +x_76 = lean::cnstr_get(x_1, 1); +lean::inc(x_76); lean::dec(x_1); -switch (lean::obj_tag(x_75)) { +switch (lean::obj_tag(x_74)) { case 0: { -obj* x_81; obj* x_84; -lean::dec(x_65); -x_81 = lean::cnstr_get(x_75, 0); -lean::inc(x_81); -lean::dec(x_75); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_81); -if (lean::obj_tag(x_77) == 0) +obj* x_79; obj* x_82; +x_79 = lean::cnstr_get(x_74, 0); +lean::inc(x_79); +lean::dec(x_74); +x_82 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_82, 0, x_79); +if (lean::obj_tag(x_76) == 0) { -obj* x_85; obj* x_86; obj* x_88; -x_85 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -x_86 = lean::box(3); -lean::inc(x_85); -x_88 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_88, 0, x_85); -lean::cnstr_set(x_88, 1, x_84); -lean::cnstr_set(x_88, 2, x_86); -return x_88; +obj* x_83; obj* x_84; obj* x_86; +x_83 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +x_84 = lean::box(3); +lean::inc(x_83); +x_86 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_86, 0, x_83); +lean::cnstr_set(x_86, 1, x_82); +lean::cnstr_set(x_86, 2, x_84); +return x_86; } else { -obj* x_89; obj* x_92; obj* x_94; -x_89 = lean::cnstr_get(x_77, 0); -lean::inc(x_89); -lean::dec(x_77); -x_92 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_92); -x_94 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_94, 0, x_92); -lean::cnstr_set(x_94, 1, x_84); -lean::cnstr_set(x_94, 2, x_89); -return x_94; +obj* x_87; obj* x_90; obj* x_92; +x_87 = lean::cnstr_get(x_76, 0); +lean::inc(x_87); +lean::dec(x_76); +x_90 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +lean::inc(x_90); +x_92 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_92, 0, x_90); +lean::cnstr_set(x_92, 1, x_82); +lean::cnstr_set(x_92, 2, x_87); +return x_92; } } case 3: { -if (lean::obj_tag(x_77) == 0) +if (lean::obj_tag(x_76) == 0) { -obj* x_96; -lean::dec(x_65); -x_96 = l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_96); -return x_96; +obj* x_93; +x_93 = l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_93); +return x_93; } else { -obj* x_98; obj* x_101; obj* x_103; -x_98 = lean::cnstr_get(x_77, 0); +obj* x_95; obj* x_98; obj* x_100; +x_95 = lean::cnstr_get(x_76, 0); +lean::inc(x_95); +lean::dec(x_76); +x_98 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; lean::inc(x_98); -lean::dec(x_77); -x_101 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_101); -x_103 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_103, 0, x_101); -lean::cnstr_set(x_103, 1, x_65); -lean::cnstr_set(x_103, 2, x_98); -return x_103; +x_100 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_100, 0, x_98); +lean::cnstr_set(x_100, 1, x_65); +lean::cnstr_set(x_100, 2, x_95); +return x_100; } } default: { -lean::dec(x_75); -if (lean::obj_tag(x_77) == 0) +lean::dec(x_74); +if (lean::obj_tag(x_76) == 0) { -obj* x_106; -lean::dec(x_65); -x_106 = l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_106); -return x_106; +obj* x_102; +x_102 = l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_102); +return x_102; } else { -obj* x_108; obj* x_111; obj* x_113; -x_108 = lean::cnstr_get(x_77, 0); -lean::inc(x_108); -lean::dec(x_77); -x_111 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_111); -x_113 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_113, 0, x_111); -lean::cnstr_set(x_113, 1, x_65); -lean::cnstr_set(x_113, 2, x_108); -return x_113; +obj* x_104; obj* x_107; obj* x_109; +x_104 = lean::cnstr_get(x_76, 0); +lean::inc(x_104); +lean::dec(x_76); +x_107 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +lean::inc(x_107); +x_109 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_109, 0, x_107); +lean::cnstr_set(x_109, 1, x_65); +lean::cnstr_set(x_109, 2, x_104); +return x_109; } } } @@ -18436,50 +18307,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_inst__implicit__binder__content_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_inst__implicit__binder__content_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_inst__implicit__binder__content_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_inst__implicit__binder__content_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_inst__implicit__binder__content_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_inst__implicit__binder__content_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -18489,44 +18359,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_inst__implicit__binder__content_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_inst__implicit__binder__content_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_term_inst__implicit__anonymous__binder_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_term_inst__implicit__anonymous__binder_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_term_inst__implicit__named__binder_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_term_inst__implicit__named__binder_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -18538,7 +18408,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -18546,45 +18416,43 @@ x_5 = l_lean_parser_term_inst__implicit__named__binder_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_term_inst__implicit__binder__content; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_term_inst__implicit__binder__content; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_term_inst__implicit__anonymous__binder_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_term_inst__implicit__binder__content; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_term_inst__implicit__anonymous__binder_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_term_inst__implicit__binder__content; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -19109,7 +18977,7 @@ return x_88; obj* l_lean_parser_term_inst__implicit__binder_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -19121,29 +18989,28 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); -x_14 = l_lean_parser_term_inst__implicit__binder__content_has__view; -x_15 = lean::cnstr_get(x_14, 1); -lean::inc(x_15); -x_17 = lean::apply_1(x_15, x_3); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); +x_13 = l_lean_parser_term_inst__implicit__binder__content_has__view; +x_14 = lean::cnstr_get(x_13, 1); +lean::inc(x_14); +x_16 = lean::apply_1(x_14, x_3); lean::inc(x_8); -x_19 = l_option_map___rarg(x_8, x_5); -x_20 = l_option_get__or__else___main___rarg(x_19, x_11); -x_21 = lean::box(0); +x_18 = l_option_map___rarg(x_8, x_5); +x_19 = l_option_get__or__else___main___rarg(x_18, x_11); +x_20 = lean::box(0); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_19); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 0, x_16); lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_17); +lean::cnstr_set(x_23, 0, x_12); lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_13); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_term_inst__implicit__binder; -lean::inc(x_25); -x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); -return x_27; +x_24 = l_lean_parser_term_inst__implicit__binder; +lean::inc(x_24); +x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); +return x_26; } } obj* _init_l_lean_parser_term_inst__implicit__binder_has__view_x_27() { @@ -19398,50 +19265,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_bracketed__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_bracketed__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_bracketed__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_bracketed__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_bracketed__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_bracketed__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -19451,101 +19317,101 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_bracketed__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_bracketed__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); -if (x_77 == 0) +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); +if (x_76 == 0) { -obj* x_79; uint8 x_80; -x_79 = lean::mk_nat_obj(1u); -x_80 = lean::nat_dec_eq(x_2, x_79); -lean::dec(x_79); -if (x_80 == 0) +obj* x_78; uint8 x_79; +x_78 = lean::mk_nat_obj(1u); +x_79 = lean::nat_dec_eq(x_2, x_78); +lean::dec(x_78); +if (x_79 == 0) { -obj* x_82; uint8 x_83; -x_82 = lean::mk_nat_obj(2u); -x_83 = lean::nat_dec_eq(x_2, x_82); -lean::dec(x_82); -if (x_83 == 0) +obj* x_81; uint8 x_82; +x_81 = lean::mk_nat_obj(2u); +x_82 = lean::nat_dec_eq(x_2, x_81); +lean::dec(x_81); +if (x_82 == 0) { -obj* x_85; uint8 x_86; -x_85 = lean::mk_nat_obj(3u); -x_86 = lean::nat_dec_eq(x_2, x_85); -lean::dec(x_85); +obj* x_84; uint8 x_85; +x_84 = lean::mk_nat_obj(3u); +x_85 = lean::nat_dec_eq(x_2, x_84); +lean::dec(x_84); lean::dec(x_2); -if (x_86 == 0) +if (x_85 == 0) { -obj* x_89; obj* x_90; obj* x_92; obj* x_93; -x_89 = l_lean_parser_term_anonymous__constructor_has__view; -x_90 = lean::cnstr_get(x_89, 0); -lean::inc(x_90); -x_92 = lean::apply_1(x_90, x_1); -x_93 = lean::alloc_cnstr(4, 1, 0); -lean::cnstr_set(x_93, 0, x_92); -return x_93; +obj* x_88; obj* x_89; obj* x_91; obj* x_92; +x_88 = l_lean_parser_term_anonymous__constructor_has__view; +x_89 = lean::cnstr_get(x_88, 0); +lean::inc(x_89); +x_91 = lean::apply_1(x_89, x_1); +x_92 = lean::alloc_cnstr(4, 1, 0); +lean::cnstr_set(x_92, 0, x_91); +return x_92; } else { -obj* x_94; obj* x_95; obj* x_97; obj* x_98; -x_94 = l_lean_parser_term_inst__implicit__binder_has__view; -x_95 = lean::cnstr_get(x_94, 0); -lean::inc(x_95); -x_97 = lean::apply_1(x_95, x_1); -x_98 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_98, 0, x_97); -return x_98; +obj* x_93; obj* x_94; obj* x_96; obj* x_97; +x_93 = l_lean_parser_term_inst__implicit__binder_has__view; +x_94 = lean::cnstr_get(x_93, 0); +lean::inc(x_94); +x_96 = lean::apply_1(x_94, x_1); +x_97 = lean::alloc_cnstr(3, 1, 0); +lean::cnstr_set(x_97, 0, x_96); +return x_97; } } else { -obj* x_100; obj* x_101; obj* x_103; obj* x_104; +obj* x_99; obj* x_100; obj* x_102; obj* x_103; lean::dec(x_2); -x_100 = l_lean_parser_term_strict__implicit__binder_has__view; -x_101 = lean::cnstr_get(x_100, 0); -lean::inc(x_101); -x_103 = lean::apply_1(x_101, x_1); -x_104 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_104, 0, x_103); -return x_104; +x_99 = l_lean_parser_term_strict__implicit__binder_has__view; +x_100 = lean::cnstr_get(x_99, 0); +lean::inc(x_100); +x_102 = lean::apply_1(x_100, x_1); +x_103 = lean::alloc_cnstr(2, 1, 0); +lean::cnstr_set(x_103, 0, x_102); +return x_103; } } else { -obj* x_106; obj* x_107; obj* x_109; obj* x_110; +obj* x_105; obj* x_106; obj* x_108; obj* x_109; lean::dec(x_2); -x_106 = l_lean_parser_term_implicit__binder_has__view; -x_107 = lean::cnstr_get(x_106, 0); -lean::inc(x_107); -x_109 = lean::apply_1(x_107, x_1); -x_110 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_110, 0, x_109); -return x_110; +x_105 = l_lean_parser_term_implicit__binder_has__view; +x_106 = lean::cnstr_get(x_105, 0); +lean::inc(x_106); +x_108 = lean::apply_1(x_106, x_1); +x_109 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_109, 0, x_108); +return x_109; } } else { -obj* x_112; obj* x_113; obj* x_115; obj* x_116; +obj* x_111; obj* x_112; obj* x_114; obj* x_115; lean::dec(x_2); -x_112 = l_lean_parser_term_explicit__binder_has__view; -x_113 = lean::cnstr_get(x_112, 0); -lean::inc(x_113); -x_115 = lean::apply_1(x_113, x_1); -x_116 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_116, 0, x_115); -return x_116; +x_111 = l_lean_parser_term_explicit__binder_has__view; +x_112 = lean::cnstr_get(x_111, 0); +lean::inc(x_112); +x_114 = lean::apply_1(x_112, x_1); +x_115 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_115, 0, x_114); +return x_115; } } } @@ -19558,7 +19424,7 @@ x_1 = lean::box(0); switch (lean::obj_tag(x_0)) { case 0: { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -19566,120 +19432,115 @@ x_5 = l_lean_parser_term_explicit__binder_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_term_bracketed__binder; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_term_bracketed__binder; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } case 1: { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_term_implicit__binder_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_term_bracketed__binder; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_term_implicit__binder_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_term_bracketed__binder; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } case 2: { -obj* x_34; obj* x_37; obj* x_38; obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; -x_34 = lean::cnstr_get(x_0, 0); -lean::inc(x_34); +obj* x_32; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_46; +x_32 = lean::cnstr_get(x_0, 0); +lean::inc(x_32); lean::dec(x_0); -x_37 = l_lean_parser_term_strict__implicit__binder_has__view; -x_38 = lean::cnstr_get(x_37, 1); -lean::inc(x_38); -x_40 = lean::apply_1(x_38, x_34); -lean::inc(x_1); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_40); -lean::cnstr_set(x_42, 1, x_1); -x_43 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; -lean::inc(x_43); -x_45 = l_lean_parser_syntax_mk__node(x_43, x_42); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_1); -x_47 = l_lean_parser_term_bracketed__binder; -lean::inc(x_47); -x_49 = l_lean_parser_syntax_mk__node(x_47, x_46); -return x_49; +x_35 = l_lean_parser_term_strict__implicit__binder_has__view; +x_36 = lean::cnstr_get(x_35, 1); +lean::inc(x_36); +x_38 = lean::apply_1(x_36, x_32); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_1); +x_40 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; +lean::inc(x_40); +x_42 = l_lean_parser_syntax_mk__node(x_40, x_39); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_1); +x_44 = l_lean_parser_term_bracketed__binder; +lean::inc(x_44); +x_46 = l_lean_parser_syntax_mk__node(x_44, x_43); +return x_46; } case 3: { -obj* x_50; obj* x_53; obj* x_54; obj* x_56; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_65; -x_50 = lean::cnstr_get(x_0, 0); -lean::inc(x_50); +obj* x_47; obj* x_50; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_61; +x_47 = lean::cnstr_get(x_0, 0); +lean::inc(x_47); lean::dec(x_0); -x_53 = l_lean_parser_term_inst__implicit__binder_has__view; -x_54 = lean::cnstr_get(x_53, 1); -lean::inc(x_54); -x_56 = lean::apply_1(x_54, x_50); -lean::inc(x_1); +x_50 = l_lean_parser_term_inst__implicit__binder_has__view; +x_51 = lean::cnstr_get(x_50, 1); +lean::inc(x_51); +x_53 = lean::apply_1(x_51, x_47); +x_54 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_54, 0, x_53); +lean::cnstr_set(x_54, 1, x_1); +x_55 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +lean::inc(x_55); +x_57 = l_lean_parser_syntax_mk__node(x_55, x_54); x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_56); +lean::cnstr_set(x_58, 0, x_57); lean::cnstr_set(x_58, 1, x_1); -x_59 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +x_59 = l_lean_parser_term_bracketed__binder; lean::inc(x_59); x_61 = l_lean_parser_syntax_mk__node(x_59, x_58); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_1); -x_63 = l_lean_parser_term_bracketed__binder; -lean::inc(x_63); -x_65 = l_lean_parser_syntax_mk__node(x_63, x_62); -return x_65; +return x_61; } default: { -obj* x_66; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; obj* x_78; obj* x_79; obj* x_81; -x_66 = lean::cnstr_get(x_0, 0); -lean::inc(x_66); +obj* x_62; obj* x_65; obj* x_66; obj* x_68; obj* x_69; obj* x_70; obj* x_72; obj* x_73; obj* x_74; obj* x_76; +x_62 = lean::cnstr_get(x_0, 0); +lean::inc(x_62); lean::dec(x_0); -x_69 = l_lean_parser_term_anonymous__constructor_has__view; -x_70 = lean::cnstr_get(x_69, 1); +x_65 = l_lean_parser_term_anonymous__constructor_has__view; +x_66 = lean::cnstr_get(x_65, 1); +lean::inc(x_66); +x_68 = lean::apply_1(x_66, x_62); +x_69 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_69, 0, x_68); +lean::cnstr_set(x_69, 1, x_1); +x_70 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__2___closed__1; lean::inc(x_70); -x_72 = lean::apply_1(x_70, x_66); -lean::inc(x_1); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_72); -lean::cnstr_set(x_74, 1, x_1); -x_75 = l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__2___closed__1; -lean::inc(x_75); -x_77 = l_lean_parser_syntax_mk__node(x_75, x_74); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_1); -x_79 = l_lean_parser_term_bracketed__binder; -lean::inc(x_79); -x_81 = l_lean_parser_syntax_mk__node(x_79, x_78); -return x_81; +x_72 = l_lean_parser_syntax_mk__node(x_70, x_69); +x_73 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_73, 0, x_72); +lean::cnstr_set(x_73, 1, x_1); +x_74 = l_lean_parser_term_bracketed__binder; +lean::inc(x_74); +x_76 = l_lean_parser_syntax_mk__node(x_74, x_73); +return x_76; } } } @@ -19729,7 +19590,7 @@ lean::inc(x_14); lean::dec(x_11); if (lean::obj_tag(x_12) == 0) { -obj* x_17; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; +obj* x_17; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; x_17 = lean::cnstr_get(x_12, 0); lean::inc(x_17); x_19 = lean::cnstr_get(x_12, 1); @@ -19746,62 +19607,61 @@ if (lean::is_shared(x_12)) { x_23 = x_12; } x_24 = lean::box(0); -lean::inc(x_24); -x_26 = lean_name_mk_numeral(x_24, x_6); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_17); -lean::cnstr_set(x_27, 1, x_24); -x_28 = l_lean_parser_syntax_mk__node(x_26, x_27); -x_29 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_29); +x_25 = lean_name_mk_numeral(x_24, x_6); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_17); +lean::cnstr_set(x_26, 1, x_24); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_26); +x_28 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_28); if (lean::is_scalar(x_23)) { - x_31 = lean::alloc_cnstr(0, 3, 0); + x_30 = lean::alloc_cnstr(0, 3, 0); } else { - x_31 = x_23; + x_30 = x_23; } -lean::cnstr_set(x_31, 0, x_28); -lean::cnstr_set(x_31, 1, x_19); -lean::cnstr_set(x_31, 2, x_29); -x_32 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_31); +lean::cnstr_set(x_30, 0, x_27); +lean::cnstr_set(x_30, 1, x_19); +lean::cnstr_set(x_30, 2, x_28); +x_31 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_30); if (lean::is_scalar(x_10)) { - x_33 = lean::alloc_cnstr(0, 2, 0); + x_32 = lean::alloc_cnstr(0, 2, 0); } else { - x_33 = x_10; + x_32 = x_10; } -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_14); -return x_33; +lean::cnstr_set(x_32, 0, x_31); +lean::cnstr_set(x_32, 1, x_14); +return x_32; } else { -obj* x_35; uint8 x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; +obj* x_34; uint8 x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; lean::dec(x_6); -x_35 = lean::cnstr_get(x_12, 0); -lean::inc(x_35); -x_37 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); +x_34 = lean::cnstr_get(x_12, 0); +lean::inc(x_34); +x_36 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); if (lean::is_shared(x_12)) { lean::dec(x_12); - x_38 = lean::box(0); + x_37 = lean::box(0); } else { lean::cnstr_release(x_12, 0); - x_38 = x_12; + x_37 = x_12; } -if (lean::is_scalar(x_38)) { - x_39 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_37)) { + x_38 = lean::alloc_cnstr(1, 1, 1); } else { - x_39 = x_38; + x_38 = x_37; } -lean::cnstr_set(x_39, 0, x_35); -lean::cnstr_set_scalar(x_39, sizeof(void*)*1, x_37); -x_40 = x_39; +lean::cnstr_set(x_38, 0, x_34); +lean::cnstr_set_scalar(x_38, sizeof(void*)*1, x_36); +x_39 = x_38; if (lean::is_scalar(x_10)) { - x_41 = lean::alloc_cnstr(0, 2, 0); + x_40 = lean::alloc_cnstr(0, 2, 0); } else { - x_41 = x_10; + x_40 = x_10; } -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_14); -return x_41; +lean::cnstr_set(x_40, 0, x_39); +lean::cnstr_set(x_40, 1, x_14); +return x_40; } } } @@ -19982,56 +19842,55 @@ goto lbl_29; } lbl_29: { -obj* x_75; obj* x_77; obj* x_79; obj* x_80; obj* x_82; obj* x_83; +obj* x_75; obj* x_76; obj* x_78; obj* x_79; obj* x_81; obj* x_82; lean::dec(x_28); x_75 = lean::box(0); -lean::inc(x_75); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_21); -lean::cnstr_set(x_77, 1, x_75); +x_76 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_76, 0, x_21); +lean::cnstr_set(x_76, 1, x_75); lean::inc(x_23); if (lean::is_scalar(x_27)) { - x_79 = lean::alloc_cnstr(0, 3, 0); + x_78 = lean::alloc_cnstr(0, 3, 0); } else { - x_79 = x_27; + x_78 = x_27; } -lean::cnstr_set(x_79, 0, x_77); -lean::cnstr_set(x_79, 1, x_23); -lean::cnstr_set(x_79, 2, x_75); -x_80 = l_lean_parser_finish__comment__block___closed__2; -lean::inc(x_80); -x_82 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_82, 0, x_79); -lean::cnstr_set(x_82, 1, x_23); -lean::cnstr_set(x_82, 2, x_80); -x_83 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_25, x_82); -x_11 = x_83; +lean::cnstr_set(x_78, 0, x_76); +lean::cnstr_set(x_78, 1, x_23); +lean::cnstr_set(x_78, 2, x_75); +x_79 = l_lean_parser_finish__comment__block___closed__2; +lean::inc(x_79); +x_81 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_81, 0, x_78); +lean::cnstr_set(x_81, 1, x_23); +lean::cnstr_set(x_81, 2, x_79); +x_82 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_25, x_81); +x_11 = x_82; x_12 = x_18; goto lbl_13; } } else { -obj* x_84; uint8 x_86; obj* x_87; obj* x_88; obj* x_89; -x_84 = lean::cnstr_get(x_16, 0); -lean::inc(x_84); -x_86 = lean::cnstr_get_scalar(x_16, sizeof(void*)*1); +obj* x_83; uint8 x_85; obj* x_86; obj* x_87; obj* x_88; +x_83 = lean::cnstr_get(x_16, 0); +lean::inc(x_83); +x_85 = lean::cnstr_get_scalar(x_16, sizeof(void*)*1); if (lean::is_shared(x_16)) { lean::dec(x_16); - x_87 = lean::box(0); + x_86 = lean::box(0); } else { lean::cnstr_release(x_16, 0); - x_87 = x_16; + x_86 = x_16; } -if (lean::is_scalar(x_87)) { - x_88 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_86)) { + x_87 = lean::alloc_cnstr(1, 1, 1); } else { - x_88 = x_87; + x_87 = x_86; } -lean::cnstr_set(x_88, 0, x_84); -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_86); -x_89 = x_88; -x_11 = x_89; +lean::cnstr_set(x_87, 0, x_83); +lean::cnstr_set_scalar(x_87, sizeof(void*)*1, x_85); +x_88 = x_87; +x_11 = x_88; x_12 = x_18; goto lbl_13; } @@ -20039,41 +19898,41 @@ lbl_10: { if (lean::obj_tag(x_8) == 0) { -obj* x_90; obj* x_92; obj* x_93; obj* x_95; obj* x_96; -x_90 = lean::cnstr_get(x_8, 0); -lean::inc(x_90); +obj* x_89; obj* x_91; obj* x_92; obj* x_94; obj* x_95; +x_89 = lean::cnstr_get(x_8, 0); +lean::inc(x_89); if (lean::is_shared(x_8)) { lean::dec(x_8); - x_92 = lean::box(0); + x_91 = lean::box(0); } else { lean::cnstr_release(x_8, 0); lean::cnstr_release(x_8, 1); lean::cnstr_release(x_8, 2); - x_92 = x_8; + x_91 = x_8; } -x_93 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_93); -if (lean::is_scalar(x_92)) { - x_95 = lean::alloc_cnstr(0, 3, 0); +x_92 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_92); +if (lean::is_scalar(x_91)) { + x_94 = lean::alloc_cnstr(0, 3, 0); } else { - x_95 = x_92; + x_94 = x_91; } -lean::cnstr_set(x_95, 0, x_90); -lean::cnstr_set(x_95, 1, x_6); -lean::cnstr_set(x_95, 2, x_93); -x_96 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_96, 0, x_95); -lean::cnstr_set(x_96, 1, x_9); -return x_96; +lean::cnstr_set(x_94, 0, x_89); +lean::cnstr_set(x_94, 1, x_6); +lean::cnstr_set(x_94, 2, x_92); +x_95 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_95, 0, x_94); +lean::cnstr_set(x_95, 1, x_9); +return x_95; } else { -obj* x_98; +obj* x_97; lean::dec(x_6); -x_98 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_98, 0, x_8); -lean::cnstr_set(x_98, 1, x_9); -return x_98; +x_97 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_97, 0, x_8); +lean::cnstr_set(x_97, 1, x_9); +return x_97; } } lbl_13: @@ -20088,147 +19947,147 @@ goto lbl_10; } else { -obj* x_101; obj* x_103; obj* x_104; -x_101 = lean::cnstr_get(x_11, 0); -lean::inc(x_101); +obj* x_100; obj* x_102; obj* x_103; +x_100 = lean::cnstr_get(x_11, 0); +lean::inc(x_100); if (lean::is_shared(x_11)) { lean::dec(x_11); - x_103 = lean::box(0); + x_102 = lean::box(0); } else { lean::cnstr_release(x_11, 0); - x_103 = x_11; + x_102 = x_11; } -x_104 = lean::cnstr_get(x_101, 0); -lean::inc(x_104); +x_103 = lean::cnstr_get(x_100, 0); +lean::inc(x_103); if (lean::obj_tag(x_2) == 0) { -obj* x_109; obj* x_111; +obj* x_108; obj* x_110; lean::dec(x_0); -lean::dec(x_103); -lean::dec(x_101); -x_109 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_109); -x_111 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_111, 0, x_2); -lean::cnstr_set(x_111, 1, x_104); -lean::cnstr_set(x_111, 2, x_109); -x_8 = x_111; +lean::dec(x_100); +lean::dec(x_102); +x_108 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_108); +x_110 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_110, 0, x_2); +lean::cnstr_set(x_110, 1, x_103); +lean::cnstr_set(x_110, 2, x_108); +x_8 = x_110; x_9 = x_12; goto lbl_10; } else { -obj* x_112; obj* x_114; obj* x_115; obj* x_117; uint8 x_119; -x_112 = lean::cnstr_get(x_2, 0); -lean::inc(x_112); -x_114 = lean::string_iterator_offset(x_104); -x_115 = lean::cnstr_get(x_112, 0); -lean::inc(x_115); -x_117 = lean::string_iterator_offset(x_115); -lean::dec(x_115); -x_119 = lean::nat_dec_lt(x_114, x_117); -if (x_119 == 0) +obj* x_111; obj* x_113; obj* x_114; obj* x_116; uint8 x_118; +x_111 = lean::cnstr_get(x_2, 0); +lean::inc(x_111); +x_113 = lean::string_iterator_offset(x_103); +x_114 = lean::cnstr_get(x_111, 0); +lean::inc(x_114); +x_116 = lean::string_iterator_offset(x_114); +lean::dec(x_114); +x_118 = lean::nat_dec_lt(x_113, x_116); +if (x_118 == 0) { -uint8 x_121; +uint8 x_120; lean::dec(x_2); -x_121 = lean::nat_dec_lt(x_117, x_114); -lean::dec(x_117); -if (x_121 == 0) +x_120 = lean::nat_dec_lt(x_116, x_113); +lean::dec(x_116); +if (x_120 == 0) { -obj* x_123; obj* x_124; uint8 x_126; -x_123 = l_lean_parser_parsec__t_merge___rarg(x_101, x_112); -x_124 = lean::string_iterator_offset(x_0); +obj* x_122; obj* x_123; uint8 x_125; +x_122 = l_lean_parser_parsec__t_merge___rarg(x_100, x_111); +x_123 = lean::string_iterator_offset(x_0); lean::dec(x_0); -x_126 = lean::nat_dec_lt(x_124, x_114); -lean::dec(x_114); -lean::dec(x_124); -if (x_126 == 0) +x_125 = lean::nat_dec_lt(x_123, x_113); +lean::dec(x_113); +lean::dec(x_123); +if (x_125 == 0) { -uint8 x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_134; -x_129 = 0; -if (lean::is_scalar(x_103)) { - x_130 = lean::alloc_cnstr(1, 1, 1); +uint8 x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_133; +x_128 = 0; +if (lean::is_scalar(x_102)) { + x_129 = lean::alloc_cnstr(1, 1, 1); } else { - x_130 = x_103; + x_129 = x_102; } -lean::cnstr_set(x_130, 0, x_123); -lean::cnstr_set_scalar(x_130, sizeof(void*)*1, x_129); -x_131 = x_130; -x_132 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_132); -x_134 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_134, 0, x_131); -lean::cnstr_set(x_134, 1, x_104); -lean::cnstr_set(x_134, 2, x_132); -x_8 = x_134; +lean::cnstr_set(x_129, 0, x_122); +lean::cnstr_set_scalar(x_129, sizeof(void*)*1, x_128); +x_130 = x_129; +x_131 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_131); +x_133 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_133, 0, x_130); +lean::cnstr_set(x_133, 1, x_103); +lean::cnstr_set(x_133, 2, x_131); +x_8 = x_133; x_9 = x_12; goto lbl_10; } else { -uint8 x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_140; -x_135 = 1; -if (lean::is_scalar(x_103)) { - x_136 = lean::alloc_cnstr(1, 1, 1); +uint8 x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_139; +x_134 = 1; +if (lean::is_scalar(x_102)) { + x_135 = lean::alloc_cnstr(1, 1, 1); } else { - x_136 = x_103; + x_135 = x_102; } -lean::cnstr_set(x_136, 0, x_123); -lean::cnstr_set_scalar(x_136, sizeof(void*)*1, x_135); -x_137 = x_136; -x_138 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_138); -x_140 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_140, 0, x_137); -lean::cnstr_set(x_140, 1, x_104); -lean::cnstr_set(x_140, 2, x_138); -x_8 = x_140; +lean::cnstr_set(x_135, 0, x_122); +lean::cnstr_set_scalar(x_135, sizeof(void*)*1, x_134); +x_136 = x_135; +x_137 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_137); +x_139 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_139, 0, x_136); +lean::cnstr_set(x_139, 1, x_103); +lean::cnstr_set(x_139, 2, x_137); +x_8 = x_139; x_9 = x_12; goto lbl_10; } } else { -uint8 x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_149; +uint8 x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_148; lean::dec(x_0); -lean::dec(x_114); -lean::dec(x_112); -x_144 = 1; -if (lean::is_scalar(x_103)) { - x_145 = lean::alloc_cnstr(1, 1, 1); +lean::dec(x_111); +lean::dec(x_113); +x_143 = 1; +if (lean::is_scalar(x_102)) { + x_144 = lean::alloc_cnstr(1, 1, 1); } else { - x_145 = x_103; + x_144 = x_102; } -lean::cnstr_set(x_145, 0, x_101); -lean::cnstr_set_scalar(x_145, sizeof(void*)*1, x_144); -x_146 = x_145; -x_147 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_147); -x_149 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_149, 0, x_146); -lean::cnstr_set(x_149, 1, x_104); -lean::cnstr_set(x_149, 2, x_147); -x_8 = x_149; +lean::cnstr_set(x_144, 0, x_100); +lean::cnstr_set_scalar(x_144, sizeof(void*)*1, x_143); +x_145 = x_144; +x_146 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_146); +x_148 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_148, 0, x_145); +lean::cnstr_set(x_148, 1, x_103); +lean::cnstr_set(x_148, 2, x_146); +x_8 = x_148; x_9 = x_12; goto lbl_10; } } else { -obj* x_156; obj* x_158; +obj* x_155; obj* x_157; lean::dec(x_0); -lean::dec(x_103); -lean::dec(x_101); -lean::dec(x_114); -lean::dec(x_112); -lean::dec(x_117); -x_156 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_156); -x_158 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_158, 0, x_2); -lean::cnstr_set(x_158, 1, x_104); -lean::cnstr_set(x_158, 2, x_156); -x_8 = x_158; +lean::dec(x_100); +lean::dec(x_102); +lean::dec(x_116); +lean::dec(x_111); +lean::dec(x_113); +x_155 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_155); +x_157 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_157, 0, x_2); +lean::cnstr_set(x_157, 1, x_103); +lean::cnstr_set(x_157, 2, x_155); +x_8 = x_157; x_9 = x_12; goto lbl_10; } @@ -20242,113 +20101,112 @@ _start: { if (lean::obj_tag(x_1) == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_16; obj* x_17; obj* x_19; obj* x_20; +obj* x_10; obj* x_11; obj* x_12; obj* x_15; obj* x_16; obj* x_18; obj* x_19; lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); x_10 = lean::box(0); x_11 = l_list_mfoldr___main___at_lean_parser_monad__parsec_longest__match___spec__2___rarg___closed__1; x_12 = l_mjoin___rarg___closed__1; -lean::inc(x_10); lean::inc(x_12); lean::inc(x_11); -x_16 = l_lean_parser_monad__parsec_error___at_lean_parser_number_x_27___spec__12___rarg(x_11, x_12, x_10, x_10, x_0); -x_17 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_17); -x_19 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_5); -lean::cnstr_set(x_19, 2, x_17); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_6); -return x_20; +x_15 = l_lean_parser_monad__parsec_error___at_lean_parser_number_x_27___spec__12___rarg(x_11, x_12, x_10, x_10, x_0); +x_16 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_16); +x_18 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_18, 0, x_15); +lean::cnstr_set(x_18, 1, x_5); +lean::cnstr_set(x_18, 2, x_16); +x_19 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_19, 0, x_18); +lean::cnstr_set(x_19, 1, x_6); +return x_19; } else { -obj* x_21; obj* x_23; obj* x_30; obj* x_31; obj* x_33; obj* x_35; -x_21 = lean::cnstr_get(x_1, 0); -lean::inc(x_21); -x_23 = lean::cnstr_get(x_1, 1); -lean::inc(x_23); +obj* x_20; obj* x_22; obj* x_29; obj* x_30; obj* x_32; obj* x_34; +x_20 = lean::cnstr_get(x_1, 0); +lean::inc(x_20); +x_22 = lean::cnstr_get(x_1, 1); +lean::inc(x_22); lean::dec(x_1); lean::inc(x_4); lean::inc(x_3); lean::inc(x_2); lean::inc(x_0); -x_30 = l_list_mfoldr___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__5(x_0, x_23, x_2, x_3, x_4, x_5, x_6); -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_33 = lean::cnstr_get(x_30, 1); -lean::inc(x_33); -if (lean::is_shared(x_30)) { - lean::dec(x_30); - x_35 = lean::box(0); +x_29 = l_list_mfoldr___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__5(x_0, x_22, x_2, x_3, x_4, x_5, x_6); +x_30 = lean::cnstr_get(x_29, 0); +lean::inc(x_30); +x_32 = lean::cnstr_get(x_29, 1); +lean::inc(x_32); +if (lean::is_shared(x_29)) { + lean::dec(x_29); + x_34 = lean::box(0); } else { - lean::cnstr_release(x_30, 0); - lean::cnstr_release(x_30, 1); - x_35 = x_30; + lean::cnstr_release(x_29, 0); + lean::cnstr_release(x_29, 1); + x_34 = x_29; } -if (lean::obj_tag(x_31) == 0) +if (lean::obj_tag(x_30) == 0) { -obj* x_36; obj* x_38; obj* x_40; obj* x_43; obj* x_44; obj* x_46; obj* x_49; obj* x_50; -x_36 = lean::cnstr_get(x_31, 0); -lean::inc(x_36); -x_38 = lean::cnstr_get(x_31, 1); -lean::inc(x_38); -x_40 = lean::cnstr_get(x_31, 2); -lean::inc(x_40); -lean::dec(x_31); -x_43 = l_lean_parser_parsec__t_lookahead___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__4(x_0, x_21, x_36, x_2, x_3, x_4, x_38, x_33); -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -x_46 = lean::cnstr_get(x_43, 1); -lean::inc(x_46); -lean::dec(x_43); -x_49 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_40, x_44); -if (lean::is_scalar(x_35)) { - x_50 = lean::alloc_cnstr(0, 2, 0); +obj* x_35; obj* x_37; obj* x_39; obj* x_42; obj* x_43; obj* x_45; obj* x_48; obj* x_49; +x_35 = lean::cnstr_get(x_30, 0); +lean::inc(x_35); +x_37 = lean::cnstr_get(x_30, 1); +lean::inc(x_37); +x_39 = lean::cnstr_get(x_30, 2); +lean::inc(x_39); +lean::dec(x_30); +x_42 = l_lean_parser_parsec__t_lookahead___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__4(x_0, x_20, x_35, x_2, x_3, x_4, x_37, x_32); +x_43 = lean::cnstr_get(x_42, 0); +lean::inc(x_43); +x_45 = lean::cnstr_get(x_42, 1); +lean::inc(x_45); +lean::dec(x_42); +x_48 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_39, x_43); +if (lean::is_scalar(x_34)) { + x_49 = lean::alloc_cnstr(0, 2, 0); } else { - x_50 = x_35; + x_49 = x_34; } -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_46); -return x_50; +lean::cnstr_set(x_49, 0, x_48); +lean::cnstr_set(x_49, 1, x_45); +return x_49; } else { -obj* x_56; uint8 x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; +obj* x_55; uint8 x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; +lean::dec(x_20); lean::dec(x_4); lean::dec(x_3); lean::dec(x_0); lean::dec(x_2); -lean::dec(x_21); -x_56 = lean::cnstr_get(x_31, 0); -lean::inc(x_56); -x_58 = lean::cnstr_get_scalar(x_31, sizeof(void*)*1); -if (lean::is_shared(x_31)) { - lean::dec(x_31); - x_59 = lean::box(0); +x_55 = lean::cnstr_get(x_30, 0); +lean::inc(x_55); +x_57 = lean::cnstr_get_scalar(x_30, sizeof(void*)*1); +if (lean::is_shared(x_30)) { + lean::dec(x_30); + x_58 = lean::box(0); } else { - lean::cnstr_release(x_31, 0); - x_59 = x_31; + lean::cnstr_release(x_30, 0); + x_58 = x_30; } -if (lean::is_scalar(x_59)) { - x_60 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_58)) { + x_59 = lean::alloc_cnstr(1, 1, 1); } else { - x_60 = x_59; + x_59 = x_58; } -lean::cnstr_set(x_60, 0, x_56); -lean::cnstr_set_scalar(x_60, sizeof(void*)*1, x_58); -x_61 = x_60; -if (lean::is_scalar(x_35)) { - x_62 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_59, 0, x_55); +lean::cnstr_set_scalar(x_59, sizeof(void*)*1, x_57); +x_60 = x_59; +if (lean::is_scalar(x_34)) { + x_61 = lean::alloc_cnstr(0, 2, 0); } else { - x_62 = x_35; + x_61 = x_34; } -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_33); -return x_62; +lean::cnstr_set(x_61, 0, x_60); +lean::cnstr_set(x_61, 1, x_32); +return x_61; } } } @@ -20470,195 +20328,183 @@ if (lean::is_shared(x_10)) { } if (lean::obj_tag(x_15) == 0) { -obj* x_23; obj* x_24; obj* x_25; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; +obj* x_23; obj* x_24; obj* x_25; obj* x_28; obj* x_29; obj* x_31; obj* x_34; obj* x_35; lean::dec(x_21); x_23 = lean::box(0); x_24 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_25 = l_mjoin___rarg___closed__1; -lean::inc(x_23); lean::inc(x_25); lean::inc(x_24); -x_29 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_24, x_25, x_23, x_23, x_1, x_2, x_3, x_17, x_12); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_32 = lean::cnstr_get(x_29, 1); -lean::inc(x_32); -lean::dec(x_29); -x_35 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_30); +x_28 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_24, x_25, x_23, x_23, x_1, x_2, x_3, x_17, x_12); +x_29 = lean::cnstr_get(x_28, 0); +lean::inc(x_29); +x_31 = lean::cnstr_get(x_28, 1); +lean::inc(x_31); +lean::dec(x_28); +x_34 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_29); if (lean::is_scalar(x_14)) { - x_36 = lean::alloc_cnstr(0, 2, 0); + x_35 = lean::alloc_cnstr(0, 2, 0); } else { - x_36 = x_14; + x_35 = x_14; } -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_32); -return x_36; +lean::cnstr_set(x_35, 0, x_34); +lean::cnstr_set(x_35, 1, x_31); +return x_35; } else { -obj* x_40; obj* x_43; obj* x_45; obj* x_46; obj* x_47; +obj* x_39; obj* x_42; obj* x_44; obj* x_45; obj* x_46; lean::dec(x_1); lean::dec(x_3); lean::dec(x_2); -x_40 = lean::cnstr_get(x_15, 0); -lean::inc(x_40); +x_39 = lean::cnstr_get(x_15, 0); +lean::inc(x_39); lean::dec(x_15); -x_43 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_43); +x_42 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_42); if (lean::is_scalar(x_21)) { - x_45 = lean::alloc_cnstr(0, 3, 0); + x_44 = lean::alloc_cnstr(0, 3, 0); } else { - x_45 = x_21; + x_44 = x_21; } -lean::cnstr_set(x_45, 0, x_40); -lean::cnstr_set(x_45, 1, x_17); -lean::cnstr_set(x_45, 2, x_43); -x_46 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_45); +lean::cnstr_set(x_44, 0, x_39); +lean::cnstr_set(x_44, 1, x_17); +lean::cnstr_set(x_44, 2, x_42); +x_45 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_44); if (lean::is_scalar(x_14)) { - x_47 = lean::alloc_cnstr(0, 2, 0); + x_46 = lean::alloc_cnstr(0, 2, 0); } else { - x_47 = x_14; + x_46 = x_14; } -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_12); -return x_47; +lean::cnstr_set(x_46, 0, x_45); +lean::cnstr_set(x_46, 1, x_12); +return x_46; } } else { -obj* x_51; uint8 x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; +obj* x_50; uint8 x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; lean::dec(x_1); lean::dec(x_3); lean::dec(x_2); -x_51 = lean::cnstr_get(x_10, 0); -lean::inc(x_51); -x_53 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); +x_50 = lean::cnstr_get(x_10, 0); +lean::inc(x_50); +x_52 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); if (lean::is_shared(x_10)) { lean::dec(x_10); - x_54 = lean::box(0); + x_53 = lean::box(0); } else { lean::cnstr_release(x_10, 0); - x_54 = x_10; + x_53 = x_10; } -if (lean::is_scalar(x_54)) { - x_55 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_53)) { + x_54 = lean::alloc_cnstr(1, 1, 1); } else { - x_55 = x_54; + x_54 = x_53; } -lean::cnstr_set(x_55, 0, x_51); -lean::cnstr_set_scalar(x_55, sizeof(void*)*1, x_53); -x_56 = x_55; +lean::cnstr_set(x_54, 0, x_50); +lean::cnstr_set_scalar(x_54, sizeof(void*)*1, x_52); +x_55 = x_54; if (lean::is_scalar(x_14)) { - x_57 = lean::alloc_cnstr(0, 2, 0); + x_56 = lean::alloc_cnstr(0, 2, 0); } else { - x_57 = x_14; + x_56 = x_14; } -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_12); -return x_57; +lean::cnstr_set(x_56, 0, x_55); +lean::cnstr_set(x_56, 1, x_12); +return x_56; } } } obj* _init_l_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_41; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_50; obj* x_51; obj* x_53; obj* x_54; obj* x_57; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; 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; obj* x_75; obj* x_76; obj* x_77; x_0 = lean::mk_string("("); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); x_4 = lean::box(0); x_5 = l_lean_parser_term_binder__content_parser_lean_parser_has__tokens; -lean::inc(x_4); lean::inc(x_5); -x_8 = l_lean_parser_list_cons_tokens___rarg(x_5, x_4); -x_9 = l_lean_parser_command_notation__like_parser_lean_parser_has__tokens; -lean::inc(x_9); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_9, x_8); -x_12 = l_lean_parser_tokens___rarg(x_11); -lean::inc(x_4); -x_14 = l_lean_parser_list_cons_tokens___rarg(x_12, x_4); -x_15 = l_lean_parser_tokens___rarg(x_14); -x_16 = lean::mk_string(")"); +x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_4); +x_8 = l_lean_parser_command_notation__like_parser_lean_parser_has__tokens; +lean::inc(x_8); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_8, x_7); +x_11 = l_lean_parser_tokens___rarg(x_10); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_11, x_4); +x_13 = l_lean_parser_tokens___rarg(x_12); +x_14 = lean::mk_string(")"); lean::inc(x_1); -x_18 = l_lean_parser_symbol_tokens___rarg(x_16, x_1); -lean::inc(x_4); -x_20 = l_lean_parser_list_cons_tokens___rarg(x_18, x_4); -x_21 = l_lean_parser_list_cons_tokens___rarg(x_15, x_20); -x_22 = l_lean_parser_list_cons_tokens___rarg(x_3, x_21); -x_23 = l_lean_parser_tokens___rarg(x_22); -x_24 = lean::mk_string("{"); +x_16 = l_lean_parser_symbol_tokens___rarg(x_14, x_1); +x_17 = l_lean_parser_list_cons_tokens___rarg(x_16, x_4); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_13, x_17); +x_19 = l_lean_parser_list_cons_tokens___rarg(x_3, x_18); +x_20 = l_lean_parser_tokens___rarg(x_19); +x_21 = lean::mk_string("{"); +lean::inc(x_1); +x_23 = l_lean_parser_symbol_tokens___rarg(x_21, x_1); +x_24 = lean::mk_string("}"); lean::inc(x_1); x_26 = l_lean_parser_symbol_tokens___rarg(x_24, x_1); -x_27 = lean::mk_string("}"); -lean::inc(x_1); -x_29 = l_lean_parser_symbol_tokens___rarg(x_27, x_1); -lean::inc(x_4); -x_31 = l_lean_parser_list_cons_tokens___rarg(x_29, x_4); +x_27 = l_lean_parser_list_cons_tokens___rarg(x_26, x_4); lean::inc(x_5); -x_33 = l_lean_parser_list_cons_tokens___rarg(x_5, x_31); -x_34 = l_lean_parser_list_cons_tokens___rarg(x_26, x_33); -x_35 = l_lean_parser_tokens___rarg(x_34); -x_36 = lean::mk_string("\xe2\xa6\x83"); +x_29 = l_lean_parser_list_cons_tokens___rarg(x_5, x_27); +x_30 = l_lean_parser_list_cons_tokens___rarg(x_23, x_29); +x_31 = l_lean_parser_tokens___rarg(x_30); +x_32 = lean::mk_string("\xe2\xa6\x83"); lean::inc(x_1); -x_38 = l_lean_parser_symbol_tokens___rarg(x_36, x_1); -x_39 = lean::mk_string("\xe2\xa6\x84"); +x_34 = l_lean_parser_symbol_tokens___rarg(x_32, x_1); +x_35 = lean::mk_string("\xe2\xa6\x84"); lean::inc(x_1); -x_41 = l_lean_parser_symbol_tokens___rarg(x_39, x_1); -lean::inc(x_4); -x_43 = l_lean_parser_list_cons_tokens___rarg(x_41, x_4); +x_37 = l_lean_parser_symbol_tokens___rarg(x_35, x_1); +x_38 = l_lean_parser_list_cons_tokens___rarg(x_37, x_4); lean::inc(x_5); -x_45 = l_lean_parser_list_cons_tokens___rarg(x_5, x_43); -x_46 = l_lean_parser_list_cons_tokens___rarg(x_38, x_45); -x_47 = l_lean_parser_tokens___rarg(x_46); -x_48 = lean::mk_string("["); +x_40 = l_lean_parser_list_cons_tokens___rarg(x_5, x_38); +x_41 = l_lean_parser_list_cons_tokens___rarg(x_34, x_40); +x_42 = l_lean_parser_tokens___rarg(x_41); +x_43 = lean::mk_string("["); lean::inc(x_1); -x_50 = l_lean_parser_symbol_tokens___rarg(x_48, x_1); -x_51 = lean::mk_string(" : "); +x_45 = l_lean_parser_symbol_tokens___rarg(x_43, x_1); +x_46 = lean::mk_string(" : "); lean::inc(x_1); -x_53 = l_lean_parser_symbol_tokens___rarg(x_51, x_1); -x_54 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_4); -lean::inc(x_54); -x_57 = l_lean_parser_list_cons_tokens___rarg(x_54, x_4); -lean::inc(x_57); -x_59 = l_lean_parser_list_cons_tokens___rarg(x_53, x_57); -lean::inc(x_4); -x_61 = l_lean_parser_list_cons_tokens___rarg(x_4, x_59); -x_62 = l_lean_parser_tokens___rarg(x_61); -x_63 = l_lean_parser_tokens___rarg(x_57); -lean::inc(x_4); -x_65 = l_lean_parser_list_cons_tokens___rarg(x_63, x_4); -x_66 = l_lean_parser_list_cons_tokens___rarg(x_62, x_65); +x_48 = l_lean_parser_symbol_tokens___rarg(x_46, x_1); +x_49 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_49); +x_51 = l_lean_parser_list_cons_tokens___rarg(x_49, x_4); +lean::inc(x_51); +x_53 = l_lean_parser_list_cons_tokens___rarg(x_48, x_51); +x_54 = l_lean_parser_list_cons_tokens___rarg(x_4, x_53); +x_55 = l_lean_parser_tokens___rarg(x_54); +x_56 = l_lean_parser_tokens___rarg(x_51); +x_57 = l_lean_parser_list_cons_tokens___rarg(x_56, x_4); +x_58 = l_lean_parser_list_cons_tokens___rarg(x_55, x_57); +x_59 = l_lean_parser_tokens___rarg(x_58); +x_60 = l_lean_parser_list_cons_tokens___rarg(x_59, x_4); +x_61 = l_lean_parser_tokens___rarg(x_60); +x_62 = lean::mk_string("]"); +x_63 = l_lean_parser_symbol_tokens___rarg(x_62, x_1); +x_64 = l_lean_parser_list_cons_tokens___rarg(x_63, x_4); +x_65 = l_lean_parser_list_cons_tokens___rarg(x_61, x_64); +x_66 = l_lean_parser_list_cons_tokens___rarg(x_45, x_65); x_67 = l_lean_parser_tokens___rarg(x_66); -lean::inc(x_4); -x_69 = l_lean_parser_list_cons_tokens___rarg(x_67, x_4); -x_70 = l_lean_parser_tokens___rarg(x_69); -x_71 = lean::mk_string("]"); -x_72 = l_lean_parser_symbol_tokens___rarg(x_71, x_1); -lean::inc(x_4); -x_74 = l_lean_parser_list_cons_tokens___rarg(x_72, x_4); -x_75 = l_lean_parser_list_cons_tokens___rarg(x_70, x_74); -x_76 = l_lean_parser_list_cons_tokens___rarg(x_50, x_75); +x_68 = l_lean_parser_term_anonymous__constructor_parser_lean_parser_has__tokens; +lean::inc(x_68); +x_70 = l_lean_parser_list_cons_tokens___rarg(x_68, x_4); +x_71 = l_lean_parser_list_cons_tokens___rarg(x_67, x_70); +x_72 = l_lean_parser_list_cons_tokens___rarg(x_42, x_71); +x_73 = l_lean_parser_list_cons_tokens___rarg(x_31, x_72); +x_74 = l_lean_parser_list_cons_tokens___rarg(x_20, x_73); +x_75 = l_lean_parser_tokens___rarg(x_74); +x_76 = l_lean_parser_list_cons_tokens___rarg(x_75, x_4); x_77 = l_lean_parser_tokens___rarg(x_76); -x_78 = l_lean_parser_term_anonymous__constructor_parser_lean_parser_has__tokens; -lean::inc(x_4); -lean::inc(x_78); -x_81 = l_lean_parser_list_cons_tokens___rarg(x_78, x_4); -x_82 = l_lean_parser_list_cons_tokens___rarg(x_77, x_81); -x_83 = l_lean_parser_list_cons_tokens___rarg(x_47, x_82); -x_84 = l_lean_parser_list_cons_tokens___rarg(x_35, x_83); -x_85 = l_lean_parser_list_cons_tokens___rarg(x_23, x_84); -x_86 = l_lean_parser_tokens___rarg(x_85); -x_87 = l_lean_parser_list_cons_tokens___rarg(x_86, x_4); -x_88 = l_lean_parser_tokens___rarg(x_87); -return x_88; +return x_77; } } obj* _init_l_lean_parser_term_bracketed__binder_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_59; obj* x_60; obj* x_61; obj* x_63; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_72; obj* x_73; obj* x_74; obj* x_76; obj* x_78; obj* x_79; obj* x_80; obj* x_82; obj* x_84; obj* x_86; obj* x_88; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_95; obj* x_96; obj* x_98; obj* x_100; obj* x_101; obj* x_102; obj* x_104; obj* x_105; obj* x_107; obj* x_108; obj* x_109; obj* x_111; obj* x_113; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_120; obj* x_121; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_142; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* 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; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_73; obj* x_74; obj* x_75; obj* x_77; obj* x_79; obj* x_81; obj* x_82; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_89; obj* x_90; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_101; obj* x_103; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_132; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -20672,255 +20518,245 @@ lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); x_7 = lean::box(0); x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binder__content_parser), 5, 0); -lean::inc(x_7); lean::inc(x_8); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_7); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__like_parser), 5, 0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_11); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_8); +lean::cnstr_set(x_10, 1, x_7); +x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__like_parser), 5, 0); +x_12 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_12, 0, x_11); +lean::cnstr_set(x_12, 1, x_10); lean::inc(x_4); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_15, 0, x_13); -lean::closure_set(x_15, 1, x_4); -lean::inc(x_7); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_7); -x_18 = l_lean_parser_term_explicit__binder__content; -lean::inc(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_20, 0, x_18); -lean::closure_set(x_20, 1, x_17); -x_21 = lean::mk_string(")"); -x_22 = l_string_trim(x_21); -lean::inc(x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_24, 0, x_22); +x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_14, 0, x_12); +lean::closure_set(x_14, 1, x_4); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_14); +lean::cnstr_set(x_15, 1, x_7); +x_16 = l_lean_parser_term_explicit__binder__content; +lean::inc(x_16); +x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_18, 0, x_16); +lean::closure_set(x_18, 1, x_15); +x_19 = lean::mk_string(")"); +x_20 = l_string_trim(x_19); +lean::inc(x_20); +x_22 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_22, 0, x_20); lean::inc(x_4); -x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_26, 0, x_22); -lean::closure_set(x_26, 1, x_4); -lean::closure_set(x_26, 2, x_24); -lean::inc(x_7); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_7); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_20); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_6); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_lean_parser_term_explicit__binder; -lean::inc(x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_33, 0, x_31); -lean::closure_set(x_33, 1, x_30); -x_34 = lean::mk_string("{"); -x_35 = l_string_trim(x_34); -lean::inc(x_35); -x_37 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_37, 0, x_35); +x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_24, 0, x_20); +lean::closure_set(x_24, 1, x_4); +lean::closure_set(x_24, 2, x_22); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_7); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_18); +lean::cnstr_set(x_26, 1, x_25); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_6); +lean::cnstr_set(x_27, 1, x_26); +x_28 = l_lean_parser_term_explicit__binder; +lean::inc(x_28); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_30, 0, x_28); +lean::closure_set(x_30, 1, x_27); +x_31 = lean::mk_string("{"); +x_32 = l_string_trim(x_31); +lean::inc(x_32); +x_34 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_34, 0, x_32); lean::inc(x_4); -x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_39, 0, x_35); -lean::closure_set(x_39, 1, x_4); -lean::closure_set(x_39, 2, x_37); -x_40 = lean::mk_string("}"); -x_41 = l_string_trim(x_40); -lean::inc(x_41); -x_43 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_43, 0, x_41); +x_36 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_36, 0, x_32); +lean::closure_set(x_36, 1, x_4); +lean::closure_set(x_36, 2, x_34); +x_37 = lean::mk_string("}"); +x_38 = l_string_trim(x_37); +lean::inc(x_38); +x_40 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_40, 0, x_38); lean::inc(x_4); -x_45 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_45, 0, x_41); -lean::closure_set(x_45, 1, x_4); -lean::closure_set(x_45, 2, x_43); -lean::inc(x_7); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set(x_47, 1, x_7); +x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_42, 0, x_38); +lean::closure_set(x_42, 1, x_4); +lean::closure_set(x_42, 2, x_40); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_7); lean::inc(x_8); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_8); -lean::cnstr_set(x_49, 1, x_47); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_39); -lean::cnstr_set(x_50, 1, x_49); -x_51 = l_lean_parser_term_implicit__binder; +x_45 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_45, 0, x_8); +lean::cnstr_set(x_45, 1, x_43); +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_36); +lean::cnstr_set(x_46, 1, x_45); +x_47 = l_lean_parser_term_implicit__binder; +lean::inc(x_47); +x_49 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_49, 0, x_47); +lean::closure_set(x_49, 1, x_46); +x_50 = lean::mk_string("\xe2\xa6\x83"); +x_51 = l_string_trim(x_50); lean::inc(x_51); -x_53 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +x_53 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_53, 0, x_51); -lean::closure_set(x_53, 1, x_50); -x_54 = lean::mk_string("\xe2\xa6\x83"); -x_55 = l_string_trim(x_54); -lean::inc(x_55); -x_57 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_57, 0, x_55); lean::inc(x_4); -x_59 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_59, 0, x_55); -lean::closure_set(x_59, 1, x_4); -lean::closure_set(x_59, 2, x_57); -x_60 = lean::mk_string("\xe2\xa6\x84"); -x_61 = l_string_trim(x_60); -lean::inc(x_61); -x_63 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_63, 0, x_61); +x_55 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_55, 0, x_51); +lean::closure_set(x_55, 1, x_4); +lean::closure_set(x_55, 2, x_53); +x_56 = lean::mk_string("\xe2\xa6\x84"); +x_57 = l_string_trim(x_56); +lean::inc(x_57); +x_59 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_59, 0, x_57); lean::inc(x_4); -x_65 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_65, 0, x_61); -lean::closure_set(x_65, 1, x_4); -lean::closure_set(x_65, 2, x_63); -lean::inc(x_7); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_65); -lean::cnstr_set(x_67, 1, x_7); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_8); -lean::cnstr_set(x_68, 1, x_67); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_59); -lean::cnstr_set(x_69, 1, x_68); -x_70 = l_lean_parser_term_strict__implicit__binder; -lean::inc(x_70); -x_72 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_72, 0, x_70); -lean::closure_set(x_72, 1, x_69); -x_73 = lean::mk_string("["); -x_74 = l_string_trim(x_73); -lean::inc(x_74); -x_76 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_76, 0, x_74); +x_61 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_61, 0, x_57); +lean::closure_set(x_61, 1, x_4); +lean::closure_set(x_61, 2, x_59); +x_62 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_62, 0, x_61); +lean::cnstr_set(x_62, 1, x_7); +x_63 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_63, 0, x_8); +lean::cnstr_set(x_63, 1, x_62); +x_64 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_64, 0, x_55); +lean::cnstr_set(x_64, 1, x_63); +x_65 = l_lean_parser_term_strict__implicit__binder; +lean::inc(x_65); +x_67 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_67, 0, x_65); +lean::closure_set(x_67, 1, x_64); +x_68 = lean::mk_string("["); +x_69 = l_string_trim(x_68); +lean::inc(x_69); +x_71 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_71, 0, x_69); lean::inc(x_4); -x_78 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_78, 0, x_74); -lean::closure_set(x_78, 1, x_4); -lean::closure_set(x_78, 2, x_76); -x_79 = lean::mk_string(" : "); -x_80 = l_string_trim(x_79); -lean::inc(x_80); -x_82 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_82, 0, x_80); +x_73 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_73, 0, x_69); +lean::closure_set(x_73, 1, x_4); +lean::closure_set(x_73, 2, x_71); +x_74 = lean::mk_string(" : "); +x_75 = l_string_trim(x_74); +lean::inc(x_75); +x_77 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_77, 0, x_75); lean::inc(x_4); -x_84 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_84, 0, x_80); -lean::closure_set(x_84, 1, x_4); -lean::closure_set(x_84, 2, x_82); +x_79 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_79, 0, x_75); +lean::closure_set(x_79, 1, x_4); +lean::closure_set(x_79, 2, x_77); lean::inc(x_4); -x_86 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_86, 0, x_4); -lean::inc(x_7); -x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_86); -lean::cnstr_set(x_88, 1, x_7); -lean::inc(x_88); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_84); -lean::cnstr_set(x_90, 1, x_88); -x_91 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); -x_92 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set(x_92, 1, x_90); -x_93 = l_lean_parser_term_inst__implicit__named__binder; -lean::inc(x_93); -x_95 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_95, 0, x_93); -lean::closure_set(x_95, 1, x_92); -x_96 = l_lean_parser_term_inst__implicit__anonymous__binder; -lean::inc(x_96); -x_98 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_98, 0, x_96); -lean::closure_set(x_98, 1, x_88); -lean::inc(x_7); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_98); -lean::cnstr_set(x_100, 1, x_7); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_95); -lean::cnstr_set(x_101, 1, x_100); -x_102 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_longest__choice___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__1), 6, 1); -lean::closure_set(x_102, 0, x_101); -lean::inc(x_7); -x_104 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_104, 0, x_102); -lean::cnstr_set(x_104, 1, x_7); -x_105 = l_lean_parser_term_inst__implicit__binder__content; -lean::inc(x_105); -x_107 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_107, 0, x_105); -lean::closure_set(x_107, 1, x_104); -x_108 = lean::mk_string("]"); -x_109 = l_string_trim(x_108); +x_81 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_81, 0, x_4); +x_82 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_82, 0, x_81); +lean::cnstr_set(x_82, 1, x_7); +lean::inc(x_82); +x_84 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_84, 0, x_79); +lean::cnstr_set(x_84, 1, x_82); +x_85 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); +x_86 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_86, 0, x_85); +lean::cnstr_set(x_86, 1, x_84); +x_87 = l_lean_parser_term_inst__implicit__named__binder; +lean::inc(x_87); +x_89 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_89, 0, x_87); +lean::closure_set(x_89, 1, x_86); +x_90 = l_lean_parser_term_inst__implicit__anonymous__binder; +lean::inc(x_90); +x_92 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_92, 0, x_90); +lean::closure_set(x_92, 1, x_82); +x_93 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_93, 0, x_92); +lean::cnstr_set(x_93, 1, x_7); +x_94 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_94, 0, x_89); +lean::cnstr_set(x_94, 1, x_93); +x_95 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_longest__choice___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__1), 6, 1); +lean::closure_set(x_95, 0, x_94); +x_96 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_96, 0, x_95); +lean::cnstr_set(x_96, 1, x_7); +x_97 = l_lean_parser_term_inst__implicit__binder__content; +lean::inc(x_97); +x_99 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_99, 0, x_97); +lean::closure_set(x_99, 1, x_96); +x_100 = lean::mk_string("]"); +x_101 = l_string_trim(x_100); +lean::inc(x_101); +x_103 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_103, 0, x_101); +lean::inc(x_4); +x_105 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_105, 0, x_101); +lean::closure_set(x_105, 1, x_4); +lean::closure_set(x_105, 2, x_103); +x_106 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_106, 0, x_105); +lean::cnstr_set(x_106, 1, x_7); +x_107 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_107, 0, x_99); +lean::cnstr_set(x_107, 1, x_106); +x_108 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_108, 0, x_73); +lean::cnstr_set(x_108, 1, x_107); +x_109 = l_lean_parser_term_inst__implicit__binder; lean::inc(x_109); -x_111 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +x_111 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); lean::closure_set(x_111, 0, x_109); -lean::inc(x_4); -x_113 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_113, 0, x_109); -lean::closure_set(x_113, 1, x_4); -lean::closure_set(x_113, 2, x_111); -lean::inc(x_7); +lean::closure_set(x_111, 1, x_108); +x_112 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_anonymous__constructor_parser), 5, 0); +x_113 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_113, 0, x_112); +lean::cnstr_set(x_113, 1, x_7); +x_114 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_114, 0, x_111); +lean::cnstr_set(x_114, 1, x_113); x_115 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_115, 0, x_113); -lean::cnstr_set(x_115, 1, x_7); +lean::cnstr_set(x_115, 0, x_67); +lean::cnstr_set(x_115, 1, x_114); x_116 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_116, 0, x_107); +lean::cnstr_set(x_116, 0, x_49); lean::cnstr_set(x_116, 1, x_115); x_117 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_117, 0, x_78); +lean::cnstr_set(x_117, 0, x_30); lean::cnstr_set(x_117, 1, x_116); -x_118 = l_lean_parser_term_inst__implicit__binder; -lean::inc(x_118); -x_120 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_120, 0, x_118); -lean::closure_set(x_120, 1, x_117); -x_121 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_anonymous__constructor_parser), 5, 0); -lean::inc(x_7); -x_123 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_123, 0, x_121); -lean::cnstr_set(x_123, 1, x_7); -x_124 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_124, 0, x_120); -lean::cnstr_set(x_124, 1, x_123); -x_125 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_125, 0, x_72); -lean::cnstr_set(x_125, 1, x_124); -x_126 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_126, 0, x_53); -lean::cnstr_set(x_126, 1, x_125); -x_127 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_127, 0, x_33); -lean::cnstr_set(x_127, 1, x_126); -x_128 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_128, 0, x_127); -lean::closure_set(x_128, 1, x_4); -x_129 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_129, 0, x_128); -lean::cnstr_set(x_129, 1, x_7); -x_130 = l_lean_parser_term__parser__m_monad; -x_131 = l_lean_parser_term__parser__m_monad__except; -x_132 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_133 = l_lean_parser_term__parser__m_alternative; -x_134 = l_lean_parser_term_bracketed__binder; -x_135 = l_lean_parser_term_bracketed__binder_has__view; -lean::inc(x_135); -lean::inc(x_134); -lean::inc(x_133); -lean::inc(x_132); -lean::inc(x_131); -lean::inc(x_130); -x_142 = l_lean_parser_combinators_node_view___rarg(x_130, x_131, x_132, x_133, x_134, x_129, x_135); -return x_142; +x_118 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_118, 0, x_117); +lean::closure_set(x_118, 1, x_4); +x_119 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_119, 0, x_118); +lean::cnstr_set(x_119, 1, x_7); +x_120 = l_lean_parser_term__parser__m_monad; +x_121 = l_lean_parser_term__parser__m_monad__except; +x_122 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_123 = l_lean_parser_term__parser__m_alternative; +x_124 = l_lean_parser_term_bracketed__binder; +x_125 = l_lean_parser_term_bracketed__binder_has__view; +lean::inc(x_125); +lean::inc(x_124); +lean::inc(x_123); +lean::inc(x_122); +lean::inc(x_121); +lean::inc(x_120); +x_132 = l_lean_parser_combinators_node_view___rarg(x_120, x_121, x_122, x_123, x_124, x_119, x_125); +return x_132; } } obj* _init_l_lean_parser_term_bracketed__binder_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_59; obj* x_60; obj* x_61; obj* x_63; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_72; obj* x_73; obj* x_74; obj* x_76; obj* x_78; obj* x_79; obj* x_80; obj* x_82; obj* x_84; obj* x_86; obj* x_88; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_95; obj* x_96; obj* x_98; obj* x_100; obj* x_101; obj* x_102; obj* x_104; obj* x_105; obj* x_107; obj* x_108; obj* x_109; obj* x_111; obj* x_113; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_120; obj* x_121; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* 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; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_73; obj* x_74; obj* x_75; obj* x_77; obj* x_79; obj* x_81; obj* x_82; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_89; obj* x_90; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_101; obj* x_103; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -20934,236 +20770,226 @@ lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); x_7 = lean::box(0); x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binder__content_parser), 5, 0); -lean::inc(x_7); lean::inc(x_8); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_7); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__like_parser), 5, 0); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_12); -lean::cnstr_set(x_13, 1, x_11); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_8); +lean::cnstr_set(x_10, 1, x_7); +x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__like_parser), 5, 0); +x_12 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_12, 0, x_11); +lean::cnstr_set(x_12, 1, x_10); lean::inc(x_4); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_15, 0, x_13); -lean::closure_set(x_15, 1, x_4); -lean::inc(x_7); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_7); -x_18 = l_lean_parser_term_explicit__binder__content; -lean::inc(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_20, 0, x_18); -lean::closure_set(x_20, 1, x_17); -x_21 = lean::mk_string(")"); -x_22 = l_string_trim(x_21); -lean::inc(x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_24, 0, x_22); +x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_14, 0, x_12); +lean::closure_set(x_14, 1, x_4); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_14); +lean::cnstr_set(x_15, 1, x_7); +x_16 = l_lean_parser_term_explicit__binder__content; +lean::inc(x_16); +x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_18, 0, x_16); +lean::closure_set(x_18, 1, x_15); +x_19 = lean::mk_string(")"); +x_20 = l_string_trim(x_19); +lean::inc(x_20); +x_22 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_22, 0, x_20); lean::inc(x_4); -x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_26, 0, x_22); -lean::closure_set(x_26, 1, x_4); -lean::closure_set(x_26, 2, x_24); -lean::inc(x_7); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_7); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_20); -lean::cnstr_set(x_29, 1, x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_6); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_lean_parser_term_explicit__binder; -lean::inc(x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_33, 0, x_31); -lean::closure_set(x_33, 1, x_30); -x_34 = lean::mk_string("{"); -x_35 = l_string_trim(x_34); -lean::inc(x_35); -x_37 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_37, 0, x_35); +x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_24, 0, x_20); +lean::closure_set(x_24, 1, x_4); +lean::closure_set(x_24, 2, x_22); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_7); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_18); +lean::cnstr_set(x_26, 1, x_25); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_6); +lean::cnstr_set(x_27, 1, x_26); +x_28 = l_lean_parser_term_explicit__binder; +lean::inc(x_28); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_30, 0, x_28); +lean::closure_set(x_30, 1, x_27); +x_31 = lean::mk_string("{"); +x_32 = l_string_trim(x_31); +lean::inc(x_32); +x_34 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_34, 0, x_32); lean::inc(x_4); -x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_39, 0, x_35); -lean::closure_set(x_39, 1, x_4); -lean::closure_set(x_39, 2, x_37); -x_40 = lean::mk_string("}"); -x_41 = l_string_trim(x_40); -lean::inc(x_41); -x_43 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_43, 0, x_41); +x_36 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_36, 0, x_32); +lean::closure_set(x_36, 1, x_4); +lean::closure_set(x_36, 2, x_34); +x_37 = lean::mk_string("}"); +x_38 = l_string_trim(x_37); +lean::inc(x_38); +x_40 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_40, 0, x_38); lean::inc(x_4); -x_45 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_45, 0, x_41); -lean::closure_set(x_45, 1, x_4); -lean::closure_set(x_45, 2, x_43); -lean::inc(x_7); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set(x_47, 1, x_7); +x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_42, 0, x_38); +lean::closure_set(x_42, 1, x_4); +lean::closure_set(x_42, 2, x_40); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_7); lean::inc(x_8); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_8); -lean::cnstr_set(x_49, 1, x_47); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_39); -lean::cnstr_set(x_50, 1, x_49); -x_51 = l_lean_parser_term_implicit__binder; +x_45 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_45, 0, x_8); +lean::cnstr_set(x_45, 1, x_43); +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_36); +lean::cnstr_set(x_46, 1, x_45); +x_47 = l_lean_parser_term_implicit__binder; +lean::inc(x_47); +x_49 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_49, 0, x_47); +lean::closure_set(x_49, 1, x_46); +x_50 = lean::mk_string("\xe2\xa6\x83"); +x_51 = l_string_trim(x_50); lean::inc(x_51); -x_53 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +x_53 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_53, 0, x_51); -lean::closure_set(x_53, 1, x_50); -x_54 = lean::mk_string("\xe2\xa6\x83"); -x_55 = l_string_trim(x_54); -lean::inc(x_55); -x_57 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_57, 0, x_55); lean::inc(x_4); -x_59 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_59, 0, x_55); -lean::closure_set(x_59, 1, x_4); -lean::closure_set(x_59, 2, x_57); -x_60 = lean::mk_string("\xe2\xa6\x84"); -x_61 = l_string_trim(x_60); -lean::inc(x_61); -x_63 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_63, 0, x_61); +x_55 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_55, 0, x_51); +lean::closure_set(x_55, 1, x_4); +lean::closure_set(x_55, 2, x_53); +x_56 = lean::mk_string("\xe2\xa6\x84"); +x_57 = l_string_trim(x_56); +lean::inc(x_57); +x_59 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_59, 0, x_57); lean::inc(x_4); -x_65 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_65, 0, x_61); -lean::closure_set(x_65, 1, x_4); -lean::closure_set(x_65, 2, x_63); -lean::inc(x_7); -x_67 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_67, 0, x_65); -lean::cnstr_set(x_67, 1, x_7); -x_68 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_68, 0, x_8); -lean::cnstr_set(x_68, 1, x_67); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_59); -lean::cnstr_set(x_69, 1, x_68); -x_70 = l_lean_parser_term_strict__implicit__binder; -lean::inc(x_70); -x_72 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_72, 0, x_70); -lean::closure_set(x_72, 1, x_69); -x_73 = lean::mk_string("["); -x_74 = l_string_trim(x_73); -lean::inc(x_74); -x_76 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_76, 0, x_74); +x_61 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_61, 0, x_57); +lean::closure_set(x_61, 1, x_4); +lean::closure_set(x_61, 2, x_59); +x_62 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_62, 0, x_61); +lean::cnstr_set(x_62, 1, x_7); +x_63 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_63, 0, x_8); +lean::cnstr_set(x_63, 1, x_62); +x_64 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_64, 0, x_55); +lean::cnstr_set(x_64, 1, x_63); +x_65 = l_lean_parser_term_strict__implicit__binder; +lean::inc(x_65); +x_67 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_67, 0, x_65); +lean::closure_set(x_67, 1, x_64); +x_68 = lean::mk_string("["); +x_69 = l_string_trim(x_68); +lean::inc(x_69); +x_71 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_71, 0, x_69); lean::inc(x_4); -x_78 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_78, 0, x_74); -lean::closure_set(x_78, 1, x_4); -lean::closure_set(x_78, 2, x_76); -x_79 = lean::mk_string(" : "); -x_80 = l_string_trim(x_79); -lean::inc(x_80); -x_82 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_82, 0, x_80); +x_73 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_73, 0, x_69); +lean::closure_set(x_73, 1, x_4); +lean::closure_set(x_73, 2, x_71); +x_74 = lean::mk_string(" : "); +x_75 = l_string_trim(x_74); +lean::inc(x_75); +x_77 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_77, 0, x_75); lean::inc(x_4); -x_84 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_84, 0, x_80); -lean::closure_set(x_84, 1, x_4); -lean::closure_set(x_84, 2, x_82); +x_79 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_79, 0, x_75); +lean::closure_set(x_79, 1, x_4); +lean::closure_set(x_79, 2, x_77); lean::inc(x_4); -x_86 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_86, 0, x_4); -lean::inc(x_7); -x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_86); -lean::cnstr_set(x_88, 1, x_7); -lean::inc(x_88); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_84); -lean::cnstr_set(x_90, 1, x_88); -x_91 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); -x_92 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_92, 0, x_91); -lean::cnstr_set(x_92, 1, x_90); -x_93 = l_lean_parser_term_inst__implicit__named__binder; -lean::inc(x_93); -x_95 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_95, 0, x_93); -lean::closure_set(x_95, 1, x_92); -x_96 = l_lean_parser_term_inst__implicit__anonymous__binder; -lean::inc(x_96); -x_98 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_98, 0, x_96); -lean::closure_set(x_98, 1, x_88); -lean::inc(x_7); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_98); -lean::cnstr_set(x_100, 1, x_7); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_95); -lean::cnstr_set(x_101, 1, x_100); -x_102 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_longest__choice___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__1), 6, 1); -lean::closure_set(x_102, 0, x_101); -lean::inc(x_7); -x_104 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_104, 0, x_102); -lean::cnstr_set(x_104, 1, x_7); -x_105 = l_lean_parser_term_inst__implicit__binder__content; -lean::inc(x_105); -x_107 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_107, 0, x_105); -lean::closure_set(x_107, 1, x_104); -x_108 = lean::mk_string("]"); -x_109 = l_string_trim(x_108); +x_81 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_81, 0, x_4); +x_82 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_82, 0, x_81); +lean::cnstr_set(x_82, 1, x_7); +lean::inc(x_82); +x_84 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_84, 0, x_79); +lean::cnstr_set(x_84, 1, x_82); +x_85 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); +x_86 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_86, 0, x_85); +lean::cnstr_set(x_86, 1, x_84); +x_87 = l_lean_parser_term_inst__implicit__named__binder; +lean::inc(x_87); +x_89 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_89, 0, x_87); +lean::closure_set(x_89, 1, x_86); +x_90 = l_lean_parser_term_inst__implicit__anonymous__binder; +lean::inc(x_90); +x_92 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_92, 0, x_90); +lean::closure_set(x_92, 1, x_82); +x_93 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_93, 0, x_92); +lean::cnstr_set(x_93, 1, x_7); +x_94 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_94, 0, x_89); +lean::cnstr_set(x_94, 1, x_93); +x_95 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_longest__choice___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__1), 6, 1); +lean::closure_set(x_95, 0, x_94); +x_96 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_96, 0, x_95); +lean::cnstr_set(x_96, 1, x_7); +x_97 = l_lean_parser_term_inst__implicit__binder__content; +lean::inc(x_97); +x_99 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_99, 0, x_97); +lean::closure_set(x_99, 1, x_96); +x_100 = lean::mk_string("]"); +x_101 = l_string_trim(x_100); +lean::inc(x_101); +x_103 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_103, 0, x_101); +lean::inc(x_4); +x_105 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_105, 0, x_101); +lean::closure_set(x_105, 1, x_4); +lean::closure_set(x_105, 2, x_103); +x_106 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_106, 0, x_105); +lean::cnstr_set(x_106, 1, x_7); +x_107 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_107, 0, x_99); +lean::cnstr_set(x_107, 1, x_106); +x_108 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_108, 0, x_73); +lean::cnstr_set(x_108, 1, x_107); +x_109 = l_lean_parser_term_inst__implicit__binder; lean::inc(x_109); -x_111 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +x_111 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); lean::closure_set(x_111, 0, x_109); -lean::inc(x_4); -x_113 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_113, 0, x_109); -lean::closure_set(x_113, 1, x_4); -lean::closure_set(x_113, 2, x_111); -lean::inc(x_7); +lean::closure_set(x_111, 1, x_108); +x_112 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_anonymous__constructor_parser), 5, 0); +x_113 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_113, 0, x_112); +lean::cnstr_set(x_113, 1, x_7); +x_114 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_114, 0, x_111); +lean::cnstr_set(x_114, 1, x_113); x_115 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_115, 0, x_113); -lean::cnstr_set(x_115, 1, x_7); +lean::cnstr_set(x_115, 0, x_67); +lean::cnstr_set(x_115, 1, x_114); x_116 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_116, 0, x_107); +lean::cnstr_set(x_116, 0, x_49); lean::cnstr_set(x_116, 1, x_115); x_117 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_117, 0, x_78); +lean::cnstr_set(x_117, 0, x_30); lean::cnstr_set(x_117, 1, x_116); -x_118 = l_lean_parser_term_inst__implicit__binder; -lean::inc(x_118); -x_120 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_120, 0, x_118); -lean::closure_set(x_120, 1, x_117); -x_121 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_anonymous__constructor_parser), 5, 0); -lean::inc(x_7); -x_123 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_123, 0, x_121); -lean::cnstr_set(x_123, 1, x_7); -x_124 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_124, 0, x_120); -lean::cnstr_set(x_124, 1, x_123); -x_125 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_125, 0, x_72); -lean::cnstr_set(x_125, 1, x_124); -x_126 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_126, 0, x_53); -lean::cnstr_set(x_126, 1, x_125); -x_127 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_127, 0, x_33); -lean::cnstr_set(x_127, 1, x_126); -x_128 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_128, 0, x_127); -lean::closure_set(x_128, 1, x_4); -x_129 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_129, 0, x_128); -lean::cnstr_set(x_129, 1, x_7); -return x_129; +x_118 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_118, 0, x_117); +lean::closure_set(x_118, 1, x_4); +x_119 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_119, 0, x_118); +lean::cnstr_set(x_119, 1, x_7); +return x_119; } } obj* l_lean_parser_term_bracketed__binder_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -21352,50 +21178,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -21405,44 +21230,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_term_binder__content_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_term_binder__content_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_term_bracketed__binder_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_term_bracketed__binder_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -21454,7 +21279,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -21462,45 +21287,43 @@ x_5 = l_lean_parser_term_bracketed__binder_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_term_binder; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_term_binder; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_term_binder__content_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_term_binder; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_term_binder__content_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_term_binder; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -21528,80 +21351,77 @@ return x_0; obj* _init_l_lean_parser_term_binder_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; x_0 = lean::box(0); x_1 = l_lean_parser_term_binder__content_parser_lean_parser_has__tokens; -lean::inc(x_0); lean::inc(x_1); -x_4 = l_lean_parser_list_cons_tokens___rarg(x_1, x_0); -x_5 = l_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens; -lean::inc(x_5); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_4); -x_8 = l_lean_parser_tokens___rarg(x_7); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_8, x_0); -x_10 = l_lean_parser_tokens___rarg(x_9); -return x_10; +x_3 = l_lean_parser_list_cons_tokens___rarg(x_1, x_0); +x_4 = l_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens; +lean::inc(x_4); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_4, x_3); +x_7 = l_lean_parser_tokens___rarg(x_6); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_7, x_0); +x_9 = l_lean_parser_tokens___rarg(x_8); +return x_9; } } obj* _init_l_lean_parser_term_binder_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_21; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_20; x_0 = lean::box(0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binder__content_parser), 5, 0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_bracketed__binder_parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_0); -x_9 = l_lean_parser_term__parser__m_monad; -x_10 = l_lean_parser_term__parser__m_monad__except; -x_11 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_12 = l_lean_parser_term__parser__m_alternative; -x_13 = l_lean_parser_term_binder; -x_14 = l_lean_parser_term_binder_has__view; -lean::inc(x_14); +x_2 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_bracketed__binder_parser), 5, 0); +x_4 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_4, 0, x_3); +lean::cnstr_set(x_4, 1, x_2); +x_5 = lean::mk_nat_obj(0u); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_6, 0, x_4); +lean::closure_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_0); +x_8 = l_lean_parser_term__parser__m_monad; +x_9 = l_lean_parser_term__parser__m_monad__except; +x_10 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_11 = l_lean_parser_term__parser__m_alternative; +x_12 = l_lean_parser_term_binder; +x_13 = l_lean_parser_term_binder_has__view; lean::inc(x_13); lean::inc(x_12); lean::inc(x_11); lean::inc(x_10); lean::inc(x_9); -x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x_8, x_14); -return x_21; +lean::inc(x_8); +x_20 = l_lean_parser_combinators_node_view___rarg(x_8, x_9, x_10, x_11, x_12, x_7, x_13); +return x_20; } } obj* _init_l_lean_parser_term_binder_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binder__content_parser), 5, 0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_bracketed__binder_parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_0); -return x_8; +x_2 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_bracketed__binder_parser), 5, 0); +x_4 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_4, 0, x_3); +lean::cnstr_set(x_4, 1, x_2); +x_5 = lean::mk_nat_obj(0u); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_6, 0, x_4); +lean::closure_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_0); +return x_7; } } obj* l_lean_parser_term_binder_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -22010,50 +21830,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_mixed__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_mixed__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_mixed__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_mixed__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_mixed__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_mixed__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -22063,44 +21882,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_mixed__binder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_mixed__binder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_term_binder__ident_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_term_binder__ident_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_term_bracketed__binder_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_term_bracketed__binder_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -22112,7 +21931,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -22120,45 +21939,43 @@ x_5 = l_lean_parser_term_bracketed__binder_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_term_mixed__binder; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_term_mixed__binder; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_term_binder__ident_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_term_mixed__binder; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_term_binder__ident_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_term_mixed__binder; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -22402,50 +22219,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_binders__remainder_has__view_x_27___lambda__1___closed__3; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_binders__remainder_has__view_x_27___lambda__1___closed__3; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_binders__remainder_has__view_x_27___lambda__1___closed__3; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_binders__remainder_has__view_x_27___lambda__1___closed__3; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_binders__remainder_has__view_x_27___lambda__1___closed__3; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_binders__remainder_has__view_x_27___lambda__1___closed__3; +lean::inc(x_69); +return x_69; } } } @@ -22455,61 +22271,61 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_binders__remainder_has__view_x_27___lambda__1___closed__3; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_binders__remainder_has__view_x_27___lambda__1___closed__3; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) +{ +obj* x_79; +x_79 = l_lean_parser_syntax_as__node___main(x_1); +if (lean::obj_tag(x_79) == 0) { obj* x_80; -x_80 = l_lean_parser_syntax_as__node___main(x_1); -if (lean::obj_tag(x_80) == 0) -{ -obj* x_81; -x_81 = l_lean_parser_term_binders__remainder_has__view_x_27___lambda__1___closed__1; -lean::inc(x_81); -return x_81; +x_80 = l_lean_parser_term_binders__remainder_has__view_x_27___lambda__1___closed__1; +lean::inc(x_80); +return x_80; } else { -obj* x_83; obj* x_86; obj* x_89; obj* x_91; obj* x_92; -x_83 = lean::cnstr_get(x_80, 0); -lean::inc(x_83); -lean::dec(x_80); -x_86 = lean::cnstr_get(x_83, 1); -lean::inc(x_86); -lean::dec(x_83); -x_89 = l_lean_parser_term_binders__remainder_has__view_x_27___lambda__1___closed__2; -lean::inc(x_89); -x_91 = l_list_map___main___rarg(x_89, x_86); -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -return x_92; +obj* x_82; obj* x_85; obj* x_88; obj* x_90; obj* x_91; +x_82 = lean::cnstr_get(x_79, 0); +lean::inc(x_82); +lean::dec(x_79); +x_85 = lean::cnstr_get(x_82, 1); +lean::inc(x_85); +lean::dec(x_82); +x_88 = l_lean_parser_term_binders__remainder_has__view_x_27___lambda__1___closed__2; +lean::inc(x_88); +x_90 = l_list_map___main___rarg(x_88, x_85); +x_91 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_91, 0, x_90); +return x_91; } } else { -obj* x_93; obj* x_94; obj* x_96; obj* x_97; -x_93 = l_lean_parser_term_binders__types_has__view; -x_94 = lean::cnstr_get(x_93, 0); -lean::inc(x_94); -x_96 = lean::apply_1(x_94, x_1); -x_97 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_97, 0, x_96); -return x_97; +obj* x_92; obj* x_93; obj* x_95; obj* x_96; +x_92 = l_lean_parser_term_binders__types_has__view; +x_93 = lean::cnstr_get(x_92, 0); +lean::inc(x_93); +x_95 = lean::apply_1(x_93, x_1); +x_96 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_96, 0, x_95); +return x_96; } } } @@ -22531,7 +22347,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -22539,47 +22355,45 @@ x_5 = l_lean_parser_term_binders__types_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_term_binders__remainder; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_term_binders__remainder; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_term_binders__remainder_has__view_x_27___lambda__2___closed__1; -lean::inc(x_21); -x_23 = l_list_map___main___rarg(x_21, x_18); -x_24 = l_lean_parser_no__kind; -lean::inc(x_24); -x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); -lean::inc(x_1); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_1); -x_29 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_29); -x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_1); -x_33 = l_lean_parser_term_binders__remainder; -lean::inc(x_33); -x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); -return x_35; +x_20 = l_lean_parser_term_binders__remainder_has__view_x_27___lambda__2___closed__1; +lean::inc(x_20); +x_22 = l_list_map___main___rarg(x_20, x_17); +x_23 = l_lean_parser_no__kind; +lean::inc(x_23); +x_25 = l_lean_parser_syntax_mk__node(x_23, x_22); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_1); +x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_1); +x_31 = l_lean_parser_term_binders__remainder; +lean::inc(x_31); +x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); +return x_33; } } } @@ -22623,47 +22437,45 @@ return x_8; obj* _init_l_lean_parser_term_binders__ext_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; -x_0 = l_lean_parser_term_binder__ident_has__view; -x_1 = lean::cnstr_get(x_0, 0); -lean::inc(x_1); -x_3 = lean::box(3); -lean::inc(x_3); -x_5 = lean::apply_1(x_1, x_3); -x_6 = lean::box(0); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_6); -x_8 = l_lean_parser_term_binders__remainder_has__view; -x_9 = lean::cnstr_get(x_8, 0); -lean::inc(x_9); -x_11 = lean::apply_1(x_9, x_3); -x_12 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_12, 0, x_11); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_7); -lean::cnstr_set(x_13, 1, x_12); -return x_13; -} -} -obj* _init_l_lean_parser_term_binders__ext_has__view_x_27___lambda__1___closed__2() { -_start: -{ -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; x_0 = l_lean_parser_term_binder__ident_has__view; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::box(3); x_4 = lean::apply_1(x_1, x_3); x_5 = lean::box(0); -lean::inc(x_5); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_4); +x_6 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_6, 0, x_4); +lean::cnstr_set(x_6, 1, x_5); +x_7 = l_lean_parser_term_binders__remainder_has__view; +x_8 = lean::cnstr_get(x_7, 0); +lean::inc(x_8); +x_10 = lean::apply_1(x_8, x_3); +x_11 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_11, 0, x_10); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_6); +lean::cnstr_set(x_12, 1, x_11); +return x_12; +} +} +obj* _init_l_lean_parser_term_binders__ext_has__view_x_27___lambda__1___closed__2() { +_start: +{ +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; +x_0 = l_lean_parser_term_binder__ident_has__view; +x_1 = lean::cnstr_get(x_0, 0); +lean::inc(x_1); +x_3 = lean::box(3); +x_4 = lean::apply_1(x_1, x_3); +x_5 = lean::box(0); +x_6 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_6, 0, x_4); +lean::cnstr_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_7, 0, x_6); lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_5); -return x_8; +return x_7; } } obj* _init_l_lean_parser_term_binders__ext_has__view_x_27___lambda__1___closed__3() { @@ -23379,7 +23191,7 @@ return x_17; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; +obj* x_18; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_33; x_18 = lean::cnstr_get(x_3, 0); lean::inc(x_18); lean::dec(x_3); @@ -23388,22 +23200,21 @@ x_22 = l_lean_parser_term_binders__remainder_has__view; x_23 = lean::cnstr_get(x_22, 1); lean::inc(x_23); x_25 = lean::apply_1(x_23, x_18); -lean::inc(x_21); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_21); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_21); lean::inc(x_9); -x_29 = l_lean_parser_syntax_mk__node(x_9, x_27); +x_28 = l_lean_parser_syntax_mk__node(x_9, x_26); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_21); x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_21); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_11); -lean::cnstr_set(x_31, 1, x_30); -x_32 = l_lean_parser_term_binders__ext; -lean::inc(x_32); -x_34 = l_lean_parser_syntax_mk__node(x_32, x_31); -return x_34; +lean::cnstr_set(x_30, 0, x_11); +lean::cnstr_set(x_30, 1, x_29); +x_31 = l_lean_parser_term_binders__ext; +lean::inc(x_31); +x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); +return x_33; } } } @@ -23431,7 +23242,7 @@ return x_0; obj* _init_l_lean_parser_term_binders__ext_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_10; obj* x_11; obj* x_12; obj* x_15; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; +obj* x_0; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; x_0 = l_lean_parser_term_binder__ident_parser_lean_parser_has__tokens; lean::inc(x_0); x_2 = l_lean_parser_tokens___rarg(x_0); @@ -23440,40 +23251,35 @@ x_4 = lean::mk_nat_obj(0u); x_5 = l_lean_parser_symbol_tokens___rarg(x_3, x_4); x_6 = lean::box(0); x_7 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_6); lean::inc(x_7); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_7, x_6); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_5, x_10); -x_12 = l_lean_parser_tokens___rarg(x_11); -lean::inc(x_6); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_7, x_6); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_5, x_9); +x_11 = l_lean_parser_tokens___rarg(x_10); lean::inc(x_0); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_0, x_6); -x_16 = l_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens; -lean::inc(x_16); -x_18 = l_lean_parser_list_cons_tokens___rarg(x_16, x_15); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_0, x_6); +x_14 = l_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens; +lean::inc(x_14); +x_16 = l_lean_parser_list_cons_tokens___rarg(x_14, x_13); +x_17 = l_lean_parser_tokens___rarg(x_16); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_17, x_6); x_19 = l_lean_parser_tokens___rarg(x_18); -lean::inc(x_6); -x_21 = l_lean_parser_list_cons_tokens___rarg(x_19, x_6); -x_22 = l_lean_parser_tokens___rarg(x_21); +x_20 = l_lean_parser_tokens___rarg(x_19); +x_21 = l_lean_parser_list_cons_tokens___rarg(x_20, x_6); +x_22 = l_lean_parser_list_cons_tokens___rarg(x_11, x_21); x_23 = l_lean_parser_tokens___rarg(x_22); -lean::inc(x_6); -x_25 = l_lean_parser_list_cons_tokens___rarg(x_23, x_6); -x_26 = l_lean_parser_list_cons_tokens___rarg(x_12, x_25); -x_27 = l_lean_parser_tokens___rarg(x_26); -lean::inc(x_6); -x_29 = l_lean_parser_list_cons_tokens___rarg(x_27, x_6); -x_30 = l_lean_parser_tokens___rarg(x_29); -x_31 = l_lean_parser_tokens___rarg(x_30); -x_32 = l_lean_parser_list_cons_tokens___rarg(x_31, x_6); -x_33 = l_lean_parser_list_cons_tokens___rarg(x_2, x_32); -x_34 = l_lean_parser_tokens___rarg(x_33); -return x_34; +x_24 = l_lean_parser_list_cons_tokens___rarg(x_23, x_6); +x_25 = l_lean_parser_tokens___rarg(x_24); +x_26 = l_lean_parser_tokens___rarg(x_25); +x_27 = l_lean_parser_list_cons_tokens___rarg(x_26, x_6); +x_28 = l_lean_parser_list_cons_tokens___rarg(x_2, x_27); +x_29 = l_lean_parser_tokens___rarg(x_28); +return x_29; } } obj* _init_l_lean_parser_term_binders__ext_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_55; +obj* x_0; obj* x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_50; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binder__ident_parser), 5, 0); lean::inc(x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__1), 6, 1); @@ -23493,88 +23299,83 @@ lean::inc(x_7); x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); lean::closure_set(x_11, 0, x_7); x_12 = lean::box(0); -lean::inc(x_12); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_11); +lean::cnstr_set(x_13, 1, x_12); x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_12); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_9); -lean::cnstr_set(x_15, 1, x_14); -x_16 = l_lean_parser_term_binders__types; -lean::inc(x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_15); -lean::inc(x_12); +lean::cnstr_set(x_14, 0, x_9); +lean::cnstr_set(x_14, 1, x_13); +x_15 = l_lean_parser_term_binders__types; +lean::inc(x_15); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_17, 0, x_15); +lean::closure_set(x_17, 1, x_14); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_0); +lean::cnstr_set(x_18, 1, x_12); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_bracketed__binder_parser), 5, 0); x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_0); -lean::cnstr_set(x_20, 1, x_12); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_bracketed__binder_parser), 5, 0); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); +lean::cnstr_set(x_20, 0, x_19); +lean::cnstr_set(x_20, 1, x_18); lean::inc(x_7); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_24, 0, x_22); -lean::closure_set(x_24, 1, x_7); -lean::inc(x_12); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_12); -x_27 = l_lean_parser_term_mixed__binder; -lean::inc(x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_29, 0, x_27); -lean::closure_set(x_29, 1, x_26); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__2), 6, 1); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_22, 0, x_20); +lean::closure_set(x_22, 1, x_7); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_22); +lean::cnstr_set(x_23, 1, x_12); +x_24 = l_lean_parser_term_mixed__binder; +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_26, 0, x_24); +lean::closure_set(x_26, 1, x_23); +x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__2), 6, 1); +lean::closure_set(x_27, 0, x_26); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_12); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_17); +lean::cnstr_set(x_29, 1, x_28); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); lean::closure_set(x_30, 0, x_29); -lean::inc(x_12); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_30); -lean::cnstr_set(x_32, 1, x_12); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_18); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_34, 0, x_33); -lean::closure_set(x_34, 1, x_7); -lean::inc(x_12); +lean::closure_set(x_30, 1, x_7); +x_31 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_31, 0, x_30); +lean::cnstr_set(x_31, 1, x_12); +x_32 = l_lean_parser_term_binders__remainder; +lean::inc(x_32); +x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_34, 0, x_32); +lean::closure_set(x_34, 1, x_31); +x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); +lean::closure_set(x_35, 0, x_34); x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_34); +lean::cnstr_set(x_36, 0, x_35); lean::cnstr_set(x_36, 1, x_12); -x_37 = l_lean_parser_term_binders__remainder; -lean::inc(x_37); -x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_39, 0, x_37); -lean::closure_set(x_39, 1, x_36); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_40, 0, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_12); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_2); -lean::cnstr_set(x_42, 1, x_41); -x_43 = l_lean_parser_term__parser__m_monad; -x_44 = l_lean_parser_term__parser__m_monad__except; -x_45 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_46 = l_lean_parser_term__parser__m_alternative; -x_47 = l_lean_parser_term_binders__ext; -x_48 = l_lean_parser_term_binders__ext_has__view; -lean::inc(x_48); -lean::inc(x_47); -lean::inc(x_46); -lean::inc(x_45); -lean::inc(x_44); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_2); +lean::cnstr_set(x_37, 1, x_36); +x_38 = l_lean_parser_term__parser__m_monad; +x_39 = l_lean_parser_term__parser__m_monad__except; +x_40 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_41 = l_lean_parser_term__parser__m_alternative; +x_42 = l_lean_parser_term_binders__ext; +x_43 = l_lean_parser_term_binders__ext_has__view; lean::inc(x_43); -x_55 = l_lean_parser_combinators_node_view___rarg(x_43, x_44, x_45, x_46, x_47, x_42, x_48); -return x_55; +lean::inc(x_42); +lean::inc(x_41); +lean::inc(x_40); +lean::inc(x_39); +lean::inc(x_38); +x_50 = l_lean_parser_combinators_node_view___rarg(x_38, x_39, x_40, x_41, x_42, x_37, x_43); +return x_50; } } obj* _init_l_lean_parser_term_binders__ext_parser___closed__1() { _start: { -obj* x_0; obj* x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; +obj* x_0; obj* x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_37; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binder__ident_parser), 5, 0); lean::inc(x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__1), 6, 1); @@ -23594,69 +23395,64 @@ lean::inc(x_7); x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); lean::closure_set(x_11, 0, x_7); x_12 = lean::box(0); -lean::inc(x_12); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_11); +lean::cnstr_set(x_13, 1, x_12); x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_11); -lean::cnstr_set(x_14, 1, x_12); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_9); -lean::cnstr_set(x_15, 1, x_14); -x_16 = l_lean_parser_term_binders__types; -lean::inc(x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_15); -lean::inc(x_12); +lean::cnstr_set(x_14, 0, x_9); +lean::cnstr_set(x_14, 1, x_13); +x_15 = l_lean_parser_term_binders__types; +lean::inc(x_15); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_17, 0, x_15); +lean::closure_set(x_17, 1, x_14); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_0); +lean::cnstr_set(x_18, 1, x_12); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_bracketed__binder_parser), 5, 0); x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_0); -lean::cnstr_set(x_20, 1, x_12); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_bracketed__binder_parser), 5, 0); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_20); +lean::cnstr_set(x_20, 0, x_19); +lean::cnstr_set(x_20, 1, x_18); lean::inc(x_7); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_24, 0, x_22); -lean::closure_set(x_24, 1, x_7); -lean::inc(x_12); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_12); -x_27 = l_lean_parser_term_mixed__binder; -lean::inc(x_27); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_29, 0, x_27); -lean::closure_set(x_29, 1, x_26); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__2), 6, 1); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_22, 0, x_20); +lean::closure_set(x_22, 1, x_7); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_22); +lean::cnstr_set(x_23, 1, x_12); +x_24 = l_lean_parser_term_mixed__binder; +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_26, 0, x_24); +lean::closure_set(x_26, 1, x_23); +x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__2), 6, 1); +lean::closure_set(x_27, 0, x_26); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_12); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_17); +lean::cnstr_set(x_29, 1, x_28); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); lean::closure_set(x_30, 0, x_29); -lean::inc(x_12); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_30); -lean::cnstr_set(x_32, 1, x_12); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_18); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_34, 0, x_33); -lean::closure_set(x_34, 1, x_7); -lean::inc(x_12); +lean::closure_set(x_30, 1, x_7); +x_31 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_31, 0, x_30); +lean::cnstr_set(x_31, 1, x_12); +x_32 = l_lean_parser_term_binders__remainder; +lean::inc(x_32); +x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_34, 0, x_32); +lean::closure_set(x_34, 1, x_31); +x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); +lean::closure_set(x_35, 0, x_34); x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_34); +lean::cnstr_set(x_36, 0, x_35); lean::cnstr_set(x_36, 1, x_12); -x_37 = l_lean_parser_term_binders__remainder; -lean::inc(x_37); -x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_39, 0, x_37); -lean::closure_set(x_39, 1, x_36); -x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_40, 0, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_12); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_2); -lean::cnstr_set(x_42, 1, x_41); -return x_42; +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_2); +lean::cnstr_set(x_37, 1, x_36); +return x_37; } } obj* l_lean_parser_term_binders__ext_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -23845,50 +23641,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_binders_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_binders_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_binders_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_binders_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_binders_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_binders_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -23898,44 +23693,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_binders_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_binders_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_term_simple__binder_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_term_simple__binder_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_term_binders__ext_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_term_binders__ext_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -23947,7 +23742,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -23955,45 +23750,43 @@ x_5 = l_lean_parser_term_binders__ext_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_term_binders; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_term_binders; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_term_simple__binder_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_term_binders; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_term_simple__binder_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_term_binders; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -24021,80 +23814,77 @@ return x_0; obj* _init_l_lean_parser_term_binders_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; x_0 = lean::box(0); x_1 = l_lean_parser_term_simple__binder_parser_lean_parser_has__tokens; -lean::inc(x_0); lean::inc(x_1); -x_4 = l_lean_parser_list_cons_tokens___rarg(x_1, x_0); -x_5 = l_lean_parser_term_binders__ext_parser_lean_parser_has__tokens; -lean::inc(x_5); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_4); -x_8 = l_lean_parser_tokens___rarg(x_7); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_8, x_0); -x_10 = l_lean_parser_tokens___rarg(x_9); -return x_10; +x_3 = l_lean_parser_list_cons_tokens___rarg(x_1, x_0); +x_4 = l_lean_parser_term_binders__ext_parser_lean_parser_has__tokens; +lean::inc(x_4); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_4, x_3); +x_7 = l_lean_parser_tokens___rarg(x_6); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_7, x_0); +x_9 = l_lean_parser_tokens___rarg(x_8); +return x_9; } } obj* _init_l_lean_parser_term_binders_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_21; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_20; x_0 = lean::box(0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_simple__binder_parser), 5, 0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binders__ext_parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_0); -x_9 = l_lean_parser_term__parser__m_monad; -x_10 = l_lean_parser_term__parser__m_monad__except; -x_11 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_12 = l_lean_parser_term__parser__m_alternative; -x_13 = l_lean_parser_term_binders; -x_14 = l_lean_parser_term_binders_has__view; -lean::inc(x_14); +x_2 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binders__ext_parser), 5, 0); +x_4 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_4, 0, x_3); +lean::cnstr_set(x_4, 1, x_2); +x_5 = lean::mk_nat_obj(0u); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_6, 0, x_4); +lean::closure_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_0); +x_8 = l_lean_parser_term__parser__m_monad; +x_9 = l_lean_parser_term__parser__m_monad__except; +x_10 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_11 = l_lean_parser_term__parser__m_alternative; +x_12 = l_lean_parser_term_binders; +x_13 = l_lean_parser_term_binders_has__view; lean::inc(x_13); lean::inc(x_12); lean::inc(x_11); lean::inc(x_10); lean::inc(x_9); -x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x_8, x_14); -return x_21; +lean::inc(x_8); +x_20 = l_lean_parser_combinators_node_view___rarg(x_8, x_9, x_10, x_11, x_12, x_7, x_13); +return x_20; } } obj* _init_l_lean_parser_term_binders_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_simple__binder_parser), 5, 0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_3, 0, x_1); -lean::cnstr_set(x_3, 1, x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binders__ext_parser), 5, 0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_3); -x_6 = lean::mk_nat_obj(0u); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_7, 0, x_5); -lean::closure_set(x_7, 1, x_6); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_0); -return x_8; +x_2 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binders__ext_parser), 5, 0); +x_4 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_4, 0, x_3); +lean::cnstr_set(x_4, 1, x_2); +x_5 = lean::mk_nat_obj(0u); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_6, 0, x_4); +lean::closure_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_0); +return x_7; } } obj* l_lean_parser_term_binders_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -24373,50 +24163,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__5; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__5; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__5; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__5; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__5; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__5; +lean::inc(x_69); +return x_69; } } } @@ -24426,77 +24215,77 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__5; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__5; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) +{ +obj* x_79; +x_79 = l_lean_parser_syntax_as__node___main(x_1); +if (lean::obj_tag(x_79) == 0) { obj* x_80; -x_80 = l_lean_parser_syntax_as__node___main(x_1); -if (lean::obj_tag(x_80) == 0) -{ -obj* x_81; -x_81 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__1; -lean::inc(x_81); -return x_81; +x_80 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__1; +lean::inc(x_80); +return x_80; } else { -obj* x_83; obj* x_86; obj* x_89; obj* x_91; obj* x_92; -x_83 = lean::cnstr_get(x_80, 0); -lean::inc(x_83); -lean::dec(x_80); -x_86 = lean::cnstr_get(x_83, 1); -lean::inc(x_86); -lean::dec(x_83); -x_89 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__2; -lean::inc(x_89); -x_91 = l_list_map___main___rarg(x_89, x_86); -x_92 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_92, 0, x_91); -return x_92; +obj* x_82; obj* x_85; obj* x_88; obj* x_90; obj* x_91; +x_82 = lean::cnstr_get(x_79, 0); +lean::inc(x_82); +lean::dec(x_79); +x_85 = lean::cnstr_get(x_82, 1); +lean::inc(x_85); +lean::dec(x_82); +x_88 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__2; +lean::inc(x_88); +x_90 = l_list_map___main___rarg(x_88, x_85); +x_91 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_91, 0, x_90); +return x_91; } } else { +obj* x_92; +x_92 = l_lean_parser_syntax_as__node___main(x_1); +if (lean::obj_tag(x_92) == 0) +{ obj* x_93; -x_93 = l_lean_parser_syntax_as__node___main(x_1); -if (lean::obj_tag(x_93) == 0) -{ -obj* x_94; -x_94 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__3; -lean::inc(x_94); -return x_94; +x_93 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__3; +lean::inc(x_93); +return x_93; } else { -obj* x_96; obj* x_99; obj* x_102; obj* x_104; obj* x_105; -x_96 = lean::cnstr_get(x_93, 0); -lean::inc(x_96); -lean::dec(x_93); -x_99 = lean::cnstr_get(x_96, 1); -lean::inc(x_99); -lean::dec(x_96); -x_102 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__4; -lean::inc(x_102); -x_104 = l_list_map___main___rarg(x_102, x_99); -x_105 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_105, 0, x_104); -return x_105; +obj* x_95; obj* x_98; obj* x_101; obj* x_103; obj* x_104; +x_95 = lean::cnstr_get(x_92, 0); +lean::inc(x_95); +lean::dec(x_92); +x_98 = lean::cnstr_get(x_95, 1); +lean::inc(x_98); +lean::dec(x_95); +x_101 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__4; +lean::inc(x_101); +x_103 = l_list_map___main___rarg(x_101, x_98); +x_104 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_104, 0, x_103); +return x_104; } } } @@ -24529,7 +24318,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; +obj* x_2; obj* x_5; obj* 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; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -24539,47 +24328,45 @@ x_7 = l_list_map___main___rarg(x_5, x_2); x_8 = l_lean_parser_no__kind; lean::inc(x_8); x_10 = l_lean_parser_syntax_mk__node(x_8, x_7); -lean::inc(x_1); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_1); -x_13 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_13); -x_15 = l_lean_parser_syntax_mk__node(x_13, x_12); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_1); -x_17 = l_lean_parser_term_bracketed__binders; -lean::inc(x_17); -x_19 = l_lean_parser_syntax_mk__node(x_17, x_16); -return x_19; +x_11 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_11, 0, x_10); +lean::cnstr_set(x_11, 1, x_1); +x_12 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_12); +x_14 = l_lean_parser_syntax_mk__node(x_12, x_11); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_14); +lean::cnstr_set(x_15, 1, x_1); +x_16 = l_lean_parser_term_bracketed__binders; +lean::inc(x_16); +x_18 = l_lean_parser_syntax_mk__node(x_16, x_15); +return x_18; } else { -obj* x_20; obj* x_23; obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_37; -x_20 = lean::cnstr_get(x_0, 0); -lean::inc(x_20); +obj* x_19; obj* x_22; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; +x_19 = lean::cnstr_get(x_0, 0); +lean::inc(x_19); lean::dec(x_0); -x_23 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__2___closed__2; -lean::inc(x_23); -x_25 = l_list_map___main___rarg(x_23, x_20); -x_26 = l_lean_parser_no__kind; -lean::inc(x_26); -x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); -lean::inc(x_1); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_28); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_1); -x_35 = l_lean_parser_term_bracketed__binders; -lean::inc(x_35); -x_37 = l_lean_parser_syntax_mk__node(x_35, x_34); -return x_37; +x_22 = l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__2___closed__2; +lean::inc(x_22); +x_24 = l_list_map___main___rarg(x_22, x_19); +x_25 = l_lean_parser_no__kind; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_31); +lean::cnstr_set(x_32, 1, x_1); +x_33 = l_lean_parser_term_bracketed__binders; +lean::inc(x_33); +x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); +return x_35; } } } @@ -24607,7 +24394,7 @@ return x_0; obj* _init_l_lean_parser_term_bracketed__binders_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; +obj* x_0; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; x_0 = l_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens; lean::inc(x_0); x_2 = l_lean_parser_tokens___rarg(x_0); @@ -24615,19 +24402,18 @@ x_3 = l_lean_parser_term_simple__binder_parser_lean_parser_has__tokens; lean::inc(x_3); x_5 = l_lean_parser_tokens___rarg(x_3); x_6 = lean::box(0); -lean::inc(x_6); -x_8 = l_lean_parser_list_cons_tokens___rarg(x_5, x_6); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_2, x_8); -x_10 = l_lean_parser_tokens___rarg(x_9); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_10, x_6); -x_12 = l_lean_parser_tokens___rarg(x_11); -return x_12; +x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_6); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_2, x_7); +x_9 = l_lean_parser_tokens___rarg(x_8); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_9, x_6); +x_11 = l_lean_parser_tokens___rarg(x_10); +return x_11; } } obj* _init_l_lean_parser_term_bracketed__binders_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_23; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_22; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_bracketed__binder_parser), 5, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__1), 6, 1); lean::closure_set(x_1, 0, x_0); @@ -24635,40 +24421,39 @@ x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_simple__bin x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__1), 6, 1); lean::closure_set(x_3, 0, x_2); x_4 = lean::box(0); -lean::inc(x_4); +x_5 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_5, 0, x_3); +lean::cnstr_set(x_5, 1, x_4); x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_3); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_4); -x_11 = l_lean_parser_term__parser__m_monad; -x_12 = l_lean_parser_term__parser__m_monad__except; -x_13 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_14 = l_lean_parser_term__parser__m_alternative; -x_15 = l_lean_parser_term_bracketed__binders; -x_16 = l_lean_parser_term_bracketed__binders_has__view; -lean::inc(x_16); +lean::cnstr_set(x_6, 0, x_1); +lean::cnstr_set(x_6, 1, x_5); +x_7 = lean::mk_nat_obj(0u); +x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_8, 0, x_6); +lean::closure_set(x_8, 1, x_7); +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_4); +x_10 = l_lean_parser_term__parser__m_monad; +x_11 = l_lean_parser_term__parser__m_monad__except; +x_12 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_13 = l_lean_parser_term__parser__m_alternative; +x_14 = l_lean_parser_term_bracketed__binders; +x_15 = l_lean_parser_term_bracketed__binders_has__view; lean::inc(x_15); lean::inc(x_14); lean::inc(x_13); lean::inc(x_12); lean::inc(x_11); -x_23 = l_lean_parser_combinators_node_view___rarg(x_11, x_12, x_13, x_14, x_15, x_10, x_16); -return x_23; +lean::inc(x_10); +x_22 = l_lean_parser_combinators_node_view___rarg(x_10, x_11, x_12, x_13, x_14, x_9, x_15); +return x_22; } } obj* _init_l_lean_parser_term_bracketed__binders_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_bracketed__binder_parser), 5, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__1), 6, 1); lean::closure_set(x_1, 0, x_0); @@ -24676,21 +24461,20 @@ x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_simple__bin x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__1), 6, 1); lean::closure_set(x_3, 0, x_2); x_4 = lean::box(0); -lean::inc(x_4); +x_5 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_5, 0, x_3); +lean::cnstr_set(x_5, 1, x_4); x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_3); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_1); -lean::cnstr_set(x_7, 1, x_6); -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_9, 0, x_7); -lean::closure_set(x_9, 1, x_8); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_4); -return x_10; +lean::cnstr_set(x_6, 0, x_1); +lean::cnstr_set(x_6, 1, x_5); +x_7 = lean::mk_nat_obj(0u); +x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_8, 0, x_6); +lean::closure_set(x_8, 1, x_7); +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_4); +return x_9; } } obj* l_lean_parser_term_bracketed__binders_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -25728,50 +25512,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_assume__binders_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_assume__binders_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_assume__binders_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_assume__binders_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_assume__binders_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_assume__binders_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -25781,44 +25564,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_assume__binders_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_assume__binders_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_term_binders_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_term_binders_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_term_assume__anonymous_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_term_assume__anonymous_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -25830,7 +25613,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -25838,45 +25621,43 @@ x_5 = l_lean_parser_term_assume__anonymous_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_term_assume__binders; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_term_assume__binders; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_term_binders_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_term_assume__binders; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_term_binders_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_term_assume__binders; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -26367,7 +26148,7 @@ return x_77; obj* l_lean_parser_term_assume_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -26381,32 +26162,31 @@ x_10 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_10); x_12 = l_option_map___rarg(x_10, x_1); x_13 = lean::box(3); -lean::inc(x_13); -x_15 = l_option_get__or__else___main___rarg(x_12, x_13); -x_16 = l_lean_parser_term_assume__binders_has__view; -x_17 = lean::cnstr_get(x_16, 1); -lean::inc(x_17); -x_19 = lean::apply_1(x_17, x_3); +x_14 = l_option_get__or__else___main___rarg(x_12, x_13); +x_15 = l_lean_parser_term_assume__binders_has__view; +x_16 = lean::cnstr_get(x_15, 1); +lean::inc(x_16); +x_18 = lean::apply_1(x_16, x_3); lean::inc(x_10); -x_21 = l_option_map___rarg(x_10, x_5); -x_22 = l_option_get__or__else___main___rarg(x_21, x_13); -x_23 = lean::box(0); +x_20 = l_option_map___rarg(x_10, x_5); +x_21 = l_option_get__or__else___main___rarg(x_20, x_13); +x_22 = lean::box(0); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_7); +lean::cnstr_set(x_23, 1, x_22); x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_7); +lean::cnstr_set(x_24, 0, x_21); lean::cnstr_set(x_24, 1, x_23); x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_22); +lean::cnstr_set(x_25, 0, x_18); lean::cnstr_set(x_25, 1, x_24); x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_19); +lean::cnstr_set(x_26, 0, x_14); lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_15); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_lean_parser_term_assume; -lean::inc(x_28); -x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); -return x_30; +x_27 = l_lean_parser_term_assume; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +return x_29; } } obj* _init_l_lean_parser_term_assume_has__view_x_27() { @@ -26433,7 +26213,7 @@ return x_0; obj* _init_l_lean_parser_term_assume_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; 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; obj* x_25; obj* x_26; obj* x_27; x_0 = lean::mk_string("assume "); x_1 = l_lean_parser_max__prec; lean::inc(x_1); @@ -26444,33 +26224,31 @@ lean::inc(x_5); x_7 = l_lean_parser_symbol_tokens___rarg(x_4, x_5); x_8 = lean::box(0); x_9 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_8); lean::inc(x_9); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_9, x_8); -lean::inc(x_12); -x_14 = l_lean_parser_list_cons_tokens___rarg(x_7, x_12); -x_15 = l_lean_parser_tokens___rarg(x_14); -x_16 = l_lean_parser_term_binders_parser_lean_parser_has__tokens; -lean::inc(x_8); -lean::inc(x_16); -x_19 = l_lean_parser_list_cons_tokens___rarg(x_16, x_8); -x_20 = l_lean_parser_list_cons_tokens___rarg(x_15, x_19); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_9, x_8); +lean::inc(x_11); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_7, x_11); +x_14 = l_lean_parser_tokens___rarg(x_13); +x_15 = l_lean_parser_term_binders_parser_lean_parser_has__tokens; +lean::inc(x_15); +x_17 = l_lean_parser_list_cons_tokens___rarg(x_15, x_8); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_14, x_17); +x_19 = l_lean_parser_tokens___rarg(x_18); +x_20 = l_lean_parser_list_cons_tokens___rarg(x_19, x_8); x_21 = l_lean_parser_tokens___rarg(x_20); -x_22 = l_lean_parser_list_cons_tokens___rarg(x_21, x_8); -x_23 = l_lean_parser_tokens___rarg(x_22); -x_24 = lean::mk_string(", "); -x_25 = l_lean_parser_symbol_tokens___rarg(x_24, x_5); -x_26 = l_lean_parser_list_cons_tokens___rarg(x_25, x_12); -x_27 = l_lean_parser_list_cons_tokens___rarg(x_23, x_26); -x_28 = l_lean_parser_list_cons_tokens___rarg(x_3, x_27); -x_29 = l_lean_parser_tokens___rarg(x_28); -return x_29; +x_22 = lean::mk_string(", "); +x_23 = l_lean_parser_symbol_tokens___rarg(x_22, x_5); +x_24 = l_lean_parser_list_cons_tokens___rarg(x_23, x_11); +x_25 = l_lean_parser_list_cons_tokens___rarg(x_21, x_24); +x_26 = l_lean_parser_list_cons_tokens___rarg(x_3, x_25); +x_27 = l_lean_parser_tokens___rarg(x_26); +return x_27; } } obj* _init_l_lean_parser_term_assume_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_54; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_52; x_0 = lean::mk_string("assume "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -26497,77 +26275,75 @@ lean::inc(x_11); x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); lean::closure_set(x_15, 0, x_11); x_16 = lean::box(0); -lean::inc(x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_15); -lean::cnstr_set(x_18, 1, x_16); -lean::inc(x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_13); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_lean_parser_term_assume__anonymous; -lean::inc(x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_20); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binders_parser), 5, 0); -lean::inc(x_16); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_16); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_23); -lean::cnstr_set(x_27, 1, x_26); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_15); +lean::cnstr_set(x_17, 1, x_16); +lean::inc(x_17); +x_19 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_19, 0, x_13); +lean::cnstr_set(x_19, 1, x_17); +x_20 = l_lean_parser_term_assume__anonymous; +lean::inc(x_20); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_22, 0, x_20); +lean::closure_set(x_22, 1, x_19); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binders_parser), 5, 0); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_16); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_22); +lean::cnstr_set(x_25, 1, x_24); lean::inc(x_11); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_29, 0, x_27); -lean::closure_set(x_29, 1, x_11); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_16); -x_31 = l_lean_parser_term_assume__binders; -lean::inc(x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_33, 0, x_31); -lean::closure_set(x_33, 1, x_30); -x_34 = lean::mk_string(", "); -x_35 = l_string_trim(x_34); -lean::inc(x_35); -x_37 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_37, 0, x_35); -x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_38, 0, x_35); -lean::closure_set(x_38, 1, x_11); -lean::closure_set(x_38, 2, x_37); +x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_27, 0, x_25); +lean::closure_set(x_27, 1, x_11); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_16); +x_29 = l_lean_parser_term_assume__binders; +lean::inc(x_29); +x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_31, 0, x_29); +lean::closure_set(x_31, 1, x_28); +x_32 = lean::mk_string(", "); +x_33 = l_string_trim(x_32); +lean::inc(x_33); +x_35 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_35, 0, x_33); +x_36 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_36, 0, x_33); +lean::closure_set(x_36, 1, x_11); +lean::closure_set(x_36, 2, x_35); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_36); +lean::cnstr_set(x_37, 1, x_17); +x_38 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_38, 0, x_31); +lean::cnstr_set(x_38, 1, x_37); x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_18); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_33); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_6); -lean::cnstr_set(x_41, 1, x_40); -x_42 = l_lean_parser_term__parser__m_monad; -x_43 = l_lean_parser_term__parser__m_monad__except; -x_44 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_45 = l_lean_parser_term__parser__m_alternative; -x_46 = l_lean_parser_term_assume; -x_47 = l_lean_parser_term_assume_has__view; -lean::inc(x_47); -lean::inc(x_46); +lean::cnstr_set(x_39, 0, x_6); +lean::cnstr_set(x_39, 1, x_38); +x_40 = l_lean_parser_term__parser__m_monad; +x_41 = l_lean_parser_term__parser__m_monad__except; +x_42 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_43 = l_lean_parser_term__parser__m_alternative; +x_44 = l_lean_parser_term_assume; +x_45 = l_lean_parser_term_assume_has__view; lean::inc(x_45); lean::inc(x_44); lean::inc(x_43); lean::inc(x_42); -x_54 = l_lean_parser_combinators_node_view___rarg(x_42, x_43, x_44, x_45, x_46, x_41, x_47); -return x_54; +lean::inc(x_41); +lean::inc(x_40); +x_52 = l_lean_parser_combinators_node_view___rarg(x_40, x_41, x_42, x_43, x_44, x_39, x_45); +return x_52; } } obj* _init_l_lean_parser_term_assume_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; x_0 = lean::mk_string("assume "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -26594,58 +26370,56 @@ lean::inc(x_11); x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); lean::closure_set(x_15, 0, x_11); x_16 = lean::box(0); -lean::inc(x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_15); -lean::cnstr_set(x_18, 1, x_16); -lean::inc(x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_13); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_lean_parser_term_assume__anonymous; -lean::inc(x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_20); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binders_parser), 5, 0); -lean::inc(x_16); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_16); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_23); -lean::cnstr_set(x_27, 1, x_26); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_15); +lean::cnstr_set(x_17, 1, x_16); +lean::inc(x_17); +x_19 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_19, 0, x_13); +lean::cnstr_set(x_19, 1, x_17); +x_20 = l_lean_parser_term_assume__anonymous; +lean::inc(x_20); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_22, 0, x_20); +lean::closure_set(x_22, 1, x_19); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binders_parser), 5, 0); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_16); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_22); +lean::cnstr_set(x_25, 1, x_24); lean::inc(x_11); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_29, 0, x_27); -lean::closure_set(x_29, 1, x_11); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_16); -x_31 = l_lean_parser_term_assume__binders; -lean::inc(x_31); -x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_33, 0, x_31); -lean::closure_set(x_33, 1, x_30); -x_34 = lean::mk_string(", "); -x_35 = l_string_trim(x_34); -lean::inc(x_35); -x_37 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_37, 0, x_35); -x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_38, 0, x_35); -lean::closure_set(x_38, 1, x_11); -lean::closure_set(x_38, 2, x_37); +x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_27, 0, x_25); +lean::closure_set(x_27, 1, x_11); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_16); +x_29 = l_lean_parser_term_assume__binders; +lean::inc(x_29); +x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_31, 0, x_29); +lean::closure_set(x_31, 1, x_28); +x_32 = lean::mk_string(", "); +x_33 = l_string_trim(x_32); +lean::inc(x_33); +x_35 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_35, 0, x_33); +x_36 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_36, 0, x_33); +lean::closure_set(x_36, 1, x_11); +lean::closure_set(x_36, 2, x_35); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_36); +lean::cnstr_set(x_37, 1, x_17); +x_38 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_38, 0, x_31); +lean::cnstr_set(x_38, 1, x_37); x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_18); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_33); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_6); -lean::cnstr_set(x_41, 1, x_40); -return x_41; +lean::cnstr_set(x_39, 0, x_6); +lean::cnstr_set(x_39, 1, x_38); +return x_39; } } obj* l_lean_parser_term_assume_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -27124,7 +26898,7 @@ return x_0; obj* _init_l_lean_parser_term_pi_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; x_0 = lean::mk_string("\xce\xa0"); x_1 = lean::mk_string("Pi"); x_2 = l_lean_parser_max__prec; @@ -27135,29 +26909,28 @@ x_6 = lean::mk_string("forall"); lean::inc(x_2); x_8 = l_lean_parser_unicode__symbol_lean_parser_has__tokens___rarg(x_5, x_6, x_2); x_9 = lean::box(0); -lean::inc(x_9); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_8, x_9); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_4, x_11); -x_13 = l_lean_parser_tokens___rarg(x_12); -x_14 = lean::mk_string(","); -x_15 = lean::mk_nat_obj(0u); -x_16 = l_lean_parser_symbol_tokens___rarg(x_14, x_15); -x_17 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_17); -x_19 = l_lean_parser_list_cons_tokens___rarg(x_17, x_9); -x_20 = l_lean_parser_list_cons_tokens___rarg(x_16, x_19); -x_21 = l_lean_parser_term_binders_parser_lean_parser_has__tokens; -lean::inc(x_21); -x_23 = l_lean_parser_list_cons_tokens___rarg(x_21, x_20); -x_24 = l_lean_parser_list_cons_tokens___rarg(x_13, x_23); -x_25 = l_lean_parser_tokens___rarg(x_24); -return x_25; +x_10 = l_lean_parser_list_cons_tokens___rarg(x_8, x_9); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_4, x_10); +x_12 = l_lean_parser_tokens___rarg(x_11); +x_13 = lean::mk_string(","); +x_14 = lean::mk_nat_obj(0u); +x_15 = l_lean_parser_symbol_tokens___rarg(x_13, x_14); +x_16 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_16); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_16, x_9); +x_19 = l_lean_parser_list_cons_tokens___rarg(x_15, x_18); +x_20 = l_lean_parser_term_binders_parser_lean_parser_has__tokens; +lean::inc(x_20); +x_22 = l_lean_parser_list_cons_tokens___rarg(x_20, x_19); +x_23 = l_lean_parser_list_cons_tokens___rarg(x_12, x_22); +x_24 = l_lean_parser_tokens___rarg(x_23); +return x_24; } } obj* _init_l_lean_parser_term_pi_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_39; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_38; x_0 = lean::mk_string("\xce\xa0"); x_1 = lean::mk_string("Pi"); x_2 = l_lean_parser_max__prec; @@ -27174,61 +26947,60 @@ lean::closure_set(x_8, 0, x_5); lean::closure_set(x_8, 1, x_6); lean::closure_set(x_8, 2, x_2); x_9 = lean::box(0); -lean::inc(x_9); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_8); +lean::cnstr_set(x_10, 1, x_9); x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_any__of___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__1), 6, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::mk_string(","); -x_15 = l_string_trim(x_14); -lean::inc(x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_17, 0, x_15); -x_18 = lean::mk_nat_obj(0u); -lean::inc(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_20, 0, x_15); -lean::closure_set(x_20, 1, x_18); -lean::closure_set(x_20, 2, x_17); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_21, 0, x_18); +lean::cnstr_set(x_11, 0, x_4); +lean::cnstr_set(x_11, 1, x_10); +x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_any__of___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__1), 6, 1); +lean::closure_set(x_12, 0, x_11); +x_13 = lean::mk_string(","); +x_14 = l_string_trim(x_13); +lean::inc(x_14); +x_16 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_16, 0, x_14); +x_17 = lean::mk_nat_obj(0u); +lean::inc(x_17); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_19, 0, x_14); +lean::closure_set(x_19, 1, x_17); +lean::closure_set(x_19, 2, x_16); +x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_20, 0, x_17); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_20); +lean::cnstr_set(x_21, 1, x_9); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_9); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binders_parser), 5, 0); +lean::cnstr_set(x_22, 0, x_19); +lean::cnstr_set(x_22, 1, x_21); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binders_parser), 5, 0); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_22); x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_23); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_13); -lean::cnstr_set(x_26, 1, x_25); -x_27 = l_lean_parser_term__parser__m_monad; -x_28 = l_lean_parser_term__parser__m_monad__except; -x_29 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_30 = l_lean_parser_term__parser__m_alternative; -x_31 = l_lean_parser_term_pi; -x_32 = l_lean_parser_term_pi_has__view; -lean::inc(x_32); +lean::cnstr_set(x_25, 0, x_12); +lean::cnstr_set(x_25, 1, x_24); +x_26 = l_lean_parser_term__parser__m_monad; +x_27 = l_lean_parser_term__parser__m_monad__except; +x_28 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_29 = l_lean_parser_term__parser__m_alternative; +x_30 = l_lean_parser_term_pi; +x_31 = l_lean_parser_term_pi_has__view; lean::inc(x_31); lean::inc(x_30); lean::inc(x_29); lean::inc(x_28); lean::inc(x_27); -x_39 = l_lean_parser_combinators_node_view___rarg(x_27, x_28, x_29, x_30, x_31, x_26, x_32); -return x_39; +lean::inc(x_26); +x_38 = l_lean_parser_combinators_node_view___rarg(x_26, x_27, x_28, x_29, x_30, x_25, x_31); +return x_38; } } obj* _init_l_lean_parser_term_pi_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; x_0 = lean::mk_string("\xce\xa0"); x_1 = lean::mk_string("Pi"); x_2 = l_lean_parser_max__prec; @@ -27245,42 +27017,41 @@ lean::closure_set(x_8, 0, x_5); lean::closure_set(x_8, 1, x_6); lean::closure_set(x_8, 2, x_2); x_9 = lean::box(0); -lean::inc(x_9); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_8); +lean::cnstr_set(x_10, 1, x_9); x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_8); -lean::cnstr_set(x_11, 1, x_9); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_4); -lean::cnstr_set(x_12, 1, x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_any__of___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__1), 6, 1); -lean::closure_set(x_13, 0, x_12); -x_14 = lean::mk_string(","); -x_15 = l_string_trim(x_14); -lean::inc(x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_17, 0, x_15); -x_18 = lean::mk_nat_obj(0u); -lean::inc(x_18); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_20, 0, x_15); -lean::closure_set(x_20, 1, x_18); -lean::closure_set(x_20, 2, x_17); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_21, 0, x_18); +lean::cnstr_set(x_11, 0, x_4); +lean::cnstr_set(x_11, 1, x_10); +x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_any__of___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__1), 6, 1); +lean::closure_set(x_12, 0, x_11); +x_13 = lean::mk_string(","); +x_14 = l_string_trim(x_13); +lean::inc(x_14); +x_16 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_16, 0, x_14); +x_17 = lean::mk_nat_obj(0u); +lean::inc(x_17); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_19, 0, x_14); +lean::closure_set(x_19, 1, x_17); +lean::closure_set(x_19, 2, x_16); +x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_20, 0, x_17); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_20); +lean::cnstr_set(x_21, 1, x_9); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_9); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binders_parser), 5, 0); +lean::cnstr_set(x_22, 0, x_19); +lean::cnstr_set(x_22, 1, x_21); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binders_parser), 5, 0); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_22); x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_23); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_13); -lean::cnstr_set(x_26, 1, x_25); -return x_26; +lean::cnstr_set(x_25, 0, x_12); +lean::cnstr_set(x_25, 1, x_24); +return x_25; } } obj* l_lean_parser_term_pi_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -27531,50 +27302,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__3; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__3; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__3; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__3; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__3; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__3; +lean::inc(x_69); +return x_69; } } } @@ -27584,52 +27354,52 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__3; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__3; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { switch (lean::obj_tag(x_1)) { case 0: { -obj* x_80; obj* x_83; obj* x_84; -x_80 = lean::cnstr_get(x_1, 0); -lean::inc(x_80); +obj* x_79; obj* x_82; obj* x_83; +x_79 = lean::cnstr_get(x_1, 0); +lean::inc(x_79); lean::dec(x_1); +x_82 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_82, 0, x_79); x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_80); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +lean::cnstr_set(x_83, 0, x_82); +return x_83; } case 3: { -obj* x_85; -x_85 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__1; -lean::inc(x_85); -return x_85; +obj* x_84; +x_84 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__1; +lean::inc(x_84); +return x_84; } default: { -obj* x_88; +obj* x_87; lean::dec(x_1); -x_88 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__1; -lean::inc(x_88); -return x_88; +x_87 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__1; +lean::inc(x_87); +return x_87; } } } @@ -27638,30 +27408,30 @@ else switch (lean::obj_tag(x_1)) { case 0: { -obj* x_90; obj* x_93; obj* x_94; -x_90 = lean::cnstr_get(x_1, 0); -lean::inc(x_90); +obj* x_89; obj* x_92; obj* x_93; +x_89 = lean::cnstr_get(x_1, 0); +lean::inc(x_89); lean::dec(x_1); -x_93 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_93, 0, x_90); -x_94 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_94, 0, x_93); -return x_94; +x_92 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_92, 0, x_89); +x_93 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_93, 0, x_92); +return x_93; } case 3: { -obj* x_95; -x_95 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__2; -lean::inc(x_95); -return x_95; +obj* x_94; +x_94 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__2; +lean::inc(x_94); +return x_94; } default: { -obj* x_98; +obj* x_97; lean::dec(x_1); -x_98 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__2; -lean::inc(x_98); -return x_98; +x_97 = l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__2; +lean::inc(x_97); +return x_97; } } } @@ -27675,7 +27445,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; +obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -27684,46 +27454,44 @@ lean::inc(x_5); x_7 = l_option_map___rarg(x_5, x_2); x_8 = lean::box(3); x_9 = l_option_get__or__else___main___rarg(x_7, x_8); -lean::inc(x_1); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_1); -x_12 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_12); -x_14 = l_lean_parser_syntax_mk__node(x_12, x_11); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_1); -x_16 = l_lean_parser_term_explicit__modifier; -lean::inc(x_16); -x_18 = l_lean_parser_syntax_mk__node(x_16, x_15); -return x_18; +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_1); +x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_11); +x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_1); +x_15 = l_lean_parser_term_explicit__modifier; +lean::inc(x_15); +x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); +return x_17; } else { -obj* x_19; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; -x_19 = lean::cnstr_get(x_0, 0); -lean::inc(x_19); +obj* x_18; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; +x_18 = lean::cnstr_get(x_0, 0); +lean::inc(x_18); lean::dec(x_0); -x_22 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_22); -x_24 = l_option_map___rarg(x_22, x_19); -x_25 = lean::box(3); -x_26 = l_option_get__or__else___main___rarg(x_24, x_25); -lean::inc(x_1); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_1); -x_29 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_29); -x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_1); -x_33 = l_lean_parser_term_explicit__modifier; -lean::inc(x_33); -x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); -return x_35; +x_21 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_21); +x_23 = l_option_map___rarg(x_21, x_18); +x_24 = lean::box(3); +x_25 = l_option_get__or__else___main___rarg(x_23, x_24); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_1); +x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_1); +x_31 = l_lean_parser_term_explicit__modifier; +lean::inc(x_31); +x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); +return x_33; } } } @@ -27767,21 +27535,20 @@ return x_8; obj* _init_l_lean_parser_term_explicit_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; x_0 = l_lean_parser_term_explicit__modifier_has__view; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::box(3); -lean::inc(x_3); -x_5 = lean::apply_1(x_1, x_3); -x_6 = l_lean_parser_ident__univs_has__view; -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_9 = lean::apply_1(x_7, x_3); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_5); -lean::cnstr_set(x_10, 1, x_9); -return x_10; +x_4 = lean::apply_1(x_1, x_3); +x_5 = l_lean_parser_ident__univs_has__view; +x_6 = lean::cnstr_get(x_5, 0); +lean::inc(x_6); +x_8 = lean::apply_1(x_6, x_3); +x_9 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_9, 0, x_4); +lean::cnstr_set(x_9, 1, x_8); +return x_9; } } obj* _init_l_lean_parser_term_explicit_has__view_x_27___lambda__1___closed__2() { @@ -27951,7 +27718,7 @@ return x_0; obj* _init_l_lean_parser_term_explicit_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* 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_17; obj* x_18; obj* x_19; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; x_0 = lean::mk_string("@"); x_1 = l_lean_parser_max__prec; lean::inc(x_1); @@ -27960,25 +27727,23 @@ x_4 = lean::mk_string("@@"); lean::inc(x_1); x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_1); x_7 = lean::box(0); -lean::inc(x_7); -x_9 = l_lean_parser_list_cons_tokens___rarg(x_6, x_7); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_3, x_9); -x_11 = l_lean_parser_tokens___rarg(x_10); -lean::inc(x_7); -x_13 = l_lean_parser_list_cons_tokens___rarg(x_11, x_7); -x_14 = l_lean_parser_tokens___rarg(x_13); -x_15 = l_lean_parser_ident__univs_parser_lean_parser_has__tokens; -lean::inc(x_15); -x_17 = l_lean_parser_list_cons_tokens___rarg(x_15, x_7); -x_18 = l_lean_parser_list_cons_tokens___rarg(x_14, x_17); -x_19 = l_lean_parser_tokens___rarg(x_18); -return x_19; +x_8 = l_lean_parser_list_cons_tokens___rarg(x_6, x_7); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_3, x_8); +x_10 = l_lean_parser_tokens___rarg(x_9); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_10, x_7); +x_12 = l_lean_parser_tokens___rarg(x_11); +x_13 = l_lean_parser_ident__univs_parser_lean_parser_has__tokens; +lean::inc(x_13); +x_15 = l_lean_parser_list_cons_tokens___rarg(x_13, x_7); +x_16 = l_lean_parser_list_cons_tokens___rarg(x_12, x_15); +x_17 = l_lean_parser_tokens___rarg(x_16); +return x_17; } } obj* _init_l_lean_parser_term_explicit_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; 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_30; obj* x_31; obj* x_32; obj* x_39; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_37; x_0 = lean::mk_string("@"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -28001,53 +27766,51 @@ lean::closure_set(x_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); x_13 = lean::box(0); -lean::inc(x_13); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_12); +lean::cnstr_set(x_14, 1, x_13); x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_12); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_6); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::mk_nat_obj(0u); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_17); -lean::inc(x_13); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_13); -x_21 = l_lean_parser_term_explicit__modifier; -lean::inc(x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_20); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident__univs_parser), 5, 0); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_13); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_23); -lean::cnstr_set(x_26, 1, x_25); -x_27 = l_lean_parser_term__parser__m_monad; -x_28 = l_lean_parser_term__parser__m_monad__except; -x_29 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_30 = l_lean_parser_term__parser__m_alternative; -x_31 = l_lean_parser_term_explicit; -x_32 = l_lean_parser_term_explicit_has__view; -lean::inc(x_32); -lean::inc(x_31); +lean::cnstr_set(x_15, 0, x_6); +lean::cnstr_set(x_15, 1, x_14); +x_16 = lean::mk_nat_obj(0u); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_17, 0, x_15); +lean::closure_set(x_17, 1, x_16); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_17); +lean::cnstr_set(x_18, 1, x_13); +x_19 = l_lean_parser_term_explicit__modifier; +lean::inc(x_19); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_21, 0, x_19); +lean::closure_set(x_21, 1, x_18); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident__univs_parser), 5, 0); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_22); +lean::cnstr_set(x_23, 1, x_13); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_21); +lean::cnstr_set(x_24, 1, x_23); +x_25 = l_lean_parser_term__parser__m_monad; +x_26 = l_lean_parser_term__parser__m_monad__except; +x_27 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_28 = l_lean_parser_term__parser__m_alternative; +x_29 = l_lean_parser_term_explicit; +x_30 = l_lean_parser_term_explicit_has__view; lean::inc(x_30); lean::inc(x_29); lean::inc(x_28); lean::inc(x_27); -x_39 = l_lean_parser_combinators_node_view___rarg(x_27, x_28, x_29, x_30, x_31, x_26, x_32); -return x_39; +lean::inc(x_26); +lean::inc(x_25); +x_37 = l_lean_parser_combinators_node_view___rarg(x_25, x_26, x_27, x_28, x_29, x_24, x_30); +return x_37; } } obj* _init_l_lean_parser_term_explicit_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; x_0 = lean::mk_string("@"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -28070,34 +27833,32 @@ lean::closure_set(x_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); x_13 = lean::box(0); -lean::inc(x_13); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_12); +lean::cnstr_set(x_14, 1, x_13); x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_12); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_6); -lean::cnstr_set(x_16, 1, x_15); -x_17 = lean::mk_nat_obj(0u); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_17); -lean::inc(x_13); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_18); -lean::cnstr_set(x_20, 1, x_13); -x_21 = l_lean_parser_term_explicit__modifier; -lean::inc(x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_20); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident__univs_parser), 5, 0); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_13); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_23); -lean::cnstr_set(x_26, 1, x_25); -return x_26; +lean::cnstr_set(x_15, 0, x_6); +lean::cnstr_set(x_15, 1, x_14); +x_16 = lean::mk_nat_obj(0u); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_17, 0, x_15); +lean::closure_set(x_17, 1, x_16); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_17); +lean::cnstr_set(x_18, 1, x_13); +x_19 = l_lean_parser_term_explicit__modifier; +lean::inc(x_19); +x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_21, 0, x_19); +lean::closure_set(x_21, 1, x_18); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident__univs_parser), 5, 0); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_22); +lean::cnstr_set(x_23, 1, x_13); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_21); +lean::cnstr_set(x_24, 1, x_23); +return x_24; } } obj* l_lean_parser_term_explicit_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -29425,7 +29186,7 @@ return x_21; } else { -obj* x_22; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_39; +obj* x_22; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_38; x_22 = lean::cnstr_get(x_5, 0); lean::inc(x_22); lean::dec(x_5); @@ -29434,25 +29195,24 @@ x_26 = l_lean_parser_term_type__spec_has__view; x_27 = lean::cnstr_get(x_26, 1); lean::inc(x_27); x_29 = lean::apply_1(x_27, x_22); -lean::inc(x_25); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_29); -lean::cnstr_set(x_31, 1, x_25); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_25); lean::inc(x_12); -x_33 = l_lean_parser_syntax_mk__node(x_12, x_31); +x_32 = l_lean_parser_syntax_mk__node(x_12, x_30); +x_33 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_33, 0, x_32); +lean::cnstr_set(x_33, 1, x_25); x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_25); +lean::cnstr_set(x_34, 0, x_14); +lean::cnstr_set(x_34, 1, x_33); x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_14); +lean::cnstr_set(x_35, 0, x_8); lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_8); -lean::cnstr_set(x_36, 1, x_35); -x_37 = l_lean_parser_term_let__lhs__id; -lean::inc(x_37); -x_39 = l_lean_parser_syntax_mk__node(x_37, x_36); -return x_39; +x_36 = l_lean_parser_term_let__lhs__id; +lean::inc(x_36); +x_38 = l_lean_parser_syntax_mk__node(x_36, x_35); +return x_38; } } } @@ -29647,50 +29407,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_let__lhs_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_let__lhs_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_let__lhs_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_let__lhs_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_let__lhs_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_let__lhs_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -29700,40 +29459,40 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_let__lhs_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_let__lhs_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; -x_80 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_80, 0, x_1); -return x_80; +obj* x_79; +x_79 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_79, 0, x_1); +return x_79; } else { -obj* x_81; obj* x_82; obj* x_84; obj* x_85; -x_81 = l_lean_parser_term_let__lhs__id_has__view; -x_82 = lean::cnstr_get(x_81, 0); -lean::inc(x_82); -x_84 = lean::apply_1(x_82, x_1); -x_85 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_85, 0, x_84); -return x_85; +obj* x_80; obj* x_81; obj* x_83; obj* x_84; +x_80 = l_lean_parser_term_let__lhs__id_has__view; +x_81 = lean::cnstr_get(x_80, 0); +lean::inc(x_81); +x_83 = lean::apply_1(x_81, x_1); +x_84 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_84, 0, x_83); +return x_84; } } } @@ -29745,7 +29504,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -29753,41 +29512,39 @@ x_5 = l_lean_parser_term_let__lhs__id_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_term_let__lhs; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_term_let__lhs; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -lean::inc(x_1); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_18); -lean::cnstr_set(x_22, 1, x_1); -x_23 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_23); -x_25 = l_lean_parser_syntax_mk__node(x_23, x_22); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_term_let__lhs; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -return x_29; +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_17); +lean::cnstr_set(x_20, 1, x_1); +x_21 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_21); +x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_term_let__lhs; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +return x_27; } } } @@ -30468,7 +30225,7 @@ return x_104; obj* l_lean_parser_term_let_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_40; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_38; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -30486,42 +30243,40 @@ x_14 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_14); x_16 = l_option_map___rarg(x_14, x_1); x_17 = lean::box(3); -lean::inc(x_17); -x_19 = l_option_get__or__else___main___rarg(x_16, x_17); -x_20 = l_lean_parser_term_let__lhs_has__view; -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -x_23 = lean::apply_1(x_21, x_3); +x_18 = l_option_get__or__else___main___rarg(x_16, x_17); +x_19 = l_lean_parser_term_let__lhs_has__view; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +x_22 = lean::apply_1(x_20, x_3); lean::inc(x_14); -x_25 = l_option_map___rarg(x_14, x_5); -lean::inc(x_17); -x_27 = l_option_get__or__else___main___rarg(x_25, x_17); +x_24 = l_option_map___rarg(x_14, x_5); +x_25 = l_option_get__or__else___main___rarg(x_24, x_17); lean::inc(x_14); -x_29 = l_option_map___rarg(x_14, x_9); -x_30 = l_option_get__or__else___main___rarg(x_29, x_17); -x_31 = lean::box(0); +x_27 = l_option_map___rarg(x_14, x_9); +x_28 = l_option_get__or__else___main___rarg(x_27, x_17); +x_29 = lean::box(0); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_11); +lean::cnstr_set(x_30, 1, x_29); +x_31 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_31, 0, x_28); +lean::cnstr_set(x_31, 1, x_30); x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_11); +lean::cnstr_set(x_32, 0, x_7); lean::cnstr_set(x_32, 1, x_31); x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_30); +lean::cnstr_set(x_33, 0, x_25); lean::cnstr_set(x_33, 1, x_32); x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_7); +lean::cnstr_set(x_34, 0, x_22); lean::cnstr_set(x_34, 1, x_33); x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_27); +lean::cnstr_set(x_35, 0, x_18); lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_23); -lean::cnstr_set(x_36, 1, x_35); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_19); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_lean_parser_term_let; -lean::inc(x_38); -x_40 = l_lean_parser_syntax_mk__node(x_38, x_37); -return x_40; +x_36 = l_lean_parser_term_let; +lean::inc(x_36); +x_38 = l_lean_parser_syntax_mk__node(x_36, x_35); +return x_38; } } obj* _init_l_lean_parser_term_let_has__view_x_27() { @@ -30548,7 +30303,7 @@ return x_0; obj* _init_l_lean_parser_term_let_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; x_0 = lean::mk_string("let "); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -30558,41 +30313,38 @@ x_5 = l_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens; lean::inc(x_5); x_7 = l_lean_parser_tokens___rarg(x_5); x_8 = l_lean_parser_term_opt__type_parser_lean_parser_has__tokens; -lean::inc(x_4); lean::inc(x_8); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_8, x_4); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_7, x_11); -lean::inc(x_4); -x_14 = l_lean_parser_list_cons_tokens___rarg(x_4, x_12); -x_15 = l_lean_parser_tokens___rarg(x_14); -x_16 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_4); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_8, x_4); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_7, x_10); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_4, x_11); +x_13 = l_lean_parser_tokens___rarg(x_12); +x_14 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_14); +x_16 = l_lean_parser_list_cons_tokens___rarg(x_14, x_4); lean::inc(x_16); -x_19 = l_lean_parser_list_cons_tokens___rarg(x_16, x_4); -lean::inc(x_19); -x_21 = l_lean_parser_list_cons_tokens___rarg(x_15, x_19); -x_22 = l_lean_parser_tokens___rarg(x_21); -x_23 = l_lean_parser_list_cons_tokens___rarg(x_22, x_4); -x_24 = l_lean_parser_tokens___rarg(x_23); -x_25 = lean::mk_string(" := "); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_13, x_16); +x_19 = l_lean_parser_tokens___rarg(x_18); +x_20 = l_lean_parser_list_cons_tokens___rarg(x_19, x_4); +x_21 = l_lean_parser_tokens___rarg(x_20); +x_22 = lean::mk_string(" := "); lean::inc(x_1); -x_27 = l_lean_parser_symbol_tokens___rarg(x_25, x_1); -x_28 = lean::mk_string(" in "); -x_29 = l_lean_parser_symbol_tokens___rarg(x_28, x_1); -x_30 = l_lean_parser_list_cons_tokens___rarg(x_29, x_19); -lean::inc(x_16); -x_32 = l_lean_parser_list_cons_tokens___rarg(x_16, x_30); -x_33 = l_lean_parser_list_cons_tokens___rarg(x_27, x_32); -x_34 = l_lean_parser_list_cons_tokens___rarg(x_24, x_33); -x_35 = l_lean_parser_list_cons_tokens___rarg(x_3, x_34); -x_36 = l_lean_parser_tokens___rarg(x_35); -return x_36; +x_24 = l_lean_parser_symbol_tokens___rarg(x_22, x_1); +x_25 = lean::mk_string(" in "); +x_26 = l_lean_parser_symbol_tokens___rarg(x_25, x_1); +x_27 = l_lean_parser_list_cons_tokens___rarg(x_26, x_16); +lean::inc(x_14); +x_29 = l_lean_parser_list_cons_tokens___rarg(x_14, x_27); +x_30 = l_lean_parser_list_cons_tokens___rarg(x_24, x_29); +x_31 = l_lean_parser_list_cons_tokens___rarg(x_21, x_30); +x_32 = l_lean_parser_list_cons_tokens___rarg(x_3, x_31); +x_33 = l_lean_parser_tokens___rarg(x_32); +return x_33; } } obj* _init_l_lean_parser_term_let_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_60; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_58; x_0 = lean::mk_string("let "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -30609,100 +30361,98 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many lean::closure_set(x_8, 0, x_7); x_9 = lean::box(0); x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_opt__type_parser), 5, 0); -lean::inc(x_9); +x_11 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_11, 0, x_10); +lean::cnstr_set(x_11, 1, x_9); x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_9); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_8); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_13); -x_16 = l_lean_parser_term_let__lhs__id; -lean::inc(x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_15); +lean::cnstr_set(x_12, 0, x_8); +lean::cnstr_set(x_12, 1, x_11); +x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_12); +x_15 = l_lean_parser_term_let__lhs__id; +lean::inc(x_15); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_17, 0, x_15); +lean::closure_set(x_17, 1, x_14); lean::inc(x_4); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_20, 0, x_4); -lean::inc(x_9); -lean::inc(x_20); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_19, 0, x_4); +lean::inc(x_19); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_19); +lean::cnstr_set(x_21, 1, x_9); +lean::inc(x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_9); -lean::inc(x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_18); -lean::cnstr_set(x_25, 1, x_23); +lean::cnstr_set(x_23, 0, x_17); +lean::cnstr_set(x_23, 1, x_21); lean::inc(x_4); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_4); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_9); -x_29 = l_lean_parser_term_let__lhs; -lean::inc(x_29); -x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_31, 0, x_29); -lean::closure_set(x_31, 1, x_28); -x_32 = lean::mk_string(" := "); -x_33 = l_string_trim(x_32); -lean::inc(x_33); -x_35 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_35, 0, x_33); +x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_25, 0, x_23); +lean::closure_set(x_25, 1, x_4); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_9); +x_27 = l_lean_parser_term_let__lhs; +lean::inc(x_27); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_29, 0, x_27); +lean::closure_set(x_29, 1, x_26); +x_30 = lean::mk_string(" := "); +x_31 = l_string_trim(x_30); +lean::inc(x_31); +x_33 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_33, 0, x_31); lean::inc(x_4); -x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_37, 0, x_33); -lean::closure_set(x_37, 1, x_4); -lean::closure_set(x_37, 2, x_35); -x_38 = lean::mk_string(" in "); -x_39 = l_string_trim(x_38); -lean::inc(x_39); -x_41 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_41, 0, x_39); -x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_42, 0, x_39); -lean::closure_set(x_42, 1, x_4); -lean::closure_set(x_42, 2, x_41); +x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_35, 0, x_31); +lean::closure_set(x_35, 1, x_4); +lean::closure_set(x_35, 2, x_33); +x_36 = lean::mk_string(" in "); +x_37 = l_string_trim(x_36); +lean::inc(x_37); +x_39 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_39, 0, x_37); +x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_40, 0, x_37); +lean::closure_set(x_40, 1, x_4); +lean::closure_set(x_40, 2, x_39); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_40); +lean::cnstr_set(x_41, 1, x_21); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_19); +lean::cnstr_set(x_42, 1, x_41); x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_23); +lean::cnstr_set(x_43, 0, x_35); +lean::cnstr_set(x_43, 1, x_42); x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_20); +lean::cnstr_set(x_44, 0, x_29); lean::cnstr_set(x_44, 1, x_43); x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_37); +lean::cnstr_set(x_45, 0, x_6); lean::cnstr_set(x_45, 1, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_31); -lean::cnstr_set(x_46, 1, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_6); -lean::cnstr_set(x_47, 1, x_46); -x_48 = l_lean_parser_term__parser__m_monad; -x_49 = l_lean_parser_term__parser__m_monad__except; -x_50 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_51 = l_lean_parser_term__parser__m_alternative; -x_52 = l_lean_parser_term_let; -x_53 = l_lean_parser_term_let_has__view; -lean::inc(x_53); -lean::inc(x_52); +x_46 = l_lean_parser_term__parser__m_monad; +x_47 = l_lean_parser_term__parser__m_monad__except; +x_48 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_49 = l_lean_parser_term__parser__m_alternative; +x_50 = l_lean_parser_term_let; +x_51 = l_lean_parser_term_let_has__view; lean::inc(x_51); lean::inc(x_50); lean::inc(x_49); lean::inc(x_48); -x_60 = l_lean_parser_combinators_node_view___rarg(x_48, x_49, x_50, x_51, x_52, x_47, x_53); -return x_60; +lean::inc(x_47); +lean::inc(x_46); +x_58 = l_lean_parser_combinators_node_view___rarg(x_46, x_47, x_48, x_49, x_50, x_45, x_51); +return x_58; } } obj* _init_l_lean_parser_term_let_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; x_0 = lean::mk_string("let "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -30719,81 +30469,79 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many lean::closure_set(x_8, 0, x_7); x_9 = lean::box(0); x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_opt__type_parser), 5, 0); -lean::inc(x_9); +x_11 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_11, 0, x_10); +lean::cnstr_set(x_11, 1, x_9); x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_10); -lean::cnstr_set(x_12, 1, x_9); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_8); -lean::cnstr_set(x_13, 1, x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_13); -x_16 = l_lean_parser_term_let__lhs__id; -lean::inc(x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_18, 0, x_16); -lean::closure_set(x_18, 1, x_15); +lean::cnstr_set(x_12, 0, x_8); +lean::cnstr_set(x_12, 1, x_11); +x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_12); +x_15 = l_lean_parser_term_let__lhs__id; +lean::inc(x_15); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_17, 0, x_15); +lean::closure_set(x_17, 1, x_14); lean::inc(x_4); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_20, 0, x_4); -lean::inc(x_9); -lean::inc(x_20); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_19, 0, x_4); +lean::inc(x_19); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_19); +lean::cnstr_set(x_21, 1, x_9); +lean::inc(x_21); x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_20); -lean::cnstr_set(x_23, 1, x_9); -lean::inc(x_23); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_18); -lean::cnstr_set(x_25, 1, x_23); +lean::cnstr_set(x_23, 0, x_17); +lean::cnstr_set(x_23, 1, x_21); lean::inc(x_4); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_27, 0, x_25); -lean::closure_set(x_27, 1, x_4); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_27); -lean::cnstr_set(x_28, 1, x_9); -x_29 = l_lean_parser_term_let__lhs; -lean::inc(x_29); -x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_31, 0, x_29); -lean::closure_set(x_31, 1, x_28); -x_32 = lean::mk_string(" := "); -x_33 = l_string_trim(x_32); -lean::inc(x_33); -x_35 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_35, 0, x_33); +x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_25, 0, x_23); +lean::closure_set(x_25, 1, x_4); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_9); +x_27 = l_lean_parser_term_let__lhs; +lean::inc(x_27); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_29, 0, x_27); +lean::closure_set(x_29, 1, x_26); +x_30 = lean::mk_string(" := "); +x_31 = l_string_trim(x_30); +lean::inc(x_31); +x_33 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_33, 0, x_31); lean::inc(x_4); -x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_37, 0, x_33); -lean::closure_set(x_37, 1, x_4); -lean::closure_set(x_37, 2, x_35); -x_38 = lean::mk_string(" in "); -x_39 = l_string_trim(x_38); -lean::inc(x_39); -x_41 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_41, 0, x_39); -x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_42, 0, x_39); -lean::closure_set(x_42, 1, x_4); -lean::closure_set(x_42, 2, x_41); +x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_35, 0, x_31); +lean::closure_set(x_35, 1, x_4); +lean::closure_set(x_35, 2, x_33); +x_36 = lean::mk_string(" in "); +x_37 = l_string_trim(x_36); +lean::inc(x_37); +x_39 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_39, 0, x_37); +x_40 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_40, 0, x_37); +lean::closure_set(x_40, 1, x_4); +lean::closure_set(x_40, 2, x_39); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_40); +lean::cnstr_set(x_41, 1, x_21); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_19); +lean::cnstr_set(x_42, 1, x_41); x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_23); +lean::cnstr_set(x_43, 0, x_35); +lean::cnstr_set(x_43, 1, x_42); x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_20); +lean::cnstr_set(x_44, 0, x_29); lean::cnstr_set(x_44, 1, x_43); x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_37); +lean::cnstr_set(x_45, 0, x_6); lean::cnstr_set(x_45, 1, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_31); -lean::cnstr_set(x_46, 1, x_45); -x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_6); -lean::cnstr_set(x_47, 1, x_46); -return x_47; +return x_45; } } obj* l_lean_parser_term_let_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -30827,26 +30575,22 @@ return x_8; obj* _init_l_lean_parser_term_opt__ident_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_0); -lean::cnstr_set(x_9, 1, x_3); -lean::cnstr_set(x_9, 2, x_5); -lean::cnstr_set(x_9, 3, x_0); -lean::cnstr_set(x_9, 4, x_0); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_0); -return x_10; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_0); +return x_6; } } obj* _init_l_lean_parser_term_opt__ident_has__view_x_27___lambda__1___closed__2() { @@ -31213,18 +30957,17 @@ return x_0; obj* _init_l_lean_parser_term_opt__ident_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; x_0 = lean::box(0); x_1 = lean::mk_string(" : "); x_2 = lean::mk_nat_obj(0u); x_3 = l_lean_parser_symbol_tokens___rarg(x_1, x_2); -lean::inc(x_0); -x_5 = l_lean_parser_list_cons_tokens___rarg(x_3, x_0); -x_6 = l_lean_parser_list_cons_tokens___rarg(x_0, x_5); +x_4 = l_lean_parser_list_cons_tokens___rarg(x_3, x_0); +x_5 = l_lean_parser_list_cons_tokens___rarg(x_0, x_4); +x_6 = l_lean_parser_tokens___rarg(x_5); x_7 = l_lean_parser_tokens___rarg(x_6); x_8 = l_lean_parser_tokens___rarg(x_7); -x_9 = l_lean_parser_tokens___rarg(x_8); -return x_9; +return x_8; } } obj* l_lean_parser_term_opt__ident_parser_lean_parser_has__view___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { @@ -32077,50 +31820,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_have__proof_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_have__proof_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_have__proof_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_have__proof_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_have__proof_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_have__proof_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -32130,44 +31872,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_have__proof_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_have__proof_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_term_have__from_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_term_have__from_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_term_have__term_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_term_have__term_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -32179,7 +31921,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -32187,45 +31929,43 @@ x_5 = l_lean_parser_term_have__term_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_term_have__proof; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_term_have__proof; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_term_have__from_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_term_have__proof; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_term_have__from_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_term_have__proof; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -33004,7 +32744,7 @@ return x_123; obj* l_lean_parser_term_have_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -33022,72 +32762,69 @@ x_14 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_14); x_16 = l_option_map___rarg(x_14, x_1); x_17 = lean::box(3); -lean::inc(x_17); -x_19 = l_option_get__or__else___main___rarg(x_16, x_17); -x_20 = l_lean_parser_term_have__proof_has__view; -x_21 = lean::cnstr_get(x_20, 1); -lean::inc(x_21); -x_23 = lean::apply_1(x_21, x_7); +x_18 = l_option_get__or__else___main___rarg(x_16, x_17); +x_19 = l_lean_parser_term_have__proof_has__view; +x_20 = lean::cnstr_get(x_19, 1); +lean::inc(x_20); +x_22 = lean::apply_1(x_20, x_7); lean::inc(x_14); -x_25 = l_option_map___rarg(x_14, x_9); -x_26 = l_option_get__or__else___main___rarg(x_25, x_17); -x_27 = lean::box(0); -lean::inc(x_27); +x_24 = l_option_map___rarg(x_14, x_9); +x_25 = l_option_get__or__else___main___rarg(x_24, x_17); +x_26 = lean::box(0); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_11); +lean::cnstr_set(x_27, 1, x_26); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_25); +lean::cnstr_set(x_28, 1, x_27); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_11); -lean::cnstr_set(x_29, 1, x_27); +lean::cnstr_set(x_29, 0, x_22); +lean::cnstr_set(x_29, 1, x_28); x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_26); +lean::cnstr_set(x_30, 0, x_5); lean::cnstr_set(x_30, 1, x_29); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_23); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_5); -lean::cnstr_set(x_32, 1, x_31); if (lean::obj_tag(x_3) == 0) { -obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_40; -lean::dec(x_27); -x_34 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set(x_36, 1, x_32); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_19); -lean::cnstr_set(x_37, 1, x_36); -x_38 = l_lean_parser_term_have; -lean::inc(x_38); -x_40 = l_lean_parser_syntax_mk__node(x_38, x_37); -return x_40; +obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_37; +x_31 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_31); +x_33 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_33, 0, x_31); +lean::cnstr_set(x_33, 1, x_30); +x_34 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_34, 0, x_18); +lean::cnstr_set(x_34, 1, x_33); +x_35 = l_lean_parser_term_have; +lean::inc(x_35); +x_37 = l_lean_parser_syntax_mk__node(x_35, x_34); +return x_37; } else { -obj* x_41; obj* x_44; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_56; -x_41 = lean::cnstr_get(x_3, 0); -lean::inc(x_41); +obj* x_38; obj* x_41; obj* x_42; obj* x_44; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_53; +x_38 = lean::cnstr_get(x_3, 0); +lean::inc(x_38); lean::dec(x_3); -x_44 = l_lean_parser_term_opt__ident_has__view; -x_45 = lean::cnstr_get(x_44, 1); -lean::inc(x_45); -x_47 = lean::apply_1(x_45, x_41); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_27); -x_49 = l_lean_parser_no__kind; -lean::inc(x_49); -x_51 = l_lean_parser_syntax_mk__node(x_49, x_48); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_51); -lean::cnstr_set(x_52, 1, x_32); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_19); -lean::cnstr_set(x_53, 1, x_52); -x_54 = l_lean_parser_term_have; -lean::inc(x_54); -x_56 = l_lean_parser_syntax_mk__node(x_54, x_53); -return x_56; +x_41 = l_lean_parser_term_opt__ident_has__view; +x_42 = lean::cnstr_get(x_41, 1); +lean::inc(x_42); +x_44 = lean::apply_1(x_42, x_38); +x_45 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_45, 0, x_44); +lean::cnstr_set(x_45, 1, x_26); +x_46 = l_lean_parser_no__kind; +lean::inc(x_46); +x_48 = l_lean_parser_syntax_mk__node(x_46, x_45); +x_49 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_49, 0, x_48); +lean::cnstr_set(x_49, 1, x_30); +x_50 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_50, 0, x_18); +lean::cnstr_set(x_50, 1, x_49); +x_51 = l_lean_parser_term_have; +lean::inc(x_51); +x_53 = l_lean_parser_syntax_mk__node(x_51, x_50); +return x_53; } } } @@ -33115,7 +32852,7 @@ return x_0; obj* _init_l_lean_parser_term_have_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_38; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_35; x_0 = lean::mk_string("have "); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -33125,43 +32862,40 @@ lean::inc(x_1); x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_1); x_7 = lean::box(0); x_8 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_7); lean::inc(x_8); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_8, x_7); -lean::inc(x_11); -x_13 = l_lean_parser_list_cons_tokens___rarg(x_6, x_11); -x_14 = l_lean_parser_tokens___rarg(x_13); -x_15 = lean::mk_string(", "); -x_16 = l_lean_parser_symbol_tokens___rarg(x_15, x_1); -x_17 = l_lean_parser_term_from_parser_lean_parser_has__tokens; -lean::inc(x_7); -lean::inc(x_17); -x_20 = l_lean_parser_list_cons_tokens___rarg(x_17, x_7); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_8, x_7); +lean::inc(x_10); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_6, x_10); +x_13 = l_lean_parser_tokens___rarg(x_12); +x_14 = lean::mk_string(", "); +x_15 = l_lean_parser_symbol_tokens___rarg(x_14, x_1); +x_16 = l_lean_parser_term_from_parser_lean_parser_has__tokens; lean::inc(x_16); -x_22 = l_lean_parser_list_cons_tokens___rarg(x_16, x_20); -x_23 = l_lean_parser_tokens___rarg(x_22); -lean::inc(x_7); -x_25 = l_lean_parser_list_cons_tokens___rarg(x_23, x_7); -x_26 = l_lean_parser_list_cons_tokens___rarg(x_14, x_25); -x_27 = l_lean_parser_tokens___rarg(x_26); -x_28 = l_lean_parser_list_cons_tokens___rarg(x_27, x_7); -x_29 = l_lean_parser_tokens___rarg(x_28); -x_30 = l_lean_parser_list_cons_tokens___rarg(x_16, x_11); -x_31 = l_lean_parser_list_cons_tokens___rarg(x_29, x_30); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_16, x_7); +lean::inc(x_15); +x_20 = l_lean_parser_list_cons_tokens___rarg(x_15, x_18); +x_21 = l_lean_parser_tokens___rarg(x_20); +x_22 = l_lean_parser_list_cons_tokens___rarg(x_21, x_7); +x_23 = l_lean_parser_list_cons_tokens___rarg(x_13, x_22); +x_24 = l_lean_parser_tokens___rarg(x_23); +x_25 = l_lean_parser_list_cons_tokens___rarg(x_24, x_7); +x_26 = l_lean_parser_tokens___rarg(x_25); +x_27 = l_lean_parser_list_cons_tokens___rarg(x_15, x_10); +x_28 = l_lean_parser_list_cons_tokens___rarg(x_26, x_27); lean::inc(x_8); -x_33 = l_lean_parser_list_cons_tokens___rarg(x_8, x_31); -x_34 = l_lean_parser_term_opt__ident_parser_lean_parser_has__tokens; -lean::inc(x_34); -x_36 = l_lean_parser_list_cons_tokens___rarg(x_34, x_33); -x_37 = l_lean_parser_list_cons_tokens___rarg(x_3, x_36); -x_38 = l_lean_parser_tokens___rarg(x_37); -return x_38; +x_30 = l_lean_parser_list_cons_tokens___rarg(x_8, x_28); +x_31 = l_lean_parser_term_opt__ident_parser_lean_parser_has__tokens; +lean::inc(x_31); +x_33 = l_lean_parser_list_cons_tokens___rarg(x_31, x_30); +x_34 = l_lean_parser_list_cons_tokens___rarg(x_3, x_33); +x_35 = l_lean_parser_tokens___rarg(x_34); +return x_35; } } obj* _init_l_lean_parser_term_have_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_64; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_61; x_0 = lean::mk_string("have "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -33187,98 +32921,95 @@ lean::closure_set(x_14, 0, x_10); lean::closure_set(x_14, 1, x_4); lean::closure_set(x_14, 2, x_12); x_15 = lean::box(0); -lean::inc(x_15); lean::inc(x_8); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_8); -lean::cnstr_set(x_18, 1, x_15); -lean::inc(x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_14); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_lean_parser_term_have__term; -lean::inc(x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_20); -x_24 = lean::mk_string(", "); -x_25 = l_string_trim(x_24); -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_27, 0, x_25); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_8); +lean::cnstr_set(x_17, 1, x_15); +lean::inc(x_17); +x_19 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_19, 0, x_14); +lean::cnstr_set(x_19, 1, x_17); +x_20 = l_lean_parser_term_have__term; +lean::inc(x_20); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_22, 0, x_20); +lean::closure_set(x_22, 1, x_19); +x_23 = lean::mk_string(", "); +x_24 = l_string_trim(x_23); +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_26, 0, x_24); lean::inc(x_4); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_29, 0, x_25); -lean::closure_set(x_29, 1, x_4); -lean::closure_set(x_29, 2, x_27); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_from_parser), 5, 0); -lean::inc(x_15); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_28, 0, x_24); +lean::closure_set(x_28, 1, x_4); +lean::closure_set(x_28, 2, x_26); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_from_parser), 5, 0); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_15); +lean::inc(x_28); x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_30); -lean::cnstr_set(x_32, 1, x_15); -lean::inc(x_29); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_29); -lean::cnstr_set(x_34, 1, x_32); -x_35 = l_lean_parser_term_have__from; -lean::inc(x_35); -x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_37, 0, x_35); -lean::closure_set(x_37, 1, x_34); -lean::inc(x_15); +lean::cnstr_set(x_32, 0, x_28); +lean::cnstr_set(x_32, 1, x_30); +x_33 = l_lean_parser_term_have__from; +lean::inc(x_33); +x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_35, 0, x_33); +lean::closure_set(x_35, 1, x_32); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_35); +lean::cnstr_set(x_36, 1, x_15); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_22); +lean::cnstr_set(x_37, 1, x_36); +x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_38, 0, x_37); +lean::closure_set(x_38, 1, x_4); x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_37); +lean::cnstr_set(x_39, 0, x_38); lean::cnstr_set(x_39, 1, x_15); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_23); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_41, 0, x_40); -lean::closure_set(x_41, 1, x_4); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_15); -x_43 = l_lean_parser_term_have__proof; -lean::inc(x_43); -x_45 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_45, 0, x_43); -lean::closure_set(x_45, 1, x_42); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_29); -lean::cnstr_set(x_46, 1, x_18); +x_40 = l_lean_parser_term_have__proof; +lean::inc(x_40); +x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_42, 0, x_40); +lean::closure_set(x_42, 1, x_39); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_28); +lean::cnstr_set(x_43, 1, x_17); +x_44 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_44, 0, x_42); +lean::cnstr_set(x_44, 1, x_43); +x_45 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_45, 0, x_8); +lean::cnstr_set(x_45, 1, x_44); +x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_opt__ident_parser), 5, 0); x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set(x_47, 1, x_46); +lean::cnstr_set(x_47, 0, x_46); +lean::cnstr_set(x_47, 1, x_45); x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_8); +lean::cnstr_set(x_48, 0, x_6); lean::cnstr_set(x_48, 1, x_47); -x_49 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_opt__ident_parser), 5, 0); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_48); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_6); -lean::cnstr_set(x_51, 1, x_50); -x_52 = l_lean_parser_term__parser__m_monad; -x_53 = l_lean_parser_term__parser__m_monad__except; -x_54 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_55 = l_lean_parser_term__parser__m_alternative; -x_56 = l_lean_parser_term_have; -x_57 = l_lean_parser_term_have_has__view; -lean::inc(x_57); -lean::inc(x_56); -lean::inc(x_55); +x_49 = l_lean_parser_term__parser__m_monad; +x_50 = l_lean_parser_term__parser__m_monad__except; +x_51 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_52 = l_lean_parser_term__parser__m_alternative; +x_53 = l_lean_parser_term_have; +x_54 = l_lean_parser_term_have_has__view; lean::inc(x_54); lean::inc(x_53); lean::inc(x_52); -x_64 = l_lean_parser_combinators_node_view___rarg(x_52, x_53, x_54, x_55, x_56, x_51, x_57); -return x_64; +lean::inc(x_51); +lean::inc(x_50); +lean::inc(x_49); +x_61 = l_lean_parser_combinators_node_view___rarg(x_49, x_50, x_51, x_52, x_53, x_48, x_54); +return x_61; } } obj* _init_l_lean_parser_term_have_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; x_0 = lean::mk_string("have "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -33304,79 +33035,76 @@ lean::closure_set(x_14, 0, x_10); lean::closure_set(x_14, 1, x_4); lean::closure_set(x_14, 2, x_12); x_15 = lean::box(0); -lean::inc(x_15); lean::inc(x_8); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_8); -lean::cnstr_set(x_18, 1, x_15); -lean::inc(x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_14); -lean::cnstr_set(x_20, 1, x_18); -x_21 = l_lean_parser_term_have__term; -lean::inc(x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_23, 0, x_21); -lean::closure_set(x_23, 1, x_20); -x_24 = lean::mk_string(", "); -x_25 = l_string_trim(x_24); -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_27, 0, x_25); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_8); +lean::cnstr_set(x_17, 1, x_15); +lean::inc(x_17); +x_19 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_19, 0, x_14); +lean::cnstr_set(x_19, 1, x_17); +x_20 = l_lean_parser_term_have__term; +lean::inc(x_20); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_22, 0, x_20); +lean::closure_set(x_22, 1, x_19); +x_23 = lean::mk_string(", "); +x_24 = l_string_trim(x_23); +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_26, 0, x_24); lean::inc(x_4); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_29, 0, x_25); -lean::closure_set(x_29, 1, x_4); -lean::closure_set(x_29, 2, x_27); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_from_parser), 5, 0); -lean::inc(x_15); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_28, 0, x_24); +lean::closure_set(x_28, 1, x_4); +lean::closure_set(x_28, 2, x_26); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_from_parser), 5, 0); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_15); +lean::inc(x_28); x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_30); -lean::cnstr_set(x_32, 1, x_15); -lean::inc(x_29); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_29); -lean::cnstr_set(x_34, 1, x_32); -x_35 = l_lean_parser_term_have__from; -lean::inc(x_35); -x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_37, 0, x_35); -lean::closure_set(x_37, 1, x_34); -lean::inc(x_15); +lean::cnstr_set(x_32, 0, x_28); +lean::cnstr_set(x_32, 1, x_30); +x_33 = l_lean_parser_term_have__from; +lean::inc(x_33); +x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_35, 0, x_33); +lean::closure_set(x_35, 1, x_32); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_35); +lean::cnstr_set(x_36, 1, x_15); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_22); +lean::cnstr_set(x_37, 1, x_36); +x_38 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); +lean::closure_set(x_38, 0, x_37); +lean::closure_set(x_38, 1, x_4); x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_37); +lean::cnstr_set(x_39, 0, x_38); lean::cnstr_set(x_39, 1, x_15); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_23); -lean::cnstr_set(x_40, 1, x_39); -x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_41, 0, x_40); -lean::closure_set(x_41, 1, x_4); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_15); -x_43 = l_lean_parser_term_have__proof; -lean::inc(x_43); -x_45 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_45, 0, x_43); -lean::closure_set(x_45, 1, x_42); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_29); -lean::cnstr_set(x_46, 1, x_18); +x_40 = l_lean_parser_term_have__proof; +lean::inc(x_40); +x_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_42, 0, x_40); +lean::closure_set(x_42, 1, x_39); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_28); +lean::cnstr_set(x_43, 1, x_17); +x_44 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_44, 0, x_42); +lean::cnstr_set(x_44, 1, x_43); +x_45 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_45, 0, x_8); +lean::cnstr_set(x_45, 1, x_44); +x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_opt__ident_parser), 5, 0); x_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set(x_47, 1, x_46); +lean::cnstr_set(x_47, 0, x_46); +lean::cnstr_set(x_47, 1, x_45); x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_8); +lean::cnstr_set(x_48, 0, x_6); lean::cnstr_set(x_48, 1, x_47); -x_49 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_opt__ident_parser), 5, 0); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_48); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_6); -lean::cnstr_set(x_51, 1, x_50); -return x_51; +return x_48; } } obj* l_lean_parser_term_have_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -33849,7 +33577,7 @@ return x_85; obj* l_lean_parser_term_show_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -33863,32 +33591,31 @@ x_10 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_10); x_12 = l_option_map___rarg(x_10, x_1); x_13 = lean::box(3); -lean::inc(x_13); -x_15 = l_option_get__or__else___main___rarg(x_12, x_13); +x_14 = l_option_get__or__else___main___rarg(x_12, x_13); lean::inc(x_10); -x_17 = l_option_map___rarg(x_10, x_5); -x_18 = l_option_get__or__else___main___rarg(x_17, x_13); -x_19 = l_lean_parser_term_from_has__view; -x_20 = lean::cnstr_get(x_19, 1); -lean::inc(x_20); -x_22 = lean::apply_1(x_20, x_7); -x_23 = lean::box(0); +x_16 = l_option_map___rarg(x_10, x_5); +x_17 = l_option_get__or__else___main___rarg(x_16, x_13); +x_18 = l_lean_parser_term_from_has__view; +x_19 = lean::cnstr_get(x_18, 1); +lean::inc(x_19); +x_21 = lean::apply_1(x_19, x_7); +x_22 = lean::box(0); +x_23 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_21); +lean::cnstr_set(x_23, 1, x_22); x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_22); +lean::cnstr_set(x_24, 0, x_17); lean::cnstr_set(x_24, 1, x_23); x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_18); +lean::cnstr_set(x_25, 0, x_3); lean::cnstr_set(x_25, 1, x_24); x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_3); +lean::cnstr_set(x_26, 0, x_14); lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_15); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_lean_parser_term_show; -lean::inc(x_28); -x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); -return x_30; +x_27 = l_lean_parser_term_show; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +return x_29; } } obj* _init_l_lean_parser_term_show_has__view_x_27() { @@ -34143,23 +33870,20 @@ return x_27; obj* _init_l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_4; obj* x_6; obj* x_7; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; x_0 = lean::box(0); x_1 = lean::box(3); -lean::inc(x_0); -lean::inc(x_1); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_1); +x_2 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_2, 0, x_1); +lean::cnstr_set(x_2, 1, x_0); +x_3 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_3, 0, x_2); +lean::cnstr_set(x_3, 1, x_0); +x_4 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_4, 0, x_3); lean::cnstr_set(x_4, 1, x_0); -lean::inc(x_0); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_4); -lean::cnstr_set(x_6, 1, x_0); -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_6); -lean::cnstr_set(x_7, 1, x_0); -lean::cnstr_set(x_7, 2, x_1); -return x_7; +lean::cnstr_set(x_4, 2, x_1); +return x_4; } } obj* _init_l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__2() { @@ -34183,121 +33907,117 @@ if (lean::obj_tag(x_0) == 0) { if (lean::obj_tag(x_0) == 0) { -obj* x_8; -lean::dec(x_6); -x_8 = l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_8); -return x_8; +obj* x_7; +x_7 = l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_7); +return x_7; } else { -obj* x_10; obj* x_13; obj* x_15; -x_10 = lean::cnstr_get(x_0, 0); -lean::inc(x_10); +obj* x_9; obj* x_12; obj* x_14; +x_9 = lean::cnstr_get(x_0, 0); +lean::inc(x_9); lean::dec(x_0); -x_13 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -lean::inc(x_13); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_13); -lean::cnstr_set(x_15, 1, x_6); -lean::cnstr_set(x_15, 2, x_10); -return x_15; +x_12 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; +lean::inc(x_12); +x_14 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_14, 0, x_12); +lean::cnstr_set(x_14, 1, x_6); +lean::cnstr_set(x_14, 2, x_9); +return x_14; } } else { -obj* x_16; obj* x_18; -x_16 = lean::cnstr_get(x_0, 0); -lean::inc(x_16); -x_18 = lean::cnstr_get(x_0, 1); -lean::inc(x_18); +obj* x_15; obj* x_17; +x_15 = lean::cnstr_get(x_0, 0); +lean::inc(x_15); +x_17 = lean::cnstr_get(x_0, 1); +lean::inc(x_17); lean::dec(x_0); -switch (lean::obj_tag(x_16)) { +switch (lean::obj_tag(x_15)) { case 0: { -obj* x_22; obj* x_25; -lean::dec(x_6); -x_22 = lean::cnstr_get(x_16, 0); -lean::inc(x_22); -lean::dec(x_16); -x_25 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_25, 0, x_22); -if (lean::obj_tag(x_18) == 0) +obj* x_20; obj* x_23; +x_20 = lean::cnstr_get(x_15, 0); +lean::inc(x_20); +lean::dec(x_15); +x_23 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_23, 0, x_20); +if (lean::obj_tag(x_17) == 0) { -obj* x_26; obj* x_27; obj* x_29; -x_26 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -x_27 = lean::box(3); -lean::inc(x_26); -x_29 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_29, 0, x_26); -lean::cnstr_set(x_29, 1, x_25); -lean::cnstr_set(x_29, 2, x_27); -return x_29; +obj* x_24; obj* x_25; obj* x_27; +x_24 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; +x_25 = lean::box(3); +lean::inc(x_24); +x_27 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_27, 0, x_24); +lean::cnstr_set(x_27, 1, x_23); +lean::cnstr_set(x_27, 2, x_25); +return x_27; } else { -obj* x_30; obj* x_33; obj* x_35; -x_30 = lean::cnstr_get(x_18, 0); -lean::inc(x_30); -lean::dec(x_18); -x_33 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -lean::inc(x_33); -x_35 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_35, 0, x_33); -lean::cnstr_set(x_35, 1, x_25); -lean::cnstr_set(x_35, 2, x_30); -return x_35; +obj* x_28; obj* x_31; obj* x_33; +x_28 = lean::cnstr_get(x_17, 0); +lean::inc(x_28); +lean::dec(x_17); +x_31 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; +lean::inc(x_31); +x_33 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_33, 0, x_31); +lean::cnstr_set(x_33, 1, x_23); +lean::cnstr_set(x_33, 2, x_28); +return x_33; } } case 3: { -if (lean::obj_tag(x_18) == 0) +if (lean::obj_tag(x_17) == 0) { -obj* x_37; -lean::dec(x_6); -x_37 = l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_37); -return x_37; +obj* x_34; +x_34 = l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_34); +return x_34; } else { -obj* x_39; obj* x_42; obj* x_44; -x_39 = lean::cnstr_get(x_18, 0); +obj* x_36; obj* x_39; obj* x_41; +x_36 = lean::cnstr_get(x_17, 0); +lean::inc(x_36); +lean::dec(x_17); +x_39 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; lean::inc(x_39); -lean::dec(x_18); -x_42 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -lean::inc(x_42); -x_44 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_44, 0, x_42); -lean::cnstr_set(x_44, 1, x_6); -lean::cnstr_set(x_44, 2, x_39); -return x_44; +x_41 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_41, 0, x_39); +lean::cnstr_set(x_41, 1, x_6); +lean::cnstr_set(x_41, 2, x_36); +return x_41; } } default: { -lean::dec(x_16); -if (lean::obj_tag(x_18) == 0) +lean::dec(x_15); +if (lean::obj_tag(x_17) == 0) { -obj* x_47; -lean::dec(x_6); -x_47 = l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_47); -return x_47; +obj* x_43; +x_43 = l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_43); +return x_43; } else { -obj* x_49; obj* x_52; obj* x_54; -x_49 = lean::cnstr_get(x_18, 0); -lean::inc(x_49); -lean::dec(x_18); -x_52 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -lean::inc(x_52); -x_54 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_54, 0, x_52); -lean::cnstr_set(x_54, 1, x_6); -lean::cnstr_set(x_54, 2, x_49); -return x_54; +obj* x_45; obj* x_48; obj* x_50; +x_45 = lean::cnstr_get(x_17, 0); +lean::inc(x_45); +lean::dec(x_17); +x_48 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; +lean::inc(x_48); +x_50 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_50, 0, x_48); +lean::cnstr_set(x_50, 1, x_6); +lean::cnstr_set(x_50, 2, x_45); +return x_50; } } } @@ -34305,147 +34025,147 @@ return x_54; } else { -obj* x_55; obj* x_57; obj* x_58; obj* x_61; -x_55 = lean::cnstr_get(x_5, 0); -lean::inc(x_55); +obj* x_51; obj* x_53; obj* x_54; obj* x_57; +x_51 = lean::cnstr_get(x_5, 0); +lean::inc(x_51); if (lean::is_shared(x_5)) { lean::dec(x_5); - x_57 = lean::box(0); + x_53 = lean::box(0); } else { lean::cnstr_release(x_5, 0); - x_57 = x_5; + x_53 = x_5; } -x_58 = lean::cnstr_get(x_55, 1); -lean::inc(x_58); -lean::dec(x_55); -x_61 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_tuple_has__view_x_27___spec__1(x_58); +x_54 = lean::cnstr_get(x_51, 1); +lean::inc(x_54); +lean::dec(x_51); +x_57 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_tuple_has__view_x_27___spec__1(x_54); if (lean::obj_tag(x_0) == 0) { -obj* x_63; -lean::dec(x_57); -x_63 = lean::box(0); +obj* x_59; +lean::dec(x_53); +x_59 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_64; obj* x_65; -x_64 = lean::box(3); +obj* x_60; obj* x_61; +x_60 = lean::box(3); +x_61 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_61, 0, x_57); +lean::cnstr_set(x_61, 1, x_59); +lean::cnstr_set(x_61, 2, x_60); +return x_61; +} +else +{ +obj* x_62; obj* x_65; +x_62 = lean::cnstr_get(x_0, 0); +lean::inc(x_62); +lean::dec(x_0); x_65 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_65, 0, x_61); -lean::cnstr_set(x_65, 1, x_63); -lean::cnstr_set(x_65, 2, x_64); +lean::cnstr_set(x_65, 0, x_57); +lean::cnstr_set(x_65, 1, x_59); +lean::cnstr_set(x_65, 2, x_62); return x_65; } +} else { -obj* x_66; obj* x_69; +obj* x_66; obj* x_68; x_66 = lean::cnstr_get(x_0, 0); lean::inc(x_66); +x_68 = lean::cnstr_get(x_0, 1); +lean::inc(x_68); lean::dec(x_0); -x_69 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_69, 0, x_61); -lean::cnstr_set(x_69, 1, x_63); -lean::cnstr_set(x_69, 2, x_66); -return x_69; -} -} -else -{ -obj* x_70; obj* x_72; -x_70 = lean::cnstr_get(x_0, 0); -lean::inc(x_70); -x_72 = lean::cnstr_get(x_0, 1); -lean::inc(x_72); -lean::dec(x_0); -switch (lean::obj_tag(x_70)) { +switch (lean::obj_tag(x_66)) { case 0: { -obj* x_75; obj* x_78; -x_75 = lean::cnstr_get(x_70, 0); -lean::inc(x_75); -lean::dec(x_70); -if (lean::is_scalar(x_57)) { - x_78 = lean::alloc_cnstr(1, 1, 0); +obj* x_71; obj* x_74; +x_71 = lean::cnstr_get(x_66, 0); +lean::inc(x_71); +lean::dec(x_66); +if (lean::is_scalar(x_53)) { + x_74 = lean::alloc_cnstr(1, 1, 0); } else { - x_78 = x_57; + x_74 = x_53; } -lean::cnstr_set(x_78, 0, x_75); -if (lean::obj_tag(x_72) == 0) +lean::cnstr_set(x_74, 0, x_71); +if (lean::obj_tag(x_68) == 0) { -obj* x_79; obj* x_80; -x_79 = lean::box(3); -x_80 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_80, 0, x_61); -lean::cnstr_set(x_80, 1, x_78); -lean::cnstr_set(x_80, 2, x_79); -return x_80; +obj* x_75; obj* x_76; +x_75 = lean::box(3); +x_76 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_76, 0, x_57); +lean::cnstr_set(x_76, 1, x_74); +lean::cnstr_set(x_76, 2, x_75); +return x_76; } else { -obj* x_81; obj* x_84; -x_81 = lean::cnstr_get(x_72, 0); -lean::inc(x_81); -lean::dec(x_72); -x_84 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_84, 0, x_61); -lean::cnstr_set(x_84, 1, x_78); -lean::cnstr_set(x_84, 2, x_81); -return x_84; +obj* x_77; obj* x_80; +x_77 = lean::cnstr_get(x_68, 0); +lean::inc(x_77); +lean::dec(x_68); +x_80 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_80, 0, x_57); +lean::cnstr_set(x_80, 1, x_74); +lean::cnstr_set(x_80, 2, x_77); +return x_80; } } case 3: { -obj* x_86; -lean::dec(x_57); -x_86 = lean::box(0); -if (lean::obj_tag(x_72) == 0) +obj* x_82; +lean::dec(x_53); +x_82 = lean::box(0); +if (lean::obj_tag(x_68) == 0) { -obj* x_87; obj* x_88; -x_87 = lean::box(3); -x_88 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_88, 0, x_61); -lean::cnstr_set(x_88, 1, x_86); -lean::cnstr_set(x_88, 2, x_87); -return x_88; +obj* x_83; obj* x_84; +x_83 = lean::box(3); +x_84 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_84, 0, x_57); +lean::cnstr_set(x_84, 1, x_82); +lean::cnstr_set(x_84, 2, x_83); +return x_84; } else { -obj* x_89; obj* x_92; -x_89 = lean::cnstr_get(x_72, 0); -lean::inc(x_89); -lean::dec(x_72); -x_92 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_92, 0, x_61); -lean::cnstr_set(x_92, 1, x_86); -lean::cnstr_set(x_92, 2, x_89); -return x_92; +obj* x_85; obj* x_88; +x_85 = lean::cnstr_get(x_68, 0); +lean::inc(x_85); +lean::dec(x_68); +x_88 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_88, 0, x_57); +lean::cnstr_set(x_88, 1, x_82); +lean::cnstr_set(x_88, 2, x_85); +return x_88; } } default: { -obj* x_95; -lean::dec(x_57); -lean::dec(x_70); -x_95 = lean::box(0); -if (lean::obj_tag(x_72) == 0) +obj* x_91; +lean::dec(x_53); +lean::dec(x_66); +x_91 = lean::box(0); +if (lean::obj_tag(x_68) == 0) { -obj* x_96; obj* x_97; -x_96 = lean::box(3); -x_97 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_97, 0, x_61); -lean::cnstr_set(x_97, 1, x_95); -lean::cnstr_set(x_97, 2, x_96); -return x_97; +obj* x_92; obj* x_93; +x_92 = lean::box(3); +x_93 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_93, 0, x_57); +lean::cnstr_set(x_93, 1, x_91); +lean::cnstr_set(x_93, 2, x_92); +return x_93; } else { -obj* x_98; obj* x_101; -x_98 = lean::cnstr_get(x_72, 0); -lean::inc(x_98); -lean::dec(x_72); -x_101 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_101, 0, x_61); -lean::cnstr_set(x_101, 1, x_95); -lean::cnstr_set(x_101, 2, x_98); -return x_101; +obj* x_94; obj* x_97; +x_94 = lean::cnstr_get(x_68, 0); +lean::inc(x_94); +lean::dec(x_68); +x_97 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_97, 0, x_57); +lean::cnstr_set(x_97, 1, x_91); +lean::cnstr_set(x_97, 2, x_94); +return x_97; } } } @@ -34508,121 +34228,117 @@ if (lean::obj_tag(x_1) == 0) { if (lean::obj_tag(x_1) == 0) { -obj* x_22; -lean::dec(x_20); -x_22 = l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_22); -return x_22; +obj* x_21; +x_21 = l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_21); +return x_21; } else { -obj* x_24; obj* x_27; obj* x_29; -x_24 = lean::cnstr_get(x_1, 0); -lean::inc(x_24); +obj* x_23; obj* x_26; obj* x_28; +x_23 = lean::cnstr_get(x_1, 0); +lean::inc(x_23); lean::dec(x_1); -x_27 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -lean::inc(x_27); -x_29 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_29, 0, x_27); -lean::cnstr_set(x_29, 1, x_20); -lean::cnstr_set(x_29, 2, x_24); -return x_29; +x_26 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; +lean::inc(x_26); +x_28 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_28, 0, x_26); +lean::cnstr_set(x_28, 1, x_20); +lean::cnstr_set(x_28, 2, x_23); +return x_28; } } else { -obj* x_30; obj* x_32; -x_30 = lean::cnstr_get(x_1, 0); -lean::inc(x_30); -x_32 = lean::cnstr_get(x_1, 1); -lean::inc(x_32); +obj* x_29; obj* x_31; +x_29 = lean::cnstr_get(x_1, 0); +lean::inc(x_29); +x_31 = lean::cnstr_get(x_1, 1); +lean::inc(x_31); lean::dec(x_1); -switch (lean::obj_tag(x_30)) { +switch (lean::obj_tag(x_29)) { case 0: { -obj* x_36; obj* x_39; -lean::dec(x_20); -x_36 = lean::cnstr_get(x_30, 0); -lean::inc(x_36); -lean::dec(x_30); -x_39 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_39, 0, x_36); -if (lean::obj_tag(x_32) == 0) +obj* x_34; obj* x_37; +x_34 = lean::cnstr_get(x_29, 0); +lean::inc(x_34); +lean::dec(x_29); +x_37 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_37, 0, x_34); +if (lean::obj_tag(x_31) == 0) { -obj* x_40; obj* x_41; obj* x_43; -x_40 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -x_41 = lean::box(3); -lean::inc(x_40); -x_43 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_43, 0, x_40); -lean::cnstr_set(x_43, 1, x_39); -lean::cnstr_set(x_43, 2, x_41); -return x_43; +obj* x_38; obj* x_39; obj* x_41; +x_38 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; +x_39 = lean::box(3); +lean::inc(x_38); +x_41 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_41, 0, x_38); +lean::cnstr_set(x_41, 1, x_37); +lean::cnstr_set(x_41, 2, x_39); +return x_41; } else { -obj* x_44; obj* x_47; obj* x_49; -x_44 = lean::cnstr_get(x_32, 0); -lean::inc(x_44); -lean::dec(x_32); -x_47 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -lean::inc(x_47); -x_49 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_49, 0, x_47); -lean::cnstr_set(x_49, 1, x_39); -lean::cnstr_set(x_49, 2, x_44); -return x_49; +obj* x_42; obj* x_45; obj* x_47; +x_42 = lean::cnstr_get(x_31, 0); +lean::inc(x_42); +lean::dec(x_31); +x_45 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; +lean::inc(x_45); +x_47 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_47, 0, x_45); +lean::cnstr_set(x_47, 1, x_37); +lean::cnstr_set(x_47, 2, x_42); +return x_47; } } case 3: { -if (lean::obj_tag(x_32) == 0) +if (lean::obj_tag(x_31) == 0) { -obj* x_51; -lean::dec(x_20); -x_51 = l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_51); -return x_51; +obj* x_48; +x_48 = l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_48); +return x_48; } else { -obj* x_53; obj* x_56; obj* x_58; -x_53 = lean::cnstr_get(x_32, 0); +obj* x_50; obj* x_53; obj* x_55; +x_50 = lean::cnstr_get(x_31, 0); +lean::inc(x_50); +lean::dec(x_31); +x_53 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; lean::inc(x_53); -lean::dec(x_32); -x_56 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -lean::inc(x_56); -x_58 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_58, 0, x_56); -lean::cnstr_set(x_58, 1, x_20); -lean::cnstr_set(x_58, 2, x_53); -return x_58; +x_55 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_55, 0, x_53); +lean::cnstr_set(x_55, 1, x_20); +lean::cnstr_set(x_55, 2, x_50); +return x_55; } } default: { -lean::dec(x_30); -if (lean::obj_tag(x_32) == 0) +lean::dec(x_29); +if (lean::obj_tag(x_31) == 0) { -obj* x_61; -lean::dec(x_20); -x_61 = l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_61); -return x_61; +obj* x_57; +x_57 = l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_57); +return x_57; } else { -obj* x_63; obj* x_66; obj* x_68; -x_63 = lean::cnstr_get(x_32, 0); -lean::inc(x_63); -lean::dec(x_32); -x_66 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; -lean::inc(x_66); -x_68 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_68, 0, x_66); -lean::cnstr_set(x_68, 1, x_20); -lean::cnstr_set(x_68, 2, x_63); -return x_68; +obj* x_59; obj* x_62; obj* x_64; +x_59 = lean::cnstr_get(x_31, 0); +lean::inc(x_59); +lean::dec(x_31); +x_62 = l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__1; +lean::inc(x_62); +x_64 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_64, 0, x_62); +lean::cnstr_set(x_64, 1, x_20); +lean::cnstr_set(x_64, 2, x_59); +return x_64; } } } @@ -34630,147 +34346,147 @@ return x_68; } else { -obj* x_69; obj* x_71; obj* x_72; obj* x_75; -x_69 = lean::cnstr_get(x_19, 0); -lean::inc(x_69); +obj* x_65; obj* x_67; obj* x_68; obj* x_71; +x_65 = lean::cnstr_get(x_19, 0); +lean::inc(x_65); if (lean::is_shared(x_19)) { lean::dec(x_19); - x_71 = lean::box(0); + x_67 = lean::box(0); } else { lean::cnstr_release(x_19, 0); - x_71 = x_19; + x_67 = x_19; } -x_72 = lean::cnstr_get(x_69, 1); -lean::inc(x_72); -lean::dec(x_69); -x_75 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_tuple_has__view_x_27___spec__1(x_72); +x_68 = lean::cnstr_get(x_65, 1); +lean::inc(x_68); +lean::dec(x_65); +x_71 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_tuple_has__view_x_27___spec__1(x_68); if (lean::obj_tag(x_1) == 0) { -obj* x_77; -lean::dec(x_71); -x_77 = lean::box(0); +obj* x_73; +lean::dec(x_67); +x_73 = lean::box(0); if (lean::obj_tag(x_1) == 0) { -obj* x_78; obj* x_79; -x_78 = lean::box(3); +obj* x_74; obj* x_75; +x_74 = lean::box(3); +x_75 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_75, 0, x_71); +lean::cnstr_set(x_75, 1, x_73); +lean::cnstr_set(x_75, 2, x_74); +return x_75; +} +else +{ +obj* x_76; obj* x_79; +x_76 = lean::cnstr_get(x_1, 0); +lean::inc(x_76); +lean::dec(x_1); x_79 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_79, 0, x_75); -lean::cnstr_set(x_79, 1, x_77); -lean::cnstr_set(x_79, 2, x_78); +lean::cnstr_set(x_79, 0, x_71); +lean::cnstr_set(x_79, 1, x_73); +lean::cnstr_set(x_79, 2, x_76); return x_79; } +} else { -obj* x_80; obj* x_83; +obj* x_80; obj* x_82; x_80 = lean::cnstr_get(x_1, 0); lean::inc(x_80); +x_82 = lean::cnstr_get(x_1, 1); +lean::inc(x_82); lean::dec(x_1); -x_83 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_83, 0, x_75); -lean::cnstr_set(x_83, 1, x_77); -lean::cnstr_set(x_83, 2, x_80); -return x_83; -} -} -else -{ -obj* x_84; obj* x_86; -x_84 = lean::cnstr_get(x_1, 0); -lean::inc(x_84); -x_86 = lean::cnstr_get(x_1, 1); -lean::inc(x_86); -lean::dec(x_1); -switch (lean::obj_tag(x_84)) { +switch (lean::obj_tag(x_80)) { case 0: { -obj* x_89; obj* x_92; -x_89 = lean::cnstr_get(x_84, 0); -lean::inc(x_89); -lean::dec(x_84); -if (lean::is_scalar(x_71)) { - x_92 = lean::alloc_cnstr(1, 1, 0); +obj* x_85; obj* x_88; +x_85 = lean::cnstr_get(x_80, 0); +lean::inc(x_85); +lean::dec(x_80); +if (lean::is_scalar(x_67)) { + x_88 = lean::alloc_cnstr(1, 1, 0); } else { - x_92 = x_71; + x_88 = x_67; } -lean::cnstr_set(x_92, 0, x_89); -if (lean::obj_tag(x_86) == 0) +lean::cnstr_set(x_88, 0, x_85); +if (lean::obj_tag(x_82) == 0) { -obj* x_93; obj* x_94; -x_93 = lean::box(3); -x_94 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_94, 0, x_75); -lean::cnstr_set(x_94, 1, x_92); -lean::cnstr_set(x_94, 2, x_93); -return x_94; +obj* x_89; obj* x_90; +x_89 = lean::box(3); +x_90 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_90, 0, x_71); +lean::cnstr_set(x_90, 1, x_88); +lean::cnstr_set(x_90, 2, x_89); +return x_90; } else { -obj* x_95; obj* x_98; -x_95 = lean::cnstr_get(x_86, 0); -lean::inc(x_95); -lean::dec(x_86); -x_98 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_98, 0, x_75); -lean::cnstr_set(x_98, 1, x_92); -lean::cnstr_set(x_98, 2, x_95); -return x_98; +obj* x_91; obj* x_94; +x_91 = lean::cnstr_get(x_82, 0); +lean::inc(x_91); +lean::dec(x_82); +x_94 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_94, 0, x_71); +lean::cnstr_set(x_94, 1, x_88); +lean::cnstr_set(x_94, 2, x_91); +return x_94; } } case 3: { -obj* x_100; -lean::dec(x_71); -x_100 = lean::box(0); -if (lean::obj_tag(x_86) == 0) +obj* x_96; +lean::dec(x_67); +x_96 = lean::box(0); +if (lean::obj_tag(x_82) == 0) { -obj* x_101; obj* x_102; -x_101 = lean::box(3); -x_102 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_102, 0, x_75); -lean::cnstr_set(x_102, 1, x_100); -lean::cnstr_set(x_102, 2, x_101); -return x_102; +obj* x_97; obj* x_98; +x_97 = lean::box(3); +x_98 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_98, 0, x_71); +lean::cnstr_set(x_98, 1, x_96); +lean::cnstr_set(x_98, 2, x_97); +return x_98; } else { -obj* x_103; obj* x_106; -x_103 = lean::cnstr_get(x_86, 0); -lean::inc(x_103); -lean::dec(x_86); -x_106 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_106, 0, x_75); -lean::cnstr_set(x_106, 1, x_100); -lean::cnstr_set(x_106, 2, x_103); -return x_106; +obj* x_99; obj* x_102; +x_99 = lean::cnstr_get(x_82, 0); +lean::inc(x_99); +lean::dec(x_82); +x_102 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_102, 0, x_71); +lean::cnstr_set(x_102, 1, x_96); +lean::cnstr_set(x_102, 2, x_99); +return x_102; } } default: { -obj* x_109; -lean::dec(x_84); -lean::dec(x_71); -x_109 = lean::box(0); -if (lean::obj_tag(x_86) == 0) +obj* x_105; +lean::dec(x_80); +lean::dec(x_67); +x_105 = lean::box(0); +if (lean::obj_tag(x_82) == 0) { -obj* x_110; obj* x_111; -x_110 = lean::box(3); -x_111 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_111, 0, x_75); -lean::cnstr_set(x_111, 1, x_109); -lean::cnstr_set(x_111, 2, x_110); -return x_111; +obj* x_106; obj* x_107; +x_106 = lean::box(3); +x_107 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_107, 0, x_71); +lean::cnstr_set(x_107, 1, x_105); +lean::cnstr_set(x_107, 2, x_106); +return x_107; } else { -obj* x_112; obj* x_115; -x_112 = lean::cnstr_get(x_86, 0); -lean::inc(x_112); -lean::dec(x_86); -x_115 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_115, 0, x_75); -lean::cnstr_set(x_115, 1, x_109); -lean::cnstr_set(x_115, 2, x_112); -return x_115; +obj* x_108; obj* x_111; +x_108 = lean::cnstr_get(x_82, 0); +lean::inc(x_108); +lean::dec(x_82); +x_111 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_111, 0, x_71); +lean::cnstr_set(x_111, 1, x_105); +lean::cnstr_set(x_111, 2, x_108); +return x_111; } } } @@ -34916,95 +34632,94 @@ if (lean::is_shared(x_0)) { } if (lean::obj_tag(x_4) == 0) { -obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; +obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; x_7 = l_lean_parser_term_match__equation_has__view; x_8 = lean::cnstr_get(x_7, 0); lean::inc(x_8); x_10 = lean::apply_1(x_8, x_2); x_11 = lean::box(0); -lean::inc(x_11); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_11); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_10); +lean::cnstr_set(x_12, 1, x_11); if (lean::is_scalar(x_6)) { - x_14 = lean::alloc_cnstr(1, 2, 0); + x_13 = lean::alloc_cnstr(1, 2, 0); } else { - x_14 = x_6; + x_13 = x_6; } -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_11); -return x_14; +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_11); +return x_13; } else { -obj* x_15; obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; -x_15 = lean::cnstr_get(x_4, 0); -lean::inc(x_15); -x_17 = lean::cnstr_get(x_4, 1); -lean::inc(x_17); +obj* x_14; obj* x_16; obj* x_19; obj* x_20; obj* x_22; obj* x_23; +x_14 = lean::cnstr_get(x_4, 0); +lean::inc(x_14); +x_16 = lean::cnstr_get(x_4, 1); +lean::inc(x_16); lean::dec(x_4); -x_20 = l_lean_parser_term_match__equation_has__view; -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_23 = lean::apply_1(x_21, x_2); -x_24 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_match_has__view_x_27___spec__2(x_17); -switch (lean::obj_tag(x_15)) { +x_19 = l_lean_parser_term_match__equation_has__view; +x_20 = lean::cnstr_get(x_19, 0); +lean::inc(x_20); +x_22 = lean::apply_1(x_20, x_2); +x_23 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_match_has__view_x_27___spec__2(x_16); +switch (lean::obj_tag(x_14)) { case 0: { -obj* x_25; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_25 = lean::cnstr_get(x_15, 0); -lean::inc(x_25); -lean::dec(x_15); +obj* x_24; obj* x_27; obj* x_28; obj* x_29; obj* x_30; +x_24 = lean::cnstr_get(x_14, 0); +lean::inc(x_24); +lean::dec(x_14); +x_27 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_27, 0, x_24); x_28 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_28, 0, x_25); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_23); -lean::cnstr_set(x_30, 1, x_29); +lean::cnstr_set(x_28, 0, x_27); +x_29 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_29, 0, x_22); +lean::cnstr_set(x_29, 1, x_28); if (lean::is_scalar(x_6)) { - x_31 = lean::alloc_cnstr(1, 2, 0); + x_30 = lean::alloc_cnstr(1, 2, 0); } else { - x_31 = x_6; + x_30 = x_6; } -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_24); -return x_31; +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_23); +return x_30; } case 3: { -obj* x_32; obj* x_34; obj* x_35; -x_32 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_23); -lean::cnstr_set(x_34, 1, x_32); +obj* x_31; obj* x_33; obj* x_34; +x_31 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_31); +x_33 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_33, 0, x_22); +lean::cnstr_set(x_33, 1, x_31); if (lean::is_scalar(x_6)) { - x_35 = lean::alloc_cnstr(1, 2, 0); + x_34 = lean::alloc_cnstr(1, 2, 0); } else { - x_35 = x_6; + x_34 = x_6; } -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_24); -return x_35; +lean::cnstr_set(x_34, 0, x_33); +lean::cnstr_set(x_34, 1, x_23); +return x_34; } default: { -obj* x_37; obj* x_39; obj* x_40; -lean::dec(x_15); -x_37 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_37); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_23); -lean::cnstr_set(x_39, 1, x_37); +obj* x_36; obj* x_38; obj* x_39; +lean::dec(x_14); +x_36 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_36); +x_38 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_38, 0, x_22); +lean::cnstr_set(x_38, 1, x_36); if (lean::is_scalar(x_6)) { - x_40 = lean::alloc_cnstr(1, 2, 0); + x_39 = lean::alloc_cnstr(1, 2, 0); } else { - x_40 = x_6; + x_39 = x_6; } -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_24); -return x_40; +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_23); +return x_39; } } } @@ -35174,21 +34889,20 @@ return x_35; obj* _init_l_lean_parser_term_match_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = l_lean_parser_term_match__equation_has__view; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::box(3); x_4 = lean::apply_1(x_1, x_3); x_5 = lean::box(0); -lean::inc(x_5); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_4); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_4); +lean::cnstr_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_5); -return x_8; +return x_7; } } obj* _init_l_lean_parser_term_match_has__view_x_27___lambda__1___closed__2() { @@ -36079,7 +35793,7 @@ return x_165; obj* l_lean_parser_term_match_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_35; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -36097,169 +35811,161 @@ x_14 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_14); x_16 = l_option_map___rarg(x_14, x_1); x_17 = lean::box(3); -lean::inc(x_17); -x_19 = l_option_get__or__else___main___rarg(x_16, x_17); -x_20 = l_list_map___main___at_lean_parser_term_match_has__view_x_27___spec__3(x_3); -x_21 = l_list_join___main___rarg(x_20); -x_22 = l_lean_parser_no__kind; -lean::inc(x_22); -x_24 = l_lean_parser_syntax_mk__node(x_22, x_21); +x_18 = l_option_get__or__else___main___rarg(x_16, x_17); +x_19 = l_list_map___main___at_lean_parser_term_match_has__view_x_27___spec__3(x_3); +x_20 = l_list_join___main___rarg(x_19); +x_21 = l_lean_parser_no__kind; +lean::inc(x_21); +x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); lean::inc(x_14); -x_26 = l_option_map___rarg(x_14, x_7); -lean::inc(x_17); -x_28 = l_option_get__or__else___main___rarg(x_26, x_17); -x_29 = l_list_map___main___at_lean_parser_term_match_has__view_x_27___spec__4(x_11); -x_30 = l_list_join___main___rarg(x_29); -lean::inc(x_22); -x_32 = l_lean_parser_syntax_mk__node(x_22, x_30); -x_33 = lean::box(0); -lean::inc(x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_32); -lean::cnstr_set(x_35, 1, x_33); +x_25 = l_option_map___rarg(x_14, x_7); +x_26 = l_option_get__or__else___main___rarg(x_25, x_17); +x_27 = l_list_map___main___at_lean_parser_term_match_has__view_x_27___spec__4(x_11); +x_28 = l_list_join___main___rarg(x_27); +lean::inc(x_21); +x_30 = l_lean_parser_syntax_mk__node(x_21, x_28); +x_31 = lean::box(0); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_30); +lean::cnstr_set(x_32, 1, x_31); if (lean::obj_tag(x_5) == 0) { if (lean::obj_tag(x_9) == 0) { -obj* x_38; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_48; -lean::dec(x_17); -lean::dec(x_33); -x_38 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_38); +obj* x_33; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_43; +x_33 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_33); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_33); +lean::cnstr_set(x_35, 1, x_32); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_26); +lean::cnstr_set(x_36, 1, x_35); +lean::inc(x_33); +x_38 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_38, 0, x_33); +lean::cnstr_set(x_38, 1, x_36); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_23); +lean::cnstr_set(x_39, 1, x_38); x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_38); -lean::cnstr_set(x_40, 1, x_35); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_28); -lean::cnstr_set(x_41, 1, x_40); -lean::inc(x_38); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_38); -lean::cnstr_set(x_43, 1, x_41); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_24); -lean::cnstr_set(x_44, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_19); -lean::cnstr_set(x_45, 1, x_44); -x_46 = l_lean_parser_term_match; -lean::inc(x_46); -x_48 = l_lean_parser_syntax_mk__node(x_46, x_45); -return x_48; +lean::cnstr_set(x_40, 0, x_18); +lean::cnstr_set(x_40, 1, x_39); +x_41 = l_lean_parser_term_match; +lean::inc(x_41); +x_43 = l_lean_parser_syntax_mk__node(x_41, x_40); +return x_43; } else { -obj* x_49; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_67; -x_49 = lean::cnstr_get(x_9, 0); -lean::inc(x_49); +obj* x_44; obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_62; +x_44 = lean::cnstr_get(x_9, 0); +lean::inc(x_44); lean::dec(x_9); lean::inc(x_14); -x_53 = l_option_map___rarg(x_14, x_49); -x_54 = l_option_get__or__else___main___rarg(x_53, x_17); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_33); -lean::inc(x_22); -x_57 = l_lean_parser_syntax_mk__node(x_22, x_55); +x_48 = l_option_map___rarg(x_14, x_44); +x_49 = l_option_get__or__else___main___rarg(x_48, x_17); +x_50 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_50, 0, x_49); +lean::cnstr_set(x_50, 1, x_31); +lean::inc(x_21); +x_52 = l_lean_parser_syntax_mk__node(x_21, x_50); +x_53 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_53, 0, x_52); +lean::cnstr_set(x_53, 1, x_32); +x_54 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_54, 0, x_26); +lean::cnstr_set(x_54, 1, x_53); +x_55 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_55); +x_57 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_57, 0, x_55); +lean::cnstr_set(x_57, 1, x_54); x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_57); -lean::cnstr_set(x_58, 1, x_35); +lean::cnstr_set(x_58, 0, x_23); +lean::cnstr_set(x_58, 1, x_57); x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_28); +lean::cnstr_set(x_59, 0, x_18); lean::cnstr_set(x_59, 1, x_58); -x_60 = l_lean_parser_combinators_many___rarg___closed__1; +x_60 = l_lean_parser_term_match; lean::inc(x_60); -x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_60); -lean::cnstr_set(x_62, 1, x_59); -x_63 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_63, 0, x_24); -lean::cnstr_set(x_63, 1, x_62); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_19); -lean::cnstr_set(x_64, 1, x_63); -x_65 = l_lean_parser_term_match; -lean::inc(x_65); -x_67 = l_lean_parser_syntax_mk__node(x_65, x_64); -return x_67; +x_62 = l_lean_parser_syntax_mk__node(x_60, x_59); +return x_62; } } else { -obj* x_68; obj* x_71; obj* x_72; obj* x_74; obj* x_76; obj* x_78; -x_68 = lean::cnstr_get(x_5, 0); -lean::inc(x_68); +obj* x_63; obj* x_66; obj* x_67; obj* x_69; obj* x_70; obj* x_72; +x_63 = lean::cnstr_get(x_5, 0); +lean::inc(x_63); lean::dec(x_5); -x_71 = l_lean_parser_term_type__spec_has__view; -x_72 = lean::cnstr_get(x_71, 1); -lean::inc(x_72); -x_74 = lean::apply_1(x_72, x_68); -lean::inc(x_33); -x_76 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_76, 0, x_74); -lean::cnstr_set(x_76, 1, x_33); -lean::inc(x_22); -x_78 = l_lean_parser_syntax_mk__node(x_22, x_76); +x_66 = l_lean_parser_term_type__spec_has__view; +x_67 = lean::cnstr_get(x_66, 1); +lean::inc(x_67); +x_69 = lean::apply_1(x_67, x_63); +x_70 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_70, 0, x_69); +lean::cnstr_set(x_70, 1, x_31); +lean::inc(x_21); +x_72 = l_lean_parser_syntax_mk__node(x_21, x_70); if (lean::obj_tag(x_9) == 0) { -obj* x_81; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_90; -lean::dec(x_17); -lean::dec(x_33); -x_81 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_81); -x_83 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_83, 0, x_81); -lean::cnstr_set(x_83, 1, x_35); -x_84 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_84, 0, x_28); -lean::cnstr_set(x_84, 1, x_83); -x_85 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_85, 0, x_78); -lean::cnstr_set(x_85, 1, x_84); -x_86 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_86, 0, x_24); -lean::cnstr_set(x_86, 1, x_85); -x_87 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_87, 0, x_19); -lean::cnstr_set(x_87, 1, x_86); -x_88 = l_lean_parser_term_match; -lean::inc(x_88); -x_90 = l_lean_parser_syntax_mk__node(x_88, x_87); -return x_90; +obj* x_73; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_82; +x_73 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_73); +x_75 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_75, 0, x_73); +lean::cnstr_set(x_75, 1, x_32); +x_76 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_76, 0, x_26); +lean::cnstr_set(x_76, 1, x_75); +x_77 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_77, 0, x_72); +lean::cnstr_set(x_77, 1, x_76); +x_78 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_78, 0, x_23); +lean::cnstr_set(x_78, 1, x_77); +x_79 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_79, 0, x_18); +lean::cnstr_set(x_79, 1, x_78); +x_80 = l_lean_parser_term_match; +lean::inc(x_80); +x_82 = l_lean_parser_syntax_mk__node(x_80, x_79); +return x_82; } else { -obj* x_91; obj* x_95; obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_107; -x_91 = lean::cnstr_get(x_9, 0); -lean::inc(x_91); +obj* x_83; obj* x_87; obj* x_88; obj* x_89; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_99; +x_83 = lean::cnstr_get(x_9, 0); +lean::inc(x_83); lean::dec(x_9); lean::inc(x_14); -x_95 = l_option_map___rarg(x_14, x_91); -x_96 = l_option_get__or__else___main___rarg(x_95, x_17); -x_97 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_97, 0, x_96); -lean::cnstr_set(x_97, 1, x_33); -lean::inc(x_22); -x_99 = l_lean_parser_syntax_mk__node(x_22, x_97); -x_100 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_100, 0, x_99); -lean::cnstr_set(x_100, 1, x_35); -x_101 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_101, 0, x_28); -lean::cnstr_set(x_101, 1, x_100); -x_102 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_102, 0, x_78); -lean::cnstr_set(x_102, 1, x_101); -x_103 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_103, 0, x_24); -lean::cnstr_set(x_103, 1, x_102); -x_104 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_104, 0, x_19); -lean::cnstr_set(x_104, 1, x_103); -x_105 = l_lean_parser_term_match; -lean::inc(x_105); -x_107 = l_lean_parser_syntax_mk__node(x_105, x_104); -return x_107; +x_87 = l_option_map___rarg(x_14, x_83); +x_88 = l_option_get__or__else___main___rarg(x_87, x_17); +x_89 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_89, 0, x_88); +lean::cnstr_set(x_89, 1, x_31); +lean::inc(x_21); +x_91 = l_lean_parser_syntax_mk__node(x_21, x_89); +x_92 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_92, 0, x_91); +lean::cnstr_set(x_92, 1, x_32); +x_93 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_93, 0, x_26); +lean::cnstr_set(x_93, 1, x_92); +x_94 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_94, 0, x_72); +lean::cnstr_set(x_94, 1, x_93); +x_95 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_95, 0, x_23); +lean::cnstr_set(x_95, 1, x_94); +x_96 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_96, 0, x_18); +lean::cnstr_set(x_96, 1, x_95); +x_97 = l_lean_parser_term_match; +lean::inc(x_97); +x_99 = l_lean_parser_syntax_mk__node(x_97, x_96); +return x_99; } } } @@ -36297,7 +36003,7 @@ return x_0; obj* _init_l_lean_parser_term_match_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_37; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_36; x_0 = lean::mk_string("match "); x_1 = lean::mk_nat_obj(0u); lean::inc(x_1); @@ -36319,30 +36025,29 @@ x_17 = l_lean_parser_tokens___rarg(x_15); x_18 = lean::mk_string(":="); x_19 = l_lean_parser_symbol_tokens___rarg(x_18, x_1); x_20 = lean::box(0); -lean::inc(x_20); lean::inc(x_7); -x_23 = l_lean_parser_list_cons_tokens___rarg(x_7, x_20); -x_24 = l_lean_parser_list_cons_tokens___rarg(x_19, x_23); +x_22 = l_lean_parser_list_cons_tokens___rarg(x_7, x_20); +x_23 = l_lean_parser_list_cons_tokens___rarg(x_19, x_22); lean::inc(x_9); -x_26 = l_lean_parser_list_cons_tokens___rarg(x_9, x_24); -x_27 = l_lean_parser_tokens___rarg(x_26); -x_28 = l_lean_parser_combinators_sep__by1_tokens___rarg(x_27, x_15); -x_29 = l_lean_parser_list_cons_tokens___rarg(x_28, x_20); -x_30 = l_lean_parser_list_cons_tokens___rarg(x_17, x_29); -x_31 = l_lean_parser_list_cons_tokens___rarg(x_12, x_30); -x_32 = l_lean_parser_term_opt__type_parser_lean_parser_has__tokens; -lean::inc(x_32); -x_34 = l_lean_parser_list_cons_tokens___rarg(x_32, x_31); -x_35 = l_lean_parser_list_cons_tokens___rarg(x_9, x_34); -x_36 = l_lean_parser_list_cons_tokens___rarg(x_3, x_35); -x_37 = l_lean_parser_tokens___rarg(x_36); -return x_37; +x_25 = l_lean_parser_list_cons_tokens___rarg(x_9, x_23); +x_26 = l_lean_parser_tokens___rarg(x_25); +x_27 = l_lean_parser_combinators_sep__by1_tokens___rarg(x_26, x_15); +x_28 = l_lean_parser_list_cons_tokens___rarg(x_27, x_20); +x_29 = l_lean_parser_list_cons_tokens___rarg(x_17, x_28); +x_30 = l_lean_parser_list_cons_tokens___rarg(x_12, x_29); +x_31 = l_lean_parser_term_opt__type_parser_lean_parser_has__tokens; +lean::inc(x_31); +x_33 = l_lean_parser_list_cons_tokens___rarg(x_31, x_30); +x_34 = l_lean_parser_list_cons_tokens___rarg(x_9, x_33); +x_35 = l_lean_parser_list_cons_tokens___rarg(x_3, x_34); +x_36 = l_lean_parser_tokens___rarg(x_35); +return x_36; } } obj* _init_l_lean_parser_term_match_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_14; uint8 x_15; obj* x_16; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_41; obj* x_42; obj* x_44; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_68; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_14; uint8 x_15; obj* x_16; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_67; x_0 = lean::mk_string("match "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -36408,65 +36113,64 @@ lean::closure_set(x_38, 0, x_35); lean::closure_set(x_38, 1, x_4); lean::closure_set(x_38, 2, x_37); x_39 = lean::box(0); -lean::inc(x_39); +x_40 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_40, 0, x_8); +lean::cnstr_set(x_40, 1, x_39); x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_8); -lean::cnstr_set(x_41, 1, x_39); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_38); -lean::cnstr_set(x_42, 1, x_41); +lean::cnstr_set(x_41, 0, x_38); +lean::cnstr_set(x_41, 1, x_40); lean::inc(x_19); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_19); -lean::cnstr_set(x_44, 1, x_42); -x_45 = l_lean_parser_term_match__equation; -lean::inc(x_45); -x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_47, 0, x_45); -lean::closure_set(x_47, 1, x_44); -x_48 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by1___at_lean_parser_term_match_has__view_x_27___spec__1___boxed), 8, 3); -lean::closure_set(x_48, 0, x_47); -lean::closure_set(x_48, 1, x_31); -lean::closure_set(x_48, 2, x_16); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_19); +lean::cnstr_set(x_43, 1, x_41); +x_44 = l_lean_parser_term_match__equation; +lean::inc(x_44); +x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_46, 0, x_44); +lean::closure_set(x_46, 1, x_43); +x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by1___at_lean_parser_term_match_has__view_x_27___spec__1___boxed), 8, 3); +lean::closure_set(x_47, 0, x_46); +lean::closure_set(x_47, 1, x_31); +lean::closure_set(x_47, 2, x_16); +x_48 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_48, 0, x_47); +lean::cnstr_set(x_48, 1, x_39); x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_39); +lean::cnstr_set(x_49, 0, x_33); +lean::cnstr_set(x_49, 1, x_48); x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_33); +lean::cnstr_set(x_50, 0, x_25); lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_25); -lean::cnstr_set(x_51, 1, x_50); -x_52 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_opt__type_parser), 5, 0); +x_51 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_opt__type_parser), 5, 0); +x_52 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_52, 0, x_51); +lean::cnstr_set(x_52, 1, x_50); x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_51); +lean::cnstr_set(x_53, 0, x_19); +lean::cnstr_set(x_53, 1, x_52); x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_19); +lean::cnstr_set(x_54, 0, x_6); lean::cnstr_set(x_54, 1, x_53); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_6); -lean::cnstr_set(x_55, 1, x_54); -x_56 = l_lean_parser_term__parser__m_monad; -x_57 = l_lean_parser_term__parser__m_monad__except; -x_58 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_59 = l_lean_parser_term__parser__m_alternative; -x_60 = l_lean_parser_term_match; -x_61 = l_lean_parser_term_match_has__view; -lean::inc(x_61); +x_55 = l_lean_parser_term__parser__m_monad; +x_56 = l_lean_parser_term__parser__m_monad__except; +x_57 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_58 = l_lean_parser_term__parser__m_alternative; +x_59 = l_lean_parser_term_match; +x_60 = l_lean_parser_term_match_has__view; lean::inc(x_60); lean::inc(x_59); lean::inc(x_58); lean::inc(x_57); lean::inc(x_56); -x_68 = l_lean_parser_combinators_node_view___rarg(x_56, x_57, x_58, x_59, x_60, x_55, x_61); -return x_68; +lean::inc(x_55); +x_67 = l_lean_parser_combinators_node_view___rarg(x_55, x_56, x_57, x_58, x_59, x_54, x_60); +return x_67; } } obj* _init_l_lean_parser_term_match_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_14; uint8 x_15; obj* x_16; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_41; obj* x_42; obj* x_44; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_14; uint8 x_15; obj* x_16; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; x_0 = lean::mk_string("match "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -36532,46 +36236,45 @@ lean::closure_set(x_38, 0, x_35); lean::closure_set(x_38, 1, x_4); lean::closure_set(x_38, 2, x_37); x_39 = lean::box(0); -lean::inc(x_39); +x_40 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_40, 0, x_8); +lean::cnstr_set(x_40, 1, x_39); x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_8); -lean::cnstr_set(x_41, 1, x_39); -x_42 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_42, 0, x_38); -lean::cnstr_set(x_42, 1, x_41); +lean::cnstr_set(x_41, 0, x_38); +lean::cnstr_set(x_41, 1, x_40); lean::inc(x_19); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_19); -lean::cnstr_set(x_44, 1, x_42); -x_45 = l_lean_parser_term_match__equation; -lean::inc(x_45); -x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_47, 0, x_45); -lean::closure_set(x_47, 1, x_44); -x_48 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by1___at_lean_parser_term_match_has__view_x_27___spec__1___boxed), 8, 3); -lean::closure_set(x_48, 0, x_47); -lean::closure_set(x_48, 1, x_31); -lean::closure_set(x_48, 2, x_16); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_19); +lean::cnstr_set(x_43, 1, x_41); +x_44 = l_lean_parser_term_match__equation; +lean::inc(x_44); +x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_46, 0, x_44); +lean::closure_set(x_46, 1, x_43); +x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by1___at_lean_parser_term_match_has__view_x_27___spec__1___boxed), 8, 3); +lean::closure_set(x_47, 0, x_46); +lean::closure_set(x_47, 1, x_31); +lean::closure_set(x_47, 2, x_16); +x_48 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_48, 0, x_47); +lean::cnstr_set(x_48, 1, x_39); x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_39); +lean::cnstr_set(x_49, 0, x_33); +lean::cnstr_set(x_49, 1, x_48); x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_33); +lean::cnstr_set(x_50, 0, x_25); lean::cnstr_set(x_50, 1, x_49); -x_51 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_51, 0, x_25); -lean::cnstr_set(x_51, 1, x_50); -x_52 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_opt__type_parser), 5, 0); +x_51 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_opt__type_parser), 5, 0); +x_52 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_52, 0, x_51); +lean::cnstr_set(x_52, 1, x_50); x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_51); +lean::cnstr_set(x_53, 0, x_19); +lean::cnstr_set(x_53, 1, x_52); x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_19); +lean::cnstr_set(x_54, 0, x_6); lean::cnstr_set(x_54, 1, x_53); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_6); -lean::cnstr_set(x_55, 1, x_54); -return x_55; +return x_54; } } obj* l_lean_parser_term_match_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -37444,7 +37147,7 @@ return x_137; obj* l_lean_parser_term_if_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_13; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_25; 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_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_13; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -37464,75 +37167,71 @@ x_16 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_16); x_18 = l_option_map___rarg(x_16, x_1); x_19 = lean::box(3); -lean::inc(x_19); -x_21 = l_option_get__or__else___main___rarg(x_18, x_19); +x_20 = l_option_get__or__else___main___rarg(x_18, x_19); lean::inc(x_16); -x_23 = l_option_map___rarg(x_16, x_7); -lean::inc(x_19); -x_25 = l_option_get__or__else___main___rarg(x_23, x_19); +x_22 = l_option_map___rarg(x_16, x_7); +x_23 = l_option_get__or__else___main___rarg(x_22, x_19); lean::inc(x_16); -x_27 = l_option_map___rarg(x_16, x_11); -x_28 = l_option_get__or__else___main___rarg(x_27, x_19); -x_29 = lean::box(0); -lean::inc(x_29); +x_25 = l_option_map___rarg(x_16, x_11); +x_26 = l_option_get__or__else___main___rarg(x_25, x_19); +x_27 = lean::box(0); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_13); +lean::cnstr_set(x_28, 1, x_27); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_26); +lean::cnstr_set(x_29, 1, x_28); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_9); +lean::cnstr_set(x_30, 1, x_29); x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_13); -lean::cnstr_set(x_31, 1, x_29); +lean::cnstr_set(x_31, 0, x_23); +lean::cnstr_set(x_31, 1, x_30); x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_28); +lean::cnstr_set(x_32, 0, x_5); lean::cnstr_set(x_32, 1, x_31); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_9); -lean::cnstr_set(x_33, 1, x_32); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_25); -lean::cnstr_set(x_34, 1, x_33); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_5); -lean::cnstr_set(x_35, 1, x_34); if (lean::obj_tag(x_3) == 0) { -obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_43; -lean::dec(x_29); -x_37 = l_lean_parser_combinators_many___rarg___closed__1; +obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; +x_33 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_33); +x_35 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_35, 0, x_33); +lean::cnstr_set(x_35, 1, x_32); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_20); +lean::cnstr_set(x_36, 1, x_35); +x_37 = l_lean_parser_term_if; lean::inc(x_37); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_37); -lean::cnstr_set(x_39, 1, x_35); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_21); -lean::cnstr_set(x_40, 1, x_39); -x_41 = l_lean_parser_term_if; -lean::inc(x_41); -x_43 = l_lean_parser_syntax_mk__node(x_41, x_40); -return x_43; +x_39 = l_lean_parser_syntax_mk__node(x_37, x_36); +return x_39; } else { -obj* x_44; obj* x_47; obj* x_48; obj* x_50; obj* x_51; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_59; -x_44 = lean::cnstr_get(x_3, 0); -lean::inc(x_44); +obj* x_40; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_55; +x_40 = lean::cnstr_get(x_3, 0); +lean::inc(x_40); lean::dec(x_3); -x_47 = l_lean_parser_term_opt__ident_has__view; -x_48 = lean::cnstr_get(x_47, 1); +x_43 = l_lean_parser_term_opt__ident_has__view; +x_44 = lean::cnstr_get(x_43, 1); +lean::inc(x_44); +x_46 = lean::apply_1(x_44, x_40); +x_47 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_47, 0, x_46); +lean::cnstr_set(x_47, 1, x_27); +x_48 = l_lean_parser_no__kind; lean::inc(x_48); -x_50 = lean::apply_1(x_48, x_44); +x_50 = l_lean_parser_syntax_mk__node(x_48, x_47); x_51 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_51, 0, x_50); -lean::cnstr_set(x_51, 1, x_29); -x_52 = l_lean_parser_no__kind; -lean::inc(x_52); -x_54 = l_lean_parser_syntax_mk__node(x_52, x_51); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_54); -lean::cnstr_set(x_55, 1, x_35); -x_56 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_56, 0, x_21); -lean::cnstr_set(x_56, 1, x_55); -x_57 = l_lean_parser_term_if; -lean::inc(x_57); -x_59 = l_lean_parser_syntax_mk__node(x_57, x_56); -return x_59; +lean::cnstr_set(x_51, 1, x_32); +x_52 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_52, 0, x_20); +lean::cnstr_set(x_52, 1, x_51); +x_53 = l_lean_parser_term_if; +lean::inc(x_53); +x_55 = l_lean_parser_syntax_mk__node(x_53, x_52); +return x_55; } } } @@ -37762,26 +37461,22 @@ return x_8; obj* _init_l_lean_parser_term_struct__inst__type_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_9; obj* x_10; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_0); -lean::cnstr_set(x_9, 1, x_3); -lean::cnstr_set(x_9, 2, x_5); -lean::cnstr_set(x_9, 3, x_0); -lean::cnstr_set(x_9, 4, x_0); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_0); -return x_10; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_0); +return x_6; } } obj* _init_l_lean_parser_term_struct__inst__type_has__view_x_27___lambda__1___closed__2() { @@ -38391,28 +38086,24 @@ return x_8; obj* _init_l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_9; obj* x_10; obj* x_11; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -lean::inc(x_0); -x_9 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_9, 0, x_0); -lean::cnstr_set(x_9, 1, x_3); -lean::cnstr_set(x_9, 2, x_5); -lean::cnstr_set(x_9, 3, x_0); -lean::cnstr_set(x_9, 4, x_0); -x_10 = lean::box(3); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_0); -lean::cnstr_set(x_11, 2, x_10); -return x_11; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = lean::box(3); +x_7 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_7, 0, x_5); +lean::cnstr_set(x_7, 1, x_0); +lean::cnstr_set(x_7, 2, x_6); +return x_7; } } obj* _init_l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__1___closed__2() { @@ -38584,121 +38275,117 @@ if (lean::obj_tag(x_0) == 0) { if (lean::obj_tag(x_0) == 0) { -obj* x_53; -lean::dec(x_51); -x_53 = l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__1___closed__1; -lean::inc(x_53); -return x_53; +obj* x_52; +x_52 = l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__1___closed__1; +lean::inc(x_52); +return x_52; } else { -obj* x_55; obj* x_58; obj* x_60; -x_55 = lean::cnstr_get(x_0, 0); -lean::inc(x_55); +obj* x_54; obj* x_57; obj* x_59; +x_54 = lean::cnstr_get(x_0, 0); +lean::inc(x_54); lean::dec(x_0); -x_58 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_58); -x_60 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_60, 0, x_58); -lean::cnstr_set(x_60, 1, x_51); -lean::cnstr_set(x_60, 2, x_55); -return x_60; +x_57 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +lean::inc(x_57); +x_59 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_59, 0, x_57); +lean::cnstr_set(x_59, 1, x_51); +lean::cnstr_set(x_59, 2, x_54); +return x_59; } } else { -obj* x_61; obj* x_63; -x_61 = lean::cnstr_get(x_0, 0); -lean::inc(x_61); -x_63 = lean::cnstr_get(x_0, 1); -lean::inc(x_63); +obj* x_60; obj* x_62; +x_60 = lean::cnstr_get(x_0, 0); +lean::inc(x_60); +x_62 = lean::cnstr_get(x_0, 1); +lean::inc(x_62); lean::dec(x_0); -switch (lean::obj_tag(x_61)) { +switch (lean::obj_tag(x_60)) { case 0: { -obj* x_67; obj* x_70; -lean::dec(x_51); -x_67 = lean::cnstr_get(x_61, 0); -lean::inc(x_67); -lean::dec(x_61); -x_70 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_70, 0, x_67); -if (lean::obj_tag(x_63) == 0) +obj* x_65; obj* x_68; +x_65 = lean::cnstr_get(x_60, 0); +lean::inc(x_65); +lean::dec(x_60); +x_68 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_68, 0, x_65); +if (lean::obj_tag(x_62) == 0) { -obj* x_71; obj* x_72; obj* x_74; -x_71 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -x_72 = lean::box(3); -lean::inc(x_71); -x_74 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_74, 0, x_71); -lean::cnstr_set(x_74, 1, x_70); -lean::cnstr_set(x_74, 2, x_72); -return x_74; +obj* x_69; obj* x_70; obj* x_72; +x_69 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +x_70 = lean::box(3); +lean::inc(x_69); +x_72 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_72, 0, x_69); +lean::cnstr_set(x_72, 1, x_68); +lean::cnstr_set(x_72, 2, x_70); +return x_72; } else { -obj* x_75; obj* x_78; obj* x_80; -x_75 = lean::cnstr_get(x_63, 0); -lean::inc(x_75); -lean::dec(x_63); -x_78 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_78); -x_80 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_80, 0, x_78); -lean::cnstr_set(x_80, 1, x_70); -lean::cnstr_set(x_80, 2, x_75); -return x_80; +obj* x_73; obj* x_76; obj* x_78; +x_73 = lean::cnstr_get(x_62, 0); +lean::inc(x_73); +lean::dec(x_62); +x_76 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +lean::inc(x_76); +x_78 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_78, 0, x_76); +lean::cnstr_set(x_78, 1, x_68); +lean::cnstr_set(x_78, 2, x_73); +return x_78; } } case 3: { -if (lean::obj_tag(x_63) == 0) +if (lean::obj_tag(x_62) == 0) { -obj* x_82; -lean::dec(x_51); -x_82 = l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__1___closed__1; -lean::inc(x_82); -return x_82; +obj* x_79; +x_79 = l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__1___closed__1; +lean::inc(x_79); +return x_79; } else { -obj* x_84; obj* x_87; obj* x_89; -x_84 = lean::cnstr_get(x_63, 0); +obj* x_81; obj* x_84; obj* x_86; +x_81 = lean::cnstr_get(x_62, 0); +lean::inc(x_81); +lean::dec(x_62); +x_84 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; lean::inc(x_84); -lean::dec(x_63); -x_87 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_87); -x_89 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_89, 0, x_87); -lean::cnstr_set(x_89, 1, x_51); -lean::cnstr_set(x_89, 2, x_84); -return x_89; +x_86 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_86, 0, x_84); +lean::cnstr_set(x_86, 1, x_51); +lean::cnstr_set(x_86, 2, x_81); +return x_86; } } default: { -lean::dec(x_61); -if (lean::obj_tag(x_63) == 0) +lean::dec(x_60); +if (lean::obj_tag(x_62) == 0) { -obj* x_92; -lean::dec(x_51); -x_92 = l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__1___closed__1; -lean::inc(x_92); -return x_92; +obj* x_88; +x_88 = l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__1___closed__1; +lean::inc(x_88); +return x_88; } else { -obj* x_94; obj* x_97; obj* x_99; -x_94 = lean::cnstr_get(x_63, 0); -lean::inc(x_94); -lean::dec(x_63); -x_97 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_97); -x_99 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_99, 0, x_97); -lean::cnstr_set(x_99, 1, x_51); -lean::cnstr_set(x_99, 2, x_94); -return x_99; +obj* x_90; obj* x_93; obj* x_95; +x_90 = lean::cnstr_get(x_62, 0); +lean::inc(x_90); +lean::dec(x_62); +x_93 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +lean::inc(x_93); +x_95 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_95, 0, x_93); +lean::cnstr_set(x_95, 1, x_51); +lean::cnstr_set(x_95, 2, x_90); +return x_95; } } } @@ -38909,121 +38596,117 @@ if (lean::obj_tag(x_1) == 0) { if (lean::obj_tag(x_1) == 0) { -obj* x_67; -lean::dec(x_65); -x_67 = l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__1___closed__1; -lean::inc(x_67); -return x_67; +obj* x_66; +x_66 = l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__1___closed__1; +lean::inc(x_66); +return x_66; } else { -obj* x_69; obj* x_72; obj* x_74; -x_69 = lean::cnstr_get(x_1, 0); -lean::inc(x_69); +obj* x_68; obj* x_71; obj* x_73; +x_68 = lean::cnstr_get(x_1, 0); +lean::inc(x_68); lean::dec(x_1); -x_72 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_72); -x_74 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_74, 0, x_72); -lean::cnstr_set(x_74, 1, x_65); -lean::cnstr_set(x_74, 2, x_69); -return x_74; +x_71 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +lean::inc(x_71); +x_73 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_73, 0, x_71); +lean::cnstr_set(x_73, 1, x_65); +lean::cnstr_set(x_73, 2, x_68); +return x_73; } } else { -obj* x_75; obj* x_77; -x_75 = lean::cnstr_get(x_1, 0); -lean::inc(x_75); -x_77 = lean::cnstr_get(x_1, 1); -lean::inc(x_77); +obj* x_74; obj* x_76; +x_74 = lean::cnstr_get(x_1, 0); +lean::inc(x_74); +x_76 = lean::cnstr_get(x_1, 1); +lean::inc(x_76); lean::dec(x_1); -switch (lean::obj_tag(x_75)) { +switch (lean::obj_tag(x_74)) { case 0: { -obj* x_81; obj* x_84; -lean::dec(x_65); -x_81 = lean::cnstr_get(x_75, 0); -lean::inc(x_81); -lean::dec(x_75); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_81); -if (lean::obj_tag(x_77) == 0) +obj* x_79; obj* x_82; +x_79 = lean::cnstr_get(x_74, 0); +lean::inc(x_79); +lean::dec(x_74); +x_82 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_82, 0, x_79); +if (lean::obj_tag(x_76) == 0) { -obj* x_85; obj* x_86; obj* x_88; -x_85 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -x_86 = lean::box(3); -lean::inc(x_85); -x_88 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_88, 0, x_85); -lean::cnstr_set(x_88, 1, x_84); -lean::cnstr_set(x_88, 2, x_86); -return x_88; +obj* x_83; obj* x_84; obj* x_86; +x_83 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +x_84 = lean::box(3); +lean::inc(x_83); +x_86 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_86, 0, x_83); +lean::cnstr_set(x_86, 1, x_82); +lean::cnstr_set(x_86, 2, x_84); +return x_86; } else { -obj* x_89; obj* x_92; obj* x_94; -x_89 = lean::cnstr_get(x_77, 0); -lean::inc(x_89); -lean::dec(x_77); -x_92 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_92); -x_94 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_94, 0, x_92); -lean::cnstr_set(x_94, 1, x_84); -lean::cnstr_set(x_94, 2, x_89); -return x_94; +obj* x_87; obj* x_90; obj* x_92; +x_87 = lean::cnstr_get(x_76, 0); +lean::inc(x_87); +lean::dec(x_76); +x_90 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +lean::inc(x_90); +x_92 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_92, 0, x_90); +lean::cnstr_set(x_92, 1, x_82); +lean::cnstr_set(x_92, 2, x_87); +return x_92; } } case 3: { -if (lean::obj_tag(x_77) == 0) +if (lean::obj_tag(x_76) == 0) { -obj* x_96; -lean::dec(x_65); -x_96 = l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__1___closed__1; -lean::inc(x_96); -return x_96; +obj* x_93; +x_93 = l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__1___closed__1; +lean::inc(x_93); +return x_93; } else { -obj* x_98; obj* x_101; obj* x_103; -x_98 = lean::cnstr_get(x_77, 0); +obj* x_95; obj* x_98; obj* x_100; +x_95 = lean::cnstr_get(x_76, 0); +lean::inc(x_95); +lean::dec(x_76); +x_98 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; lean::inc(x_98); -lean::dec(x_77); -x_101 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_101); -x_103 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_103, 0, x_101); -lean::cnstr_set(x_103, 1, x_65); -lean::cnstr_set(x_103, 2, x_98); -return x_103; +x_100 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_100, 0, x_98); +lean::cnstr_set(x_100, 1, x_65); +lean::cnstr_set(x_100, 2, x_95); +return x_100; } } default: { -lean::dec(x_75); -if (lean::obj_tag(x_77) == 0) +lean::dec(x_74); +if (lean::obj_tag(x_76) == 0) { -obj* x_106; -lean::dec(x_65); -x_106 = l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__1___closed__1; -lean::inc(x_106); -return x_106; +obj* x_102; +x_102 = l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__1___closed__1; +lean::inc(x_102); +return x_102; } else { -obj* x_108; obj* x_111; obj* x_113; -x_108 = lean::cnstr_get(x_77, 0); -lean::inc(x_108); -lean::dec(x_77); -x_111 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; -lean::inc(x_111); -x_113 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_113, 0, x_111); -lean::cnstr_set(x_113, 1, x_65); -lean::cnstr_set(x_113, 2, x_108); -return x_113; +obj* x_104; obj* x_107; obj* x_109; +x_104 = lean::cnstr_get(x_76, 0); +lean::inc(x_104); +lean::dec(x_76); +x_107 = l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +lean::inc(x_107); +x_109 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_109, 0, x_107); +lean::cnstr_set(x_109, 1, x_65); +lean::cnstr_set(x_109, 2, x_104); +return x_109; } } } @@ -39520,28 +39203,27 @@ return x_16; } else { -obj* x_17; obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; +obj* x_17; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; x_17 = lean::cnstr_get(x_3, 0); lean::inc(x_17); lean::dec(x_3); x_20 = lean::box(0); -lean::inc(x_20); -x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_17); -lean::cnstr_set(x_22, 1, x_20); -x_23 = l_lean_parser_no__kind; -lean::inc(x_23); -x_25 = l_lean_parser_syntax_mk__node(x_23, x_22); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_17); +lean::cnstr_set(x_21, 1, x_20); +x_22 = l_lean_parser_no__kind; +lean::inc(x_22); +x_24 = l_lean_parser_syntax_mk__node(x_22, x_21); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_20); x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_20); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_10); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_lean_parser_term_struct__inst__source; -lean::inc(x_28); -x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); -return x_30; +lean::cnstr_set(x_26, 0, x_10); +lean::cnstr_set(x_26, 1, x_25); +x_27 = l_lean_parser_term_struct__inst__source; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +return x_29; } } } @@ -39740,50 +39422,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_struct__inst__item_has__view_x_27___lambda__1___closed__1; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_struct__inst__item_has__view_x_27___lambda__1___closed__1; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_struct__inst__item_has__view_x_27___lambda__1___closed__1; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_struct__inst__item_has__view_x_27___lambda__1___closed__1; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_struct__inst__item_has__view_x_27___lambda__1___closed__1; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_struct__inst__item_has__view_x_27___lambda__1___closed__1; +lean::inc(x_69); +return x_69; } } } @@ -39793,44 +39474,44 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_struct__inst__item_has__view_x_27___lambda__1___closed__1; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_struct__inst__item_has__view_x_27___lambda__1___closed__1; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_term_struct__inst__source_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_term_struct__inst__source_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { -obj* x_85; obj* x_86; obj* x_88; obj* x_89; -x_85 = l_lean_parser_term_struct__inst__field_has__view; -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::apply_1(x_86, x_1); -x_89 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_89, 0, x_88); -return x_89; +obj* x_84; obj* x_85; obj* x_87; obj* x_88; +x_84 = l_lean_parser_term_struct__inst__field_has__view; +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::apply_1(x_85, x_1); +x_88 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_88, 0, x_87); +return x_88; } } } @@ -39842,7 +39523,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -39850,45 +39531,43 @@ x_5 = l_lean_parser_term_struct__inst__field_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_term_struct__inst__item; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_term_struct__inst__item; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_term_struct__inst__source_has__view; -x_22 = lean::cnstr_get(x_21, 1); -lean::inc(x_22); -x_24 = lean::apply_1(x_22, x_18); -lean::inc(x_1); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_24); -lean::cnstr_set(x_26, 1, x_1); -x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_27); -x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_1); -x_31 = l_lean_parser_term_struct__inst__item; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +x_20 = l_lean_parser_term_struct__inst__source_has__view; +x_21 = lean::cnstr_get(x_20, 1); +lean::inc(x_21); +x_23 = lean::apply_1(x_21, x_17); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_1); +x_25 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_1); +x_29 = l_lean_parser_term_struct__inst__item; +lean::inc(x_29); +x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); +return x_31; } } } @@ -39955,95 +39634,94 @@ if (lean::is_shared(x_0)) { } if (lean::obj_tag(x_4) == 0) { -obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; +obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; x_7 = l_lean_parser_term_struct__inst__item_has__view; x_8 = lean::cnstr_get(x_7, 0); lean::inc(x_8); x_10 = lean::apply_1(x_8, x_2); x_11 = lean::box(0); -lean::inc(x_11); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_11); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_10); +lean::cnstr_set(x_12, 1, x_11); if (lean::is_scalar(x_6)) { - x_14 = lean::alloc_cnstr(1, 2, 0); + x_13 = lean::alloc_cnstr(1, 2, 0); } else { - x_14 = x_6; + x_13 = x_6; } -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_11); -return x_14; +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_11); +return x_13; } else { -obj* x_15; obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_24; -x_15 = lean::cnstr_get(x_4, 0); -lean::inc(x_15); -x_17 = lean::cnstr_get(x_4, 1); -lean::inc(x_17); +obj* x_14; obj* x_16; obj* x_19; obj* x_20; obj* x_22; obj* x_23; +x_14 = lean::cnstr_get(x_4, 0); +lean::inc(x_14); +x_16 = lean::cnstr_get(x_4, 1); +lean::inc(x_16); lean::dec(x_4); -x_20 = l_lean_parser_term_struct__inst__item_has__view; -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_23 = lean::apply_1(x_21, x_2); -x_24 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_struct__inst_has__view_x_27___spec__1(x_17); -switch (lean::obj_tag(x_15)) { +x_19 = l_lean_parser_term_struct__inst__item_has__view; +x_20 = lean::cnstr_get(x_19, 0); +lean::inc(x_20); +x_22 = lean::apply_1(x_20, x_2); +x_23 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_struct__inst_has__view_x_27___spec__1(x_16); +switch (lean::obj_tag(x_14)) { case 0: { -obj* x_25; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_25 = lean::cnstr_get(x_15, 0); -lean::inc(x_25); -lean::dec(x_15); +obj* x_24; obj* x_27; obj* x_28; obj* x_29; obj* x_30; +x_24 = lean::cnstr_get(x_14, 0); +lean::inc(x_24); +lean::dec(x_14); +x_27 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_27, 0, x_24); x_28 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_28, 0, x_25); -x_29 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_29, 0, x_28); -x_30 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_30, 0, x_23); -lean::cnstr_set(x_30, 1, x_29); +lean::cnstr_set(x_28, 0, x_27); +x_29 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_29, 0, x_22); +lean::cnstr_set(x_29, 1, x_28); if (lean::is_scalar(x_6)) { - x_31 = lean::alloc_cnstr(1, 2, 0); + x_30 = lean::alloc_cnstr(1, 2, 0); } else { - x_31 = x_6; + x_30 = x_6; } -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_24); -return x_31; +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_23); +return x_30; } case 3: { -obj* x_32; obj* x_34; obj* x_35; -x_32 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_32); -x_34 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_34, 0, x_23); -lean::cnstr_set(x_34, 1, x_32); +obj* x_31; obj* x_33; obj* x_34; +x_31 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_31); +x_33 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_33, 0, x_22); +lean::cnstr_set(x_33, 1, x_31); if (lean::is_scalar(x_6)) { - x_35 = lean::alloc_cnstr(1, 2, 0); + x_34 = lean::alloc_cnstr(1, 2, 0); } else { - x_35 = x_6; + x_34 = x_6; } -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_24); -return x_35; +lean::cnstr_set(x_34, 0, x_33); +lean::cnstr_set(x_34, 1, x_23); +return x_34; } default: { -obj* x_37; obj* x_39; obj* x_40; -lean::dec(x_15); -x_37 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; -lean::inc(x_37); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_23); -lean::cnstr_set(x_39, 1, x_37); +obj* x_36; obj* x_38; obj* x_39; +lean::dec(x_14); +x_36 = l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +lean::inc(x_36); +x_38 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_38, 0, x_22); +lean::cnstr_set(x_38, 1, x_36); if (lean::is_scalar(x_6)) { - x_40 = lean::alloc_cnstr(1, 2, 0); + x_39 = lean::alloc_cnstr(1, 2, 0); } else { - x_40 = x_6; + x_39 = x_6; } -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_24); -return x_40; +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_23); +return x_39; } } } @@ -40137,21 +39815,20 @@ return x_35; obj* _init_l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = l_lean_parser_term_struct__inst__item_has__view; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::box(3); x_4 = lean::apply_1(x_1, x_3); x_5 = lean::box(0); -lean::inc(x_5); -x_7 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_7, 0, x_4); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_4); +lean::cnstr_set(x_6, 1, x_5); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); lean::cnstr_set(x_7, 1, x_5); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_5); -return x_8; +return x_7; } } obj* _init_l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__2() { @@ -40465,135 +40142,134 @@ lean::dec(x_88); switch (lean::obj_tag(x_102)) { case 0: { -obj* x_106; obj* x_109; obj* x_110; obj* x_112; -lean::dec(x_98); -x_106 = lean::cnstr_get(x_102, 0); -lean::inc(x_106); +obj* x_105; obj* x_108; obj* x_109; obj* x_111; +x_105 = lean::cnstr_get(x_102, 0); +lean::inc(x_105); lean::dec(x_102); -x_109 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_109, 0, x_106); -x_110 = l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__1; -lean::inc(x_110); -x_112 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_112, 0, x_5); -lean::cnstr_set(x_112, 1, x_23); -lean::cnstr_set(x_112, 2, x_60); -lean::cnstr_set(x_112, 3, x_110); -lean::cnstr_set(x_112, 4, x_109); -return x_112; +x_108 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_108, 0, x_105); +x_109 = l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__1; +lean::inc(x_109); +x_111 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_111, 0, x_5); +lean::cnstr_set(x_111, 1, x_23); +lean::cnstr_set(x_111, 2, x_60); +lean::cnstr_set(x_111, 3, x_109); +lean::cnstr_set(x_111, 4, x_108); +return x_111; } case 3: { -obj* x_113; obj* x_115; -x_113 = l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__1; -lean::inc(x_113); -x_115 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_115, 0, x_5); -lean::cnstr_set(x_115, 1, x_23); -lean::cnstr_set(x_115, 2, x_60); -lean::cnstr_set(x_115, 3, x_113); -lean::cnstr_set(x_115, 4, x_98); -return x_115; +obj* x_112; obj* x_114; +x_112 = l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__1; +lean::inc(x_112); +x_114 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_114, 0, x_5); +lean::cnstr_set(x_114, 1, x_23); +lean::cnstr_set(x_114, 2, x_60); +lean::cnstr_set(x_114, 3, x_112); +lean::cnstr_set(x_114, 4, x_98); +return x_114; } default: { -obj* x_117; obj* x_119; +obj* x_116; obj* x_118; lean::dec(x_102); -x_117 = l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__1; -lean::inc(x_117); -x_119 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_119, 0, x_5); -lean::cnstr_set(x_119, 1, x_23); -lean::cnstr_set(x_119, 2, x_60); -lean::cnstr_set(x_119, 3, x_117); -lean::cnstr_set(x_119, 4, x_98); -return x_119; +x_116 = l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__1; +lean::inc(x_116); +x_118 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_118, 0, x_5); +lean::cnstr_set(x_118, 1, x_23); +lean::cnstr_set(x_118, 2, x_60); +lean::cnstr_set(x_118, 3, x_116); +lean::cnstr_set(x_118, 4, x_98); +return x_118; } } } } else { -obj* x_120; obj* x_122; obj* x_123; obj* x_126; -x_120 = lean::cnstr_get(x_97, 0); -lean::inc(x_120); +obj* x_119; obj* x_121; obj* x_122; obj* x_125; +x_119 = lean::cnstr_get(x_97, 0); +lean::inc(x_119); if (lean::is_shared(x_97)) { lean::dec(x_97); - x_122 = lean::box(0); + x_121 = lean::box(0); } else { lean::cnstr_release(x_97, 0); - x_122 = x_97; + x_121 = x_97; } -x_123 = lean::cnstr_get(x_120, 1); -lean::inc(x_123); -lean::dec(x_120); -x_126 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_struct__inst_has__view_x_27___spec__1(x_123); +x_122 = lean::cnstr_get(x_119, 1); +lean::inc(x_122); +lean::dec(x_119); +x_125 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_struct__inst_has__view_x_27___spec__1(x_122); if (lean::obj_tag(x_88) == 0) { -obj* x_128; obj* x_129; -lean::dec(x_122); -x_128 = lean::box(0); -x_129 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_129, 0, x_5); -lean::cnstr_set(x_129, 1, x_23); -lean::cnstr_set(x_129, 2, x_60); -lean::cnstr_set(x_129, 3, x_126); -lean::cnstr_set(x_129, 4, x_128); -return x_129; +obj* x_127; obj* x_128; +lean::dec(x_121); +x_127 = lean::box(0); +x_128 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_128, 0, x_5); +lean::cnstr_set(x_128, 1, x_23); +lean::cnstr_set(x_128, 2, x_60); +lean::cnstr_set(x_128, 3, x_125); +lean::cnstr_set(x_128, 4, x_127); +return x_128; } else { -obj* x_130; -x_130 = lean::cnstr_get(x_88, 0); -lean::inc(x_130); +obj* x_129; +x_129 = lean::cnstr_get(x_88, 0); +lean::inc(x_129); lean::dec(x_88); -switch (lean::obj_tag(x_130)) { +switch (lean::obj_tag(x_129)) { case 0: { -obj* x_133; obj* x_136; obj* x_137; -x_133 = lean::cnstr_get(x_130, 0); -lean::inc(x_133); -lean::dec(x_130); -if (lean::is_scalar(x_122)) { - x_136 = lean::alloc_cnstr(1, 1, 0); +obj* x_132; obj* x_135; obj* x_136; +x_132 = lean::cnstr_get(x_129, 0); +lean::inc(x_132); +lean::dec(x_129); +if (lean::is_scalar(x_121)) { + x_135 = lean::alloc_cnstr(1, 1, 0); } else { - x_136 = x_122; + x_135 = x_121; } -lean::cnstr_set(x_136, 0, x_133); -x_137 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_137, 0, x_5); -lean::cnstr_set(x_137, 1, x_23); -lean::cnstr_set(x_137, 2, x_60); -lean::cnstr_set(x_137, 3, x_126); -lean::cnstr_set(x_137, 4, x_136); -return x_137; +lean::cnstr_set(x_135, 0, x_132); +x_136 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_136, 0, x_5); +lean::cnstr_set(x_136, 1, x_23); +lean::cnstr_set(x_136, 2, x_60); +lean::cnstr_set(x_136, 3, x_125); +lean::cnstr_set(x_136, 4, x_135); +return x_136; } case 3: { -obj* x_139; obj* x_140; -lean::dec(x_122); -x_139 = lean::box(0); -x_140 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_140, 0, x_5); -lean::cnstr_set(x_140, 1, x_23); -lean::cnstr_set(x_140, 2, x_60); -lean::cnstr_set(x_140, 3, x_126); -lean::cnstr_set(x_140, 4, x_139); -return x_140; +obj* x_138; obj* x_139; +lean::dec(x_121); +x_138 = lean::box(0); +x_139 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_139, 0, x_5); +lean::cnstr_set(x_139, 1, x_23); +lean::cnstr_set(x_139, 2, x_60); +lean::cnstr_set(x_139, 3, x_125); +lean::cnstr_set(x_139, 4, x_138); +return x_139; } default: { -obj* x_143; obj* x_144; -lean::dec(x_122); -lean::dec(x_130); -x_143 = lean::box(0); -x_144 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_144, 0, x_5); -lean::cnstr_set(x_144, 1, x_23); -lean::cnstr_set(x_144, 2, x_60); -lean::cnstr_set(x_144, 3, x_126); -lean::cnstr_set(x_144, 4, x_143); -return x_144; +obj* x_142; obj* x_143; +lean::dec(x_121); +lean::dec(x_129); +x_142 = lean::box(0); +x_143 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_143, 0, x_5); +lean::cnstr_set(x_143, 1, x_23); +lean::cnstr_set(x_143, 2, x_60); +lean::cnstr_set(x_143, 3, x_125); +lean::cnstr_set(x_143, 4, x_142); +return x_143; } } } @@ -40923,135 +40599,134 @@ lean::dec(x_102); switch (lean::obj_tag(x_116)) { case 0: { -obj* x_120; obj* x_123; obj* x_124; obj* x_126; -lean::dec(x_112); -x_120 = lean::cnstr_get(x_116, 0); -lean::inc(x_120); +obj* x_119; obj* x_122; obj* x_123; obj* x_125; +x_119 = lean::cnstr_get(x_116, 0); +lean::inc(x_119); lean::dec(x_116); -x_123 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_123, 0, x_120); -x_124 = l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__1; -lean::inc(x_124); -x_126 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_126, 0, x_19); -lean::cnstr_set(x_126, 1, x_37); -lean::cnstr_set(x_126, 2, x_74); -lean::cnstr_set(x_126, 3, x_124); -lean::cnstr_set(x_126, 4, x_123); -return x_126; +x_122 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_122, 0, x_119); +x_123 = l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__1; +lean::inc(x_123); +x_125 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_125, 0, x_19); +lean::cnstr_set(x_125, 1, x_37); +lean::cnstr_set(x_125, 2, x_74); +lean::cnstr_set(x_125, 3, x_123); +lean::cnstr_set(x_125, 4, x_122); +return x_125; } case 3: { -obj* x_127; obj* x_129; -x_127 = l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__1; -lean::inc(x_127); -x_129 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_129, 0, x_19); -lean::cnstr_set(x_129, 1, x_37); -lean::cnstr_set(x_129, 2, x_74); -lean::cnstr_set(x_129, 3, x_127); -lean::cnstr_set(x_129, 4, x_112); -return x_129; +obj* x_126; obj* x_128; +x_126 = l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__1; +lean::inc(x_126); +x_128 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_128, 0, x_19); +lean::cnstr_set(x_128, 1, x_37); +lean::cnstr_set(x_128, 2, x_74); +lean::cnstr_set(x_128, 3, x_126); +lean::cnstr_set(x_128, 4, x_112); +return x_128; } default: { -obj* x_131; obj* x_133; +obj* x_130; obj* x_132; lean::dec(x_116); -x_131 = l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__1; -lean::inc(x_131); -x_133 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_133, 0, x_19); -lean::cnstr_set(x_133, 1, x_37); -lean::cnstr_set(x_133, 2, x_74); -lean::cnstr_set(x_133, 3, x_131); -lean::cnstr_set(x_133, 4, x_112); -return x_133; +x_130 = l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__1; +lean::inc(x_130); +x_132 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_132, 0, x_19); +lean::cnstr_set(x_132, 1, x_37); +lean::cnstr_set(x_132, 2, x_74); +lean::cnstr_set(x_132, 3, x_130); +lean::cnstr_set(x_132, 4, x_112); +return x_132; } } } } else { -obj* x_134; obj* x_136; obj* x_137; obj* x_140; -x_134 = lean::cnstr_get(x_111, 0); -lean::inc(x_134); +obj* x_133; obj* x_135; obj* x_136; obj* x_139; +x_133 = lean::cnstr_get(x_111, 0); +lean::inc(x_133); if (lean::is_shared(x_111)) { lean::dec(x_111); - x_136 = lean::box(0); + x_135 = lean::box(0); } else { lean::cnstr_release(x_111, 0); - x_136 = x_111; + x_135 = x_111; } -x_137 = lean::cnstr_get(x_134, 1); -lean::inc(x_137); -lean::dec(x_134); -x_140 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_struct__inst_has__view_x_27___spec__1(x_137); +x_136 = lean::cnstr_get(x_133, 1); +lean::inc(x_136); +lean::dec(x_133); +x_139 = l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_term_struct__inst_has__view_x_27___spec__1(x_136); if (lean::obj_tag(x_102) == 0) { -obj* x_142; obj* x_143; -lean::dec(x_136); -x_142 = lean::box(0); -x_143 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_143, 0, x_19); -lean::cnstr_set(x_143, 1, x_37); -lean::cnstr_set(x_143, 2, x_74); -lean::cnstr_set(x_143, 3, x_140); -lean::cnstr_set(x_143, 4, x_142); -return x_143; +obj* x_141; obj* x_142; +lean::dec(x_135); +x_141 = lean::box(0); +x_142 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_142, 0, x_19); +lean::cnstr_set(x_142, 1, x_37); +lean::cnstr_set(x_142, 2, x_74); +lean::cnstr_set(x_142, 3, x_139); +lean::cnstr_set(x_142, 4, x_141); +return x_142; } else { -obj* x_144; -x_144 = lean::cnstr_get(x_102, 0); -lean::inc(x_144); +obj* x_143; +x_143 = lean::cnstr_get(x_102, 0); +lean::inc(x_143); lean::dec(x_102); -switch (lean::obj_tag(x_144)) { +switch (lean::obj_tag(x_143)) { case 0: { -obj* x_147; obj* x_150; obj* x_151; -x_147 = lean::cnstr_get(x_144, 0); -lean::inc(x_147); -lean::dec(x_144); -if (lean::is_scalar(x_136)) { - x_150 = lean::alloc_cnstr(1, 1, 0); +obj* x_146; obj* x_149; obj* x_150; +x_146 = lean::cnstr_get(x_143, 0); +lean::inc(x_146); +lean::dec(x_143); +if (lean::is_scalar(x_135)) { + x_149 = lean::alloc_cnstr(1, 1, 0); } else { - x_150 = x_136; + x_149 = x_135; } -lean::cnstr_set(x_150, 0, x_147); -x_151 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_151, 0, x_19); -lean::cnstr_set(x_151, 1, x_37); -lean::cnstr_set(x_151, 2, x_74); -lean::cnstr_set(x_151, 3, x_140); -lean::cnstr_set(x_151, 4, x_150); -return x_151; +lean::cnstr_set(x_149, 0, x_146); +x_150 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_150, 0, x_19); +lean::cnstr_set(x_150, 1, x_37); +lean::cnstr_set(x_150, 2, x_74); +lean::cnstr_set(x_150, 3, x_139); +lean::cnstr_set(x_150, 4, x_149); +return x_150; } case 3: { -obj* x_153; obj* x_154; -lean::dec(x_136); -x_153 = lean::box(0); -x_154 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_154, 0, x_19); -lean::cnstr_set(x_154, 1, x_37); -lean::cnstr_set(x_154, 2, x_74); -lean::cnstr_set(x_154, 3, x_140); -lean::cnstr_set(x_154, 4, x_153); -return x_154; +obj* x_152; obj* x_153; +lean::dec(x_135); +x_152 = lean::box(0); +x_153 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_153, 0, x_19); +lean::cnstr_set(x_153, 1, x_37); +lean::cnstr_set(x_153, 2, x_74); +lean::cnstr_set(x_153, 3, x_139); +lean::cnstr_set(x_153, 4, x_152); +return x_153; } default: { -obj* x_157; obj* x_158; -lean::dec(x_144); -lean::dec(x_136); -x_157 = lean::box(0); -x_158 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_158, 0, x_19); -lean::cnstr_set(x_158, 1, x_37); -lean::cnstr_set(x_158, 2, x_74); -lean::cnstr_set(x_158, 3, x_140); -lean::cnstr_set(x_158, 4, x_157); -return x_158; +obj* x_156; obj* x_157; +lean::dec(x_143); +lean::dec(x_135); +x_156 = lean::box(0); +x_157 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_157, 0, x_19); +lean::cnstr_set(x_157, 1, x_37); +lean::cnstr_set(x_157, 2, x_74); +lean::cnstr_set(x_157, 3, x_139); +lean::cnstr_set(x_157, 4, x_156); +return x_157; } } } @@ -41068,7 +40743,7 @@ return x_158; obj* l_lean_parser_term_struct__inst_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -41084,143 +40759,138 @@ x_12 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_12); x_14 = l_option_map___rarg(x_12, x_1); x_15 = lean::box(3); -lean::inc(x_15); -x_17 = l_option_get__or__else___main___rarg(x_14, x_15); -x_18 = l_list_map___main___at_lean_parser_term_struct__inst_has__view_x_27___spec__2(x_7); -x_19 = l_list_join___main___rarg(x_18); -x_20 = l_lean_parser_no__kind; -lean::inc(x_20); -x_22 = l_lean_parser_syntax_mk__node(x_20, x_19); +x_16 = l_option_get__or__else___main___rarg(x_14, x_15); +x_17 = l_list_map___main___at_lean_parser_term_struct__inst_has__view_x_27___spec__2(x_7); +x_18 = l_list_join___main___rarg(x_17); +x_19 = l_lean_parser_no__kind; +lean::inc(x_19); +x_21 = l_lean_parser_syntax_mk__node(x_19, x_18); lean::inc(x_12); -x_24 = l_option_map___rarg(x_12, x_9); -x_25 = l_option_get__or__else___main___rarg(x_24, x_15); -x_26 = lean::box(0); -lean::inc(x_26); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_25); -lean::cnstr_set(x_28, 1, x_26); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_22); -lean::cnstr_set(x_29, 1, x_28); +x_23 = l_option_map___rarg(x_12, x_9); +x_24 = l_option_get__or__else___main___rarg(x_23, x_15); +x_25 = lean::box(0); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_24); +lean::cnstr_set(x_26, 1, x_25); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_21); +lean::cnstr_set(x_27, 1, x_26); if (lean::obj_tag(x_3) == 0) { if (lean::obj_tag(x_5) == 0) { -obj* x_31; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; -lean::dec(x_26); -x_31 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_31); +obj* x_28; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_36; +x_28 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_28); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_28); +lean::cnstr_set(x_30, 1, x_27); +lean::inc(x_28); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_28); +lean::cnstr_set(x_32, 1, x_30); x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_31); -lean::cnstr_set(x_33, 1, x_29); -lean::inc(x_31); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_31); -lean::cnstr_set(x_35, 1, x_33); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_17); -lean::cnstr_set(x_36, 1, x_35); -x_37 = l_lean_parser_term_struct__inst; -lean::inc(x_37); -x_39 = l_lean_parser_syntax_mk__node(x_37, x_36); -return x_39; +lean::cnstr_set(x_33, 0, x_16); +lean::cnstr_set(x_33, 1, x_32); +x_34 = l_lean_parser_term_struct__inst; +lean::inc(x_34); +x_36 = l_lean_parser_syntax_mk__node(x_34, x_33); +return x_36; } else { -obj* x_40; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_57; -x_40 = lean::cnstr_get(x_5, 0); -lean::inc(x_40); +obj* x_37; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_50; obj* x_51; obj* x_52; obj* x_54; +x_37 = lean::cnstr_get(x_5, 0); +lean::inc(x_37); lean::dec(x_5); -x_43 = l_lean_parser_term_struct__inst__with_has__view; -x_44 = lean::cnstr_get(x_43, 1); -lean::inc(x_44); -x_46 = lean::apply_1(x_44, x_40); +x_40 = l_lean_parser_term_struct__inst__with_has__view; +x_41 = lean::cnstr_get(x_40, 1); +lean::inc(x_41); +x_43 = lean::apply_1(x_41, x_37); +x_44 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_44, 0, x_43); +lean::cnstr_set(x_44, 1, x_25); +lean::inc(x_19); +x_46 = l_lean_parser_syntax_mk__node(x_19, x_44); x_47 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_26); -lean::inc(x_20); -x_49 = l_lean_parser_syntax_mk__node(x_20, x_47); +lean::cnstr_set(x_47, 1, x_27); +x_48 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_48); x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_29); -x_51 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_51); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_51); -lean::cnstr_set(x_53, 1, x_50); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_17); -lean::cnstr_set(x_54, 1, x_53); -x_55 = l_lean_parser_term_struct__inst; -lean::inc(x_55); -x_57 = l_lean_parser_syntax_mk__node(x_55, x_54); -return x_57; +lean::cnstr_set(x_50, 0, x_48); +lean::cnstr_set(x_50, 1, x_47); +x_51 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_51, 0, x_16); +lean::cnstr_set(x_51, 1, x_50); +x_52 = l_lean_parser_term_struct__inst; +lean::inc(x_52); +x_54 = l_lean_parser_syntax_mk__node(x_52, x_51); +return x_54; } } else { -obj* x_58; obj* x_61; obj* x_62; obj* x_64; obj* x_66; obj* x_68; -x_58 = lean::cnstr_get(x_3, 0); -lean::inc(x_58); +obj* x_55; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_64; +x_55 = lean::cnstr_get(x_3, 0); +lean::inc(x_55); lean::dec(x_3); -x_61 = l_lean_parser_term_struct__inst__type_has__view; -x_62 = lean::cnstr_get(x_61, 1); -lean::inc(x_62); -x_64 = lean::apply_1(x_62, x_58); -lean::inc(x_26); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_64); -lean::cnstr_set(x_66, 1, x_26); -lean::inc(x_20); -x_68 = l_lean_parser_syntax_mk__node(x_20, x_66); +x_58 = l_lean_parser_term_struct__inst__type_has__view; +x_59 = lean::cnstr_get(x_58, 1); +lean::inc(x_59); +x_61 = lean::apply_1(x_59, x_55); +x_62 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_62, 0, x_61); +lean::cnstr_set(x_62, 1, x_25); +lean::inc(x_19); +x_64 = l_lean_parser_syntax_mk__node(x_19, x_62); if (lean::obj_tag(x_5) == 0) { -obj* x_70; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_77; -lean::dec(x_26); -x_70 = l_lean_parser_combinators_many___rarg___closed__1; +obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_72; +x_65 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_65); +x_67 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_67, 0, x_65); +lean::cnstr_set(x_67, 1, x_27); +x_68 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_68, 0, x_64); +lean::cnstr_set(x_68, 1, x_67); +x_69 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_69, 0, x_16); +lean::cnstr_set(x_69, 1, x_68); +x_70 = l_lean_parser_term_struct__inst; lean::inc(x_70); -x_72 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_72, 0, x_70); -lean::cnstr_set(x_72, 1, x_29); -x_73 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_73, 0, x_68); -lean::cnstr_set(x_73, 1, x_72); -x_74 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_74, 0, x_17); -lean::cnstr_set(x_74, 1, x_73); -x_75 = l_lean_parser_term_struct__inst; -lean::inc(x_75); -x_77 = l_lean_parser_syntax_mk__node(x_75, x_74); -return x_77; +x_72 = l_lean_parser_syntax_mk__node(x_70, x_69); +return x_72; } else { -obj* x_78; obj* x_81; obj* x_82; obj* x_84; obj* x_85; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_93; -x_78 = lean::cnstr_get(x_5, 0); -lean::inc(x_78); +obj* x_73; obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_88; +x_73 = lean::cnstr_get(x_5, 0); +lean::inc(x_73); lean::dec(x_5); -x_81 = l_lean_parser_term_struct__inst__with_has__view; -x_82 = lean::cnstr_get(x_81, 1); -lean::inc(x_82); -x_84 = lean::apply_1(x_82, x_78); +x_76 = l_lean_parser_term_struct__inst__with_has__view; +x_77 = lean::cnstr_get(x_76, 1); +lean::inc(x_77); +x_79 = lean::apply_1(x_77, x_73); +x_80 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_80, 0, x_79); +lean::cnstr_set(x_80, 1, x_25); +lean::inc(x_19); +x_82 = l_lean_parser_syntax_mk__node(x_19, x_80); +x_83 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_83, 0, x_82); +lean::cnstr_set(x_83, 1, x_27); +x_84 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_84, 0, x_64); +lean::cnstr_set(x_84, 1, x_83); x_85 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_85, 0, x_84); -lean::cnstr_set(x_85, 1, x_26); -lean::inc(x_20); -x_87 = l_lean_parser_syntax_mk__node(x_20, x_85); -x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_87); -lean::cnstr_set(x_88, 1, x_29); -x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_68); -lean::cnstr_set(x_89, 1, x_88); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_17); -lean::cnstr_set(x_90, 1, x_89); -x_91 = l_lean_parser_term_struct__inst; -lean::inc(x_91); -x_93 = l_lean_parser_syntax_mk__node(x_91, x_90); -return x_93; +lean::cnstr_set(x_85, 0, x_16); +lean::cnstr_set(x_85, 1, x_84); +x_86 = l_lean_parser_term_struct__inst; +lean::inc(x_86); +x_88 = l_lean_parser_syntax_mk__node(x_86, x_85); +return x_88; } } } @@ -41249,7 +40919,7 @@ return x_0; obj* _init_l_lean_parser_term_struct__inst_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_41; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; x_0 = lean::mk_string("{"); x_1 = l_lean_parser_max__prec; lean::inc(x_1); @@ -41259,63 +40929,55 @@ x_5 = lean::mk_string(" . "); x_6 = lean::mk_nat_obj(0u); lean::inc(x_6); x_8 = l_lean_parser_symbol_tokens___rarg(x_5, x_6); -lean::inc(x_4); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_8, x_4); -lean::inc(x_4); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_4, x_10); +x_9 = l_lean_parser_list_cons_tokens___rarg(x_8, x_4); +x_10 = l_lean_parser_list_cons_tokens___rarg(x_4, x_9); +x_11 = l_lean_parser_tokens___rarg(x_10); +x_12 = l_lean_parser_tokens___rarg(x_11); x_13 = l_lean_parser_tokens___rarg(x_12); -x_14 = l_lean_parser_tokens___rarg(x_13); -x_15 = l_lean_parser_tokens___rarg(x_14); -x_16 = lean::mk_string(" with "); +x_14 = lean::mk_string(" with "); lean::inc(x_6); -x_18 = l_lean_parser_symbol_tokens___rarg(x_16, x_6); -lean::inc(x_4); -x_20 = l_lean_parser_list_cons_tokens___rarg(x_18, x_4); -x_21 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_21); -x_23 = l_lean_parser_list_cons_tokens___rarg(x_21, x_20); -x_24 = l_lean_parser_tokens___rarg(x_23); -x_25 = l_lean_parser_tokens___rarg(x_24); -x_26 = l_lean_parser_tokens___rarg(x_25); -x_27 = lean::mk_string(" := "); +x_16 = l_lean_parser_symbol_tokens___rarg(x_14, x_6); +x_17 = l_lean_parser_list_cons_tokens___rarg(x_16, x_4); +x_18 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_18); +x_20 = l_lean_parser_list_cons_tokens___rarg(x_18, x_17); +x_21 = l_lean_parser_tokens___rarg(x_20); +x_22 = l_lean_parser_tokens___rarg(x_21); +x_23 = l_lean_parser_tokens___rarg(x_22); +x_24 = lean::mk_string(" := "); lean::inc(x_6); -x_29 = l_lean_parser_symbol_tokens___rarg(x_27, x_6); -lean::inc(x_4); -lean::inc(x_21); -x_32 = l_lean_parser_list_cons_tokens___rarg(x_21, x_4); -x_33 = l_lean_parser_list_cons_tokens___rarg(x_29, x_32); -lean::inc(x_4); -x_35 = l_lean_parser_list_cons_tokens___rarg(x_4, x_33); -x_36 = l_lean_parser_tokens___rarg(x_35); -x_37 = lean::mk_string(".."); +x_26 = l_lean_parser_symbol_tokens___rarg(x_24, x_6); +lean::inc(x_18); +x_28 = l_lean_parser_list_cons_tokens___rarg(x_18, x_4); +x_29 = l_lean_parser_list_cons_tokens___rarg(x_26, x_28); +x_30 = l_lean_parser_list_cons_tokens___rarg(x_4, x_29); +x_31 = l_lean_parser_tokens___rarg(x_30); +x_32 = lean::mk_string(".."); lean::inc(x_6); -x_39 = l_lean_parser_symbol_tokens___rarg(x_37, x_6); -lean::inc(x_21); -x_41 = l_lean_parser_tokens___rarg(x_21); -lean::inc(x_4); -x_43 = l_lean_parser_list_cons_tokens___rarg(x_41, x_4); -x_44 = l_lean_parser_list_cons_tokens___rarg(x_39, x_43); -x_45 = l_lean_parser_tokens___rarg(x_44); -lean::inc(x_4); -x_47 = l_lean_parser_list_cons_tokens___rarg(x_45, x_4); -x_48 = l_lean_parser_list_cons_tokens___rarg(x_36, x_47); -x_49 = l_lean_parser_tokens___rarg(x_48); -lean::inc(x_4); -x_51 = l_lean_parser_list_cons_tokens___rarg(x_49, x_4); -x_52 = l_lean_parser_tokens___rarg(x_51); -x_53 = lean::mk_string(", "); +x_34 = l_lean_parser_symbol_tokens___rarg(x_32, x_6); +lean::inc(x_18); +x_36 = l_lean_parser_tokens___rarg(x_18); +x_37 = l_lean_parser_list_cons_tokens___rarg(x_36, x_4); +x_38 = l_lean_parser_list_cons_tokens___rarg(x_34, x_37); +x_39 = l_lean_parser_tokens___rarg(x_38); +x_40 = l_lean_parser_list_cons_tokens___rarg(x_39, x_4); +x_41 = l_lean_parser_list_cons_tokens___rarg(x_31, x_40); +x_42 = l_lean_parser_tokens___rarg(x_41); +x_43 = l_lean_parser_list_cons_tokens___rarg(x_42, x_4); +x_44 = l_lean_parser_tokens___rarg(x_43); +x_45 = lean::mk_string(", "); lean::inc(x_6); -x_55 = l_lean_parser_symbol_tokens___rarg(x_53, x_6); -x_56 = l_lean_parser_combinators_sep__by_tokens___rarg(x_52, x_55); -x_57 = lean::mk_string("}"); -x_58 = l_lean_parser_symbol_tokens___rarg(x_57, x_6); -x_59 = l_lean_parser_list_cons_tokens___rarg(x_58, x_4); -x_60 = l_lean_parser_list_cons_tokens___rarg(x_56, x_59); -x_61 = l_lean_parser_list_cons_tokens___rarg(x_26, x_60); -x_62 = l_lean_parser_list_cons_tokens___rarg(x_15, x_61); -x_63 = l_lean_parser_list_cons_tokens___rarg(x_3, x_62); -x_64 = l_lean_parser_tokens___rarg(x_63); -return x_64; +x_47 = l_lean_parser_symbol_tokens___rarg(x_45, x_6); +x_48 = l_lean_parser_combinators_sep__by_tokens___rarg(x_44, x_47); +x_49 = lean::mk_string("}"); +x_50 = l_lean_parser_symbol_tokens___rarg(x_49, x_6); +x_51 = l_lean_parser_list_cons_tokens___rarg(x_50, x_4); +x_52 = l_lean_parser_list_cons_tokens___rarg(x_48, x_51); +x_53 = l_lean_parser_list_cons_tokens___rarg(x_23, x_52); +x_54 = l_lean_parser_list_cons_tokens___rarg(x_13, x_53); +x_55 = l_lean_parser_list_cons_tokens___rarg(x_3, x_54); +x_56 = l_lean_parser_tokens___rarg(x_55); +return x_56; } } obj* l_lean_parser_term_struct__inst_parser_lean_parser_has__view___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { @@ -41381,7 +41043,7 @@ return x_15; obj* _init_l_lean_parser_term_struct__inst_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* 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_29; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_41; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_53; obj* x_55; obj* x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_64; obj* x_65; obj* x_67; obj* x_69; obj* x_70; obj* x_72; obj* x_73; obj* x_74; obj* x_76; obj* x_78; uint8 x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_104; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; 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; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_66; obj* x_67; obj* x_68; obj* x_70; obj* x_72; uint8 x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_98; x_0 = lean::mk_string("{"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -41405,174 +41067,168 @@ lean::closure_set(x_13, 0, x_8); lean::closure_set(x_13, 1, x_11); lean::closure_set(x_13, 2, x_10); x_14 = lean::box(0); -lean::inc(x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_13); -lean::cnstr_set(x_16, 1, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); -lean::inc(x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_16); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_struct__inst_parser_lean_parser_has__view___lambda__1), 6, 1); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_13); +lean::cnstr_set(x_15, 1, x_14); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); +lean::inc(x_16); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_16); +lean::cnstr_set(x_18, 1, x_15); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_struct__inst_parser_lean_parser_has__view___lambda__1), 6, 1); +lean::closure_set(x_19, 0, x_18); +x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); lean::closure_set(x_20, 0, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_21, 0, x_20); lean::inc(x_11); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_23, 0, x_11); -x_24 = lean::mk_string(" with "); -x_25 = l_string_trim(x_24); -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_27, 0, x_25); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_22, 0, x_11); +x_23 = lean::mk_string(" with "); +x_24 = l_string_trim(x_23); +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_26, 0, x_24); lean::inc(x_11); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_29, 0, x_25); -lean::closure_set(x_29, 1, x_11); -lean::closure_set(x_29, 2, x_27); -lean::inc(x_14); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_28, 0, x_24); +lean::closure_set(x_28, 1, x_11); +lean::closure_set(x_28, 2, x_26); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_14); +lean::inc(x_22); x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_29); -lean::cnstr_set(x_31, 1, x_14); -lean::inc(x_23); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_23); -lean::cnstr_set(x_33, 1, x_31); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_struct__inst_parser_lean_parser_has__view___lambda__2), 6, 1); -lean::closure_set(x_34, 0, x_33); -x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_35, 0, x_34); -x_36 = lean::mk_string(" := "); -x_37 = l_string_trim(x_36); -lean::inc(x_37); -x_39 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_39, 0, x_37); +lean::cnstr_set(x_31, 0, x_22); +lean::cnstr_set(x_31, 1, x_29); +x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_struct__inst_parser_lean_parser_has__view___lambda__2), 6, 1); +lean::closure_set(x_32, 0, x_31); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); +lean::closure_set(x_33, 0, x_32); +x_34 = lean::mk_string(" := "); +x_35 = l_string_trim(x_34); +lean::inc(x_35); +x_37 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_37, 0, x_35); lean::inc(x_11); -x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_41, 0, x_37); -lean::closure_set(x_41, 1, x_11); -lean::closure_set(x_41, 2, x_39); -lean::inc(x_14); -lean::inc(x_23); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_23); -lean::cnstr_set(x_44, 1, x_14); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_41); -lean::cnstr_set(x_45, 1, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_17); -lean::cnstr_set(x_46, 1, x_45); -x_47 = l_lean_parser_term_struct__inst__field; -lean::inc(x_47); -x_49 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_49, 0, x_47); -lean::closure_set(x_49, 1, x_46); -x_50 = lean::mk_string(".."); -x_51 = l_string_trim(x_50); -lean::inc(x_51); -x_53 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_53, 0, x_51); +x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_39, 0, x_35); +lean::closure_set(x_39, 1, x_11); +lean::closure_set(x_39, 2, x_37); +lean::inc(x_22); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_22); +lean::cnstr_set(x_41, 1, x_14); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_39); +lean::cnstr_set(x_42, 1, x_41); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_16); +lean::cnstr_set(x_43, 1, x_42); +x_44 = l_lean_parser_term_struct__inst__field; +lean::inc(x_44); +x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_46, 0, x_44); +lean::closure_set(x_46, 1, x_43); +x_47 = lean::mk_string(".."); +x_48 = l_string_trim(x_47); +lean::inc(x_48); +x_50 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_50, 0, x_48); lean::inc(x_11); -x_55 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_55, 0, x_51); -lean::closure_set(x_55, 1, x_11); -lean::closure_set(x_55, 2, x_53); -x_56 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_56, 0, x_23); -lean::inc(x_14); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_56); -lean::cnstr_set(x_58, 1, x_14); +x_52 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_52, 0, x_48); +lean::closure_set(x_52, 1, x_11); +lean::closure_set(x_52, 2, x_50); +x_53 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); +lean::closure_set(x_53, 0, x_22); +x_54 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_54, 0, x_53); +lean::cnstr_set(x_54, 1, x_14); +x_55 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_55, 0, x_52); +lean::cnstr_set(x_55, 1, x_54); +x_56 = l_lean_parser_term_struct__inst__source; +lean::inc(x_56); +x_58 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_58, 0, x_56); +lean::closure_set(x_58, 1, x_55); x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_55); -lean::cnstr_set(x_59, 1, x_58); -x_60 = l_lean_parser_term_struct__inst__source; -lean::inc(x_60); -x_62 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::cnstr_set(x_59, 0, x_58); +lean::cnstr_set(x_59, 1, x_14); +x_60 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_60, 0, x_46); +lean::cnstr_set(x_60, 1, x_59); +lean::inc(x_11); +x_62 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); lean::closure_set(x_62, 0, x_60); -lean::closure_set(x_62, 1, x_59); -lean::inc(x_14); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_62); -lean::cnstr_set(x_64, 1, x_14); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_49); -lean::cnstr_set(x_65, 1, x_64); +lean::closure_set(x_62, 1, x_11); +x_63 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_63, 0, x_62); +lean::cnstr_set(x_63, 1, x_14); +x_64 = l_lean_parser_term_struct__inst__item; +lean::inc(x_64); +x_66 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_66, 0, x_64); +lean::closure_set(x_66, 1, x_63); +x_67 = lean::mk_string(", "); +x_68 = l_string_trim(x_67); +lean::inc(x_68); +x_70 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_70, 0, x_68); lean::inc(x_11); -x_67 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_67, 0, x_65); -lean::closure_set(x_67, 1, x_11); -lean::inc(x_14); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_67); -lean::cnstr_set(x_69, 1, x_14); -x_70 = l_lean_parser_term_struct__inst__item; -lean::inc(x_70); -x_72 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_72, 0, x_70); -lean::closure_set(x_72, 1, x_69); -x_73 = lean::mk_string(", "); -x_74 = l_string_trim(x_73); -lean::inc(x_74); -x_76 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_76, 0, x_74); -lean::inc(x_11); -x_78 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_78, 0, x_74); -lean::closure_set(x_78, 1, x_11); -lean::closure_set(x_78, 2, x_76); -x_79 = 1; -x_80 = lean::box(x_79); -x_81 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__tokens___spec__1___boxed), 8, 3); -lean::closure_set(x_81, 0, x_72); -lean::closure_set(x_81, 1, x_78); -lean::closure_set(x_81, 2, x_80); -x_82 = lean::mk_string("}"); -x_83 = l_string_trim(x_82); -lean::inc(x_83); -x_85 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_85, 0, x_83); -x_86 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_86, 0, x_83); -lean::closure_set(x_86, 1, x_11); -lean::closure_set(x_86, 2, x_85); -x_87 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_14); -x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_81); -lean::cnstr_set(x_88, 1, x_87); -x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_35); -lean::cnstr_set(x_89, 1, x_88); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_21); -lean::cnstr_set(x_90, 1, x_89); -x_91 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_91, 0, x_6); -lean::cnstr_set(x_91, 1, x_90); -x_92 = l_lean_parser_term__parser__m_monad; -x_93 = l_lean_parser_term__parser__m_monad__except; -x_94 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_95 = l_lean_parser_term__parser__m_alternative; -x_96 = l_lean_parser_term_struct__inst; -x_97 = l_lean_parser_term_struct__inst_has__view; -lean::inc(x_97); -lean::inc(x_96); -lean::inc(x_95); -lean::inc(x_94); -lean::inc(x_93); -lean::inc(x_92); -x_104 = l_lean_parser_combinators_node_view___rarg(x_92, x_93, x_94, x_95, x_96, x_91, x_97); -return x_104; +x_72 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_72, 0, x_68); +lean::closure_set(x_72, 1, x_11); +lean::closure_set(x_72, 2, x_70); +x_73 = 1; +x_74 = lean::box(x_73); +x_75 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__tokens___spec__1___boxed), 8, 3); +lean::closure_set(x_75, 0, x_66); +lean::closure_set(x_75, 1, x_72); +lean::closure_set(x_75, 2, x_74); +x_76 = lean::mk_string("}"); +x_77 = l_string_trim(x_76); +lean::inc(x_77); +x_79 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_79, 0, x_77); +x_80 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_80, 0, x_77); +lean::closure_set(x_80, 1, x_11); +lean::closure_set(x_80, 2, x_79); +x_81 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_81, 0, x_80); +lean::cnstr_set(x_81, 1, x_14); +x_82 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_82, 0, x_75); +lean::cnstr_set(x_82, 1, x_81); +x_83 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_83, 0, x_33); +lean::cnstr_set(x_83, 1, x_82); +x_84 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_84, 0, x_20); +lean::cnstr_set(x_84, 1, x_83); +x_85 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_85, 0, x_6); +lean::cnstr_set(x_85, 1, x_84); +x_86 = l_lean_parser_term__parser__m_monad; +x_87 = l_lean_parser_term__parser__m_monad__except; +x_88 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_89 = l_lean_parser_term__parser__m_alternative; +x_90 = l_lean_parser_term_struct__inst; +x_91 = l_lean_parser_term_struct__inst_has__view; +lean::inc(x_91); +lean::inc(x_90); +lean::inc(x_89); +lean::inc(x_88); +lean::inc(x_87); +lean::inc(x_86); +x_98 = l_lean_parser_combinators_node_view___rarg(x_86, x_87, x_88, x_89, x_90, x_85, x_91); +return x_98; } } obj* _init_l_lean_parser_term_struct__inst_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* 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_29; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_41; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_53; obj* x_55; obj* x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_64; obj* x_65; obj* x_67; obj* x_69; obj* x_70; obj* x_72; obj* x_73; obj* x_74; obj* x_76; obj* x_78; uint8 x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; 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; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_66; obj* x_67; obj* x_68; obj* x_70; obj* x_72; uint8 x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; x_0 = lean::mk_string("{"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -41596,155 +41252,149 @@ lean::closure_set(x_13, 0, x_8); lean::closure_set(x_13, 1, x_11); lean::closure_set(x_13, 2, x_10); x_14 = lean::box(0); -lean::inc(x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_13); -lean::cnstr_set(x_16, 1, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); -lean::inc(x_17); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_16); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_struct__inst_parser_lean_parser_has__view___lambda__1), 6, 1); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_13); +lean::cnstr_set(x_15, 1, x_14); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4), 1, 0); +lean::inc(x_16); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_16); +lean::cnstr_set(x_18, 1, x_15); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_struct__inst_parser_lean_parser_has__view___lambda__1), 6, 1); +lean::closure_set(x_19, 0, x_18); +x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); lean::closure_set(x_20, 0, x_19); -x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_21, 0, x_20); lean::inc(x_11); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_23, 0, x_11); -x_24 = lean::mk_string(" with "); -x_25 = l_string_trim(x_24); -lean::inc(x_25); -x_27 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_27, 0, x_25); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_22, 0, x_11); +x_23 = lean::mk_string(" with "); +x_24 = l_string_trim(x_23); +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_26, 0, x_24); lean::inc(x_11); -x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_29, 0, x_25); -lean::closure_set(x_29, 1, x_11); -lean::closure_set(x_29, 2, x_27); -lean::inc(x_14); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_28, 0, x_24); +lean::closure_set(x_28, 1, x_11); +lean::closure_set(x_28, 2, x_26); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_14); +lean::inc(x_22); x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_29); -lean::cnstr_set(x_31, 1, x_14); -lean::inc(x_23); -x_33 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_33, 0, x_23); -lean::cnstr_set(x_33, 1, x_31); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_struct__inst_parser_lean_parser_has__view___lambda__2), 6, 1); -lean::closure_set(x_34, 0, x_33); -x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_35, 0, x_34); -x_36 = lean::mk_string(" := "); -x_37 = l_string_trim(x_36); -lean::inc(x_37); -x_39 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_39, 0, x_37); +lean::cnstr_set(x_31, 0, x_22); +lean::cnstr_set(x_31, 1, x_29); +x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_struct__inst_parser_lean_parser_has__view___lambda__2), 6, 1); +lean::closure_set(x_32, 0, x_31); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); +lean::closure_set(x_33, 0, x_32); +x_34 = lean::mk_string(" := "); +x_35 = l_string_trim(x_34); +lean::inc(x_35); +x_37 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_37, 0, x_35); lean::inc(x_11); -x_41 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_41, 0, x_37); -lean::closure_set(x_41, 1, x_11); -lean::closure_set(x_41, 2, x_39); -lean::inc(x_14); -lean::inc(x_23); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_23); -lean::cnstr_set(x_44, 1, x_14); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_41); -lean::cnstr_set(x_45, 1, x_44); -x_46 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_46, 0, x_17); -lean::cnstr_set(x_46, 1, x_45); -x_47 = l_lean_parser_term_struct__inst__field; -lean::inc(x_47); -x_49 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_49, 0, x_47); -lean::closure_set(x_49, 1, x_46); -x_50 = lean::mk_string(".."); -x_51 = l_string_trim(x_50); -lean::inc(x_51); -x_53 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_53, 0, x_51); +x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_39, 0, x_35); +lean::closure_set(x_39, 1, x_11); +lean::closure_set(x_39, 2, x_37); +lean::inc(x_22); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_22); +lean::cnstr_set(x_41, 1, x_14); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_39); +lean::cnstr_set(x_42, 1, x_41); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_16); +lean::cnstr_set(x_43, 1, x_42); +x_44 = l_lean_parser_term_struct__inst__field; +lean::inc(x_44); +x_46 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_46, 0, x_44); +lean::closure_set(x_46, 1, x_43); +x_47 = lean::mk_string(".."); +x_48 = l_string_trim(x_47); +lean::inc(x_48); +x_50 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_50, 0, x_48); lean::inc(x_11); -x_55 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_55, 0, x_51); -lean::closure_set(x_55, 1, x_11); -lean::closure_set(x_55, 2, x_53); -x_56 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); -lean::closure_set(x_56, 0, x_23); -lean::inc(x_14); -x_58 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_58, 0, x_56); -lean::cnstr_set(x_58, 1, x_14); +x_52 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_52, 0, x_48); +lean::closure_set(x_52, 1, x_11); +lean::closure_set(x_52, 2, x_50); +x_53 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7), 6, 1); +lean::closure_set(x_53, 0, x_22); +x_54 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_54, 0, x_53); +lean::cnstr_set(x_54, 1, x_14); +x_55 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_55, 0, x_52); +lean::cnstr_set(x_55, 1, x_54); +x_56 = l_lean_parser_term_struct__inst__source; +lean::inc(x_56); +x_58 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_58, 0, x_56); +lean::closure_set(x_58, 1, x_55); x_59 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_59, 0, x_55); -lean::cnstr_set(x_59, 1, x_58); -x_60 = l_lean_parser_term_struct__inst__source; -lean::inc(x_60); -x_62 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::cnstr_set(x_59, 0, x_58); +lean::cnstr_set(x_59, 1, x_14); +x_60 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_60, 0, x_46); +lean::cnstr_set(x_60, 1, x_59); +lean::inc(x_11); +x_62 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); lean::closure_set(x_62, 0, x_60); -lean::closure_set(x_62, 1, x_59); -lean::inc(x_14); -x_64 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_64, 0, x_62); -lean::cnstr_set(x_64, 1, x_14); -x_65 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_65, 0, x_49); -lean::cnstr_set(x_65, 1, x_64); +lean::closure_set(x_62, 1, x_11); +x_63 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_63, 0, x_62); +lean::cnstr_set(x_63, 1, x_14); +x_64 = l_lean_parser_term_struct__inst__item; +lean::inc(x_64); +x_66 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); +lean::closure_set(x_66, 0, x_64); +lean::closure_set(x_66, 1, x_63); +x_67 = lean::mk_string(", "); +x_68 = l_string_trim(x_67); +lean::inc(x_68); +x_70 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_70, 0, x_68); lean::inc(x_11); -x_67 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3), 7, 2); -lean::closure_set(x_67, 0, x_65); -lean::closure_set(x_67, 1, x_11); -lean::inc(x_14); -x_69 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_69, 0, x_67); -lean::cnstr_set(x_69, 1, x_14); -x_70 = l_lean_parser_term_struct__inst__item; -lean::inc(x_70); -x_72 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_precedence__lit_parser___spec__1), 7, 2); -lean::closure_set(x_72, 0, x_70); -lean::closure_set(x_72, 1, x_69); -x_73 = lean::mk_string(", "); -x_74 = l_string_trim(x_73); -lean::inc(x_74); -x_76 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_76, 0, x_74); -lean::inc(x_11); -x_78 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_78, 0, x_74); -lean::closure_set(x_78, 1, x_11); -lean::closure_set(x_78, 2, x_76); -x_79 = 1; -x_80 = lean::box(x_79); -x_81 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__tokens___spec__1___boxed), 8, 3); -lean::closure_set(x_81, 0, x_72); -lean::closure_set(x_81, 1, x_78); -lean::closure_set(x_81, 2, x_80); -x_82 = lean::mk_string("}"); -x_83 = l_string_trim(x_82); -lean::inc(x_83); -x_85 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_85, 0, x_83); -x_86 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); -lean::closure_set(x_86, 0, x_83); -lean::closure_set(x_86, 1, x_11); -lean::closure_set(x_86, 2, x_85); -x_87 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_87, 0, x_86); -lean::cnstr_set(x_87, 1, x_14); -x_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_81); -lean::cnstr_set(x_88, 1, x_87); -x_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_35); -lean::cnstr_set(x_89, 1, x_88); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_21); -lean::cnstr_set(x_90, 1, x_89); -x_91 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_91, 0, x_6); -lean::cnstr_set(x_91, 1, x_90); -return x_91; +x_72 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_72, 0, x_68); +lean::closure_set(x_72, 1, x_11); +lean::closure_set(x_72, 2, x_70); +x_73 = 1; +x_74 = lean::box(x_73); +x_75 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__tokens___spec__1___boxed), 8, 3); +lean::closure_set(x_75, 0, x_66); +lean::closure_set(x_75, 1, x_72); +lean::closure_set(x_75, 2, x_74); +x_76 = lean::mk_string("}"); +x_77 = l_string_trim(x_76); +lean::inc(x_77); +x_79 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_79, 0, x_77); +x_80 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1), 8, 3); +lean::closure_set(x_80, 0, x_77); +lean::closure_set(x_80, 1, x_11); +lean::closure_set(x_80, 2, x_79); +x_81 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_81, 0, x_80); +lean::cnstr_set(x_81, 1, x_14); +x_82 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_82, 0, x_75); +lean::cnstr_set(x_82, 1, x_81); +x_83 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_83, 0, x_33); +lean::cnstr_set(x_83, 1, x_82); +x_84 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_84, 0, x_20); +lean::cnstr_set(x_84, 1, x_83); +x_85 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_85, 0, x_6); +lean::cnstr_set(x_85, 1, x_84); +return x_85; } } obj* l_lean_parser_term_struct__inst_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -42695,7 +42345,7 @@ return x_154; obj* l_lean_parser_term_subtype_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; +obj* x_1; obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_11; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -42713,77 +42363,73 @@ x_14 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_14); x_16 = l_option_map___rarg(x_14, x_1); x_17 = lean::box(3); -lean::inc(x_17); -x_19 = l_option_get__or__else___main___rarg(x_16, x_17); -x_20 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_20, 0, x_3); +x_18 = l_option_get__or__else___main___rarg(x_16, x_17); +x_19 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_19, 0, x_3); lean::inc(x_14); -x_22 = l_option_map___rarg(x_14, x_7); -lean::inc(x_17); -x_24 = l_option_get__or__else___main___rarg(x_22, x_17); +x_21 = l_option_map___rarg(x_14, x_7); +x_22 = l_option_get__or__else___main___rarg(x_21, x_17); lean::inc(x_14); -x_26 = l_option_map___rarg(x_14, x_11); -x_27 = l_option_get__or__else___main___rarg(x_26, x_17); -x_28 = lean::box(0); -lean::inc(x_28); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_27); -lean::cnstr_set(x_30, 1, x_28); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_9); -lean::cnstr_set(x_31, 1, x_30); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_24); -lean::cnstr_set(x_32, 1, x_31); +x_24 = l_option_map___rarg(x_14, x_11); +x_25 = l_option_get__or__else___main___rarg(x_24, x_17); +x_26 = lean::box(0); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_25); +lean::cnstr_set(x_27, 1, x_26); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_9); +lean::cnstr_set(x_28, 1, x_27); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_22); +lean::cnstr_set(x_29, 1, x_28); if (lean::obj_tag(x_5) == 0) { -obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_41; -lean::dec(x_28); -x_34 = l_lean_parser_combinators_many___rarg___closed__1; -lean::inc(x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set(x_36, 1, x_32); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_20); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_19); -lean::cnstr_set(x_38, 1, x_37); -x_39 = l_lean_parser_term_subtype; -lean::inc(x_39); -x_41 = l_lean_parser_syntax_mk__node(x_39, x_38); -return x_41; +obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_37; +x_30 = l_lean_parser_combinators_many___rarg___closed__1; +lean::inc(x_30); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_30); +lean::cnstr_set(x_32, 1, x_29); +x_33 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_33, 0, x_19); +lean::cnstr_set(x_33, 1, x_32); +x_34 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_34, 0, x_18); +lean::cnstr_set(x_34, 1, x_33); +x_35 = l_lean_parser_term_subtype; +lean::inc(x_35); +x_37 = l_lean_parser_syntax_mk__node(x_35, x_34); +return x_37; } else { -obj* x_42; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_58; -x_42 = lean::cnstr_get(x_5, 0); -lean::inc(x_42); +obj* x_38; obj* x_41; obj* x_42; obj* x_44; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_54; +x_38 = lean::cnstr_get(x_5, 0); +lean::inc(x_38); lean::dec(x_5); -x_45 = l_lean_parser_term_type__spec_has__view; -x_46 = lean::cnstr_get(x_45, 1); +x_41 = l_lean_parser_term_type__spec_has__view; +x_42 = lean::cnstr_get(x_41, 1); +lean::inc(x_42); +x_44 = lean::apply_1(x_42, x_38); +x_45 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_45, 0, x_44); +lean::cnstr_set(x_45, 1, x_26); +x_46 = l_lean_parser_no__kind; lean::inc(x_46); -x_48 = lean::apply_1(x_46, x_42); +x_48 = l_lean_parser_syntax_mk__node(x_46, x_45); x_49 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_28); -x_50 = l_lean_parser_no__kind; -lean::inc(x_50); -x_52 = l_lean_parser_syntax_mk__node(x_50, x_49); -x_53 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_32); -x_54 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_54, 0, x_20); -lean::cnstr_set(x_54, 1, x_53); -x_55 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_55, 0, x_19); -lean::cnstr_set(x_55, 1, x_54); -x_56 = l_lean_parser_term_subtype; -lean::inc(x_56); -x_58 = l_lean_parser_syntax_mk__node(x_56, x_55); -return x_58; +lean::cnstr_set(x_49, 1, x_29); +x_50 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_50, 0, x_19); +lean::cnstr_set(x_50, 1, x_49); +x_51 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_51, 0, x_18); +lean::cnstr_set(x_51, 1, x_50); +x_52 = l_lean_parser_term_subtype; +lean::inc(x_52); +x_54 = l_lean_parser_syntax_mk__node(x_52, x_51); +return x_54; } } } @@ -42811,7 +42457,7 @@ return x_0; obj* _init_l_lean_parser_term_subtype_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* 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; x_0 = lean::mk_string("{"); x_1 = l_lean_parser_max__prec; lean::inc(x_1); @@ -42823,19 +42469,18 @@ lean::inc(x_6); x_8 = l_lean_parser_symbol_tokens___rarg(x_5, x_6); x_9 = lean::mk_string("}"); x_10 = l_lean_parser_symbol_tokens___rarg(x_9, x_6); -lean::inc(x_4); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_10, x_4); -x_13 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_13); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_13, x_12); -x_16 = l_lean_parser_list_cons_tokens___rarg(x_8, x_15); -x_17 = l_lean_parser_term_opt__type_parser_lean_parser_has__tokens; -lean::inc(x_17); -x_19 = l_lean_parser_list_cons_tokens___rarg(x_17, x_16); -x_20 = l_lean_parser_list_cons_tokens___rarg(x_4, x_19); -x_21 = l_lean_parser_list_cons_tokens___rarg(x_3, x_20); -x_22 = l_lean_parser_tokens___rarg(x_21); -return x_22; +x_11 = l_lean_parser_list_cons_tokens___rarg(x_10, x_4); +x_12 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_12); +x_14 = l_lean_parser_list_cons_tokens___rarg(x_12, x_11); +x_15 = l_lean_parser_list_cons_tokens___rarg(x_8, x_14); +x_16 = l_lean_parser_term_opt__type_parser_lean_parser_has__tokens; +lean::inc(x_16); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_16, x_15); +x_19 = l_lean_parser_list_cons_tokens___rarg(x_4, x_18); +x_20 = l_lean_parser_list_cons_tokens___rarg(x_3, x_19); +x_21 = l_lean_parser_tokens___rarg(x_20); +return x_21; } } obj* _init_l_lean_parser_term_subtype_parser_lean_parser_has__view() { @@ -43457,7 +43102,7 @@ return x_80; obj* l_lean_parser_term_inaccessible_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_23; +obj* x_1; obj* x_3; obj* x_5; 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_22; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -43469,25 +43114,24 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); lean::inc(x_8); -x_15 = l_option_map___rarg(x_8, x_5); -x_16 = l_option_get__or__else___main___rarg(x_15, x_11); -x_17 = lean::box(0); +x_14 = l_option_map___rarg(x_8, x_5); +x_15 = l_option_get__or__else___main___rarg(x_14, x_11); +x_16 = lean::box(0); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_15); +lean::cnstr_set(x_17, 1, x_16); x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_16); +lean::cnstr_set(x_18, 0, x_3); lean::cnstr_set(x_18, 1, x_17); x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_3); +lean::cnstr_set(x_19, 0, x_12); lean::cnstr_set(x_19, 1, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_13); -lean::cnstr_set(x_20, 1, x_19); -x_21 = l_lean_parser_term_inaccessible; -lean::inc(x_21); -x_23 = l_lean_parser_syntax_mk__node(x_21, x_20); -return x_23; +x_20 = l_lean_parser_term_inaccessible; +lean::inc(x_20); +x_22 = l_lean_parser_syntax_mk__node(x_20, x_19); +return x_22; } } obj* _init_l_lean_parser_term_inaccessible_has__view_x_27() { @@ -44408,370 +44052,343 @@ return x_2; obj* _init_l_lean_parser_term_builtin__leading__parsers_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_48; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_57; obj* x_59; obj* x_60; obj* x_62; obj* x_64; obj* x_65; obj* x_67; obj* x_68; obj* x_70; obj* x_72; obj* x_73; obj* x_74; obj* x_76; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_44; obj* x_45; obj* x_47; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_56; obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_66; obj* x_67; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_74; x_0 = lean::box(0); x_1 = l_lean_parser_term_borrowed_parser_lean_parser_has__tokens; -lean::inc(x_0); lean::inc(x_1); -x_4 = l_lean_parser_token__map__cons_tokens___rarg(x_1, x_0); -x_5 = l_lean_parser_term_sorry_parser_lean_parser_has__tokens; -lean::inc(x_5); -x_7 = l_lean_parser_token__map__cons_tokens___rarg(x_5, x_4); -x_8 = l_lean_parser_term_anonymous__inaccessible_parser_lean_parser_has__tokens; -lean::inc(x_8); -x_10 = l_lean_parser_token__map__cons_tokens___rarg(x_8, x_7); -x_11 = l_lean_parser_term_inaccessible_parser_lean_parser_has__tokens; -lean::inc(x_11); -x_13 = l_lean_parser_token__map__cons_tokens___rarg(x_11, x_10); -x_14 = l_lean_parser_term_subtype_parser_lean_parser_has__tokens; -lean::inc(x_14); -x_16 = l_lean_parser_token__map__cons_tokens___rarg(x_14, x_13); -x_17 = l_lean_parser_term_struct__inst_parser_lean_parser_has__tokens; -lean::inc(x_17); -x_19 = l_lean_parser_token__map__cons_tokens___rarg(x_17, x_16); -x_20 = l_lean_parser_term_if_parser_lean_parser_has__tokens; -lean::inc(x_20); -x_22 = l_lean_parser_token__map__cons_tokens___rarg(x_20, x_19); -x_23 = l_lean_parser_term_match_parser_lean_parser_has__tokens; -lean::inc(x_23); -x_25 = l_lean_parser_token__map__cons_tokens___rarg(x_23, x_22); -x_26 = l_lean_parser_term_assume_parser_lean_parser_has__tokens; -lean::inc(x_26); -x_28 = l_lean_parser_token__map__cons_tokens___rarg(x_26, x_25); -x_29 = l_lean_parser_term_show_parser_lean_parser_has__tokens; -lean::inc(x_29); -x_31 = l_lean_parser_token__map__cons_tokens___rarg(x_29, x_28); -x_32 = l_lean_parser_term_have_parser_lean_parser_has__tokens; -lean::inc(x_32); -x_34 = l_lean_parser_token__map__cons_tokens___rarg(x_32, x_31); -x_35 = l_lean_parser_term_let_parser_lean_parser_has__tokens; -lean::inc(x_35); -x_37 = l_lean_parser_token__map__cons_tokens___rarg(x_35, x_34); -x_38 = l_lean_parser_term_explicit_parser_lean_parser_has__tokens; -lean::inc(x_38); -x_40 = l_lean_parser_token__map__cons_tokens___rarg(x_38, x_37); -lean::inc(x_38); -x_42 = l_lean_parser_token__map__cons_tokens___rarg(x_38, x_40); -x_43 = l_lean_parser_term_anonymous__constructor_parser_lean_parser_has__tokens; -lean::inc(x_43); -x_45 = l_lean_parser_token__map__cons_tokens___rarg(x_43, x_42); -x_46 = l_lean_parser_term_pi_parser_lean_parser_has__tokens; -lean::inc(x_46); -x_48 = l_lean_parser_token__map__cons_tokens___rarg(x_46, x_45); -lean::inc(x_46); -x_50 = l_lean_parser_token__map__cons_tokens___rarg(x_46, x_48); -lean::inc(x_46); -x_52 = l_lean_parser_token__map__cons_tokens___rarg(x_46, x_50); -lean::inc(x_46); -x_54 = l_lean_parser_token__map__cons_tokens___rarg(x_46, x_52); -x_55 = l_lean_parser_term_lambda_parser_lean_parser_has__tokens; -lean::inc(x_55); -x_57 = l_lean_parser_token__map__cons_tokens___rarg(x_55, x_54); -lean::inc(x_55); -x_59 = l_lean_parser_token__map__cons_tokens___rarg(x_55, x_57); -x_60 = l_lean_parser_term_sort_parser_lean_parser_has__tokens; -lean::inc(x_60); -x_62 = l_lean_parser_token__map__cons_tokens___rarg(x_60, x_59); -lean::inc(x_60); -x_64 = l_lean_parser_token__map__cons_tokens___rarg(x_60, x_62); -x_65 = l_lean_parser_term_hole_parser_lean_parser_has__tokens; -lean::inc(x_65); -x_67 = l_lean_parser_token__map__cons_tokens___rarg(x_65, x_64); -x_68 = l_lean_parser_term_paren_parser_lean_parser_has__tokens; -lean::inc(x_68); -x_70 = l_lean_parser_token__map__cons_tokens___rarg(x_68, x_67); -lean::inc(x_0); -x_72 = l_lean_parser_token__map__cons_tokens___rarg(x_0, x_70); -x_73 = l_lean_parser_token__map__cons_tokens___rarg(x_0, x_72); -x_74 = l_lean_parser_ident__univs_parser_lean_parser_has__tokens; -lean::inc(x_74); -x_76 = l_lean_parser_token__map__cons_tokens___rarg(x_74, x_73); -return x_76; +x_3 = l_lean_parser_token__map__cons_tokens___rarg(x_1, x_0); +x_4 = l_lean_parser_term_sorry_parser_lean_parser_has__tokens; +lean::inc(x_4); +x_6 = l_lean_parser_token__map__cons_tokens___rarg(x_4, x_3); +x_7 = l_lean_parser_term_anonymous__inaccessible_parser_lean_parser_has__tokens; +lean::inc(x_7); +x_9 = l_lean_parser_token__map__cons_tokens___rarg(x_7, x_6); +x_10 = l_lean_parser_term_inaccessible_parser_lean_parser_has__tokens; +lean::inc(x_10); +x_12 = l_lean_parser_token__map__cons_tokens___rarg(x_10, x_9); +x_13 = l_lean_parser_term_subtype_parser_lean_parser_has__tokens; +lean::inc(x_13); +x_15 = l_lean_parser_token__map__cons_tokens___rarg(x_13, x_12); +x_16 = l_lean_parser_term_struct__inst_parser_lean_parser_has__tokens; +lean::inc(x_16); +x_18 = l_lean_parser_token__map__cons_tokens___rarg(x_16, x_15); +x_19 = l_lean_parser_term_if_parser_lean_parser_has__tokens; +lean::inc(x_19); +x_21 = l_lean_parser_token__map__cons_tokens___rarg(x_19, x_18); +x_22 = l_lean_parser_term_match_parser_lean_parser_has__tokens; +lean::inc(x_22); +x_24 = l_lean_parser_token__map__cons_tokens___rarg(x_22, x_21); +x_25 = l_lean_parser_term_assume_parser_lean_parser_has__tokens; +lean::inc(x_25); +x_27 = l_lean_parser_token__map__cons_tokens___rarg(x_25, x_24); +x_28 = l_lean_parser_term_show_parser_lean_parser_has__tokens; +lean::inc(x_28); +x_30 = l_lean_parser_token__map__cons_tokens___rarg(x_28, x_27); +x_31 = l_lean_parser_term_have_parser_lean_parser_has__tokens; +lean::inc(x_31); +x_33 = l_lean_parser_token__map__cons_tokens___rarg(x_31, x_30); +x_34 = l_lean_parser_term_let_parser_lean_parser_has__tokens; +lean::inc(x_34); +x_36 = l_lean_parser_token__map__cons_tokens___rarg(x_34, x_33); +x_37 = l_lean_parser_term_explicit_parser_lean_parser_has__tokens; +lean::inc(x_37); +x_39 = l_lean_parser_token__map__cons_tokens___rarg(x_37, x_36); +lean::inc(x_37); +x_41 = l_lean_parser_token__map__cons_tokens___rarg(x_37, x_39); +x_42 = l_lean_parser_term_anonymous__constructor_parser_lean_parser_has__tokens; +lean::inc(x_42); +x_44 = l_lean_parser_token__map__cons_tokens___rarg(x_42, x_41); +x_45 = l_lean_parser_term_pi_parser_lean_parser_has__tokens; +lean::inc(x_45); +x_47 = l_lean_parser_token__map__cons_tokens___rarg(x_45, x_44); +lean::inc(x_45); +x_49 = l_lean_parser_token__map__cons_tokens___rarg(x_45, x_47); +lean::inc(x_45); +x_51 = l_lean_parser_token__map__cons_tokens___rarg(x_45, x_49); +lean::inc(x_45); +x_53 = l_lean_parser_token__map__cons_tokens___rarg(x_45, x_51); +x_54 = l_lean_parser_term_lambda_parser_lean_parser_has__tokens; +lean::inc(x_54); +x_56 = l_lean_parser_token__map__cons_tokens___rarg(x_54, x_53); +lean::inc(x_54); +x_58 = l_lean_parser_token__map__cons_tokens___rarg(x_54, x_56); +x_59 = l_lean_parser_term_sort_parser_lean_parser_has__tokens; +lean::inc(x_59); +x_61 = l_lean_parser_token__map__cons_tokens___rarg(x_59, x_58); +lean::inc(x_59); +x_63 = l_lean_parser_token__map__cons_tokens___rarg(x_59, x_61); +x_64 = l_lean_parser_term_hole_parser_lean_parser_has__tokens; +lean::inc(x_64); +x_66 = l_lean_parser_token__map__cons_tokens___rarg(x_64, x_63); +x_67 = l_lean_parser_term_paren_parser_lean_parser_has__tokens; +lean::inc(x_67); +x_69 = l_lean_parser_token__map__cons_tokens___rarg(x_67, x_66); +x_70 = l_lean_parser_token__map__cons_tokens___rarg(x_0, x_69); +x_71 = l_lean_parser_token__map__cons_tokens___rarg(x_0, x_70); +x_72 = l_lean_parser_ident__univs_parser_lean_parser_has__tokens; +lean::inc(x_72); +x_74 = l_lean_parser_token__map__cons_tokens___rarg(x_72, x_71); +return x_74; } } obj* _init_l_lean_parser_term_builtin__leading__parsers() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_46; obj* x_47; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_57; obj* x_59; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_74; obj* x_75; obj* x_77; obj* x_78; obj* x_79; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_111; obj* x_112; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* 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_39; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_113; obj* x_114; obj* x_115; obj* x_116; obj* x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; x_0 = lean::box(0); x_1 = lean::mk_string("ident"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident__univs_parser), 5, 0); -x_5 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_5, 0, x_3); -lean::cnstr_set(x_5, 1, x_4); -x_6 = l_lean_parser_number; -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1), 1, 0); -lean::inc(x_6); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_6); -lean::cnstr_set(x_9, 1, x_7); -x_10 = l_lean_parser_string__lit; -x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_string__lit_parser___at_lean_parser_term_builtin__leading__parsers_lean_parser_has__tokens___spec__1), 1, 0); -lean::inc(x_10); -x_13 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_13, 0, x_10); -lean::cnstr_set(x_13, 1, x_11); -x_14 = lean::mk_string("("); -lean::inc(x_0); -x_16 = lean_name_mk_string(x_0, x_14); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_paren_parser), 5, 0); -x_18 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_18, 0, x_16); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::mk_string("_"); -lean::inc(x_0); -x_21 = lean_name_mk_string(x_0, x_19); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_hole_parser), 5, 0); -x_23 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::mk_string("Sort"); -lean::inc(x_0); -x_26 = lean_name_mk_string(x_0, x_24); -x_27 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_sort_parser), 5, 0); -lean::inc(x_27); -x_29 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_29, 0, x_26); -lean::cnstr_set(x_29, 1, x_27); -x_30 = lean::mk_string("Type"); -lean::inc(x_0); -x_32 = lean_name_mk_string(x_0, x_30); +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident__univs_parser), 5, 0); +x_4 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_4, 0, x_2); +lean::cnstr_set(x_4, 1, x_3); +x_5 = l_lean_parser_number; +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1), 1, 0); +lean::inc(x_5); +x_8 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_8, 0, x_5); +lean::cnstr_set(x_8, 1, x_6); +x_9 = l_lean_parser_string__lit; +x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_string__lit_parser___at_lean_parser_term_builtin__leading__parsers_lean_parser_has__tokens___spec__1), 1, 0); +lean::inc(x_9); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_9); +lean::cnstr_set(x_12, 1, x_10); +x_13 = lean::mk_string("("); +x_14 = lean_name_mk_string(x_0, x_13); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_paren_parser), 5, 0); +x_16 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_16, 0, x_14); +lean::cnstr_set(x_16, 1, x_15); +x_17 = lean::mk_string("_"); +x_18 = lean_name_mk_string(x_0, x_17); +x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_hole_parser), 5, 0); +x_20 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_20, 0, x_18); +lean::cnstr_set(x_20, 1, x_19); +x_21 = lean::mk_string("Sort"); +x_22 = lean_name_mk_string(x_0, x_21); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_sort_parser), 5, 0); +lean::inc(x_23); +x_25 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_25, 0, x_22); +lean::cnstr_set(x_25, 1, x_23); +x_26 = lean::mk_string("Type"); +x_27 = lean_name_mk_string(x_0, x_26); +x_28 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_23); +x_29 = lean::mk_string("\xce\xbb"); +x_30 = lean_name_mk_string(x_0, x_29); +x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_lambda_parser), 5, 0); +lean::inc(x_31); x_33 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_33, 0, x_32); -lean::cnstr_set(x_33, 1, x_27); -x_34 = lean::mk_string("\xce\xbb"); -lean::inc(x_0); -x_36 = lean_name_mk_string(x_0, x_34); -x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_lambda_parser), 5, 0); -lean::inc(x_37); -x_39 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_39, 0, x_36); -lean::cnstr_set(x_39, 1, x_37); -x_40 = lean::mk_string("fun"); -lean::inc(x_0); -x_42 = lean_name_mk_string(x_0, x_40); -x_43 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_37); -x_44 = lean::mk_string("\xce\xa0"); -lean::inc(x_0); -x_46 = lean_name_mk_string(x_0, x_44); -x_47 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_pi_parser), 5, 0); -lean::inc(x_47); +lean::cnstr_set(x_33, 0, x_30); +lean::cnstr_set(x_33, 1, x_31); +x_34 = lean::mk_string("fun"); +x_35 = lean_name_mk_string(x_0, x_34); +x_36 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_36, 0, x_35); +lean::cnstr_set(x_36, 1, x_31); +x_37 = lean::mk_string("\xce\xa0"); +x_38 = lean_name_mk_string(x_0, x_37); +x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_pi_parser), 5, 0); +lean::inc(x_39); +x_41 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_41, 0, x_38); +lean::cnstr_set(x_41, 1, x_39); +x_42 = lean::mk_string("Pi"); +x_43 = lean_name_mk_string(x_0, x_42); +lean::inc(x_39); +x_45 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_45, 0, x_43); +lean::cnstr_set(x_45, 1, x_39); +x_46 = lean::mk_string("\xe2\x88\x80"); +x_47 = lean_name_mk_string(x_0, x_46); +lean::inc(x_39); x_49 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_49, 0, x_46); -lean::cnstr_set(x_49, 1, x_47); -x_50 = lean::mk_string("Pi"); -lean::inc(x_0); -x_52 = lean_name_mk_string(x_0, x_50); -lean::inc(x_47); -x_54 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_54, 0, x_52); -lean::cnstr_set(x_54, 1, x_47); -x_55 = lean::mk_string("\xe2\x88\x80"); -lean::inc(x_0); -x_57 = lean_name_mk_string(x_0, x_55); -lean::inc(x_47); -x_59 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_59, 0, x_57); -lean::cnstr_set(x_59, 1, x_47); -x_60 = lean::mk_string("forall"); -lean::inc(x_0); -x_62 = lean_name_mk_string(x_0, x_60); -x_63 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_63, 0, x_62); -lean::cnstr_set(x_63, 1, x_47); -x_64 = lean::mk_string("\xe2\x9f\xa8"); -lean::inc(x_0); -x_66 = lean_name_mk_string(x_0, x_64); -x_67 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_anonymous__constructor_parser), 5, 0); +lean::cnstr_set(x_49, 0, x_47); +lean::cnstr_set(x_49, 1, x_39); +x_50 = lean::mk_string("forall"); +x_51 = lean_name_mk_string(x_0, x_50); +x_52 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_52, 0, x_51); +lean::cnstr_set(x_52, 1, x_39); +x_53 = lean::mk_string("\xe2\x9f\xa8"); +x_54 = lean_name_mk_string(x_0, x_53); +x_55 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_anonymous__constructor_parser), 5, 0); +x_56 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_56, 0, x_54); +lean::cnstr_set(x_56, 1, x_55); +x_57 = lean::mk_string("@"); +x_58 = lean_name_mk_string(x_0, x_57); +x_59 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_explicit_parser), 5, 0); +lean::inc(x_59); +x_61 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_61, 0, x_58); +lean::cnstr_set(x_61, 1, x_59); +x_62 = lean::mk_string("@@"); +x_63 = lean_name_mk_string(x_0, x_62); +x_64 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_64, 0, x_63); +lean::cnstr_set(x_64, 1, x_59); +x_65 = lean::mk_string("let"); +x_66 = lean_name_mk_string(x_0, x_65); +x_67 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_let_parser), 5, 0); x_68 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_68, 0, x_66); lean::cnstr_set(x_68, 1, x_67); -x_69 = lean::mk_string("@"); -lean::inc(x_0); -x_71 = lean_name_mk_string(x_0, x_69); -x_72 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_explicit_parser), 5, 0); -lean::inc(x_72); -x_74 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_74, 0, x_71); -lean::cnstr_set(x_74, 1, x_72); -x_75 = lean::mk_string("@@"); -lean::inc(x_0); -x_77 = lean_name_mk_string(x_0, x_75); -x_78 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_72); -x_79 = lean::mk_string("let"); -lean::inc(x_0); -x_81 = lean_name_mk_string(x_0, x_79); -x_82 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_let_parser), 5, 0); -x_83 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_83, 0, x_81); -lean::cnstr_set(x_83, 1, x_82); -x_84 = lean::mk_string("have"); -lean::inc(x_0); -x_86 = lean_name_mk_string(x_0, x_84); -x_87 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_have_parser), 5, 0); +x_69 = lean::mk_string("have"); +x_70 = lean_name_mk_string(x_0, x_69); +x_71 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_have_parser), 5, 0); +x_72 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_72, 0, x_70); +lean::cnstr_set(x_72, 1, x_71); +x_73 = lean::mk_string("show"); +x_74 = lean_name_mk_string(x_0, x_73); +x_75 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_show_parser), 5, 0); +x_76 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_76, 0, x_74); +lean::cnstr_set(x_76, 1, x_75); +x_77 = lean::mk_string("assume"); +x_78 = lean_name_mk_string(x_0, x_77); +x_79 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_assume_parser), 5, 0); +x_80 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_80, 0, x_78); +lean::cnstr_set(x_80, 1, x_79); +x_81 = lean::mk_string("match"); +x_82 = lean_name_mk_string(x_0, x_81); +x_83 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_match_parser), 5, 0); +x_84 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_84, 0, x_82); +lean::cnstr_set(x_84, 1, x_83); +x_85 = lean::mk_string("if"); +x_86 = lean_name_mk_string(x_0, x_85); +x_87 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_if_parser), 5, 0); x_88 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_88, 0, x_86); lean::cnstr_set(x_88, 1, x_87); -x_89 = lean::mk_string("show"); -lean::inc(x_0); -x_91 = lean_name_mk_string(x_0, x_89); -x_92 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_show_parser), 5, 0); +x_89 = lean::mk_string("{"); +x_90 = lean_name_mk_string(x_0, x_89); +x_91 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_struct__inst_parser), 5, 0); +lean::inc(x_90); x_93 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_93, 0, x_91); -lean::cnstr_set(x_93, 1, x_92); -x_94 = lean::mk_string("assume"); -lean::inc(x_0); -x_96 = lean_name_mk_string(x_0, x_94); -x_97 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_assume_parser), 5, 0); -x_98 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_98, 0, x_96); -lean::cnstr_set(x_98, 1, x_97); -x_99 = lean::mk_string("match"); -lean::inc(x_0); -x_101 = lean_name_mk_string(x_0, x_99); -x_102 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_match_parser), 5, 0); +lean::cnstr_set(x_93, 0, x_90); +lean::cnstr_set(x_93, 1, x_91); +x_94 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_subtype_parser), 5, 0); +x_95 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_95, 0, x_90); +lean::cnstr_set(x_95, 1, x_94); +x_96 = lean::mk_string(".("); +x_97 = lean_name_mk_string(x_0, x_96); +x_98 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_inaccessible_parser), 5, 0); +x_99 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_99, 0, x_97); +lean::cnstr_set(x_99, 1, x_98); +x_100 = lean::mk_string("._"); +x_101 = lean_name_mk_string(x_0, x_100); +x_102 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_anonymous__inaccessible_parser), 5, 0); x_103 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_103, 0, x_101); lean::cnstr_set(x_103, 1, x_102); -x_104 = lean::mk_string("if"); -lean::inc(x_0); -x_106 = lean_name_mk_string(x_0, x_104); -x_107 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_if_parser), 5, 0); -x_108 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_108, 0, x_106); -lean::cnstr_set(x_108, 1, x_107); -x_109 = lean::mk_string("{"); -lean::inc(x_0); -x_111 = lean_name_mk_string(x_0, x_109); -x_112 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_struct__inst_parser), 5, 0); -lean::inc(x_111); -x_114 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_114, 0, x_111); -lean::cnstr_set(x_114, 1, x_112); -x_115 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_subtype_parser), 5, 0); -x_116 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_116, 0, x_111); +x_104 = lean::mk_string("sorry"); +x_105 = lean_name_mk_string(x_0, x_104); +x_106 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_sorry_parser), 5, 0); +x_107 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_107, 0, x_105); +lean::cnstr_set(x_107, 1, x_106); +x_108 = lean::mk_string("@&"); +x_109 = lean_name_mk_string(x_0, x_108); +x_110 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_borrowed_parser), 5, 0); +x_111 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_111, 0, x_109); +lean::cnstr_set(x_111, 1, x_110); +x_112 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_112, 0, x_111); +lean::cnstr_set(x_112, 1, x_0); +x_113 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_113, 0, x_107); +lean::cnstr_set(x_113, 1, x_112); +x_114 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_114, 0, x_103); +lean::cnstr_set(x_114, 1, x_113); +x_115 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_115, 0, x_99); +lean::cnstr_set(x_115, 1, x_114); +x_116 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_116, 0, x_95); lean::cnstr_set(x_116, 1, x_115); -x_117 = lean::mk_string(".("); -lean::inc(x_0); -x_119 = lean_name_mk_string(x_0, x_117); -x_120 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_inaccessible_parser), 5, 0); -x_121 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_121, 0, x_119); +x_117 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_117, 0, x_93); +lean::cnstr_set(x_117, 1, x_116); +x_118 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_118, 0, x_88); +lean::cnstr_set(x_118, 1, x_117); +x_119 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_119, 0, x_84); +lean::cnstr_set(x_119, 1, x_118); +x_120 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_120, 0, x_80); +lean::cnstr_set(x_120, 1, x_119); +x_121 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_121, 0, x_76); lean::cnstr_set(x_121, 1, x_120); -x_122 = lean::mk_string("._"); -lean::inc(x_0); -x_124 = lean_name_mk_string(x_0, x_122); -x_125 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_anonymous__inaccessible_parser), 5, 0); -x_126 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_126, 0, x_124); +x_122 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_122, 0, x_72); +lean::cnstr_set(x_122, 1, x_121); +x_123 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_123, 0, x_68); +lean::cnstr_set(x_123, 1, x_122); +x_124 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_124, 0, x_64); +lean::cnstr_set(x_124, 1, x_123); +x_125 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_125, 0, x_61); +lean::cnstr_set(x_125, 1, x_124); +x_126 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_126, 0, x_56); lean::cnstr_set(x_126, 1, x_125); -x_127 = lean::mk_string("sorry"); -lean::inc(x_0); -x_129 = lean_name_mk_string(x_0, x_127); -x_130 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_sorry_parser), 5, 0); -x_131 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_131, 0, x_129); +x_127 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_127, 0, x_52); +lean::cnstr_set(x_127, 1, x_126); +x_128 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_128, 0, x_49); +lean::cnstr_set(x_128, 1, x_127); +x_129 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_129, 0, x_45); +lean::cnstr_set(x_129, 1, x_128); +x_130 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_130, 0, x_41); +lean::cnstr_set(x_130, 1, x_129); +x_131 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_131, 0, x_36); lean::cnstr_set(x_131, 1, x_130); -x_132 = lean::mk_string("@&"); -lean::inc(x_0); -x_134 = lean_name_mk_string(x_0, x_132); -x_135 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_borrowed_parser), 5, 0); -x_136 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_136, 0, x_134); +x_132 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_132, 0, x_33); +lean::cnstr_set(x_132, 1, x_131); +x_133 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_133, 0, x_28); +lean::cnstr_set(x_133, 1, x_132); +x_134 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_134, 0, x_25); +lean::cnstr_set(x_134, 1, x_133); +x_135 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_135, 0, x_20); +lean::cnstr_set(x_135, 1, x_134); +x_136 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_136, 0, x_16); lean::cnstr_set(x_136, 1, x_135); x_137 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_137, 0, x_136); -lean::cnstr_set(x_137, 1, x_0); +lean::cnstr_set(x_137, 0, x_12); +lean::cnstr_set(x_137, 1, x_136); x_138 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_138, 0, x_131); +lean::cnstr_set(x_138, 0, x_8); lean::cnstr_set(x_138, 1, x_137); x_139 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_139, 0, x_126); +lean::cnstr_set(x_139, 0, x_4); lean::cnstr_set(x_139, 1, x_138); -x_140 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_140, 0, x_121); -lean::cnstr_set(x_140, 1, x_139); -x_141 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_141, 0, x_116); -lean::cnstr_set(x_141, 1, x_140); -x_142 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_142, 0, x_114); -lean::cnstr_set(x_142, 1, x_141); -x_143 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_143, 0, x_108); -lean::cnstr_set(x_143, 1, x_142); -x_144 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_144, 0, x_103); -lean::cnstr_set(x_144, 1, x_143); -x_145 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_145, 0, x_98); -lean::cnstr_set(x_145, 1, x_144); -x_146 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_146, 0, x_93); -lean::cnstr_set(x_146, 1, x_145); -x_147 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_147, 0, x_88); -lean::cnstr_set(x_147, 1, x_146); -x_148 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_148, 0, x_83); -lean::cnstr_set(x_148, 1, x_147); -x_149 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_149, 0, x_78); -lean::cnstr_set(x_149, 1, x_148); -x_150 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_150, 0, x_74); -lean::cnstr_set(x_150, 1, x_149); -x_151 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_151, 0, x_68); -lean::cnstr_set(x_151, 1, x_150); -x_152 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_152, 0, x_63); -lean::cnstr_set(x_152, 1, x_151); -x_153 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_153, 0, x_59); -lean::cnstr_set(x_153, 1, x_152); -x_154 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_154, 0, x_54); -lean::cnstr_set(x_154, 1, x_153); -x_155 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_155, 0, x_49); -lean::cnstr_set(x_155, 1, x_154); -x_156 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_156, 0, x_43); -lean::cnstr_set(x_156, 1, x_155); -x_157 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_157, 0, x_39); -lean::cnstr_set(x_157, 1, x_156); -x_158 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_158, 0, x_33); -lean::cnstr_set(x_158, 1, x_157); -x_159 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_159, 0, x_29); -lean::cnstr_set(x_159, 1, x_158); -x_160 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_160, 0, x_23); -lean::cnstr_set(x_160, 1, x_159); -x_161 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_161, 0, x_18); -lean::cnstr_set(x_161, 1, x_160); -x_162 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_162, 0, x_13); -lean::cnstr_set(x_162, 1, x_161); -x_163 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_163, 0, x_9); -lean::cnstr_set(x_163, 1, x_162); -x_164 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_164, 0, x_5); -lean::cnstr_set(x_164, 1, x_163); -x_165 = l_lean_parser_token__map_of__list___main___rarg(x_164); -return x_165; +x_140 = l_lean_parser_token__map_of__list___main___rarg(x_139); +return x_140; } } obj* _init_l_lean_parser_term_sort__app() { @@ -44793,13 +44410,12 @@ return x_8; obj* _init_l_lean_parser_term_sort__app_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_2; +obj* x_0; obj* x_1; x_0 = lean::box(3); -lean::inc(x_0); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_0); -lean::cnstr_set(x_2, 1, x_0); -return x_2; +x_1 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1, 0, x_0); +lean::cnstr_set(x_1, 1, x_0); +return x_1; } } obj* l_lean_parser_term_sort__app_has__view_x_27___lambda__1(obj* x_0) { @@ -45835,13 +45451,12 @@ return x_8; obj* _init_l_lean_parser_term_app_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_2; +obj* x_0; obj* x_1; x_0 = lean::box(3); -lean::inc(x_0); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_0); -lean::cnstr_set(x_2, 1, x_0); -return x_2; +x_1 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1, 0, x_0); +lean::cnstr_set(x_1, 1, x_0); +return x_1; } } obj* l_lean_parser_term_app_has__view_x_27___lambda__1(obj* x_0) { @@ -46115,15 +45730,13 @@ return x_8; obj* _init_l_lean_parser_term_arrow_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_3; +obj* x_0; obj* x_1; x_0 = lean::box(3); -lean::inc(x_0); -lean::inc(x_0); -x_3 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_3, 0, x_0); -lean::cnstr_set(x_3, 1, x_0); -lean::cnstr_set(x_3, 2, x_0); -return x_3; +x_1 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_1, 0, x_0); +lean::cnstr_set(x_1, 1, x_0); +lean::cnstr_set(x_1, 2, x_0); +return x_1; } } obj* l_lean_parser_term_arrow_has__view_x_27___lambda__1(obj* x_0) { @@ -46160,117 +45773,114 @@ return x_10; } else { -obj* x_12; obj* x_15; obj* x_17; +obj* x_12; obj* x_15; obj* x_16; x_12 = lean::cnstr_get(x_7, 0); lean::inc(x_12); lean::dec(x_7); x_15 = lean::box(3); -lean::inc(x_15); -x_17 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_17, 0, x_15); -lean::cnstr_set(x_17, 1, x_15); -lean::cnstr_set(x_17, 2, x_12); -return x_17; +x_16 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_16, 0, x_15); +lean::cnstr_set(x_16, 1, x_15); +lean::cnstr_set(x_16, 2, x_12); +return x_16; } } else { -obj* x_18; obj* x_20; -x_18 = lean::cnstr_get(x_7, 0); -lean::inc(x_18); -x_20 = lean::cnstr_get(x_7, 1); -lean::inc(x_20); +obj* x_17; obj* x_19; +x_17 = lean::cnstr_get(x_7, 0); +lean::inc(x_17); +x_19 = lean::cnstr_get(x_7, 1); +lean::inc(x_19); lean::dec(x_7); -if (lean::obj_tag(x_20) == 0) +if (lean::obj_tag(x_19) == 0) { -obj* x_23; obj* x_25; -x_23 = lean::box(3); -lean::inc(x_23); -x_25 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_18); -lean::cnstr_set(x_25, 2, x_23); -return x_25; +obj* x_22; obj* x_23; +x_22 = lean::box(3); +x_23 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_23, 0, x_22); +lean::cnstr_set(x_23, 1, x_17); +lean::cnstr_set(x_23, 2, x_22); +return x_23; } else { -obj* x_26; obj* x_29; obj* x_30; -x_26 = lean::cnstr_get(x_20, 0); -lean::inc(x_26); -lean::dec(x_20); -x_29 = lean::box(3); -x_30 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_18); -lean::cnstr_set(x_30, 2, x_26); -return x_30; +obj* x_24; obj* x_27; obj* x_28; +x_24 = lean::cnstr_get(x_19, 0); +lean::inc(x_24); +lean::dec(x_19); +x_27 = lean::box(3); +x_28 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_17); +lean::cnstr_set(x_28, 2, x_24); +return x_28; } } } else { -obj* x_31; obj* x_33; -x_31 = lean::cnstr_get(x_7, 0); +obj* x_29; obj* x_31; +x_29 = lean::cnstr_get(x_7, 0); +lean::inc(x_29); +x_31 = lean::cnstr_get(x_7, 1); lean::inc(x_31); -x_33 = lean::cnstr_get(x_7, 1); -lean::inc(x_33); lean::dec(x_7); -if (lean::obj_tag(x_33) == 0) +if (lean::obj_tag(x_31) == 0) { -if (lean::obj_tag(x_33) == 0) +if (lean::obj_tag(x_31) == 0) { -obj* x_36; obj* x_38; -x_36 = lean::box(3); +obj* x_34; obj* x_35; +x_34 = lean::box(3); +x_35 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_35, 0, x_29); +lean::cnstr_set(x_35, 1, x_34); +lean::cnstr_set(x_35, 2, x_34); +return x_35; +} +else +{ +obj* x_36; obj* x_39; obj* x_40; +x_36 = lean::cnstr_get(x_31, 0); lean::inc(x_36); -x_38 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_38, 0, x_31); -lean::cnstr_set(x_38, 1, x_36); -lean::cnstr_set(x_38, 2, x_36); -return x_38; -} -else -{ -obj* x_39; obj* x_42; obj* x_43; -x_39 = lean::cnstr_get(x_33, 0); -lean::inc(x_39); -lean::dec(x_33); -x_42 = lean::box(3); -x_43 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_43, 0, x_31); -lean::cnstr_set(x_43, 1, x_42); -lean::cnstr_set(x_43, 2, x_39); -return x_43; +lean::dec(x_31); +x_39 = lean::box(3); +x_40 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_40, 0, x_29); +lean::cnstr_set(x_40, 1, x_39); +lean::cnstr_set(x_40, 2, x_36); +return x_40; } } else { -obj* x_44; obj* x_46; -x_44 = lean::cnstr_get(x_33, 0); -lean::inc(x_44); -x_46 = lean::cnstr_get(x_33, 1); -lean::inc(x_46); -lean::dec(x_33); -if (lean::obj_tag(x_46) == 0) +obj* x_41; obj* x_43; +x_41 = lean::cnstr_get(x_31, 0); +lean::inc(x_41); +x_43 = lean::cnstr_get(x_31, 1); +lean::inc(x_43); +lean::dec(x_31); +if (lean::obj_tag(x_43) == 0) { -obj* x_49; obj* x_50; -x_49 = lean::box(3); -x_50 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_50, 0, x_31); -lean::cnstr_set(x_50, 1, x_44); -lean::cnstr_set(x_50, 2, x_49); -return x_50; +obj* x_46; obj* x_47; +x_46 = lean::box(3); +x_47 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_47, 0, x_29); +lean::cnstr_set(x_47, 1, x_41); +lean::cnstr_set(x_47, 2, x_46); +return x_47; } else { -obj* x_51; obj* x_54; -x_51 = lean::cnstr_get(x_46, 0); -lean::inc(x_51); -lean::dec(x_46); -x_54 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_54, 0, x_31); -lean::cnstr_set(x_54, 1, x_44); -lean::cnstr_set(x_54, 2, x_51); -return x_54; +obj* x_48; obj* x_51; +x_48 = lean::cnstr_get(x_43, 0); +lean::inc(x_48); +lean::dec(x_43); +x_51 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_51, 0, x_29); +lean::cnstr_set(x_51, 1, x_41); +lean::cnstr_set(x_51, 2, x_48); +return x_51; } } } @@ -46487,24 +46097,21 @@ return x_8; obj* _init_l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_9; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -x_8 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_8, 0, x_0); -lean::cnstr_set(x_8, 1, x_3); -lean::cnstr_set(x_8, 2, x_5); -lean::cnstr_set(x_8, 3, x_0); -lean::cnstr_set(x_8, 4, x_0); -x_9 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_9, 0, x_8); -return x_9; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +x_6 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_6, 0, x_5); +return x_6; } } obj* _init_l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__2() { @@ -46693,50 +46300,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__3; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__3; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__3; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__3; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__3; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__3; +lean::inc(x_69); +return x_69; } } } @@ -46746,61 +46352,61 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__3; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__3; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { -obj* x_80; obj* x_81; obj* x_83; obj* x_84; -x_80 = l_lean_parser_number_has__view; -x_81 = lean::cnstr_get(x_80, 0); -lean::inc(x_81); -x_83 = lean::apply_1(x_81, x_1); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +obj* x_79; obj* x_80; obj* x_82; obj* x_83; +x_79 = l_lean_parser_number_has__view; +x_80 = lean::cnstr_get(x_79, 0); +lean::inc(x_80); +x_82 = lean::apply_1(x_80, x_1); +x_83 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_83, 0, x_82); +return x_83; } else { switch (lean::obj_tag(x_1)) { case 1: { -obj* x_85; obj* x_88; -x_85 = lean::cnstr_get(x_1, 0); -lean::inc(x_85); +obj* x_84; obj* x_87; +x_84 = lean::cnstr_get(x_1, 0); +lean::inc(x_84); lean::dec(x_1); -x_88 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_88, 0, x_85); -return x_88; +x_87 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_87, 0, x_84); +return x_87; } case 3: { -obj* x_89; -x_89 = l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__2; -lean::inc(x_89); -return x_89; +obj* x_88; +x_88 = l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__2; +lean::inc(x_88); +return x_88; } default: { -obj* x_92; +obj* x_91; lean::dec(x_1); -x_92 = l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__2; -lean::inc(x_92); -return x_92; +x_91 = l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__2; +lean::inc(x_91); +return x_91; } } } @@ -46814,51 +46420,49 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; +obj* x_2; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); x_5 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_5, 0, x_2); -lean::inc(x_1); -x_7 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_1); -x_8 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_8); -x_10 = l_lean_parser_syntax_mk__node(x_8, x_7); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_1); -x_12 = l_lean_parser_term_projection__spec; -lean::inc(x_12); -x_14 = l_lean_parser_syntax_mk__node(x_12, x_11); -return x_14; +x_6 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_1); +x_7 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_7); +x_9 = l_lean_parser_syntax_mk__node(x_7, x_6); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_1); +x_11 = l_lean_parser_term_projection__spec; +lean::inc(x_11); +x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); +return x_13; } else { -obj* x_15; obj* x_18; obj* x_19; obj* x_21; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_30; -x_15 = lean::cnstr_get(x_0, 0); -lean::inc(x_15); +obj* x_14; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; +x_14 = lean::cnstr_get(x_0, 0); +lean::inc(x_14); lean::dec(x_0); -x_18 = l_lean_parser_number_has__view; -x_19 = lean::cnstr_get(x_18, 1); -lean::inc(x_19); -x_21 = lean::apply_1(x_19, x_15); -lean::inc(x_1); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_21); -lean::cnstr_set(x_23, 1, x_1); -x_24 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_24); -x_26 = l_lean_parser_syntax_mk__node(x_24, x_23); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_26); -lean::cnstr_set(x_27, 1, x_1); -x_28 = l_lean_parser_term_projection__spec; -lean::inc(x_28); -x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); -return x_30; +x_17 = l_lean_parser_number_has__view; +x_18 = lean::cnstr_get(x_17, 1); +lean::inc(x_18); +x_20 = lean::apply_1(x_18, x_14); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_20); +lean::cnstr_set(x_21, 1, x_1); +x_22 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_22); +x_24 = l_lean_parser_syntax_mk__node(x_22, x_21); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_1); +x_26 = l_lean_parser_term_projection__spec; +lean::inc(x_26); +x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); +return x_28; } } } @@ -47732,221 +47336,219 @@ _start: { if (lean::obj_tag(x_0) == 0) { -obj* x_9; obj* x_10; obj* x_11; obj* x_15; +obj* x_9; obj* x_10; obj* x_11; obj* x_14; lean::dec(x_1); x_9 = lean::box(0); x_10 = l_lean_parser_combinators_choice__aux___main___rarg___closed__1; x_11 = l_mjoin___rarg___closed__1; -lean::inc(x_9); lean::inc(x_11); lean::inc(x_10); -x_15 = l_lean_parser_monad__parsec_error___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__5___rarg(x_10, x_11, x_9, x_9, x_2, x_3, x_4, x_5, x_6, x_7); -return x_15; +x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__5___rarg(x_10, x_11, x_9, x_9, x_2, x_3, x_4, x_5, x_6, x_7); +return x_14; } else { -obj* x_16; obj* x_18; obj* x_20; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; -x_16 = lean::cnstr_get(x_0, 0); -lean::inc(x_16); -x_18 = lean::cnstr_get(x_0, 1); -lean::inc(x_18); +obj* x_15; obj* x_17; obj* x_19; obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; +x_15 = lean::cnstr_get(x_0, 0); +lean::inc(x_15); +x_17 = lean::cnstr_get(x_0, 1); +lean::inc(x_17); if (lean::is_shared(x_0)) { lean::dec(x_0); - x_20 = lean::box(0); + x_19 = lean::box(0); } else { lean::cnstr_release(x_0, 0); lean::cnstr_release(x_0, 1); - x_20 = x_0; + x_19 = x_0; } lean::inc(x_6); lean::inc(x_5); lean::inc(x_4); lean::inc(x_3); lean::inc(x_2); -x_26 = lean::apply_6(x_16, x_2, x_3, x_4, x_5, x_6, x_7); -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -x_29 = lean::cnstr_get(x_26, 1); -lean::inc(x_29); +x_25 = lean::apply_6(x_15, x_2, x_3, x_4, x_5, x_6, x_7); +x_26 = lean::cnstr_get(x_25, 0); +lean::inc(x_26); +x_28 = lean::cnstr_get(x_25, 1); +lean::inc(x_28); +if (lean::is_shared(x_25)) { + lean::dec(x_25); + x_30 = lean::box(0); +} else { + lean::cnstr_release(x_25, 0); + lean::cnstr_release(x_25, 1); + x_30 = x_25; +} +x_31 = lean::mk_nat_obj(1u); +x_32 = lean::nat_add(x_1, x_31); +lean::dec(x_31); +if (lean::obj_tag(x_26) == 0) +{ +obj* x_34; obj* x_36; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_48; +x_34 = lean::cnstr_get(x_26, 0); +lean::inc(x_34); +x_36 = lean::cnstr_get(x_26, 1); +lean::inc(x_36); +x_38 = lean::cnstr_get(x_26, 2); +lean::inc(x_38); if (lean::is_shared(x_26)) { lean::dec(x_26); - x_31 = lean::box(0); + x_40 = lean::box(0); } else { lean::cnstr_release(x_26, 0); lean::cnstr_release(x_26, 1); - x_31 = x_26; + lean::cnstr_release(x_26, 2); + x_40 = x_26; } -x_32 = lean::mk_nat_obj(1u); -x_33 = lean::nat_add(x_1, x_32); +x_41 = lean::box(0); +x_42 = lean_name_mk_numeral(x_41, x_1); +if (lean::is_scalar(x_19)) { + x_43 = lean::alloc_cnstr(1, 2, 0); +} else { + x_43 = x_19; +} +lean::cnstr_set(x_43, 0, x_34); +lean::cnstr_set(x_43, 1, x_41); +x_44 = l_lean_parser_syntax_mk__node(x_42, x_43); +x_45 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_45); +if (lean::is_scalar(x_40)) { + x_47 = lean::alloc_cnstr(0, 3, 0); +} else { + x_47 = x_40; +} +lean::cnstr_set(x_47, 0, x_44); +lean::cnstr_set(x_47, 1, x_36); +lean::cnstr_set(x_47, 2, x_45); +x_48 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_38, x_47); +if (lean::obj_tag(x_48) == 0) +{ +obj* x_56; +lean::dec(x_5); +lean::dec(x_4); +lean::dec(x_6); +lean::dec(x_3); +lean::dec(x_2); lean::dec(x_32); -if (lean::obj_tag(x_27) == 0) -{ -obj* x_35; obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_50; -x_35 = lean::cnstr_get(x_27, 0); -lean::inc(x_35); -x_37 = lean::cnstr_get(x_27, 1); -lean::inc(x_37); -x_39 = lean::cnstr_get(x_27, 2); -lean::inc(x_39); -if (lean::is_shared(x_27)) { - lean::dec(x_27); - x_41 = lean::box(0); +lean::dec(x_17); +if (lean::is_scalar(x_30)) { + x_56 = lean::alloc_cnstr(0, 2, 0); } else { - lean::cnstr_release(x_27, 0); - lean::cnstr_release(x_27, 1); - lean::cnstr_release(x_27, 2); - x_41 = x_27; + x_56 = x_30; } -x_42 = lean::box(0); -lean::inc(x_42); -x_44 = lean_name_mk_numeral(x_42, x_1); -if (lean::is_scalar(x_20)) { - x_45 = lean::alloc_cnstr(1, 2, 0); -} else { - x_45 = x_20; -} -lean::cnstr_set(x_45, 0, x_35); -lean::cnstr_set(x_45, 1, x_42); -x_46 = l_lean_parser_syntax_mk__node(x_44, x_45); -x_47 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_47); -if (lean::is_scalar(x_41)) { - x_49 = lean::alloc_cnstr(0, 3, 0); -} else { - x_49 = x_41; -} -lean::cnstr_set(x_49, 0, x_46); -lean::cnstr_set(x_49, 1, x_37); -lean::cnstr_set(x_49, 2, x_47); -x_50 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_39, x_49); -if (lean::obj_tag(x_50) == 0) -{ -obj* x_58; -lean::dec(x_5); -lean::dec(x_18); -lean::dec(x_4); -lean::dec(x_6); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_33); -if (lean::is_scalar(x_31)) { - x_58 = lean::alloc_cnstr(0, 2, 0); -} else { - x_58 = x_31; -} -lean::cnstr_set(x_58, 0, x_50); -lean::cnstr_set(x_58, 1, x_29); -return x_58; +lean::cnstr_set(x_56, 0, x_48); +lean::cnstr_set(x_56, 1, x_28); +return x_56; } else { -obj* x_59; uint8 x_61; -x_59 = lean::cnstr_get(x_50, 0); -lean::inc(x_59); -x_61 = lean::cnstr_get_scalar(x_50, sizeof(void*)*1); -if (x_61 == 0) +obj* x_57; uint8 x_59; +x_57 = lean::cnstr_get(x_48, 0); +lean::inc(x_57); +x_59 = lean::cnstr_get_scalar(x_48, sizeof(void*)*1); +if (x_59 == 0) { -obj* x_63; obj* x_64; obj* x_66; obj* x_69; obj* x_70; -lean::dec(x_50); -x_63 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__4(x_18, x_33, x_2, x_3, x_4, x_5, x_6, x_29); -x_64 = lean::cnstr_get(x_63, 0); +obj* x_61; obj* x_62; obj* x_64; obj* x_67; obj* x_68; +lean::dec(x_48); +x_61 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__4(x_17, x_32, x_2, x_3, x_4, x_5, x_6, x_28); +x_62 = lean::cnstr_get(x_61, 0); +lean::inc(x_62); +x_64 = lean::cnstr_get(x_61, 1); lean::inc(x_64); -x_66 = lean::cnstr_get(x_63, 1); -lean::inc(x_66); -lean::dec(x_63); -x_69 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_59, x_64); -if (lean::is_scalar(x_31)) { - x_70 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_61); +x_67 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_57, x_62); +if (lean::is_scalar(x_30)) { + x_68 = lean::alloc_cnstr(0, 2, 0); } else { - x_70 = x_31; + x_68 = x_30; } -lean::cnstr_set(x_70, 0, x_69); -lean::cnstr_set(x_70, 1, x_66); -return x_70; +lean::cnstr_set(x_68, 0, x_67); +lean::cnstr_set(x_68, 1, x_64); +return x_68; } else { -obj* x_79; +obj* x_77; lean::dec(x_5); -lean::dec(x_18); lean::dec(x_4); lean::dec(x_6); lean::dec(x_3); lean::dec(x_2); -lean::dec(x_33); -lean::dec(x_59); -if (lean::is_scalar(x_31)) { - x_79 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_32); +lean::dec(x_17); +lean::dec(x_57); +if (lean::is_scalar(x_30)) { + x_77 = lean::alloc_cnstr(0, 2, 0); } else { - x_79 = x_31; + x_77 = x_30; } -lean::cnstr_set(x_79, 0, x_50); -lean::cnstr_set(x_79, 1, x_29); -return x_79; +lean::cnstr_set(x_77, 0, x_48); +lean::cnstr_set(x_77, 1, x_28); +return x_77; } } } else { -obj* x_82; uint8 x_84; obj* x_85; -lean::dec(x_20); +obj* x_80; uint8 x_82; obj* x_83; +lean::dec(x_19); lean::dec(x_1); -x_82 = lean::cnstr_get(x_27, 0); -lean::inc(x_82); -x_84 = lean::cnstr_get_scalar(x_27, sizeof(void*)*1); -if (lean::is_shared(x_27)) { - lean::dec(x_27); - x_85 = lean::box(0); +x_80 = lean::cnstr_get(x_26, 0); +lean::inc(x_80); +x_82 = lean::cnstr_get_scalar(x_26, sizeof(void*)*1); +if (lean::is_shared(x_26)) { + lean::dec(x_26); + x_83 = lean::box(0); } else { - lean::cnstr_release(x_27, 0); - x_85 = x_27; + lean::cnstr_release(x_26, 0); + x_83 = x_26; } -if (x_84 == 0) +if (x_82 == 0) { -obj* x_87; obj* x_88; obj* x_90; obj* x_93; obj* x_94; -lean::dec(x_85); -x_87 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__4(x_18, x_33, x_2, x_3, x_4, x_5, x_6, x_29); -x_88 = lean::cnstr_get(x_87, 0); +obj* x_85; obj* x_86; obj* x_88; obj* x_91; obj* x_92; +lean::dec(x_83); +x_85 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__4(x_17, x_32, x_2, x_3, x_4, x_5, x_6, x_28); +x_86 = lean::cnstr_get(x_85, 0); +lean::inc(x_86); +x_88 = lean::cnstr_get(x_85, 1); lean::inc(x_88); -x_90 = lean::cnstr_get(x_87, 1); -lean::inc(x_90); -lean::dec(x_87); -x_93 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_82, x_88); -if (lean::is_scalar(x_31)) { - x_94 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_85); +x_91 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_80, x_86); +if (lean::is_scalar(x_30)) { + x_92 = lean::alloc_cnstr(0, 2, 0); } else { - x_94 = x_31; + x_92 = x_30; } -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_90); -return x_94; +lean::cnstr_set(x_92, 0, x_91); +lean::cnstr_set(x_92, 1, x_88); +return x_92; } else { -obj* x_102; obj* x_103; obj* x_104; +obj* x_100; obj* x_101; obj* x_102; lean::dec(x_5); -lean::dec(x_18); lean::dec(x_4); lean::dec(x_6); lean::dec(x_3); lean::dec(x_2); -lean::dec(x_33); -if (lean::is_scalar(x_85)) { - x_102 = lean::alloc_cnstr(1, 1, 1); +lean::dec(x_32); +lean::dec(x_17); +if (lean::is_scalar(x_83)) { + x_100 = lean::alloc_cnstr(1, 1, 1); } else { - x_102 = x_85; + x_100 = x_83; } -lean::cnstr_set(x_102, 0, x_82); -lean::cnstr_set_scalar(x_102, sizeof(void*)*1, x_84); -x_103 = x_102; -if (lean::is_scalar(x_31)) { - x_104 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_100, 0, x_80); +lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_82); +x_101 = x_100; +if (lean::is_scalar(x_30)) { + x_102 = lean::alloc_cnstr(0, 2, 0); } else { - x_104 = x_31; + x_102 = x_30; } -lean::cnstr_set(x_104, 0, x_103); -lean::cnstr_set(x_104, 1, x_29); -return x_104; +lean::cnstr_set(x_102, 0, x_101); +lean::cnstr_set(x_102, 1, x_28); +return x_102; } } } @@ -48045,7 +47647,7 @@ return x_35; obj* _init_l_lean_parser_term_projection_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_42; obj* x_45; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_40; obj* x_43; x_0 = lean::mk_string("."); x_1 = l_string_quote(x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); @@ -48066,65 +47668,63 @@ lean::closure_set(x_9, 0, x_7); lean::closure_set(x_9, 1, x_8); x_10 = lean::box(0); x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__3), 2, 0); -lean::inc(x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_10); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__2), 2, 0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::mk_nat_obj(0u); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__4), 8, 2); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_16); -lean::inc(x_10); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_10); -x_20 = l_lean_parser_term_projection__spec; -lean::inc(x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__3), 8, 2); -lean::closure_set(x_22, 0, x_20); -lean::closure_set(x_22, 1, x_19); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_10); +x_12 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_12, 0, x_11); +lean::cnstr_set(x_12, 1, x_10); +x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__2), 2, 0); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_12); +x_15 = lean::mk_nat_obj(0u); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__4), 8, 2); +lean::closure_set(x_16, 0, x_14); +lean::closure_set(x_16, 1, x_15); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_16); +lean::cnstr_set(x_17, 1, x_10); +x_18 = l_lean_parser_term_projection__spec; +lean::inc(x_18); +x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__3), 8, 2); +lean::closure_set(x_20, 0, x_18); +lean::closure_set(x_20, 1, x_17); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_20); +lean::cnstr_set(x_21, 1, x_10); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_9); +lean::cnstr_set(x_22, 1, x_21); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_get__leading), 6, 0); x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_9); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_get__leading), 6, 0); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_24); -x_27 = l_lean_parser_term_projection; -lean::inc(x_26); -lean::inc(x_27); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__3), 8, 2); -lean::closure_set(x_30, 0, x_27); -lean::closure_set(x_30, 1, x_26); -x_31 = l_lean_parser_trailing__term__parser__m_monad; -x_32 = l_lean_parser_trailing__term__parser__m_monad__except; -x_33 = l_lean_parser_trailing__term__parser__m_lean_parser_monad__parsec; -x_34 = l_lean_parser_trailing__term__parser__m_alternative; -x_35 = l_lean_parser_term_projection_has__view; -lean::inc(x_35); -lean::inc(x_27); -lean::inc(x_34); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_22); +x_25 = l_lean_parser_term_projection; +lean::inc(x_24); +lean::inc(x_25); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__3), 8, 2); +lean::closure_set(x_28, 0, x_25); +lean::closure_set(x_28, 1, x_24); +x_29 = l_lean_parser_trailing__term__parser__m_monad; +x_30 = l_lean_parser_trailing__term__parser__m_monad__except; +x_31 = l_lean_parser_trailing__term__parser__m_lean_parser_monad__parsec; +x_32 = l_lean_parser_trailing__term__parser__m_alternative; +x_33 = l_lean_parser_term_projection_has__view; lean::inc(x_33); +lean::inc(x_25); lean::inc(x_32); lean::inc(x_31); -x_42 = l_lean_parser_combinators_node_view___rarg(x_31, x_32, x_33, x_34, x_27, x_26, x_35); -lean::inc(x_34); -lean::inc(x_33); -x_45 = l_lean_parser_combinators_try_view___rarg(x_33, x_34, x_30, x_42); -return x_45; +lean::inc(x_30); +lean::inc(x_29); +x_40 = l_lean_parser_combinators_node_view___rarg(x_29, x_30, x_31, x_32, x_25, x_24, x_33); +lean::inc(x_32); +lean::inc(x_31); +x_43 = l_lean_parser_combinators_try_view___rarg(x_31, x_32, x_28, x_40); +return x_43; } } obj* _init_l_lean_parser_term_projection_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; x_0 = lean::mk_string("."); x_1 = l_string_quote(x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); @@ -48145,38 +47745,36 @@ lean::closure_set(x_9, 0, x_7); lean::closure_set(x_9, 1, x_8); x_10 = lean::box(0); x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__3), 2, 0); -lean::inc(x_10); -x_13 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_13, 0, x_11); -lean::cnstr_set(x_13, 1, x_10); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__2), 2, 0); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_13); -x_16 = lean::mk_nat_obj(0u); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__4), 8, 2); -lean::closure_set(x_17, 0, x_15); -lean::closure_set(x_17, 1, x_16); -lean::inc(x_10); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_17); -lean::cnstr_set(x_19, 1, x_10); -x_20 = l_lean_parser_term_projection__spec; -lean::inc(x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__3), 8, 2); -lean::closure_set(x_22, 0, x_20); -lean::closure_set(x_22, 1, x_19); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_10); +x_12 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_12, 0, x_11); +lean::cnstr_set(x_12, 1, x_10); +x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__2), 2, 0); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_12); +x_15 = lean::mk_nat_obj(0u); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__4), 8, 2); +lean::closure_set(x_16, 0, x_14); +lean::closure_set(x_16, 1, x_15); +x_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_16); +lean::cnstr_set(x_17, 1, x_10); +x_18 = l_lean_parser_term_projection__spec; +lean::inc(x_18); +x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__3), 8, 2); +lean::closure_set(x_20, 0, x_18); +lean::closure_set(x_20, 1, x_17); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_20); +lean::cnstr_set(x_21, 1, x_10); +x_22 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_22, 0, x_9); +lean::cnstr_set(x_22, 1, x_21); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_get__leading), 6, 0); x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_9); -lean::cnstr_set(x_24, 1, x_23); -x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_get__leading), 6, 0); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_24); -return x_26; +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_22); +return x_24; } } obj* l_lean_parser_term_projection_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { @@ -48214,22 +47812,21 @@ return x_17; obj* _init_l_lean_parser_term_projection_tokens() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_7; obj* x_8; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_6; obj* x_7; x_0 = l_lean_parser_max__prec; x_1 = lean::mk_nat_obj(1u); x_2 = lean::nat_add(x_0, x_1); lean::dec(x_1); x_4 = lean::box(0); x_5 = lean::mk_string("."); -lean::inc(x_4); -x_7 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_7, 0, x_5); -lean::cnstr_set(x_7, 1, x_2); -lean::cnstr_set(x_7, 2, x_4); -x_8 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_8, 0, x_7); -lean::cnstr_set(x_8, 1, x_4); -return x_8; +x_6 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_2); +lean::cnstr_set(x_6, 2, x_4); +x_7 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_7, 0, x_6); +lean::cnstr_set(x_7, 1, x_4); +return x_7; } } obj* _init_l_lean_parser_term_builtin__trailing__parsers_lean_parser_has__tokens() { @@ -48251,40 +47848,37 @@ return x_8; obj* _init_l_lean_parser_term_builtin__trailing__parsers() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* 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_19; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; x_0 = lean::box(0); x_1 = lean::mk_string("\xe2\x86\x92"); -lean::inc(x_0); -x_3 = lean_name_mk_string(x_0, x_1); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_arrow_parser), 6, 0); -lean::inc(x_4); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_3); -lean::cnstr_set(x_6, 1, x_4); -x_7 = lean::mk_string("->"); -lean::inc(x_0); -x_9 = lean_name_mk_string(x_0, x_7); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_4); -x_11 = lean::mk_string("."); -lean::inc(x_0); -x_13 = lean_name_mk_string(x_0, x_11); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_projection_parser), 6, 0); -x_15 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_15, 0, x_13); +x_2 = lean_name_mk_string(x_0, x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_arrow_parser), 6, 0); +lean::inc(x_3); +x_5 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_5, 0, x_2); +lean::cnstr_set(x_5, 1, x_3); +x_6 = lean::mk_string("->"); +x_7 = lean_name_mk_string(x_0, x_6); +x_8 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_8, 0, x_7); +lean::cnstr_set(x_8, 1, x_3); +x_9 = lean::mk_string("."); +x_10 = lean_name_mk_string(x_0, x_9); +x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_projection_parser), 6, 0); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_10); +lean::cnstr_set(x_12, 1, x_11); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_0); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_8); +lean::cnstr_set(x_14, 1, x_13); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_5); lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_0); -x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_10); -lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_6); -lean::cnstr_set(x_18, 1, x_17); -x_19 = l_lean_parser_token__map_of__list___main___rarg(x_18); -return x_19; +x_16 = l_lean_parser_token__map_of__list___main___rarg(x_15); +return x_16; } } obj* l_rbmap_find___main___at___private_init_lean_parser_term_1__trailing___spec__2___rarg(obj* x_0, obj* x_1) { @@ -48388,200 +47982,198 @@ lean::inc(x_21); lean::dec(x_12); if (lean::obj_tag(x_17) == 0) { -obj* x_26; obj* x_27; obj* x_28; obj* x_32; obj* x_33; obj* x_35; obj* x_38; obj* x_39; +obj* x_26; obj* x_27; obj* x_28; obj* x_31; obj* x_32; obj* x_34; obj* x_37; obj* x_38; lean::dec(x_0); lean::dec(x_17); x_26 = lean::box(0); x_27 = l_string_join___closed__1; x_28 = l_mjoin___rarg___closed__1; -lean::inc(x_26); lean::inc(x_28); lean::inc(x_27); -x_32 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_27, x_28, x_26, x_26, x_3, x_19, x_14); -x_33 = lean::cnstr_get(x_32, 0); -lean::inc(x_33); -x_35 = lean::cnstr_get(x_32, 1); -lean::inc(x_35); -lean::dec(x_32); -x_38 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_33); +x_31 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_27, x_28, x_26, x_26, x_3, x_19, x_14); +x_32 = lean::cnstr_get(x_31, 0); +lean::inc(x_32); +x_34 = lean::cnstr_get(x_31, 1); +lean::inc(x_34); +lean::dec(x_31); +x_37 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_32); if (lean::is_scalar(x_16)) { - x_39 = lean::alloc_cnstr(0, 2, 0); + x_38 = lean::alloc_cnstr(0, 2, 0); } else { - x_39 = x_16; + x_38 = x_16; } -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_35); -return x_39; +lean::cnstr_set(x_38, 0, x_37); +lean::cnstr_set(x_38, 1, x_34); +return x_38; } else { -obj* x_40; -x_40 = lean::cnstr_get(x_17, 0); -lean::inc(x_40); +obj* x_39; +x_39 = lean::cnstr_get(x_17, 0); +lean::inc(x_39); lean::dec(x_17); -switch (lean::obj_tag(x_40)) { +switch (lean::obj_tag(x_39)) { case 0: { -obj* x_43; obj* x_46; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_55; obj* x_58; obj* x_60; obj* x_61; obj* x_62; -x_43 = lean::cnstr_get(x_40, 0); -lean::inc(x_43); -lean::dec(x_40); -x_46 = lean::cnstr_get(x_43, 1); -lean::inc(x_46); -lean::dec(x_43); -x_49 = lean::box(0); -x_50 = lean_name_mk_string(x_49, x_46); -x_51 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_50); -x_52 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_51, x_3, x_19, x_14); -x_53 = lean::cnstr_get(x_52, 0); -lean::inc(x_53); -x_55 = lean::cnstr_get(x_52, 1); -lean::inc(x_55); -lean::dec(x_52); -x_58 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_58); -x_60 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_58, x_53); -x_61 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_60); +obj* x_42; obj* x_45; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_54; obj* x_57; obj* x_59; obj* x_60; obj* x_61; +x_42 = lean::cnstr_get(x_39, 0); +lean::inc(x_42); +lean::dec(x_39); +x_45 = lean::cnstr_get(x_42, 1); +lean::inc(x_45); +lean::dec(x_42); +x_48 = lean::box(0); +x_49 = lean_name_mk_string(x_48, x_45); +x_50 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_49); +x_51 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_50, x_3, x_19, x_14); +x_52 = lean::cnstr_get(x_51, 0); +lean::inc(x_52); +x_54 = lean::cnstr_get(x_51, 1); +lean::inc(x_54); +lean::dec(x_51); +x_57 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_57); +x_59 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_57, x_52); +x_60 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_59); if (lean::is_scalar(x_16)) { - x_62 = lean::alloc_cnstr(0, 2, 0); + x_61 = lean::alloc_cnstr(0, 2, 0); } else { - x_62 = x_16; + x_61 = x_16; } -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_55); -return x_62; +lean::cnstr_set(x_61, 0, x_60); +lean::cnstr_set(x_61, 1, x_54); +return x_61; } case 1: { -obj* x_64; obj* x_66; obj* x_67; obj* x_68; obj* x_70; obj* x_73; obj* x_75; obj* x_76; obj* x_77; -lean::dec(x_40); -x_64 = l_lean_parser_indexed___rarg___lambda__1___closed__1; -lean::inc(x_64); -x_66 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_64); -x_67 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_66, x_3, x_19, x_14); -x_68 = lean::cnstr_get(x_67, 0); -lean::inc(x_68); -x_70 = lean::cnstr_get(x_67, 1); -lean::inc(x_70); -lean::dec(x_67); -x_73 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_73); -x_75 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_73, x_68); -x_76 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_75); +obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_69; obj* x_72; obj* x_74; obj* x_75; obj* x_76; +lean::dec(x_39); +x_63 = l_lean_parser_indexed___rarg___lambda__1___closed__1; +lean::inc(x_63); +x_65 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_63); +x_66 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_65, x_3, x_19, x_14); +x_67 = lean::cnstr_get(x_66, 0); +lean::inc(x_67); +x_69 = lean::cnstr_get(x_66, 1); +lean::inc(x_69); +lean::dec(x_66); +x_72 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_72); +x_74 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_72, x_67); +x_75 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_74); if (lean::is_scalar(x_16)) { - x_77 = lean::alloc_cnstr(0, 2, 0); + x_76 = lean::alloc_cnstr(0, 2, 0); } else { - x_77 = x_16; + x_76 = x_16; } -lean::cnstr_set(x_77, 0, x_76); -lean::cnstr_set(x_77, 1, x_70); -return x_77; +lean::cnstr_set(x_76, 0, x_75); +lean::cnstr_set(x_76, 1, x_69); +return x_76; } case 2: { -obj* x_78; obj* x_81; obj* x_84; obj* x_85; obj* x_86; obj* x_88; obj* x_91; obj* x_93; obj* x_94; obj* x_95; -x_78 = lean::cnstr_get(x_40, 0); -lean::inc(x_78); -lean::dec(x_40); -x_81 = lean::cnstr_get(x_78, 0); -lean::inc(x_81); -lean::dec(x_78); -x_84 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_81); -x_85 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_84, x_3, x_19, x_14); -x_86 = lean::cnstr_get(x_85, 0); -lean::inc(x_86); -x_88 = lean::cnstr_get(x_85, 1); -lean::inc(x_88); -lean::dec(x_85); -x_91 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_91); -x_93 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_91, x_86); -x_94 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_93); +obj* x_77; obj* x_80; obj* x_83; obj* x_84; obj* x_85; obj* x_87; obj* x_90; obj* x_92; obj* x_93; obj* x_94; +x_77 = lean::cnstr_get(x_39, 0); +lean::inc(x_77); +lean::dec(x_39); +x_80 = lean::cnstr_get(x_77, 0); +lean::inc(x_80); +lean::dec(x_77); +x_83 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_80); +x_84 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_83, x_3, x_19, x_14); +x_85 = lean::cnstr_get(x_84, 0); +lean::inc(x_85); +x_87 = lean::cnstr_get(x_84, 1); +lean::inc(x_87); +lean::dec(x_84); +x_90 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_90); +x_92 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_90, x_85); +x_93 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_92); if (lean::is_scalar(x_16)) { - x_95 = lean::alloc_cnstr(0, 2, 0); + x_94 = lean::alloc_cnstr(0, 2, 0); } else { - x_95 = x_16; + x_94 = x_16; } -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set(x_95, 1, x_88); -return x_95; +lean::cnstr_set(x_94, 0, x_93); +lean::cnstr_set(x_94, 1, x_87); +return x_94; } default: { -obj* x_96; obj* x_97; obj* x_98; obj* x_103; obj* x_104; obj* x_106; -x_96 = lean::box(0); -x_97 = l_string_join___closed__1; -x_98 = l_mjoin___rarg___closed__1; +obj* x_95; obj* x_96; obj* x_97; obj* x_101; obj* x_102; obj* x_104; +x_95 = lean::box(0); +x_96 = l_string_join___closed__1; +x_97 = l_mjoin___rarg___closed__1; lean::inc(x_3); -lean::inc(x_96); -lean::inc(x_98); lean::inc(x_97); -x_103 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_97, x_98, x_96, x_96, x_3, x_19, x_14); -x_104 = lean::cnstr_get(x_103, 0); +lean::inc(x_96); +x_101 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_96, x_97, x_95, x_95, x_3, x_19, x_14); +x_102 = lean::cnstr_get(x_101, 0); +lean::inc(x_102); +x_104 = lean::cnstr_get(x_101, 1); lean::inc(x_104); -x_106 = lean::cnstr_get(x_103, 1); -lean::inc(x_106); -lean::dec(x_103); -if (lean::obj_tag(x_104) == 0) +lean::dec(x_101); +if (lean::obj_tag(x_102) == 0) { -obj* x_109; obj* x_111; obj* x_113; obj* x_116; obj* x_117; obj* x_118; obj* x_120; obj* x_123; obj* x_124; obj* x_125; -x_109 = lean::cnstr_get(x_104, 0); +obj* x_107; obj* x_109; obj* x_111; obj* x_114; obj* x_115; obj* x_116; obj* x_118; obj* x_121; obj* x_122; obj* x_123; +x_107 = lean::cnstr_get(x_102, 0); +lean::inc(x_107); +x_109 = lean::cnstr_get(x_102, 1); lean::inc(x_109); -x_111 = lean::cnstr_get(x_104, 1); +x_111 = lean::cnstr_get(x_102, 2); lean::inc(x_111); -x_113 = lean::cnstr_get(x_104, 2); -lean::inc(x_113); -lean::dec(x_104); -x_116 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_109); -x_117 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_116, x_3, x_111, x_106); -x_118 = lean::cnstr_get(x_117, 0); +lean::dec(x_102); +x_114 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_107); +x_115 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_114, x_3, x_109, x_104); +x_116 = lean::cnstr_get(x_115, 0); +lean::inc(x_116); +x_118 = lean::cnstr_get(x_115, 1); lean::inc(x_118); -x_120 = lean::cnstr_get(x_117, 1); -lean::inc(x_120); -lean::dec(x_117); -x_123 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_113, x_118); -x_124 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_123); +lean::dec(x_115); +x_121 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_111, x_116); +x_122 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_121); if (lean::is_scalar(x_16)) { - x_125 = lean::alloc_cnstr(0, 2, 0); + x_123 = lean::alloc_cnstr(0, 2, 0); } else { - x_125 = x_16; + x_123 = x_16; } -lean::cnstr_set(x_125, 0, x_124); -lean::cnstr_set(x_125, 1, x_120); -return x_125; +lean::cnstr_set(x_123, 0, x_122); +lean::cnstr_set(x_123, 1, x_118); +return x_123; } else { -obj* x_128; uint8 x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; +obj* x_126; uint8 x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; lean::dec(x_3); lean::dec(x_0); -x_128 = lean::cnstr_get(x_104, 0); -lean::inc(x_128); -x_130 = lean::cnstr_get_scalar(x_104, sizeof(void*)*1); -if (lean::is_shared(x_104)) { - lean::dec(x_104); - x_131 = lean::box(0); +x_126 = lean::cnstr_get(x_102, 0); +lean::inc(x_126); +x_128 = lean::cnstr_get_scalar(x_102, sizeof(void*)*1); +if (lean::is_shared(x_102)) { + lean::dec(x_102); + x_129 = lean::box(0); } else { - lean::cnstr_release(x_104, 0); - x_131 = x_104; + lean::cnstr_release(x_102, 0); + x_129 = x_102; } -if (lean::is_scalar(x_131)) { - x_132 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_129)) { + x_130 = lean::alloc_cnstr(1, 1, 1); } else { - x_132 = x_131; + x_130 = x_129; } -lean::cnstr_set(x_132, 0, x_128); -lean::cnstr_set_scalar(x_132, sizeof(void*)*1, x_130); -x_133 = x_132; -x_134 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_133); +lean::cnstr_set(x_130, 0, x_126); +lean::cnstr_set_scalar(x_130, sizeof(void*)*1, x_128); +x_131 = x_130; +x_132 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_131); if (lean::is_scalar(x_16)) { - x_135 = lean::alloc_cnstr(0, 2, 0); + x_133 = lean::alloc_cnstr(0, 2, 0); } else { - x_135 = x_16; + x_133 = x_16; } -lean::cnstr_set(x_135, 0, x_134); -lean::cnstr_set(x_135, 1, x_106); -return x_135; +lean::cnstr_set(x_133, 0, x_132); +lean::cnstr_set(x_133, 1, x_104); +return x_133; } } } @@ -48589,35 +48181,35 @@ return x_135; } else { -obj* x_138; uint8 x_140; obj* x_141; obj* x_142; obj* x_143; obj* x_144; +obj* x_136; uint8 x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; lean::dec(x_3); lean::dec(x_0); -x_138 = lean::cnstr_get(x_12, 0); -lean::inc(x_138); -x_140 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); +x_136 = lean::cnstr_get(x_12, 0); +lean::inc(x_136); +x_138 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); if (lean::is_shared(x_12)) { lean::dec(x_12); - x_141 = lean::box(0); + x_139 = lean::box(0); } else { lean::cnstr_release(x_12, 0); - x_141 = x_12; + x_139 = x_12; } -if (lean::is_scalar(x_141)) { - x_142 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_139)) { + x_140 = lean::alloc_cnstr(1, 1, 1); } else { - x_142 = x_141; + x_140 = x_139; } -lean::cnstr_set(x_142, 0, x_138); -lean::cnstr_set_scalar(x_142, sizeof(void*)*1, x_140); -x_143 = x_142; +lean::cnstr_set(x_140, 0, x_136); +lean::cnstr_set_scalar(x_140, sizeof(void*)*1, x_138); +x_141 = x_140; if (lean::is_scalar(x_16)) { - x_144 = lean::alloc_cnstr(0, 2, 0); + x_142 = lean::alloc_cnstr(0, 2, 0); } else { - x_144 = x_16; + x_142 = x_16; } -lean::cnstr_set(x_144, 0, x_143); -lean::cnstr_set(x_144, 1, x_14); -return x_144; +lean::cnstr_set(x_142, 0, x_141); +lean::cnstr_set(x_142, 1, x_14); +return x_142; } } } @@ -48769,56 +48361,55 @@ goto lbl_30; } lbl_30: { -obj* x_76; obj* x_78; obj* x_80; obj* x_81; obj* x_83; obj* x_84; +obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_82; obj* x_83; lean::dec(x_29); x_76 = lean::box(0); -lean::inc(x_76); -x_78 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_78, 0, x_22); -lean::cnstr_set(x_78, 1, x_76); +x_77 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_77, 0, x_22); +lean::cnstr_set(x_77, 1, x_76); lean::inc(x_24); if (lean::is_scalar(x_28)) { - x_80 = lean::alloc_cnstr(0, 3, 0); + x_79 = lean::alloc_cnstr(0, 3, 0); } else { - x_80 = x_28; + x_79 = x_28; } -lean::cnstr_set(x_80, 0, x_78); -lean::cnstr_set(x_80, 1, x_24); -lean::cnstr_set(x_80, 2, x_76); -x_81 = l_lean_parser_finish__comment__block___closed__2; -lean::inc(x_81); -x_83 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_83, 0, x_80); -lean::cnstr_set(x_83, 1, x_24); -lean::cnstr_set(x_83, 2, x_81); -x_84 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_26, x_83); -x_12 = x_84; +lean::cnstr_set(x_79, 0, x_77); +lean::cnstr_set(x_79, 1, x_24); +lean::cnstr_set(x_79, 2, x_76); +x_80 = l_lean_parser_finish__comment__block___closed__2; +lean::inc(x_80); +x_82 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_82, 0, x_79); +lean::cnstr_set(x_82, 1, x_24); +lean::cnstr_set(x_82, 2, x_80); +x_83 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_26, x_82); +x_12 = x_83; x_13 = x_19; goto lbl_14; } } else { -obj* x_85; uint8 x_87; obj* x_88; obj* x_89; obj* x_90; -x_85 = lean::cnstr_get(x_17, 0); -lean::inc(x_85); -x_87 = lean::cnstr_get_scalar(x_17, sizeof(void*)*1); +obj* x_84; uint8 x_86; obj* x_87; obj* x_88; obj* x_89; +x_84 = lean::cnstr_get(x_17, 0); +lean::inc(x_84); +x_86 = lean::cnstr_get_scalar(x_17, sizeof(void*)*1); if (lean::is_shared(x_17)) { lean::dec(x_17); - x_88 = lean::box(0); + x_87 = lean::box(0); } else { lean::cnstr_release(x_17, 0); - x_88 = x_17; + x_87 = x_17; } -if (lean::is_scalar(x_88)) { - x_89 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_87)) { + x_88 = lean::alloc_cnstr(1, 1, 1); } else { - x_89 = x_88; + x_88 = x_87; } -lean::cnstr_set(x_89, 0, x_85); -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_87); -x_90 = x_89; -x_12 = x_90; +lean::cnstr_set(x_88, 0, x_84); +lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_86); +x_89 = x_88; +x_12 = x_89; x_13 = x_19; goto lbl_14; } @@ -48826,41 +48417,41 @@ lbl_11: { if (lean::obj_tag(x_9) == 0) { -obj* x_91; obj* x_93; obj* x_94; obj* x_96; obj* x_97; -x_91 = lean::cnstr_get(x_9, 0); -lean::inc(x_91); +obj* x_90; obj* x_92; obj* x_93; obj* x_95; obj* x_96; +x_90 = lean::cnstr_get(x_9, 0); +lean::inc(x_90); if (lean::is_shared(x_9)) { lean::dec(x_9); - x_93 = lean::box(0); + x_92 = lean::box(0); } else { lean::cnstr_release(x_9, 0); lean::cnstr_release(x_9, 1); lean::cnstr_release(x_9, 2); - x_93 = x_9; + x_92 = x_9; } -x_94 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_94); -if (lean::is_scalar(x_93)) { - x_96 = lean::alloc_cnstr(0, 3, 0); +x_93 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_93); +if (lean::is_scalar(x_92)) { + x_95 = lean::alloc_cnstr(0, 3, 0); } else { - x_96 = x_93; + x_95 = x_92; } -lean::cnstr_set(x_96, 0, x_91); -lean::cnstr_set(x_96, 1, x_7); -lean::cnstr_set(x_96, 2, x_94); -x_97 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_97, 0, x_96); -lean::cnstr_set(x_97, 1, x_10); -return x_97; +lean::cnstr_set(x_95, 0, x_90); +lean::cnstr_set(x_95, 1, x_7); +lean::cnstr_set(x_95, 2, x_93); +x_96 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_96, 0, x_95); +lean::cnstr_set(x_96, 1, x_10); +return x_96; } else { -obj* x_99; +obj* x_98; lean::dec(x_7); -x_99 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_99, 0, x_9); -lean::cnstr_set(x_99, 1, x_10); -return x_99; +x_98 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_98, 0, x_9); +lean::cnstr_set(x_98, 1, x_10); +return x_98; } } lbl_14: @@ -48875,147 +48466,147 @@ goto lbl_11; } else { -obj* x_102; obj* x_104; obj* x_105; -x_102 = lean::cnstr_get(x_12, 0); -lean::inc(x_102); +obj* x_101; obj* x_103; obj* x_104; +x_101 = lean::cnstr_get(x_12, 0); +lean::inc(x_101); if (lean::is_shared(x_12)) { lean::dec(x_12); - x_104 = lean::box(0); + x_103 = lean::box(0); } else { lean::cnstr_release(x_12, 0); - x_104 = x_12; + x_103 = x_12; } -x_105 = lean::cnstr_get(x_102, 0); -lean::inc(x_105); +x_104 = lean::cnstr_get(x_101, 0); +lean::inc(x_104); if (lean::obj_tag(x_2) == 0) { -obj* x_110; obj* x_112; +obj* x_109; obj* x_111; lean::dec(x_0); -lean::dec(x_102); -lean::dec(x_104); -x_110 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_110); -x_112 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_112, 0, x_2); -lean::cnstr_set(x_112, 1, x_105); -lean::cnstr_set(x_112, 2, x_110); -x_9 = x_112; +lean::dec(x_103); +lean::dec(x_101); +x_109 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_109); +x_111 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_111, 0, x_2); +lean::cnstr_set(x_111, 1, x_104); +lean::cnstr_set(x_111, 2, x_109); +x_9 = x_111; x_10 = x_13; goto lbl_11; } else { -obj* x_113; obj* x_115; obj* x_116; obj* x_118; uint8 x_120; -x_113 = lean::cnstr_get(x_2, 0); -lean::inc(x_113); -x_115 = lean::string_iterator_offset(x_105); -x_116 = lean::cnstr_get(x_113, 0); -lean::inc(x_116); -x_118 = lean::string_iterator_offset(x_116); -lean::dec(x_116); -x_120 = lean::nat_dec_lt(x_115, x_118); -if (x_120 == 0) +obj* x_112; obj* x_114; obj* x_115; obj* x_117; uint8 x_119; +x_112 = lean::cnstr_get(x_2, 0); +lean::inc(x_112); +x_114 = lean::string_iterator_offset(x_104); +x_115 = lean::cnstr_get(x_112, 0); +lean::inc(x_115); +x_117 = lean::string_iterator_offset(x_115); +lean::dec(x_115); +x_119 = lean::nat_dec_lt(x_114, x_117); +if (x_119 == 0) { -uint8 x_122; +uint8 x_121; lean::dec(x_2); -x_122 = lean::nat_dec_lt(x_118, x_115); -lean::dec(x_118); -if (x_122 == 0) +x_121 = lean::nat_dec_lt(x_117, x_114); +lean::dec(x_117); +if (x_121 == 0) { -obj* x_124; obj* x_125; uint8 x_127; -x_124 = l_lean_parser_parsec__t_merge___rarg(x_102, x_113); -x_125 = lean::string_iterator_offset(x_0); +obj* x_123; obj* x_124; uint8 x_126; +x_123 = l_lean_parser_parsec__t_merge___rarg(x_101, x_112); +x_124 = lean::string_iterator_offset(x_0); lean::dec(x_0); -x_127 = lean::nat_dec_lt(x_125, x_115); -lean::dec(x_115); -lean::dec(x_125); -if (x_127 == 0) +x_126 = lean::nat_dec_lt(x_124, x_114); +lean::dec(x_114); +lean::dec(x_124); +if (x_126 == 0) { -uint8 x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_135; -x_130 = 0; -if (lean::is_scalar(x_104)) { - x_131 = lean::alloc_cnstr(1, 1, 1); +uint8 x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_134; +x_129 = 0; +if (lean::is_scalar(x_103)) { + x_130 = lean::alloc_cnstr(1, 1, 1); } else { - x_131 = x_104; + x_130 = x_103; } -lean::cnstr_set(x_131, 0, x_124); -lean::cnstr_set_scalar(x_131, sizeof(void*)*1, x_130); -x_132 = x_131; -x_133 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_133); -x_135 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_135, 0, x_132); -lean::cnstr_set(x_135, 1, x_105); -lean::cnstr_set(x_135, 2, x_133); -x_9 = x_135; +lean::cnstr_set(x_130, 0, x_123); +lean::cnstr_set_scalar(x_130, sizeof(void*)*1, x_129); +x_131 = x_130; +x_132 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_132); +x_134 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_134, 0, x_131); +lean::cnstr_set(x_134, 1, x_104); +lean::cnstr_set(x_134, 2, x_132); +x_9 = x_134; x_10 = x_13; goto lbl_11; } else { -uint8 x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_141; -x_136 = 1; -if (lean::is_scalar(x_104)) { - x_137 = lean::alloc_cnstr(1, 1, 1); +uint8 x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_140; +x_135 = 1; +if (lean::is_scalar(x_103)) { + x_136 = lean::alloc_cnstr(1, 1, 1); } else { - x_137 = x_104; + x_136 = x_103; } -lean::cnstr_set(x_137, 0, x_124); -lean::cnstr_set_scalar(x_137, sizeof(void*)*1, x_136); -x_138 = x_137; -x_139 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_139); -x_141 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_141, 0, x_138); -lean::cnstr_set(x_141, 1, x_105); -lean::cnstr_set(x_141, 2, x_139); -x_9 = x_141; +lean::cnstr_set(x_136, 0, x_123); +lean::cnstr_set_scalar(x_136, sizeof(void*)*1, x_135); +x_137 = x_136; +x_138 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_138); +x_140 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_140, 0, x_137); +lean::cnstr_set(x_140, 1, x_104); +lean::cnstr_set(x_140, 2, x_138); +x_9 = x_140; x_10 = x_13; goto lbl_11; } } else { -uint8 x_145; obj* x_146; obj* x_147; obj* x_148; obj* x_150; +uint8 x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_149; lean::dec(x_0); -lean::dec(x_115); -lean::dec(x_113); -x_145 = 1; -if (lean::is_scalar(x_104)) { - x_146 = lean::alloc_cnstr(1, 1, 1); +lean::dec(x_114); +lean::dec(x_112); +x_144 = 1; +if (lean::is_scalar(x_103)) { + x_145 = lean::alloc_cnstr(1, 1, 1); } else { - x_146 = x_104; + x_145 = x_103; } -lean::cnstr_set(x_146, 0, x_102); -lean::cnstr_set_scalar(x_146, sizeof(void*)*1, x_145); -x_147 = x_146; -x_148 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_148); -x_150 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_150, 0, x_147); -lean::cnstr_set(x_150, 1, x_105); -lean::cnstr_set(x_150, 2, x_148); -x_9 = x_150; +lean::cnstr_set(x_145, 0, x_101); +lean::cnstr_set_scalar(x_145, sizeof(void*)*1, x_144); +x_146 = x_145; +x_147 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_147); +x_149 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_149, 0, x_146); +lean::cnstr_set(x_149, 1, x_104); +lean::cnstr_set(x_149, 2, x_147); +x_9 = x_149; x_10 = x_13; goto lbl_11; } } else { -obj* x_157; obj* x_159; +obj* x_156; obj* x_158; lean::dec(x_0); -lean::dec(x_102); -lean::dec(x_104); -lean::dec(x_118); -lean::dec(x_115); -lean::dec(x_113); -x_157 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_157); -x_159 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_159, 0, x_2); -lean::cnstr_set(x_159, 1, x_105); -lean::cnstr_set(x_159, 2, x_157); -x_9 = x_159; +lean::dec(x_103); +lean::dec(x_101); +lean::dec(x_114); +lean::dec(x_112); +lean::dec(x_117); +x_156 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_156); +x_158 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_158, 0, x_2); +lean::cnstr_set(x_158, 1, x_104); +lean::cnstr_set(x_158, 2, x_156); +x_9 = x_158; x_10 = x_13; goto lbl_11; } @@ -49029,7 +48620,7 @@ _start: { if (lean::obj_tag(x_1) == 0) { -obj* x_12; obj* x_13; obj* x_14; obj* x_18; obj* x_19; obj* x_21; obj* x_22; +obj* x_12; obj* x_13; obj* x_14; obj* x_17; obj* x_18; obj* x_20; obj* x_21; lean::dec(x_5); lean::dec(x_4); lean::dec(x_3); @@ -49037,108 +48628,107 @@ lean::dec(x_2); x_12 = lean::box(0); x_13 = l_list_mfoldr___main___at_lean_parser_monad__parsec_longest__match___spec__2___rarg___closed__1; x_14 = l_mjoin___rarg___closed__1; -lean::inc(x_12); lean::inc(x_14); lean::inc(x_13); -x_18 = l_lean_parser_monad__parsec_error___at_lean_parser_number_x_27___spec__12___rarg(x_13, x_14, x_12, x_12, x_0); -x_19 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_19); -x_21 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_21, 0, x_18); -lean::cnstr_set(x_21, 1, x_6); -lean::cnstr_set(x_21, 2, x_19); -x_22 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_22, 0, x_21); -lean::cnstr_set(x_22, 1, x_7); -return x_22; +x_17 = l_lean_parser_monad__parsec_error___at_lean_parser_number_x_27___spec__12___rarg(x_13, x_14, x_12, x_12, x_0); +x_18 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_18); +x_20 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_20, 0, x_17); +lean::cnstr_set(x_20, 1, x_6); +lean::cnstr_set(x_20, 2, x_18); +x_21 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_21, 0, x_20); +lean::cnstr_set(x_21, 1, x_7); +return x_21; } else { -obj* x_23; obj* x_25; obj* x_33; obj* x_34; obj* x_36; obj* x_38; -x_23 = lean::cnstr_get(x_1, 0); -lean::inc(x_23); -x_25 = lean::cnstr_get(x_1, 1); -lean::inc(x_25); +obj* x_22; obj* x_24; obj* x_32; obj* x_33; obj* x_35; obj* x_37; +x_22 = lean::cnstr_get(x_1, 0); +lean::inc(x_22); +x_24 = lean::cnstr_get(x_1, 1); +lean::inc(x_24); lean::dec(x_1); lean::inc(x_5); lean::inc(x_4); lean::inc(x_3); lean::inc(x_2); lean::inc(x_0); -x_33 = l_list_mfoldr___main___at___private_init_lean_parser_term_1__trailing___spec__9(x_0, x_25, x_2, x_3, x_4, x_5, x_6, x_7); -x_34 = lean::cnstr_get(x_33, 0); -lean::inc(x_34); -x_36 = lean::cnstr_get(x_33, 1); -lean::inc(x_36); -if (lean::is_shared(x_33)) { - lean::dec(x_33); - x_38 = lean::box(0); +x_32 = l_list_mfoldr___main___at___private_init_lean_parser_term_1__trailing___spec__9(x_0, x_24, x_2, x_3, x_4, x_5, x_6, x_7); +x_33 = lean::cnstr_get(x_32, 0); +lean::inc(x_33); +x_35 = lean::cnstr_get(x_32, 1); +lean::inc(x_35); +if (lean::is_shared(x_32)) { + lean::dec(x_32); + x_37 = lean::box(0); } else { - lean::cnstr_release(x_33, 0); - lean::cnstr_release(x_33, 1); - x_38 = x_33; + lean::cnstr_release(x_32, 0); + lean::cnstr_release(x_32, 1); + x_37 = x_32; } -if (lean::obj_tag(x_34) == 0) +if (lean::obj_tag(x_33) == 0) { -obj* x_39; obj* x_41; obj* x_43; obj* x_46; obj* x_47; obj* x_49; obj* x_52; obj* x_53; -x_39 = lean::cnstr_get(x_34, 0); -lean::inc(x_39); -x_41 = lean::cnstr_get(x_34, 1); -lean::inc(x_41); -x_43 = lean::cnstr_get(x_34, 2); -lean::inc(x_43); -lean::dec(x_34); -x_46 = l_lean_parser_parsec__t_lookahead___at___private_init_lean_parser_term_1__trailing___spec__8(x_0, x_23, x_39, x_2, x_3, x_4, x_5, x_41, x_36); -x_47 = lean::cnstr_get(x_46, 0); -lean::inc(x_47); -x_49 = lean::cnstr_get(x_46, 1); -lean::inc(x_49); -lean::dec(x_46); -x_52 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_43, x_47); -if (lean::is_scalar(x_38)) { - x_53 = lean::alloc_cnstr(0, 2, 0); +obj* x_38; obj* x_40; obj* x_42; obj* x_45; obj* x_46; obj* x_48; obj* x_51; obj* x_52; +x_38 = lean::cnstr_get(x_33, 0); +lean::inc(x_38); +x_40 = lean::cnstr_get(x_33, 1); +lean::inc(x_40); +x_42 = lean::cnstr_get(x_33, 2); +lean::inc(x_42); +lean::dec(x_33); +x_45 = l_lean_parser_parsec__t_lookahead___at___private_init_lean_parser_term_1__trailing___spec__8(x_0, x_22, x_38, x_2, x_3, x_4, x_5, x_40, x_35); +x_46 = lean::cnstr_get(x_45, 0); +lean::inc(x_46); +x_48 = lean::cnstr_get(x_45, 1); +lean::inc(x_48); +lean::dec(x_45); +x_51 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_42, x_46); +if (lean::is_scalar(x_37)) { + x_52 = lean::alloc_cnstr(0, 2, 0); } else { - x_53 = x_38; + x_52 = x_37; } -lean::cnstr_set(x_53, 0, x_52); -lean::cnstr_set(x_53, 1, x_49); -return x_53; +lean::cnstr_set(x_52, 0, x_51); +lean::cnstr_set(x_52, 1, x_48); +return x_52; } else { -obj* x_60; uint8 x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; +obj* x_59; uint8 x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; lean::dec(x_5); lean::dec(x_4); lean::dec(x_3); lean::dec(x_0); lean::dec(x_2); -lean::dec(x_23); -x_60 = lean::cnstr_get(x_34, 0); -lean::inc(x_60); -x_62 = lean::cnstr_get_scalar(x_34, sizeof(void*)*1); -if (lean::is_shared(x_34)) { - lean::dec(x_34); - x_63 = lean::box(0); +lean::dec(x_22); +x_59 = lean::cnstr_get(x_33, 0); +lean::inc(x_59); +x_61 = lean::cnstr_get_scalar(x_33, sizeof(void*)*1); +if (lean::is_shared(x_33)) { + lean::dec(x_33); + x_62 = lean::box(0); } else { - lean::cnstr_release(x_34, 0); - x_63 = x_34; + lean::cnstr_release(x_33, 0); + x_62 = x_33; } -if (lean::is_scalar(x_63)) { - x_64 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_62)) { + x_63 = lean::alloc_cnstr(1, 1, 1); } else { - x_64 = x_63; + x_63 = x_62; } -lean::cnstr_set(x_64, 0, x_60); -lean::cnstr_set_scalar(x_64, sizeof(void*)*1, x_62); -x_65 = x_64; -if (lean::is_scalar(x_38)) { - x_66 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_63, 0, x_59); +lean::cnstr_set_scalar(x_63, sizeof(void*)*1, x_61); +x_64 = x_63; +if (lean::is_scalar(x_37)) { + x_65 = lean::alloc_cnstr(0, 2, 0); } else { - x_66 = x_38; + x_65 = x_37; } -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_36); -return x_66; +lean::cnstr_set(x_65, 0, x_64); +lean::cnstr_set(x_65, 1, x_35); +return x_65; } } } @@ -49482,26 +49072,25 @@ _start: { if (lean::obj_tag(x_0) == 0) { -obj* x_7; obj* x_8; obj* x_9; obj* x_13; +obj* x_7; obj* x_8; obj* x_9; obj* x_12; x_7 = lean::box(0); x_8 = l_lean_parser_combinators_any__of___rarg___closed__1; x_9 = l_mjoin___rarg___closed__1; -lean::inc(x_7); lean::inc(x_9); lean::inc(x_8); -x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__5___rarg(x_8, x_9, x_7, x_7, x_1, x_2, x_3, x_4, x_5, x_6); -return x_13; +x_12 = l_lean_parser_monad__parsec_error___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__5___rarg(x_8, x_9, x_7, x_7, x_1, x_2, x_3, x_4, x_5, x_6); +return x_12; } else { -obj* x_14; obj* x_16; obj* x_19; -x_14 = lean::cnstr_get(x_0, 0); -lean::inc(x_14); -x_16 = lean::cnstr_get(x_0, 1); -lean::inc(x_16); +obj* x_13; obj* x_15; obj* x_18; +x_13 = lean::cnstr_get(x_0, 0); +lean::inc(x_13); +x_15 = lean::cnstr_get(x_0, 1); +lean::inc(x_15); lean::dec(x_0); -x_19 = l_list_foldl___main___at___private_init_lean_parser_term_1__trailing___spec__12(x_14, x_16, x_1, x_2, x_3, x_4, x_5, x_6); -return x_19; +x_18 = l_list_foldl___main___at___private_init_lean_parser_term_1__trailing___spec__12(x_13, x_15, x_1, x_2, x_3, x_4, x_5, x_6); +return x_18; } } } @@ -49510,28 +49099,27 @@ _start: { if (lean::obj_tag(x_0) == 0) { -obj* x_7; obj* x_8; obj* x_9; obj* x_13; +obj* x_7; obj* x_8; obj* x_9; obj* x_12; x_7 = lean::box(0); x_8 = l_string_join___closed__1; x_9 = l_mjoin___rarg___closed__1; -lean::inc(x_7); lean::inc(x_9); lean::inc(x_8); -x_13 = l_lean_parser_monad__parsec_error___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__5___rarg(x_8, x_9, x_7, x_7, x_1, x_2, x_3, x_4, x_5, x_6); -return x_13; +x_12 = l_lean_parser_monad__parsec_error___at_lean_parser_term_projection_parser_lean_parser_has__view___spec__5___rarg(x_8, x_9, x_7, x_7, x_1, x_2, x_3, x_4, x_5, x_6); +return x_12; } else { -obj* x_14; obj* x_16; obj* x_19; obj* x_20; -x_14 = lean::cnstr_get(x_0, 0); -lean::inc(x_14); -x_16 = lean::cnstr_get(x_0, 1); -lean::inc(x_16); +obj* x_13; obj* x_15; obj* x_18; obj* x_19; +x_13 = lean::cnstr_get(x_0, 0); +lean::inc(x_13); +x_15 = lean::cnstr_get(x_0, 1); +lean::inc(x_15); lean::dec(x_0); -x_19 = lean::alloc_closure(reinterpret_cast(l_list_foldr___main___at___private_init_lean_parser_term_1__trailing___spec__13), 7, 1); -lean::closure_set(x_19, 0, x_16); -x_20 = l_reader__t_orelse___at___private_init_lean_parser_term_1__trailing___spec__11___rarg(x_14, x_19, x_1, x_2, x_3, x_4, x_5, x_6); -return x_20; +x_18 = lean::alloc_closure(reinterpret_cast(l_list_foldr___main___at___private_init_lean_parser_term_1__trailing___spec__13), 7, 1); +lean::closure_set(x_18, 0, x_15); +x_19 = l_reader__t_orelse___at___private_init_lean_parser_term_1__trailing___spec__11___rarg(x_13, x_18, x_1, x_2, x_3, x_4, x_5, x_6); +return x_19; } } } @@ -49937,200 +49525,198 @@ lean::inc(x_19); lean::dec(x_10); if (lean::obj_tag(x_15) == 0) { -obj* x_24; obj* x_25; obj* x_26; obj* x_30; obj* x_31; obj* x_33; obj* x_36; obj* x_37; +obj* x_24; obj* x_25; obj* x_26; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; lean::dec(x_15); lean::dec(x_0); x_24 = lean::box(0); x_25 = l_string_join___closed__1; x_26 = l_mjoin___rarg___closed__1; -lean::inc(x_24); lean::inc(x_26); lean::inc(x_25); -x_30 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_25, x_26, x_24, x_24, x_2, x_17, x_12); -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_33 = lean::cnstr_get(x_30, 1); -lean::inc(x_33); -lean::dec(x_30); -x_36 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_31); +x_29 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_25, x_26, x_24, x_24, x_2, x_17, x_12); +x_30 = lean::cnstr_get(x_29, 0); +lean::inc(x_30); +x_32 = lean::cnstr_get(x_29, 1); +lean::inc(x_32); +lean::dec(x_29); +x_35 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_30); if (lean::is_scalar(x_14)) { - x_37 = lean::alloc_cnstr(0, 2, 0); + x_36 = lean::alloc_cnstr(0, 2, 0); } else { - x_37 = x_14; + x_36 = x_14; } -lean::cnstr_set(x_37, 0, x_36); -lean::cnstr_set(x_37, 1, x_33); -return x_37; +lean::cnstr_set(x_36, 0, x_35); +lean::cnstr_set(x_36, 1, x_32); +return x_36; } else { -obj* x_38; -x_38 = lean::cnstr_get(x_15, 0); -lean::inc(x_38); +obj* x_37; +x_37 = lean::cnstr_get(x_15, 0); +lean::inc(x_37); lean::dec(x_15); -switch (lean::obj_tag(x_38)) { +switch (lean::obj_tag(x_37)) { case 0: { -obj* x_41; obj* x_44; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_53; obj* x_56; obj* x_58; obj* x_59; obj* x_60; -x_41 = lean::cnstr_get(x_38, 0); -lean::inc(x_41); -lean::dec(x_38); -x_44 = lean::cnstr_get(x_41, 1); -lean::inc(x_44); -lean::dec(x_41); -x_47 = lean::box(0); -x_48 = lean_name_mk_string(x_47, x_44); -x_49 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_48); -x_50 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_49, x_2, x_17, x_12); -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -x_53 = lean::cnstr_get(x_50, 1); -lean::inc(x_53); -lean::dec(x_50); -x_56 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_56); -x_58 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_56, x_51); -x_59 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_58); +obj* x_40; obj* x_43; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_55; obj* x_57; obj* x_58; obj* x_59; +x_40 = lean::cnstr_get(x_37, 0); +lean::inc(x_40); +lean::dec(x_37); +x_43 = lean::cnstr_get(x_40, 1); +lean::inc(x_43); +lean::dec(x_40); +x_46 = lean::box(0); +x_47 = lean_name_mk_string(x_46, x_43); +x_48 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_47); +x_49 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_48, x_2, x_17, x_12); +x_50 = lean::cnstr_get(x_49, 0); +lean::inc(x_50); +x_52 = lean::cnstr_get(x_49, 1); +lean::inc(x_52); +lean::dec(x_49); +x_55 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_55); +x_57 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_50); +x_58 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_57); if (lean::is_scalar(x_14)) { - x_60 = lean::alloc_cnstr(0, 2, 0); + x_59 = lean::alloc_cnstr(0, 2, 0); } else { - x_60 = x_14; + x_59 = x_14; } -lean::cnstr_set(x_60, 0, x_59); -lean::cnstr_set(x_60, 1, x_53); -return x_60; +lean::cnstr_set(x_59, 0, x_58); +lean::cnstr_set(x_59, 1, x_52); +return x_59; } case 1: { -obj* x_62; obj* x_64; obj* x_65; obj* x_66; obj* x_68; obj* x_71; obj* x_73; obj* x_74; obj* x_75; -lean::dec(x_38); -x_62 = l_lean_parser_indexed___rarg___lambda__1___closed__1; -lean::inc(x_62); -x_64 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_62); -x_65 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_64, x_2, x_17, x_12); -x_66 = lean::cnstr_get(x_65, 0); -lean::inc(x_66); -x_68 = lean::cnstr_get(x_65, 1); -lean::inc(x_68); -lean::dec(x_65); -x_71 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_71); -x_73 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_71, x_66); -x_74 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_73); +obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_67; obj* x_70; obj* x_72; obj* x_73; obj* x_74; +lean::dec(x_37); +x_61 = l_lean_parser_indexed___rarg___lambda__1___closed__1; +lean::inc(x_61); +x_63 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_61); +x_64 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_63, x_2, x_17, x_12); +x_65 = lean::cnstr_get(x_64, 0); +lean::inc(x_65); +x_67 = lean::cnstr_get(x_64, 1); +lean::inc(x_67); +lean::dec(x_64); +x_70 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_70); +x_72 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_70, x_65); +x_73 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_72); if (lean::is_scalar(x_14)) { - x_75 = lean::alloc_cnstr(0, 2, 0); + x_74 = lean::alloc_cnstr(0, 2, 0); } else { - x_75 = x_14; + x_74 = x_14; } -lean::cnstr_set(x_75, 0, x_74); -lean::cnstr_set(x_75, 1, x_68); -return x_75; +lean::cnstr_set(x_74, 0, x_73); +lean::cnstr_set(x_74, 1, x_67); +return x_74; } case 2: { -obj* x_76; obj* x_79; obj* x_82; obj* x_83; obj* x_84; obj* x_86; obj* x_89; obj* x_91; obj* x_92; obj* x_93; -x_76 = lean::cnstr_get(x_38, 0); -lean::inc(x_76); -lean::dec(x_38); -x_79 = lean::cnstr_get(x_76, 0); -lean::inc(x_79); -lean::dec(x_76); -x_82 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_79); -x_83 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_82, x_2, x_17, x_12); -x_84 = lean::cnstr_get(x_83, 0); -lean::inc(x_84); -x_86 = lean::cnstr_get(x_83, 1); -lean::inc(x_86); -lean::dec(x_83); -x_89 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_89); -x_91 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_89, x_84); -x_92 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_91); +obj* x_75; obj* x_78; obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_88; obj* x_90; obj* x_91; obj* x_92; +x_75 = lean::cnstr_get(x_37, 0); +lean::inc(x_75); +lean::dec(x_37); +x_78 = lean::cnstr_get(x_75, 0); +lean::inc(x_78); +lean::dec(x_75); +x_81 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_78); +x_82 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_81, x_2, x_17, x_12); +x_83 = lean::cnstr_get(x_82, 0); +lean::inc(x_83); +x_85 = lean::cnstr_get(x_82, 1); +lean::inc(x_85); +lean::dec(x_82); +x_88 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_88); +x_90 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_88, x_83); +x_91 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_90); if (lean::is_scalar(x_14)) { - x_93 = lean::alloc_cnstr(0, 2, 0); + x_92 = lean::alloc_cnstr(0, 2, 0); } else { - x_93 = x_14; + x_92 = x_14; } -lean::cnstr_set(x_93, 0, x_92); -lean::cnstr_set(x_93, 1, x_86); -return x_93; +lean::cnstr_set(x_92, 0, x_91); +lean::cnstr_set(x_92, 1, x_85); +return x_92; } default: { -obj* x_94; obj* x_95; obj* x_96; obj* x_101; obj* x_102; obj* x_104; -x_94 = lean::box(0); -x_95 = l_string_join___closed__1; -x_96 = l_mjoin___rarg___closed__1; +obj* x_93; obj* x_94; obj* x_95; obj* x_99; obj* x_100; obj* x_102; +x_93 = lean::box(0); +x_94 = l_string_join___closed__1; +x_95 = l_mjoin___rarg___closed__1; lean::inc(x_2); -lean::inc(x_94); -lean::inc(x_96); lean::inc(x_95); -x_101 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_95, x_96, x_94, x_94, x_2, x_17, x_12); -x_102 = lean::cnstr_get(x_101, 0); +lean::inc(x_94); +x_99 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_94, x_95, x_93, x_93, x_2, x_17, x_12); +x_100 = lean::cnstr_get(x_99, 0); +lean::inc(x_100); +x_102 = lean::cnstr_get(x_99, 1); lean::inc(x_102); -x_104 = lean::cnstr_get(x_101, 1); -lean::inc(x_104); -lean::dec(x_101); -if (lean::obj_tag(x_102) == 0) +lean::dec(x_99); +if (lean::obj_tag(x_100) == 0) { -obj* x_107; obj* x_109; obj* x_111; obj* x_114; obj* x_115; obj* x_116; obj* x_118; obj* x_121; obj* x_122; obj* x_123; -x_107 = lean::cnstr_get(x_102, 0); +obj* x_105; obj* x_107; obj* x_109; obj* x_112; obj* x_113; obj* x_114; obj* x_116; obj* x_119; obj* x_120; obj* x_121; +x_105 = lean::cnstr_get(x_100, 0); +lean::inc(x_105); +x_107 = lean::cnstr_get(x_100, 1); lean::inc(x_107); -x_109 = lean::cnstr_get(x_102, 1); +x_109 = lean::cnstr_get(x_100, 2); lean::inc(x_109); -x_111 = lean::cnstr_get(x_102, 2); -lean::inc(x_111); -lean::dec(x_102); -x_114 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_107); -x_115 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_114, x_2, x_109, x_104); -x_116 = lean::cnstr_get(x_115, 0); +lean::dec(x_100); +x_112 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_105); +x_113 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_112, x_2, x_107, x_102); +x_114 = lean::cnstr_get(x_113, 0); +lean::inc(x_114); +x_116 = lean::cnstr_get(x_113, 1); lean::inc(x_116); -x_118 = lean::cnstr_get(x_115, 1); -lean::inc(x_118); -lean::dec(x_115); -x_121 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_111, x_116); -x_122 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_121); +lean::dec(x_113); +x_119 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_109, x_114); +x_120 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_119); if (lean::is_scalar(x_14)) { - x_123 = lean::alloc_cnstr(0, 2, 0); + x_121 = lean::alloc_cnstr(0, 2, 0); } else { - x_123 = x_14; + x_121 = x_14; } -lean::cnstr_set(x_123, 0, x_122); -lean::cnstr_set(x_123, 1, x_118); -return x_123; +lean::cnstr_set(x_121, 0, x_120); +lean::cnstr_set(x_121, 1, x_116); +return x_121; } else { -obj* x_126; uint8 x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; +obj* x_124; uint8 x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; lean::dec(x_0); lean::dec(x_2); -x_126 = lean::cnstr_get(x_102, 0); -lean::inc(x_126); -x_128 = lean::cnstr_get_scalar(x_102, sizeof(void*)*1); -if (lean::is_shared(x_102)) { - lean::dec(x_102); - x_129 = lean::box(0); +x_124 = lean::cnstr_get(x_100, 0); +lean::inc(x_124); +x_126 = lean::cnstr_get_scalar(x_100, sizeof(void*)*1); +if (lean::is_shared(x_100)) { + lean::dec(x_100); + x_127 = lean::box(0); } else { - lean::cnstr_release(x_102, 0); - x_129 = x_102; + lean::cnstr_release(x_100, 0); + x_127 = x_100; } -if (lean::is_scalar(x_129)) { - x_130 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_127)) { + x_128 = lean::alloc_cnstr(1, 1, 1); } else { - x_130 = x_129; + x_128 = x_127; } -lean::cnstr_set(x_130, 0, x_126); -lean::cnstr_set_scalar(x_130, sizeof(void*)*1, x_128); -x_131 = x_130; -x_132 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_131); +lean::cnstr_set(x_128, 0, x_124); +lean::cnstr_set_scalar(x_128, sizeof(void*)*1, x_126); +x_129 = x_128; +x_130 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_129); if (lean::is_scalar(x_14)) { - x_133 = lean::alloc_cnstr(0, 2, 0); + x_131 = lean::alloc_cnstr(0, 2, 0); } else { - x_133 = x_14; + x_131 = x_14; } -lean::cnstr_set(x_133, 0, x_132); -lean::cnstr_set(x_133, 1, x_104); -return x_133; +lean::cnstr_set(x_131, 0, x_130); +lean::cnstr_set(x_131, 1, x_102); +return x_131; } } } @@ -50138,35 +49724,35 @@ return x_133; } else { -obj* x_136; uint8 x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; +obj* x_134; uint8 x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; lean::dec(x_0); lean::dec(x_2); -x_136 = lean::cnstr_get(x_10, 0); -lean::inc(x_136); -x_138 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); +x_134 = lean::cnstr_get(x_10, 0); +lean::inc(x_134); +x_136 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); if (lean::is_shared(x_10)) { lean::dec(x_10); - x_139 = lean::box(0); + x_137 = lean::box(0); } else { lean::cnstr_release(x_10, 0); - x_139 = x_10; + x_137 = x_10; } -if (lean::is_scalar(x_139)) { - x_140 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_137)) { + x_138 = lean::alloc_cnstr(1, 1, 1); } else { - x_140 = x_139; + x_138 = x_137; } -lean::cnstr_set(x_140, 0, x_136); -lean::cnstr_set_scalar(x_140, sizeof(void*)*1, x_138); -x_141 = x_140; +lean::cnstr_set(x_138, 0, x_134); +lean::cnstr_set_scalar(x_138, sizeof(void*)*1, x_136); +x_139 = x_138; if (lean::is_scalar(x_14)) { - x_142 = lean::alloc_cnstr(0, 2, 0); + x_140 = lean::alloc_cnstr(0, 2, 0); } else { - x_142 = x_14; + x_140 = x_14; } -lean::cnstr_set(x_142, 0, x_141); -lean::cnstr_set(x_142, 1, x_12); -return x_142; +lean::cnstr_set(x_140, 0, x_139); +lean::cnstr_set(x_140, 1, x_12); +return x_140; } } } @@ -50184,28 +49770,27 @@ _start: { if (lean::obj_tag(x_0) == 0) { -obj* x_6; obj* x_7; obj* x_8; obj* x_12; +obj* x_6; obj* x_7; obj* x_8; obj* x_11; x_6 = lean::box(0); x_7 = l_string_join___closed__1; x_8 = l_mjoin___rarg___closed__1; -lean::inc(x_6); lean::inc(x_8); lean::inc(x_7); -x_12 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_7, x_8, x_6, x_6, x_1, x_2, x_3, x_4, x_5); -return x_12; +x_11 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_7, x_8, x_6, x_6, x_1, x_2, x_3, x_4, x_5); +return x_11; } else { -obj* x_13; obj* x_15; obj* x_18; obj* x_19; -x_13 = lean::cnstr_get(x_0, 0); -lean::inc(x_13); -x_15 = lean::cnstr_get(x_0, 1); -lean::inc(x_15); +obj* x_12; obj* x_14; obj* x_17; obj* x_18; +x_12 = lean::cnstr_get(x_0, 0); +lean::inc(x_12); +x_14 = lean::cnstr_get(x_0, 1); +lean::inc(x_14); lean::dec(x_0); -x_18 = lean::alloc_closure(reinterpret_cast(l_list_foldr___main___at___private_init_lean_parser_term_2__leading___spec__6), 6, 1); -lean::closure_set(x_18, 0, x_15); -x_19 = l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__2___rarg(x_13, x_18, x_1, x_2, x_3, x_4, x_5); -return x_19; +x_17 = lean::alloc_closure(reinterpret_cast(l_list_foldr___main___at___private_init_lean_parser_term_2__leading___spec__6), 6, 1); +lean::closure_set(x_17, 0, x_14); +x_18 = l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__2___rarg(x_12, x_17, x_1, x_2, x_3, x_4, x_5); +return x_18; } } } @@ -50348,56 +49933,55 @@ goto lbl_29; } lbl_29: { -obj* x_75; obj* x_77; obj* x_79; obj* x_80; obj* x_82; obj* x_83; +obj* x_75; obj* x_76; obj* x_78; obj* x_79; obj* x_81; obj* x_82; lean::dec(x_28); x_75 = lean::box(0); -lean::inc(x_75); -x_77 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_77, 0, x_21); -lean::cnstr_set(x_77, 1, x_75); +x_76 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_76, 0, x_21); +lean::cnstr_set(x_76, 1, x_75); lean::inc(x_23); if (lean::is_scalar(x_27)) { - x_79 = lean::alloc_cnstr(0, 3, 0); + x_78 = lean::alloc_cnstr(0, 3, 0); } else { - x_79 = x_27; + x_78 = x_27; } -lean::cnstr_set(x_79, 0, x_77); -lean::cnstr_set(x_79, 1, x_23); -lean::cnstr_set(x_79, 2, x_75); -x_80 = l_lean_parser_finish__comment__block___closed__2; -lean::inc(x_80); -x_82 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_82, 0, x_79); -lean::cnstr_set(x_82, 1, x_23); -lean::cnstr_set(x_82, 2, x_80); -x_83 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_25, x_82); -x_11 = x_83; +lean::cnstr_set(x_78, 0, x_76); +lean::cnstr_set(x_78, 1, x_23); +lean::cnstr_set(x_78, 2, x_75); +x_79 = l_lean_parser_finish__comment__block___closed__2; +lean::inc(x_79); +x_81 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_81, 0, x_78); +lean::cnstr_set(x_81, 1, x_23); +lean::cnstr_set(x_81, 2, x_79); +x_82 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_25, x_81); +x_11 = x_82; x_12 = x_18; goto lbl_13; } } else { -obj* x_84; uint8 x_86; obj* x_87; obj* x_88; obj* x_89; -x_84 = lean::cnstr_get(x_16, 0); -lean::inc(x_84); -x_86 = lean::cnstr_get_scalar(x_16, sizeof(void*)*1); +obj* x_83; uint8 x_85; obj* x_86; obj* x_87; obj* x_88; +x_83 = lean::cnstr_get(x_16, 0); +lean::inc(x_83); +x_85 = lean::cnstr_get_scalar(x_16, sizeof(void*)*1); if (lean::is_shared(x_16)) { lean::dec(x_16); - x_87 = lean::box(0); + x_86 = lean::box(0); } else { lean::cnstr_release(x_16, 0); - x_87 = x_16; + x_86 = x_16; } -if (lean::is_scalar(x_87)) { - x_88 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_86)) { + x_87 = lean::alloc_cnstr(1, 1, 1); } else { - x_88 = x_87; + x_87 = x_86; } -lean::cnstr_set(x_88, 0, x_84); -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_86); -x_89 = x_88; -x_11 = x_89; +lean::cnstr_set(x_87, 0, x_83); +lean::cnstr_set_scalar(x_87, sizeof(void*)*1, x_85); +x_88 = x_87; +x_11 = x_88; x_12 = x_18; goto lbl_13; } @@ -50405,41 +49989,41 @@ lbl_10: { if (lean::obj_tag(x_8) == 0) { -obj* x_90; obj* x_92; obj* x_93; obj* x_95; obj* x_96; -x_90 = lean::cnstr_get(x_8, 0); -lean::inc(x_90); +obj* x_89; obj* x_91; obj* x_92; obj* x_94; obj* x_95; +x_89 = lean::cnstr_get(x_8, 0); +lean::inc(x_89); if (lean::is_shared(x_8)) { lean::dec(x_8); - x_92 = lean::box(0); + x_91 = lean::box(0); } else { lean::cnstr_release(x_8, 0); lean::cnstr_release(x_8, 1); lean::cnstr_release(x_8, 2); - x_92 = x_8; + x_91 = x_8; } -x_93 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_93); -if (lean::is_scalar(x_92)) { - x_95 = lean::alloc_cnstr(0, 3, 0); +x_92 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_92); +if (lean::is_scalar(x_91)) { + x_94 = lean::alloc_cnstr(0, 3, 0); } else { - x_95 = x_92; + x_94 = x_91; } -lean::cnstr_set(x_95, 0, x_90); -lean::cnstr_set(x_95, 1, x_6); -lean::cnstr_set(x_95, 2, x_93); -x_96 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_96, 0, x_95); -lean::cnstr_set(x_96, 1, x_9); -return x_96; +lean::cnstr_set(x_94, 0, x_89); +lean::cnstr_set(x_94, 1, x_6); +lean::cnstr_set(x_94, 2, x_92); +x_95 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_95, 0, x_94); +lean::cnstr_set(x_95, 1, x_9); +return x_95; } else { -obj* x_98; +obj* x_97; lean::dec(x_6); -x_98 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_98, 0, x_8); -lean::cnstr_set(x_98, 1, x_9); -return x_98; +x_97 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_97, 0, x_8); +lean::cnstr_set(x_97, 1, x_9); +return x_97; } } lbl_13: @@ -50454,147 +50038,147 @@ goto lbl_10; } else { -obj* x_101; obj* x_103; obj* x_104; -x_101 = lean::cnstr_get(x_11, 0); -lean::inc(x_101); +obj* x_100; obj* x_102; obj* x_103; +x_100 = lean::cnstr_get(x_11, 0); +lean::inc(x_100); if (lean::is_shared(x_11)) { lean::dec(x_11); - x_103 = lean::box(0); + x_102 = lean::box(0); } else { lean::cnstr_release(x_11, 0); - x_103 = x_11; + x_102 = x_11; } -x_104 = lean::cnstr_get(x_101, 0); -lean::inc(x_104); +x_103 = lean::cnstr_get(x_100, 0); +lean::inc(x_103); if (lean::obj_tag(x_2) == 0) { -obj* x_109; obj* x_111; +obj* x_108; obj* x_110; lean::dec(x_0); -lean::dec(x_103); -lean::dec(x_101); -x_109 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_109); -x_111 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_111, 0, x_2); -lean::cnstr_set(x_111, 1, x_104); -lean::cnstr_set(x_111, 2, x_109); -x_8 = x_111; +lean::dec(x_100); +lean::dec(x_102); +x_108 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_108); +x_110 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_110, 0, x_2); +lean::cnstr_set(x_110, 1, x_103); +lean::cnstr_set(x_110, 2, x_108); +x_8 = x_110; x_9 = x_12; goto lbl_10; } else { -obj* x_112; obj* x_114; obj* x_115; obj* x_117; uint8 x_119; -x_112 = lean::cnstr_get(x_2, 0); -lean::inc(x_112); -x_114 = lean::string_iterator_offset(x_104); -x_115 = lean::cnstr_get(x_112, 0); -lean::inc(x_115); -x_117 = lean::string_iterator_offset(x_115); -lean::dec(x_115); -x_119 = lean::nat_dec_lt(x_114, x_117); -if (x_119 == 0) +obj* x_111; obj* x_113; obj* x_114; obj* x_116; uint8 x_118; +x_111 = lean::cnstr_get(x_2, 0); +lean::inc(x_111); +x_113 = lean::string_iterator_offset(x_103); +x_114 = lean::cnstr_get(x_111, 0); +lean::inc(x_114); +x_116 = lean::string_iterator_offset(x_114); +lean::dec(x_114); +x_118 = lean::nat_dec_lt(x_113, x_116); +if (x_118 == 0) { -uint8 x_121; +uint8 x_120; lean::dec(x_2); -x_121 = lean::nat_dec_lt(x_117, x_114); -lean::dec(x_117); -if (x_121 == 0) +x_120 = lean::nat_dec_lt(x_116, x_113); +lean::dec(x_116); +if (x_120 == 0) { -obj* x_123; obj* x_124; uint8 x_126; -x_123 = l_lean_parser_parsec__t_merge___rarg(x_101, x_112); -x_124 = lean::string_iterator_offset(x_0); +obj* x_122; obj* x_123; uint8 x_125; +x_122 = l_lean_parser_parsec__t_merge___rarg(x_100, x_111); +x_123 = lean::string_iterator_offset(x_0); lean::dec(x_0); -x_126 = lean::nat_dec_lt(x_124, x_114); -lean::dec(x_114); -lean::dec(x_124); -if (x_126 == 0) +x_125 = lean::nat_dec_lt(x_123, x_113); +lean::dec(x_113); +lean::dec(x_123); +if (x_125 == 0) { -uint8 x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_134; -x_129 = 0; -if (lean::is_scalar(x_103)) { - x_130 = lean::alloc_cnstr(1, 1, 1); +uint8 x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_133; +x_128 = 0; +if (lean::is_scalar(x_102)) { + x_129 = lean::alloc_cnstr(1, 1, 1); } else { - x_130 = x_103; + x_129 = x_102; } -lean::cnstr_set(x_130, 0, x_123); -lean::cnstr_set_scalar(x_130, sizeof(void*)*1, x_129); -x_131 = x_130; -x_132 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_132); -x_134 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_134, 0, x_131); -lean::cnstr_set(x_134, 1, x_104); -lean::cnstr_set(x_134, 2, x_132); -x_8 = x_134; +lean::cnstr_set(x_129, 0, x_122); +lean::cnstr_set_scalar(x_129, sizeof(void*)*1, x_128); +x_130 = x_129; +x_131 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_131); +x_133 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_133, 0, x_130); +lean::cnstr_set(x_133, 1, x_103); +lean::cnstr_set(x_133, 2, x_131); +x_8 = x_133; x_9 = x_12; goto lbl_10; } else { -uint8 x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_140; -x_135 = 1; -if (lean::is_scalar(x_103)) { - x_136 = lean::alloc_cnstr(1, 1, 1); +uint8 x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_139; +x_134 = 1; +if (lean::is_scalar(x_102)) { + x_135 = lean::alloc_cnstr(1, 1, 1); } else { - x_136 = x_103; + x_135 = x_102; } -lean::cnstr_set(x_136, 0, x_123); -lean::cnstr_set_scalar(x_136, sizeof(void*)*1, x_135); -x_137 = x_136; -x_138 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_138); -x_140 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_140, 0, x_137); -lean::cnstr_set(x_140, 1, x_104); -lean::cnstr_set(x_140, 2, x_138); -x_8 = x_140; +lean::cnstr_set(x_135, 0, x_122); +lean::cnstr_set_scalar(x_135, sizeof(void*)*1, x_134); +x_136 = x_135; +x_137 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_137); +x_139 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_139, 0, x_136); +lean::cnstr_set(x_139, 1, x_103); +lean::cnstr_set(x_139, 2, x_137); +x_8 = x_139; x_9 = x_12; goto lbl_10; } } else { -uint8 x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_149; +uint8 x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_148; lean::dec(x_0); -lean::dec(x_114); -lean::dec(x_112); -x_144 = 1; -if (lean::is_scalar(x_103)) { - x_145 = lean::alloc_cnstr(1, 1, 1); +lean::dec(x_111); +lean::dec(x_113); +x_143 = 1; +if (lean::is_scalar(x_102)) { + x_144 = lean::alloc_cnstr(1, 1, 1); } else { - x_145 = x_103; + x_144 = x_102; } -lean::cnstr_set(x_145, 0, x_101); -lean::cnstr_set_scalar(x_145, sizeof(void*)*1, x_144); -x_146 = x_145; -x_147 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_147); -x_149 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_149, 0, x_146); -lean::cnstr_set(x_149, 1, x_104); -lean::cnstr_set(x_149, 2, x_147); -x_8 = x_149; +lean::cnstr_set(x_144, 0, x_100); +lean::cnstr_set_scalar(x_144, sizeof(void*)*1, x_143); +x_145 = x_144; +x_146 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_146); +x_148 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_148, 0, x_145); +lean::cnstr_set(x_148, 1, x_103); +lean::cnstr_set(x_148, 2, x_146); +x_8 = x_148; x_9 = x_12; goto lbl_10; } } else { -obj* x_156; obj* x_158; +obj* x_155; obj* x_157; lean::dec(x_0); -lean::dec(x_103); -lean::dec(x_101); -lean::dec(x_114); -lean::dec(x_112); -lean::dec(x_117); -x_156 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_156); -x_158 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_158, 0, x_2); -lean::cnstr_set(x_158, 1, x_104); -lean::cnstr_set(x_158, 2, x_156); -x_8 = x_158; +lean::dec(x_100); +lean::dec(x_102); +lean::dec(x_116); +lean::dec(x_111); +lean::dec(x_113); +x_155 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_155); +x_157 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_157, 0, x_2); +lean::cnstr_set(x_157, 1, x_103); +lean::cnstr_set(x_157, 2, x_155); +x_8 = x_157; x_9 = x_12; goto lbl_10; } @@ -50608,113 +50192,112 @@ _start: { if (lean::obj_tag(x_1) == 0) { -obj* x_10; obj* x_11; obj* x_12; obj* x_16; obj* x_17; obj* x_19; obj* x_20; +obj* x_10; obj* x_11; obj* x_12; obj* x_15; obj* x_16; obj* x_18; obj* x_19; lean::dec(x_4); lean::dec(x_3); lean::dec(x_2); x_10 = lean::box(0); x_11 = l_list_mfoldr___main___at_lean_parser_monad__parsec_longest__match___spec__2___rarg___closed__1; x_12 = l_mjoin___rarg___closed__1; -lean::inc(x_10); lean::inc(x_12); lean::inc(x_11); -x_16 = l_lean_parser_monad__parsec_error___at_lean_parser_number_x_27___spec__12___rarg(x_11, x_12, x_10, x_10, x_0); -x_17 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_17); -x_19 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_5); -lean::cnstr_set(x_19, 2, x_17); -x_20 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_6); -return x_20; +x_15 = l_lean_parser_monad__parsec_error___at_lean_parser_number_x_27___spec__12___rarg(x_11, x_12, x_10, x_10, x_0); +x_16 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_16); +x_18 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_18, 0, x_15); +lean::cnstr_set(x_18, 1, x_5); +lean::cnstr_set(x_18, 2, x_16); +x_19 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_19, 0, x_18); +lean::cnstr_set(x_19, 1, x_6); +return x_19; } else { -obj* x_21; obj* x_23; obj* x_30; obj* x_31; obj* x_33; obj* x_35; -x_21 = lean::cnstr_get(x_1, 0); -lean::inc(x_21); -x_23 = lean::cnstr_get(x_1, 1); -lean::inc(x_23); +obj* x_20; obj* x_22; obj* x_29; obj* x_30; obj* x_32; obj* x_34; +x_20 = lean::cnstr_get(x_1, 0); +lean::inc(x_20); +x_22 = lean::cnstr_get(x_1, 1); +lean::inc(x_22); lean::dec(x_1); lean::inc(x_4); lean::inc(x_3); lean::inc(x_2); lean::inc(x_0); -x_30 = l_list_mfoldr___main___at___private_init_lean_parser_term_2__leading___spec__10(x_0, x_23, x_2, x_3, x_4, x_5, x_6); -x_31 = lean::cnstr_get(x_30, 0); -lean::inc(x_31); -x_33 = lean::cnstr_get(x_30, 1); -lean::inc(x_33); -if (lean::is_shared(x_30)) { - lean::dec(x_30); - x_35 = lean::box(0); +x_29 = l_list_mfoldr___main___at___private_init_lean_parser_term_2__leading___spec__10(x_0, x_22, x_2, x_3, x_4, x_5, x_6); +x_30 = lean::cnstr_get(x_29, 0); +lean::inc(x_30); +x_32 = lean::cnstr_get(x_29, 1); +lean::inc(x_32); +if (lean::is_shared(x_29)) { + lean::dec(x_29); + x_34 = lean::box(0); } else { - lean::cnstr_release(x_30, 0); - lean::cnstr_release(x_30, 1); - x_35 = x_30; + lean::cnstr_release(x_29, 0); + lean::cnstr_release(x_29, 1); + x_34 = x_29; } -if (lean::obj_tag(x_31) == 0) +if (lean::obj_tag(x_30) == 0) { -obj* x_36; obj* x_38; obj* x_40; obj* x_43; obj* x_44; obj* x_46; obj* x_49; obj* x_50; -x_36 = lean::cnstr_get(x_31, 0); -lean::inc(x_36); -x_38 = lean::cnstr_get(x_31, 1); -lean::inc(x_38); -x_40 = lean::cnstr_get(x_31, 2); -lean::inc(x_40); -lean::dec(x_31); -x_43 = l_lean_parser_parsec__t_lookahead___at___private_init_lean_parser_term_2__leading___spec__9(x_0, x_21, x_36, x_2, x_3, x_4, x_38, x_33); -x_44 = lean::cnstr_get(x_43, 0); -lean::inc(x_44); -x_46 = lean::cnstr_get(x_43, 1); -lean::inc(x_46); -lean::dec(x_43); -x_49 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_40, x_44); -if (lean::is_scalar(x_35)) { - x_50 = lean::alloc_cnstr(0, 2, 0); +obj* x_35; obj* x_37; obj* x_39; obj* x_42; obj* x_43; obj* x_45; obj* x_48; obj* x_49; +x_35 = lean::cnstr_get(x_30, 0); +lean::inc(x_35); +x_37 = lean::cnstr_get(x_30, 1); +lean::inc(x_37); +x_39 = lean::cnstr_get(x_30, 2); +lean::inc(x_39); +lean::dec(x_30); +x_42 = l_lean_parser_parsec__t_lookahead___at___private_init_lean_parser_term_2__leading___spec__9(x_0, x_20, x_35, x_2, x_3, x_4, x_37, x_32); +x_43 = lean::cnstr_get(x_42, 0); +lean::inc(x_43); +x_45 = lean::cnstr_get(x_42, 1); +lean::inc(x_45); +lean::dec(x_42); +x_48 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_39, x_43); +if (lean::is_scalar(x_34)) { + x_49 = lean::alloc_cnstr(0, 2, 0); } else { - x_50 = x_35; + x_49 = x_34; } -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_46); -return x_50; +lean::cnstr_set(x_49, 0, x_48); +lean::cnstr_set(x_49, 1, x_45); +return x_49; } else { -obj* x_56; uint8 x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; +obj* x_55; uint8 x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; +lean::dec(x_20); lean::dec(x_4); lean::dec(x_3); lean::dec(x_0); lean::dec(x_2); -lean::dec(x_21); -x_56 = lean::cnstr_get(x_31, 0); -lean::inc(x_56); -x_58 = lean::cnstr_get_scalar(x_31, sizeof(void*)*1); -if (lean::is_shared(x_31)) { - lean::dec(x_31); - x_59 = lean::box(0); +x_55 = lean::cnstr_get(x_30, 0); +lean::inc(x_55); +x_57 = lean::cnstr_get_scalar(x_30, sizeof(void*)*1); +if (lean::is_shared(x_30)) { + lean::dec(x_30); + x_58 = lean::box(0); } else { - lean::cnstr_release(x_31, 0); - x_59 = x_31; + lean::cnstr_release(x_30, 0); + x_58 = x_30; } -if (lean::is_scalar(x_59)) { - x_60 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_58)) { + x_59 = lean::alloc_cnstr(1, 1, 1); } else { - x_60 = x_59; + x_59 = x_58; } -lean::cnstr_set(x_60, 0, x_56); -lean::cnstr_set_scalar(x_60, sizeof(void*)*1, x_58); -x_61 = x_60; -if (lean::is_scalar(x_35)) { - x_62 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_59, 0, x_55); +lean::cnstr_set_scalar(x_59, sizeof(void*)*1, x_57); +x_60 = x_59; +if (lean::is_scalar(x_34)) { + x_61 = lean::alloc_cnstr(0, 2, 0); } else { - x_62 = x_35; + x_61 = x_34; } -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_33); -return x_62; +lean::cnstr_set(x_61, 0, x_60); +lean::cnstr_set(x_61, 1, x_32); +return x_61; } } } @@ -51323,263 +50906,260 @@ x_40 = lean::string_mk_iterator(x_35); x_41 = l_lean_parser_trie_match__prefix___rarg(x_38, x_40); if (lean::obj_tag(x_41) == 0) { -obj* x_43; obj* x_44; obj* x_45; obj* x_49; obj* x_50; obj* x_52; obj* x_55; obj* x_57; obj* x_59; obj* x_60; obj* x_61; +obj* x_43; obj* x_44; obj* x_45; obj* x_48; obj* x_49; obj* x_51; obj* x_54; obj* x_56; obj* x_58; obj* x_59; obj* x_60; lean::dec(x_18); x_43 = lean::box(0); x_44 = l_lean_parser_curr__lbp___rarg___lambda__1___closed__1; x_45 = l_mjoin___rarg___closed__1; -lean::inc(x_43); lean::inc(x_45); lean::inc(x_44); -x_49 = l_lean_parser_monad__parsec_error___at_lean_parser_term__parser_run___spec__3___rarg(x_44, x_45, x_43, x_43, x_0, x_1, x_2, x_14, x_9); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_52 = lean::cnstr_get(x_49, 1); -lean::inc(x_52); -lean::dec(x_49); -x_55 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_55); -x_57 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_50); -lean::inc(x_55); -x_59 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_57); -x_60 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_59); +x_48 = l_lean_parser_monad__parsec_error___at_lean_parser_term__parser_run___spec__3___rarg(x_44, x_45, x_43, x_43, x_0, x_1, x_2, x_14, x_9); +x_49 = lean::cnstr_get(x_48, 0); +lean::inc(x_49); +x_51 = lean::cnstr_get(x_48, 1); +lean::inc(x_51); +lean::dec(x_48); +x_54 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_54); +x_56 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_54, x_49); +lean::inc(x_54); +x_58 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_54, x_56); +x_59 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_58); if (lean::is_scalar(x_11)) { - x_61 = lean::alloc_cnstr(0, 2, 0); + x_60 = lean::alloc_cnstr(0, 2, 0); } else { - x_61 = x_11; + x_60 = x_11; } -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_52); -return x_61; +lean::cnstr_set(x_60, 0, x_59); +lean::cnstr_set(x_60, 1, x_51); +return x_60; } else { -obj* x_65; obj* x_68; obj* x_71; obj* x_74; obj* x_76; obj* x_77; obj* x_78; +obj* x_64; obj* x_67; obj* x_70; obj* x_73; obj* x_75; obj* x_76; obj* x_77; lean::dec(x_1); lean::dec(x_0); lean::dec(x_2); -x_65 = lean::cnstr_get(x_41, 0); -lean::inc(x_65); +x_64 = lean::cnstr_get(x_41, 0); +lean::inc(x_64); lean::dec(x_41); -x_68 = lean::cnstr_get(x_65, 1); -lean::inc(x_68); -lean::dec(x_65); -x_71 = lean::cnstr_get(x_68, 1); -lean::inc(x_71); -lean::dec(x_68); -x_74 = l_lean_parser_match__token___closed__2; -lean::inc(x_74); +x_67 = lean::cnstr_get(x_64, 1); +lean::inc(x_67); +lean::dec(x_64); +x_70 = lean::cnstr_get(x_67, 1); +lean::inc(x_70); +lean::dec(x_67); +x_73 = l_lean_parser_match__token___closed__2; +lean::inc(x_73); if (lean::is_scalar(x_18)) { - x_76 = lean::alloc_cnstr(0, 3, 0); + x_75 = lean::alloc_cnstr(0, 3, 0); } else { - x_76 = x_18; + x_75 = x_18; } -lean::cnstr_set(x_76, 0, x_71); -lean::cnstr_set(x_76, 1, x_14); -lean::cnstr_set(x_76, 2, x_74); -x_77 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_76); +lean::cnstr_set(x_75, 0, x_70); +lean::cnstr_set(x_75, 1, x_14); +lean::cnstr_set(x_75, 2, x_73); +x_76 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_75); if (lean::is_scalar(x_11)) { - x_78 = lean::alloc_cnstr(0, 2, 0); + x_77 = lean::alloc_cnstr(0, 2, 0); } else { - x_78 = x_11; + x_77 = x_11; } -lean::cnstr_set(x_78, 0, x_77); -lean::cnstr_set(x_78, 1, x_9); -return x_78; +lean::cnstr_set(x_77, 0, x_76); +lean::cnstr_set(x_77, 1, x_9); +return x_77; } } case 1: { -obj* x_83; obj* x_84; obj* x_87; obj* x_88; obj* x_89; +obj* x_82; obj* x_83; obj* x_86; obj* x_87; obj* x_88; lean::dec(x_1); lean::dec(x_0); lean::dec(x_2); lean::dec(x_29); -x_83 = l_lean_parser_max__prec; -x_84 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_84); +x_82 = l_lean_parser_max__prec; +x_83 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_83); +lean::inc(x_82); if (lean::is_scalar(x_18)) { - x_87 = lean::alloc_cnstr(0, 3, 0); + x_86 = lean::alloc_cnstr(0, 3, 0); } else { - x_87 = x_18; + x_86 = x_18; } -lean::cnstr_set(x_87, 0, x_83); -lean::cnstr_set(x_87, 1, x_14); -lean::cnstr_set(x_87, 2, x_84); -x_88 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_87); +lean::cnstr_set(x_86, 0, x_82); +lean::cnstr_set(x_86, 1, x_14); +lean::cnstr_set(x_86, 2, x_83); +x_87 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_86); if (lean::is_scalar(x_11)) { - x_89 = lean::alloc_cnstr(0, 2, 0); + x_88 = lean::alloc_cnstr(0, 2, 0); } else { - x_89 = x_11; + x_88 = x_11; } -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_9); -return x_89; +lean::cnstr_set(x_88, 0, x_87); +lean::cnstr_set(x_88, 1, x_9); +return x_88; } case 2: { -obj* x_90; obj* x_93; obj* x_96; uint8 x_97; -x_90 = lean::cnstr_get(x_29, 0); -lean::inc(x_90); +obj* x_89; obj* x_92; obj* x_95; uint8 x_96; +x_89 = lean::cnstr_get(x_29, 0); +lean::inc(x_89); lean::dec(x_29); -x_93 = lean::cnstr_get(x_90, 0); -lean::inc(x_93); -lean::dec(x_90); -x_96 = l_lean_parser_number_has__view_x_27___lambda__1___closed__6; -x_97 = lean_name_dec_eq(x_93, x_96); -if (x_97 == 0) +x_92 = lean::cnstr_get(x_89, 0); +lean::inc(x_92); +lean::dec(x_89); +x_95 = l_lean_parser_number_has__view_x_27___lambda__1___closed__6; +x_96 = lean_name_dec_eq(x_92, x_95); +if (x_96 == 0) { -obj* x_98; uint8 x_99; -x_98 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__1; -x_99 = lean_name_dec_eq(x_93, x_98); -lean::dec(x_93); -if (x_99 == 0) +obj* x_97; uint8 x_98; +x_97 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__1; +x_98 = lean_name_dec_eq(x_92, x_97); +lean::dec(x_92); +if (x_98 == 0) { -obj* x_102; obj* x_103; obj* x_104; obj* x_108; obj* x_109; obj* x_111; obj* x_114; obj* x_115; +obj* x_101; obj* x_102; obj* x_103; obj* x_106; obj* x_107; obj* x_109; obj* x_112; obj* x_113; lean::dec(x_18); -x_102 = lean::box(0); -x_103 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__2; -x_104 = l_mjoin___rarg___closed__1; -lean::inc(x_102); -lean::inc(x_104); +x_101 = lean::box(0); +x_102 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__2; +x_103 = l_mjoin___rarg___closed__1; lean::inc(x_103); -x_108 = l_lean_parser_monad__parsec_error___at_lean_parser_term__parser_run___spec__3___rarg(x_103, x_104, x_102, x_102, x_0, x_1, x_2, x_14, x_9); -x_109 = lean::cnstr_get(x_108, 0); +lean::inc(x_102); +x_106 = l_lean_parser_monad__parsec_error___at_lean_parser_term__parser_run___spec__3___rarg(x_102, x_103, x_101, x_101, x_0, x_1, x_2, x_14, x_9); +x_107 = lean::cnstr_get(x_106, 0); +lean::inc(x_107); +x_109 = lean::cnstr_get(x_106, 1); lean::inc(x_109); -x_111 = lean::cnstr_get(x_108, 1); -lean::inc(x_111); -lean::dec(x_108); -x_114 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_109); +lean::dec(x_106); +x_112 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_107); if (lean::is_scalar(x_11)) { - x_115 = lean::alloc_cnstr(0, 2, 0); + x_113 = lean::alloc_cnstr(0, 2, 0); } else { - x_115 = x_11; + x_113 = x_11; } -lean::cnstr_set(x_115, 0, x_114); -lean::cnstr_set(x_115, 1, x_111); -return x_115; +lean::cnstr_set(x_113, 0, x_112); +lean::cnstr_set(x_113, 1, x_109); +return x_113; } else { -obj* x_119; obj* x_120; obj* x_123; obj* x_124; obj* x_125; +obj* x_117; obj* x_118; obj* x_121; obj* x_122; obj* x_123; lean::dec(x_1); lean::dec(x_0); lean::dec(x_2); -x_119 = l_lean_parser_max__prec; -x_120 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_120); -lean::inc(x_119); +x_117 = l_lean_parser_max__prec; +x_118 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_118); +lean::inc(x_117); if (lean::is_scalar(x_18)) { - x_123 = lean::alloc_cnstr(0, 3, 0); + x_121 = lean::alloc_cnstr(0, 3, 0); } else { - x_123 = x_18; + x_121 = x_18; } -lean::cnstr_set(x_123, 0, x_119); -lean::cnstr_set(x_123, 1, x_14); -lean::cnstr_set(x_123, 2, x_120); -x_124 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_123); +lean::cnstr_set(x_121, 0, x_117); +lean::cnstr_set(x_121, 1, x_14); +lean::cnstr_set(x_121, 2, x_118); +x_122 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_121); if (lean::is_scalar(x_11)) { - x_125 = lean::alloc_cnstr(0, 2, 0); + x_123 = lean::alloc_cnstr(0, 2, 0); } else { - x_125 = x_11; + x_123 = x_11; } -lean::cnstr_set(x_125, 0, x_124); -lean::cnstr_set(x_125, 1, x_9); -return x_125; +lean::cnstr_set(x_123, 0, x_122); +lean::cnstr_set(x_123, 1, x_9); +return x_123; } } else { -obj* x_130; obj* x_131; obj* x_134; obj* x_135; obj* x_136; +obj* x_128; obj* x_129; obj* x_132; obj* x_133; obj* x_134; lean::dec(x_1); lean::dec(x_0); lean::dec(x_2); -lean::dec(x_93); -x_130 = l_lean_parser_max__prec; -x_131 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_131); -lean::inc(x_130); +lean::dec(x_92); +x_128 = l_lean_parser_max__prec; +x_129 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_129); +lean::inc(x_128); if (lean::is_scalar(x_18)) { - x_134 = lean::alloc_cnstr(0, 3, 0); + x_132 = lean::alloc_cnstr(0, 3, 0); } else { - x_134 = x_18; + x_132 = x_18; } -lean::cnstr_set(x_134, 0, x_130); -lean::cnstr_set(x_134, 1, x_14); -lean::cnstr_set(x_134, 2, x_131); -x_135 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_134); +lean::cnstr_set(x_132, 0, x_128); +lean::cnstr_set(x_132, 1, x_14); +lean::cnstr_set(x_132, 2, x_129); +x_133 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_132); if (lean::is_scalar(x_11)) { - x_136 = lean::alloc_cnstr(0, 2, 0); + x_134 = lean::alloc_cnstr(0, 2, 0); } else { - x_136 = x_11; + x_134 = x_11; } -lean::cnstr_set(x_136, 0, x_135); -lean::cnstr_set(x_136, 1, x_9); -return x_136; +lean::cnstr_set(x_134, 0, x_133); +lean::cnstr_set(x_134, 1, x_9); +return x_134; } } default: { -obj* x_138; obj* x_139; obj* x_140; obj* x_144; obj* x_145; obj* x_147; obj* x_150; obj* x_151; +obj* x_136; obj* x_137; obj* x_138; obj* x_141; obj* x_142; obj* x_144; obj* x_147; obj* x_148; lean::dec(x_18); -x_138 = lean::box(0); -x_139 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__2; -x_140 = l_mjoin___rarg___closed__1; +x_136 = lean::box(0); +x_137 = l_lean_parser_curr__lbp___rarg___lambda__3___closed__2; +x_138 = l_mjoin___rarg___closed__1; lean::inc(x_138); -lean::inc(x_140); -lean::inc(x_139); -x_144 = l_lean_parser_monad__parsec_error___at_lean_parser_term__parser_run___spec__3___rarg(x_139, x_140, x_138, x_138, x_0, x_1, x_2, x_14, x_9); -x_145 = lean::cnstr_get(x_144, 0); -lean::inc(x_145); -x_147 = lean::cnstr_get(x_144, 1); -lean::inc(x_147); -lean::dec(x_144); -x_150 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_145); +lean::inc(x_137); +x_141 = l_lean_parser_monad__parsec_error___at_lean_parser_term__parser_run___spec__3___rarg(x_137, x_138, x_136, x_136, x_0, x_1, x_2, x_14, x_9); +x_142 = lean::cnstr_get(x_141, 0); +lean::inc(x_142); +x_144 = lean::cnstr_get(x_141, 1); +lean::inc(x_144); +lean::dec(x_141); +x_147 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_142); if (lean::is_scalar(x_11)) { - x_151 = lean::alloc_cnstr(0, 2, 0); + x_148 = lean::alloc_cnstr(0, 2, 0); } else { - x_151 = x_11; + x_148 = x_11; } -lean::cnstr_set(x_151, 0, x_150); -lean::cnstr_set(x_151, 1, x_147); -return x_151; +lean::cnstr_set(x_148, 0, x_147); +lean::cnstr_set(x_148, 1, x_144); +return x_148; } } } } else { -obj* x_155; uint8 x_157; obj* x_158; obj* x_159; obj* x_160; obj* x_161; +obj* x_152; uint8 x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_158; lean::dec(x_1); lean::dec(x_0); lean::dec(x_2); -x_155 = lean::cnstr_get(x_7, 0); -lean::inc(x_155); -x_157 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); +x_152 = lean::cnstr_get(x_7, 0); +lean::inc(x_152); +x_154 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); if (lean::is_shared(x_7)) { lean::dec(x_7); - x_158 = lean::box(0); + x_155 = lean::box(0); } else { lean::cnstr_release(x_7, 0); - x_158 = x_7; + x_155 = x_7; } -if (lean::is_scalar(x_158)) { - x_159 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_155)) { + x_156 = lean::alloc_cnstr(1, 1, 1); } else { - x_159 = x_158; + x_156 = x_155; } -lean::cnstr_set(x_159, 0, x_155); -lean::cnstr_set_scalar(x_159, sizeof(void*)*1, x_157); -x_160 = x_159; +lean::cnstr_set(x_156, 0, x_152); +lean::cnstr_set_scalar(x_156, sizeof(void*)*1, x_154); +x_157 = x_156; if (lean::is_scalar(x_11)) { - x_161 = lean::alloc_cnstr(0, 2, 0); + x_158 = lean::alloc_cnstr(0, 2, 0); } else { - x_161 = x_11; + x_158 = x_11; } -lean::cnstr_set(x_161, 0, x_160); -lean::cnstr_set(x_161, 1, x_9); -return x_161; +lean::cnstr_set(x_158, 0, x_157); +lean::cnstr_set(x_158, 1, x_9); +return x_158; } } } @@ -51782,7 +51362,7 @@ return x_99; } else { -obj* x_104; obj* x_105; obj* x_106; obj* x_110; +obj* x_104; obj* x_105; obj* x_106; obj* x_109; lean::dec(x_1); lean::dec(x_3); lean::dec(x_0); @@ -51790,11 +51370,10 @@ lean::dec(x_2); x_104 = lean::box(0); x_105 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_106 = l_mjoin___rarg___closed__1; -lean::inc(x_104); lean::inc(x_106); lean::inc(x_105); -x_110 = l_lean_parser_monad__parsec_error___at_lean_parser_term__parser_run___spec__3___rarg(x_105, x_106, x_104, x_104, x_4, x_5, x_6, x_7, x_8); -return x_110; +x_109 = l_lean_parser_monad__parsec_error___at_lean_parser_term__parser_run___spec__3___rarg(x_105, x_106, x_104, x_104, x_4, x_5, x_6, x_7, x_8); +return x_109; } } } @@ -51854,16 +51433,15 @@ return x_9; obj* l_lean_parser_rec__t_run__parsec___at_lean_parser_term__parser_run___spec__5___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { -obj* x_6; obj* x_7; obj* x_8; obj* x_12; +obj* x_6; obj* x_7; obj* x_8; obj* x_11; lean::dec(x_0); x_6 = lean::box(0); x_7 = l_lean_parser_rec__t_run__parsec___rarg___lambda__1___closed__1; x_8 = l_mjoin___rarg___closed__1; -lean::inc(x_6); lean::inc(x_8); lean::inc(x_7); -x_12 = l_lean_parser_monad__parsec_error___at_lean_parser_term__parser_run___spec__6___rarg(x_7, x_8, x_6, x_6, x_1, x_2, x_3, x_4); -return x_12; +x_11 = l_lean_parser_monad__parsec_error___at_lean_parser_term__parser_run___spec__6___rarg(x_7, x_8, x_6, x_6, x_1, x_2, x_3, x_4); +return x_11; } } obj* _init_l_lean_parser_rec__t_run__parsec___at_lean_parser_term__parser_run___spec__5___closed__1() { diff --git a/src/boot/init/lean/parser/token.cpp b/src/boot/init/lean/parser/token.cpp index 85b22ceb65..77d92d3c4f 100644 --- a/src/boot/init/lean/parser/token.cpp +++ b/src/boot/init/lean/parser/token.cpp @@ -699,96 +699,94 @@ uint8 x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { -obj* x_4; obj* x_5; obj* x_6; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_19; +obj* x_4; obj* x_5; obj* x_6; obj* x_9; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_18; x_4 = lean::box(0); x_5 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_6 = l_mjoin___rarg___closed__1; -lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); -x_10 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -if (lean::is_shared(x_10)) { - lean::dec(x_10); - x_15 = lean::box(0); +x_9 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); +x_10 = lean::cnstr_get(x_9, 0); +lean::inc(x_10); +x_12 = lean::cnstr_get(x_9, 1); +lean::inc(x_12); +if (lean::is_shared(x_9)) { + lean::dec(x_9); + x_14 = lean::box(0); } else { - lean::cnstr_release(x_10, 0); - lean::cnstr_release(x_10, 1); - x_15 = x_10; + lean::cnstr_release(x_9, 0); + lean::cnstr_release(x_9, 1); + x_14 = x_9; } -x_16 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_16); -x_18 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_11); -if (lean::is_scalar(x_15)) { - x_19 = lean::alloc_cnstr(0, 2, 0); +x_15 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_15); +x_17 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_10); +if (lean::is_scalar(x_14)) { + x_18 = lean::alloc_cnstr(0, 2, 0); } else { - x_19 = x_15; + x_18 = x_14; } -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_13); -return x_19; +lean::cnstr_set(x_18, 0, x_17); +lean::cnstr_set(x_18, 1, x_12); +return x_18; } else { -uint32 x_20; uint8 x_21; -x_20 = lean::string_iterator_curr(x_1); -x_21 = l_true_decidable; -if (x_21 == 0) +uint32 x_19; uint8 x_20; +x_19 = lean::string_iterator_curr(x_1); +x_20 = l_true_decidable; +if (x_20 == 0) { -obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_32; obj* x_33; obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_41; -x_22 = l_char_quote__core(x_20); -x_23 = l_char_has__repr___closed__1; -lean::inc(x_23); -x_25 = lean::string_append(x_23, x_22); -lean::dec(x_22); -x_27 = lean::string_append(x_25, x_23); -x_28 = lean::box(0); -x_29 = l_mjoin___rarg___closed__1; +obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_33; obj* x_35; obj* x_36; obj* x_38; obj* x_39; +x_21 = l_char_quote__core(x_19); +x_22 = l_char_has__repr___closed__1; +lean::inc(x_22); +x_24 = lean::string_append(x_22, x_21); +lean::dec(x_21); +x_26 = lean::string_append(x_24, x_22); +x_27 = lean::box(0); +x_28 = l_mjoin___rarg___closed__1; lean::inc(x_28); -lean::inc(x_29); -x_32 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_27, x_29, x_28, x_28, x_0, x_1, x_2); -x_33 = lean::cnstr_get(x_32, 0); +x_30 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_26, x_28, x_27, x_27, x_0, x_1, x_2); +x_31 = lean::cnstr_get(x_30, 0); +lean::inc(x_31); +x_33 = lean::cnstr_get(x_30, 1); lean::inc(x_33); -x_35 = lean::cnstr_get(x_32, 1); -lean::inc(x_35); -if (lean::is_shared(x_32)) { - lean::dec(x_32); - x_37 = lean::box(0); +if (lean::is_shared(x_30)) { + lean::dec(x_30); + x_35 = lean::box(0); } else { - lean::cnstr_release(x_32, 0); - lean::cnstr_release(x_32, 1); - x_37 = x_32; + lean::cnstr_release(x_30, 0); + lean::cnstr_release(x_30, 1); + x_35 = x_30; } -x_38 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_38); -x_40 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_38, x_33); -if (lean::is_scalar(x_37)) { - x_41 = lean::alloc_cnstr(0, 2, 0); +x_36 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_36); +x_38 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_36, x_31); +if (lean::is_scalar(x_35)) { + x_39 = lean::alloc_cnstr(0, 2, 0); } else { - x_41 = x_37; + x_39 = x_35; } -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_35); -return x_41; +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_33); +return x_39; } else { -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; +obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; lean::dec(x_0); -x_43 = lean::string_iterator_next(x_1); -x_44 = lean::box(0); -x_45 = lean::box_uint32(x_20); -x_46 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_43); -lean::cnstr_set(x_46, 2, x_44); -x_47 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_2); -return x_47; +x_41 = lean::string_iterator_next(x_1); +x_42 = lean::box(0); +x_43 = lean::box_uint32(x_19); +x_44 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_44, 0, x_43); +lean::cnstr_set(x_44, 1, x_41); +lean::cnstr_set(x_44, 2, x_42); +x_45 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_45, 0, x_44); +lean::cnstr_set(x_45, 1, x_2); +return x_45; } } } @@ -1236,17 +1234,16 @@ return x_160; } else { -obj* x_163; obj* x_164; obj* x_165; obj* x_169; +obj* x_163; obj* x_164; obj* x_165; obj* x_168; lean::dec(x_1); lean::dec(x_0); x_163 = lean::box(0); x_164 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_165 = l_mjoin___rarg___closed__1; -lean::inc(x_163); lean::inc(x_165); lean::inc(x_164); -x_169 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_164, x_165, x_163, x_163, x_2, x_3, x_4); -return x_169; +x_168 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_164, x_165, x_163, x_163, x_2, x_3, x_4); +return x_168; } } } @@ -2333,16 +2330,15 @@ return x_303; } else { -obj* x_305; obj* x_306; obj* x_307; obj* x_311; +obj* x_305; obj* x_306; obj* x_307; obj* x_310; lean::dec(x_0); x_305 = lean::box(0); x_306 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_307 = l_mjoin___rarg___closed__1; -lean::inc(x_305); lean::inc(x_307); lean::inc(x_306); -x_311 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_306, x_307, x_305, x_305, x_1, x_2, x_3); -return x_311; +x_310 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_306, x_307, x_305, x_305, x_1, x_2, x_3); +return x_310; } } } @@ -3603,48 +3599,46 @@ obj* x_45; x_45 = lean::box(0); if (lean::obj_tag(x_17) == 0) { -obj* x_47; -lean::inc(x_45); -x_47 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_47, 0, x_5); -lean::cnstr_set(x_47, 1, x_45); -lean::cnstr_set(x_47, 2, x_45); -return x_47; +obj* x_46; +x_46 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_46, 0, x_5); +lean::cnstr_set(x_46, 1, x_45); +lean::cnstr_set(x_46, 2, x_45); +return x_46; } else { -obj* x_48; -x_48 = lean::cnstr_get(x_17, 0); -lean::inc(x_48); +obj* x_47; +x_47 = lean::cnstr_get(x_17, 0); +lean::inc(x_47); lean::dec(x_17); x_14 = x_45; -x_15 = x_48; +x_15 = x_47; goto lbl_16; } } default: { -obj* x_52; +obj* x_51; lean::dec(x_18); -x_52 = lean::box(0); +x_51 = lean::box(0); if (lean::obj_tag(x_17) == 0) { -obj* x_54; -lean::inc(x_52); -x_54 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_54, 0, x_5); -lean::cnstr_set(x_54, 1, x_52); -lean::cnstr_set(x_54, 2, x_52); -return x_54; +obj* x_52; +x_52 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_52, 0, x_5); +lean::cnstr_set(x_52, 1, x_51); +lean::cnstr_set(x_52, 2, x_51); +return x_52; } else { -obj* x_55; -x_55 = lean::cnstr_get(x_17, 0); -lean::inc(x_55); +obj* x_53; +x_53 = lean::cnstr_get(x_17, 0); +lean::inc(x_53); lean::dec(x_17); -x_14 = x_52; -x_15 = x_55; +x_14 = x_51; +x_15 = x_53; goto lbl_16; } } @@ -3828,48 +3822,46 @@ obj* x_59; x_59 = lean::box(0); if (lean::obj_tag(x_31) == 0) { -obj* x_61; -lean::inc(x_59); -x_61 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_61, 0, x_19); -lean::cnstr_set(x_61, 1, x_59); -lean::cnstr_set(x_61, 2, x_59); -return x_61; +obj* x_60; +x_60 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_60, 0, x_19); +lean::cnstr_set(x_60, 1, x_59); +lean::cnstr_set(x_60, 2, x_59); +return x_60; } else { -obj* x_62; -x_62 = lean::cnstr_get(x_31, 0); -lean::inc(x_62); +obj* x_61; +x_61 = lean::cnstr_get(x_31, 0); +lean::inc(x_61); lean::dec(x_31); x_28 = x_59; -x_29 = x_62; +x_29 = x_61; goto lbl_30; } } default: { -obj* x_66; +obj* x_65; lean::dec(x_32); -x_66 = lean::box(0); +x_65 = lean::box(0); if (lean::obj_tag(x_31) == 0) { -obj* x_68; -lean::inc(x_66); -x_68 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_68, 0, x_19); -lean::cnstr_set(x_68, 1, x_66); -lean::cnstr_set(x_68, 2, x_66); -return x_68; +obj* x_66; +x_66 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_66, 0, x_19); +lean::cnstr_set(x_66, 1, x_65); +lean::cnstr_set(x_66, 2, x_65); +return x_66; } else { -obj* x_69; -x_69 = lean::cnstr_get(x_31, 0); -lean::inc(x_69); +obj* x_67; +x_67 = lean::cnstr_get(x_31, 0); +lean::inc(x_67); lean::dec(x_31); -x_28 = x_66; -x_29 = x_69; +x_28 = x_65; +x_29 = x_67; goto lbl_30; } } @@ -3882,7 +3874,7 @@ goto lbl_30; obj* l_lean_parser_detail__ident__part__escaped_has__view_x_27___lambda__2(obj* x_0) { _start: { -obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; +obj* x_1; obj* x_3; obj* x_5; obj* x_8; obj* x_10; obj* x_11; obj* x_12; 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_25; x_1 = lean::cnstr_get(x_0, 0); lean::inc(x_1); x_3 = lean::cnstr_get(x_0, 1); @@ -3894,29 +3886,27 @@ x_8 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; lean::inc(x_8); x_10 = l_option_map___rarg(x_8, x_1); x_11 = lean::box(3); -lean::inc(x_11); -x_13 = l_option_get__or__else___main___rarg(x_10, x_11); +x_12 = l_option_get__or__else___main___rarg(x_10, x_11); lean::inc(x_8); -x_15 = l_option_map___rarg(x_8, x_3); -lean::inc(x_11); -x_17 = l_option_get__or__else___main___rarg(x_15, x_11); +x_14 = l_option_map___rarg(x_8, x_3); +x_15 = l_option_get__or__else___main___rarg(x_14, x_11); lean::inc(x_8); -x_19 = l_option_map___rarg(x_8, x_5); -x_20 = l_option_get__or__else___main___rarg(x_19, x_11); -x_21 = lean::box(0); +x_17 = l_option_map___rarg(x_8, x_5); +x_18 = l_option_get__or__else___main___rarg(x_17, x_11); +x_19 = lean::box(0); +x_20 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_20, 0, x_18); +lean::cnstr_set(x_20, 1, x_19); +x_21 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_21, 0, x_15); +lean::cnstr_set(x_21, 1, x_20); x_22 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_22, 0, x_20); +lean::cnstr_set(x_22, 0, x_12); lean::cnstr_set(x_22, 1, x_21); -x_23 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_17); -lean::cnstr_set(x_23, 1, x_22); -x_24 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_24, 0, x_13); -lean::cnstr_set(x_24, 1, x_23); -x_25 = l_lean_parser_detail__ident__part__escaped; -lean::inc(x_25); -x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); -return x_27; +x_23 = l_lean_parser_detail__ident__part__escaped; +lean::inc(x_23); +x_25 = l_lean_parser_syntax_mk__node(x_23, x_22); +return x_25; } } obj* _init_l_lean_parser_detail__ident__part__escaped_has__view_x_27() { @@ -4141,50 +4131,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__1___closed__2; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__1___closed__2; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__1___closed__2; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__1___closed__2; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__1___closed__2; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__1___closed__2; +lean::inc(x_69); +return x_69; } } } @@ -4194,65 +4183,65 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__1___closed__2; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__1___closed__2; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); lean::dec(x_2); -if (x_77 == 0) +if (x_76 == 0) { switch (lean::obj_tag(x_1)) { case 0: { -obj* x_80; obj* x_83; obj* x_84; -x_80 = lean::cnstr_get(x_1, 0); -lean::inc(x_80); +obj* x_79; obj* x_82; obj* x_83; +x_79 = lean::cnstr_get(x_1, 0); +lean::inc(x_79); lean::dec(x_1); +x_82 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_82, 0, x_79); x_83 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_83, 0, x_80); -x_84 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_84, 0, x_83); -return x_84; +lean::cnstr_set(x_83, 0, x_82); +return x_83; } case 3: { -obj* x_85; -x_85 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__1___closed__1; -lean::inc(x_85); -return x_85; +obj* x_84; +x_84 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__1___closed__1; +lean::inc(x_84); +return x_84; } default: { -obj* x_88; +obj* x_87; lean::dec(x_1); -x_88 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__1___closed__1; -lean::inc(x_88); -return x_88; +x_87 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__1___closed__1; +lean::inc(x_87); +return x_87; } } } else { -obj* x_90; obj* x_91; obj* x_93; obj* x_94; -x_90 = l_lean_parser_detail__ident__part__escaped_has__view; -x_91 = lean::cnstr_get(x_90, 0); -lean::inc(x_91); -x_93 = lean::apply_1(x_91, x_1); -x_94 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_94, 0, x_93); -return x_94; +obj* x_89; obj* x_90; obj* x_92; obj* x_93; +x_89 = l_lean_parser_detail__ident__part__escaped_has__view; +x_90 = lean::cnstr_get(x_89, 0); +lean::inc(x_90); +x_92 = lean::apply_1(x_90, x_1); +x_93 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_93, 0, x_92); +return x_93; } } } @@ -4284,7 +4273,7 @@ obj* x_1; x_1 = lean::box(0); if (lean::obj_tag(x_0) == 0) { -obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; +obj* x_2; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_16; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -4292,46 +4281,44 @@ x_5 = l_lean_parser_detail__ident__part__escaped_has__view; x_6 = lean::cnstr_get(x_5, 1); lean::inc(x_6); x_8 = lean::apply_1(x_6, x_2); -lean::inc(x_1); -x_10 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_10, 0, x_8); -lean::cnstr_set(x_10, 1, x_1); -x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_11); -x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_1); -x_15 = l_lean_parser_detail__ident__part; -lean::inc(x_15); -x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); -return x_17; +x_9 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_9, 0, x_8); +lean::cnstr_set(x_9, 1, x_1); +x_10 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_10); +x_12 = l_lean_parser_syntax_mk__node(x_10, x_9); +x_13 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_13, 0, x_12); +lean::cnstr_set(x_13, 1, x_1); +x_14 = l_lean_parser_detail__ident__part; +lean::inc(x_14); +x_16 = l_lean_parser_syntax_mk__node(x_14, x_13); +return x_16; } else { -obj* x_18; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; -x_18 = lean::cnstr_get(x_0, 0); -lean::inc(x_18); +obj* x_17; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_32; +x_17 = lean::cnstr_get(x_0, 0); +lean::inc(x_17); lean::dec(x_0); -x_21 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_21); -x_23 = l_option_map___rarg(x_21, x_18); -x_24 = lean::box(3); -x_25 = l_option_get__or__else___main___rarg(x_23, x_24); -lean::inc(x_1); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_25); -lean::cnstr_set(x_27, 1, x_1); -x_28 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_28); -x_30 = l_lean_parser_syntax_mk__node(x_28, x_27); -x_31 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_1); -x_32 = l_lean_parser_detail__ident__part; -lean::inc(x_32); -x_34 = l_lean_parser_syntax_mk__node(x_32, x_31); -return x_34; +x_20 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_20); +x_22 = l_option_map___rarg(x_20, x_17); +x_23 = lean::box(3); +x_24 = l_option_get__or__else___main___rarg(x_22, x_23); +x_25 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_25, 0, x_24); +lean::cnstr_set(x_25, 1, x_1); +x_26 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_26); +x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_1); +x_30 = l_lean_parser_detail__ident__part; +lean::inc(x_30); +x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); +return x_32; } } } @@ -4578,212 +4565,210 @@ uint8 x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { -obj* x_4; obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; +obj* x_4; obj* x_5; obj* x_6; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; x_4 = lean::box(0); x_5 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_6 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); -x_11 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -if (lean::is_shared(x_11)) { - lean::dec(x_11); - x_16 = lean::box(0); +x_10 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); +x_11 = lean::cnstr_get(x_10, 0); +lean::inc(x_11); +x_13 = lean::cnstr_get(x_10, 1); +lean::inc(x_13); +if (lean::is_shared(x_10)) { + lean::dec(x_10); + x_15 = lean::box(0); } else { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - x_16 = x_11; + lean::cnstr_release(x_10, 0); + lean::cnstr_release(x_10, 1); + x_15 = x_10; } -x_17 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_17); -x_19 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_12); -if (lean::obj_tag(x_19) == 0) +x_16 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_16); +x_18 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_11); +if (lean::obj_tag(x_18) == 0) { -obj* x_20; obj* x_22; obj* x_24; uint32 x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -x_22 = lean::cnstr_get(x_19, 1); -lean::inc(x_22); -x_24 = lean::cnstr_get(x_19, 2); -lean::inc(x_24); +obj* x_19; obj* x_21; obj* x_23; uint32 x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_34; obj* x_35; +x_19 = lean::cnstr_get(x_18, 0); +lean::inc(x_19); +x_21 = lean::cnstr_get(x_18, 1); +lean::inc(x_21); +x_23 = lean::cnstr_get(x_18, 2); +lean::inc(x_23); +lean::dec(x_18); +x_26 = lean::unbox_uint32(x_19); lean::dec(x_19); -x_27 = lean::unbox_uint32(x_20); -lean::dec(x_20); -x_29 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__2(x_27, x_0, x_22, x_14); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_32 = lean::cnstr_get(x_29, 1); -lean::inc(x_32); -lean::dec(x_29); -x_35 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_24, x_30); -if (lean::is_scalar(x_16)) { - x_36 = lean::alloc_cnstr(0, 2, 0); +x_28 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__2(x_26, x_0, x_21, x_13); +x_29 = lean::cnstr_get(x_28, 0); +lean::inc(x_29); +x_31 = lean::cnstr_get(x_28, 1); +lean::inc(x_31); +lean::dec(x_28); +x_34 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_29); +if (lean::is_scalar(x_15)) { + x_35 = lean::alloc_cnstr(0, 2, 0); } else { - x_36 = x_16; + x_35 = x_15; } -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_32); -return x_36; +lean::cnstr_set(x_35, 0, x_34); +lean::cnstr_set(x_35, 1, x_31); +return x_35; } else { -obj* x_38; uint8 x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; +obj* x_37; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; lean::dec(x_0); -x_38 = lean::cnstr_get(x_19, 0); -lean::inc(x_38); -x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); -if (lean::is_shared(x_19)) { - lean::dec(x_19); - x_41 = lean::box(0); +x_37 = lean::cnstr_get(x_18, 0); +lean::inc(x_37); +x_39 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); +if (lean::is_shared(x_18)) { + lean::dec(x_18); + x_40 = lean::box(0); } else { - lean::cnstr_release(x_19, 0); - x_41 = x_19; + lean::cnstr_release(x_18, 0); + x_40 = x_18; } -if (lean::is_scalar(x_41)) { - x_42 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_40)) { + x_41 = lean::alloc_cnstr(1, 1, 1); } else { - x_42 = x_41; + x_41 = x_40; } -lean::cnstr_set(x_42, 0, x_38); -lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); -x_43 = x_42; -if (lean::is_scalar(x_16)) { - x_44 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_41, 0, x_37); +lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); +x_42 = x_41; +if (lean::is_scalar(x_15)) { + x_43 = lean::alloc_cnstr(0, 2, 0); } else { - x_44 = x_16; + x_43 = x_15; } -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_14); -return x_44; +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_13); +return x_43; } } else { -uint32 x_45; uint8 x_46; -x_45 = lean::string_iterator_curr(x_1); -x_46 = l_lean_is__id__end__escape(x_45); -if (x_46 == 0) +uint32 x_44; uint8 x_45; +x_44 = lean::string_iterator_curr(x_1); +x_45 = l_lean_is__id__end__escape(x_44); +if (x_45 == 0) { -obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; +obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_56; lean::inc(x_1); -x_48 = lean::string_iterator_next(x_1); -x_49 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__4(x_1, x_0, x_48, x_2); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_52 = lean::cnstr_get(x_49, 1); -lean::inc(x_52); -if (lean::is_shared(x_49)) { - lean::dec(x_49); - x_54 = lean::box(0); +x_47 = lean::string_iterator_next(x_1); +x_48 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__4(x_1, x_0, x_47, x_2); +x_49 = lean::cnstr_get(x_48, 0); +lean::inc(x_49); +x_51 = lean::cnstr_get(x_48, 1); +lean::inc(x_51); +if (lean::is_shared(x_48)) { + lean::dec(x_48); + x_53 = lean::box(0); } else { - lean::cnstr_release(x_49, 0); - lean::cnstr_release(x_49, 1); - x_54 = x_49; + lean::cnstr_release(x_48, 0); + lean::cnstr_release(x_48, 1); + x_53 = x_48; } -x_55 = lean::box(0); -x_56 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_50); -if (lean::is_scalar(x_54)) { - x_57 = lean::alloc_cnstr(0, 2, 0); +x_54 = lean::box(0); +x_55 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_54, x_49); +if (lean::is_scalar(x_53)) { + x_56 = lean::alloc_cnstr(0, 2, 0); } else { - x_57 = x_54; + x_56 = x_53; } -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_52); -return x_57; +lean::cnstr_set(x_56, 0, x_55); +lean::cnstr_set(x_56, 1, x_51); +return x_56; } else { -obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; -x_58 = l_char_quote__core(x_45); -x_59 = l_char_has__repr___closed__1; -lean::inc(x_59); -x_61 = lean::string_append(x_59, x_58); -lean::dec(x_58); -x_63 = lean::string_append(x_61, x_59); -x_64 = lean::box(0); -x_65 = l_mjoin___rarg___closed__1; +obj* x_57; obj* x_58; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_67; obj* x_68; obj* x_70; obj* x_72; obj* x_73; obj* x_75; +x_57 = l_char_quote__core(x_44); +x_58 = l_char_has__repr___closed__1; +lean::inc(x_58); +x_60 = lean::string_append(x_58, x_57); +lean::dec(x_57); +x_62 = lean::string_append(x_60, x_58); +x_63 = lean::box(0); +x_64 = l_mjoin___rarg___closed__1; lean::inc(x_0); lean::inc(x_64); -lean::inc(x_65); -x_69 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_63, x_65, x_64, x_64, x_0, x_1, x_2); -x_70 = lean::cnstr_get(x_69, 0); +x_67 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_62, x_64, x_63, x_63, x_0, x_1, x_2); +x_68 = lean::cnstr_get(x_67, 0); +lean::inc(x_68); +x_70 = lean::cnstr_get(x_67, 1); lean::inc(x_70); -x_72 = lean::cnstr_get(x_69, 1); -lean::inc(x_72); -if (lean::is_shared(x_69)) { - lean::dec(x_69); - x_74 = lean::box(0); +if (lean::is_shared(x_67)) { + lean::dec(x_67); + x_72 = lean::box(0); } else { - lean::cnstr_release(x_69, 0); - lean::cnstr_release(x_69, 1); - x_74 = x_69; + lean::cnstr_release(x_67, 0); + lean::cnstr_release(x_67, 1); + x_72 = x_67; } -x_75 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_75); -x_77 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_75, x_70); -if (lean::obj_tag(x_77) == 0) +x_73 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_73); +x_75 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_73, x_68); +if (lean::obj_tag(x_75) == 0) { -obj* x_78; obj* x_80; obj* x_82; uint32 x_85; obj* x_87; obj* x_88; obj* x_90; obj* x_93; obj* x_94; -x_78 = lean::cnstr_get(x_77, 0); +obj* x_76; obj* x_78; obj* x_80; uint32 x_83; obj* x_85; obj* x_86; obj* x_88; obj* x_91; obj* x_92; +x_76 = lean::cnstr_get(x_75, 0); +lean::inc(x_76); +x_78 = lean::cnstr_get(x_75, 1); lean::inc(x_78); -x_80 = lean::cnstr_get(x_77, 1); +x_80 = lean::cnstr_get(x_75, 2); lean::inc(x_80); -x_82 = lean::cnstr_get(x_77, 2); -lean::inc(x_82); -lean::dec(x_77); -x_85 = lean::unbox_uint32(x_78); -lean::dec(x_78); -x_87 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__6(x_85, x_0, x_80, x_72); -x_88 = lean::cnstr_get(x_87, 0); +lean::dec(x_75); +x_83 = lean::unbox_uint32(x_76); +lean::dec(x_76); +x_85 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__6(x_83, x_0, x_78, x_70); +x_86 = lean::cnstr_get(x_85, 0); +lean::inc(x_86); +x_88 = lean::cnstr_get(x_85, 1); lean::inc(x_88); -x_90 = lean::cnstr_get(x_87, 1); -lean::inc(x_90); -lean::dec(x_87); -x_93 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_82, x_88); -if (lean::is_scalar(x_74)) { - x_94 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_85); +x_91 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_80, x_86); +if (lean::is_scalar(x_72)) { + x_92 = lean::alloc_cnstr(0, 2, 0); } else { - x_94 = x_74; + x_92 = x_72; } -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_90); -return x_94; +lean::cnstr_set(x_92, 0, x_91); +lean::cnstr_set(x_92, 1, x_88); +return x_92; } else { -obj* x_96; uint8 x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; +obj* x_94; uint8 x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; lean::dec(x_0); -x_96 = lean::cnstr_get(x_77, 0); -lean::inc(x_96); -x_98 = lean::cnstr_get_scalar(x_77, sizeof(void*)*1); -if (lean::is_shared(x_77)) { - lean::dec(x_77); - x_99 = lean::box(0); +x_94 = lean::cnstr_get(x_75, 0); +lean::inc(x_94); +x_96 = lean::cnstr_get_scalar(x_75, sizeof(void*)*1); +if (lean::is_shared(x_75)) { + lean::dec(x_75); + x_97 = lean::box(0); } else { - lean::cnstr_release(x_77, 0); - x_99 = x_77; + lean::cnstr_release(x_75, 0); + x_97 = x_75; } -if (lean::is_scalar(x_99)) { - x_100 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_97)) { + x_98 = lean::alloc_cnstr(1, 1, 1); } else { - x_100 = x_99; + x_98 = x_97; } -lean::cnstr_set(x_100, 0, x_96); -lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_98); -x_101 = x_100; -if (lean::is_scalar(x_74)) { - x_102 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_98, 0, x_94); +lean::cnstr_set_scalar(x_98, sizeof(void*)*1, x_96); +x_99 = x_98; +if (lean::is_scalar(x_72)) { + x_100 = lean::alloc_cnstr(0, 2, 0); } else { - x_102 = x_74; + x_100 = x_72; } -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_72); -return x_102; +lean::cnstr_set(x_100, 0, x_99); +lean::cnstr_set(x_100, 1, x_70); +return x_100; } } } @@ -5011,212 +4996,210 @@ uint8 x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { -obj* x_4; obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; +obj* x_4; obj* x_5; obj* x_6; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; x_4 = lean::box(0); x_5 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_6 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); -x_11 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -if (lean::is_shared(x_11)) { - lean::dec(x_11); - x_16 = lean::box(0); +x_10 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); +x_11 = lean::cnstr_get(x_10, 0); +lean::inc(x_11); +x_13 = lean::cnstr_get(x_10, 1); +lean::inc(x_13); +if (lean::is_shared(x_10)) { + lean::dec(x_10); + x_15 = lean::box(0); } else { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - x_16 = x_11; + lean::cnstr_release(x_10, 0); + lean::cnstr_release(x_10, 1); + x_15 = x_10; } -x_17 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_17); -x_19 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_12); -if (lean::obj_tag(x_19) == 0) +x_16 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_16); +x_18 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_11); +if (lean::obj_tag(x_18) == 0) { -obj* x_20; obj* x_22; obj* x_24; uint32 x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -x_22 = lean::cnstr_get(x_19, 1); -lean::inc(x_22); -x_24 = lean::cnstr_get(x_19, 2); -lean::inc(x_24); +obj* x_19; obj* x_21; obj* x_23; uint32 x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_34; obj* x_35; +x_19 = lean::cnstr_get(x_18, 0); +lean::inc(x_19); +x_21 = lean::cnstr_get(x_18, 1); +lean::inc(x_21); +x_23 = lean::cnstr_get(x_18, 2); +lean::inc(x_23); +lean::dec(x_18); +x_26 = lean::unbox_uint32(x_19); lean::dec(x_19); -x_27 = lean::unbox_uint32(x_20); -lean::dec(x_20); -x_29 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__9(x_27, x_0, x_22, x_14); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_32 = lean::cnstr_get(x_29, 1); -lean::inc(x_32); -lean::dec(x_29); -x_35 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_24, x_30); -if (lean::is_scalar(x_16)) { - x_36 = lean::alloc_cnstr(0, 2, 0); +x_28 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__9(x_26, x_0, x_21, x_13); +x_29 = lean::cnstr_get(x_28, 0); +lean::inc(x_29); +x_31 = lean::cnstr_get(x_28, 1); +lean::inc(x_31); +lean::dec(x_28); +x_34 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_29); +if (lean::is_scalar(x_15)) { + x_35 = lean::alloc_cnstr(0, 2, 0); } else { - x_36 = x_16; + x_35 = x_15; } -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_32); -return x_36; +lean::cnstr_set(x_35, 0, x_34); +lean::cnstr_set(x_35, 1, x_31); +return x_35; } else { -obj* x_38; uint8 x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; +obj* x_37; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; lean::dec(x_0); -x_38 = lean::cnstr_get(x_19, 0); -lean::inc(x_38); -x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); -if (lean::is_shared(x_19)) { - lean::dec(x_19); - x_41 = lean::box(0); +x_37 = lean::cnstr_get(x_18, 0); +lean::inc(x_37); +x_39 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); +if (lean::is_shared(x_18)) { + lean::dec(x_18); + x_40 = lean::box(0); } else { - lean::cnstr_release(x_19, 0); - x_41 = x_19; + lean::cnstr_release(x_18, 0); + x_40 = x_18; } -if (lean::is_scalar(x_41)) { - x_42 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_40)) { + x_41 = lean::alloc_cnstr(1, 1, 1); } else { - x_42 = x_41; + x_41 = x_40; } -lean::cnstr_set(x_42, 0, x_38); -lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); -x_43 = x_42; -if (lean::is_scalar(x_16)) { - x_44 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_41, 0, x_37); +lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); +x_42 = x_41; +if (lean::is_scalar(x_15)) { + x_43 = lean::alloc_cnstr(0, 2, 0); } else { - x_44 = x_16; + x_43 = x_15; } -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_14); -return x_44; +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_13); +return x_43; } } else { -uint32 x_45; uint8 x_46; -x_45 = lean::string_iterator_curr(x_1); -x_46 = l_lean_is__id__end__escape(x_45); -if (x_46 == 0) +uint32 x_44; uint8 x_45; +x_44 = lean::string_iterator_curr(x_1); +x_45 = l_lean_is__id__end__escape(x_44); +if (x_45 == 0) { -obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; +obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_56; lean::inc(x_1); -x_48 = lean::string_iterator_next(x_1); -x_49 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__11(x_1, x_0, x_48, x_2); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_52 = lean::cnstr_get(x_49, 1); -lean::inc(x_52); -if (lean::is_shared(x_49)) { - lean::dec(x_49); - x_54 = lean::box(0); +x_47 = lean::string_iterator_next(x_1); +x_48 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__11(x_1, x_0, x_47, x_2); +x_49 = lean::cnstr_get(x_48, 0); +lean::inc(x_49); +x_51 = lean::cnstr_get(x_48, 1); +lean::inc(x_51); +if (lean::is_shared(x_48)) { + lean::dec(x_48); + x_53 = lean::box(0); } else { - lean::cnstr_release(x_49, 0); - lean::cnstr_release(x_49, 1); - x_54 = x_49; + lean::cnstr_release(x_48, 0); + lean::cnstr_release(x_48, 1); + x_53 = x_48; } -x_55 = lean::box(0); -x_56 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_50); -if (lean::is_scalar(x_54)) { - x_57 = lean::alloc_cnstr(0, 2, 0); +x_54 = lean::box(0); +x_55 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_54, x_49); +if (lean::is_scalar(x_53)) { + x_56 = lean::alloc_cnstr(0, 2, 0); } else { - x_57 = x_54; + x_56 = x_53; } -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_52); -return x_57; +lean::cnstr_set(x_56, 0, x_55); +lean::cnstr_set(x_56, 1, x_51); +return x_56; } else { -obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; -x_58 = l_char_quote__core(x_45); -x_59 = l_char_has__repr___closed__1; -lean::inc(x_59); -x_61 = lean::string_append(x_59, x_58); -lean::dec(x_58); -x_63 = lean::string_append(x_61, x_59); -x_64 = lean::box(0); -x_65 = l_mjoin___rarg___closed__1; +obj* x_57; obj* x_58; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_67; obj* x_68; obj* x_70; obj* x_72; obj* x_73; obj* x_75; +x_57 = l_char_quote__core(x_44); +x_58 = l_char_has__repr___closed__1; +lean::inc(x_58); +x_60 = lean::string_append(x_58, x_57); +lean::dec(x_57); +x_62 = lean::string_append(x_60, x_58); +x_63 = lean::box(0); +x_64 = l_mjoin___rarg___closed__1; lean::inc(x_0); lean::inc(x_64); -lean::inc(x_65); -x_69 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_63, x_65, x_64, x_64, x_0, x_1, x_2); -x_70 = lean::cnstr_get(x_69, 0); +x_67 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_62, x_64, x_63, x_63, x_0, x_1, x_2); +x_68 = lean::cnstr_get(x_67, 0); +lean::inc(x_68); +x_70 = lean::cnstr_get(x_67, 1); lean::inc(x_70); -x_72 = lean::cnstr_get(x_69, 1); -lean::inc(x_72); -if (lean::is_shared(x_69)) { - lean::dec(x_69); - x_74 = lean::box(0); +if (lean::is_shared(x_67)) { + lean::dec(x_67); + x_72 = lean::box(0); } else { - lean::cnstr_release(x_69, 0); - lean::cnstr_release(x_69, 1); - x_74 = x_69; + lean::cnstr_release(x_67, 0); + lean::cnstr_release(x_67, 1); + x_72 = x_67; } -x_75 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_75); -x_77 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_75, x_70); -if (lean::obj_tag(x_77) == 0) +x_73 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_73); +x_75 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_73, x_68); +if (lean::obj_tag(x_75) == 0) { -obj* x_78; obj* x_80; obj* x_82; uint32 x_85; obj* x_87; obj* x_88; obj* x_90; obj* x_93; obj* x_94; -x_78 = lean::cnstr_get(x_77, 0); +obj* x_76; obj* x_78; obj* x_80; uint32 x_83; obj* x_85; obj* x_86; obj* x_88; obj* x_91; obj* x_92; +x_76 = lean::cnstr_get(x_75, 0); +lean::inc(x_76); +x_78 = lean::cnstr_get(x_75, 1); lean::inc(x_78); -x_80 = lean::cnstr_get(x_77, 1); +x_80 = lean::cnstr_get(x_75, 2); lean::inc(x_80); -x_82 = lean::cnstr_get(x_77, 2); -lean::inc(x_82); -lean::dec(x_77); -x_85 = lean::unbox_uint32(x_78); -lean::dec(x_78); -x_87 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__13(x_85, x_0, x_80, x_72); -x_88 = lean::cnstr_get(x_87, 0); +lean::dec(x_75); +x_83 = lean::unbox_uint32(x_76); +lean::dec(x_76); +x_85 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__13(x_83, x_0, x_78, x_70); +x_86 = lean::cnstr_get(x_85, 0); +lean::inc(x_86); +x_88 = lean::cnstr_get(x_85, 1); lean::inc(x_88); -x_90 = lean::cnstr_get(x_87, 1); -lean::inc(x_90); -lean::dec(x_87); -x_93 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_82, x_88); -if (lean::is_scalar(x_74)) { - x_94 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_85); +x_91 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_80, x_86); +if (lean::is_scalar(x_72)) { + x_92 = lean::alloc_cnstr(0, 2, 0); } else { - x_94 = x_74; + x_92 = x_72; } -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_90); -return x_94; +lean::cnstr_set(x_92, 0, x_91); +lean::cnstr_set(x_92, 1, x_88); +return x_92; } else { -obj* x_96; uint8 x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; +obj* x_94; uint8 x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; lean::dec(x_0); -x_96 = lean::cnstr_get(x_77, 0); -lean::inc(x_96); -x_98 = lean::cnstr_get_scalar(x_77, sizeof(void*)*1); -if (lean::is_shared(x_77)) { - lean::dec(x_77); - x_99 = lean::box(0); +x_94 = lean::cnstr_get(x_75, 0); +lean::inc(x_94); +x_96 = lean::cnstr_get_scalar(x_75, sizeof(void*)*1); +if (lean::is_shared(x_75)) { + lean::dec(x_75); + x_97 = lean::box(0); } else { - lean::cnstr_release(x_77, 0); - x_99 = x_77; + lean::cnstr_release(x_75, 0); + x_97 = x_75; } -if (lean::is_scalar(x_99)) { - x_100 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_97)) { + x_98 = lean::alloc_cnstr(1, 1, 1); } else { - x_100 = x_99; + x_98 = x_97; } -lean::cnstr_set(x_100, 0, x_96); -lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_98); -x_101 = x_100; -if (lean::is_scalar(x_74)) { - x_102 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_98, 0, x_94); +lean::cnstr_set_scalar(x_98, sizeof(void*)*1, x_96); +x_99 = x_98; +if (lean::is_scalar(x_72)) { + x_100 = lean::alloc_cnstr(0, 2, 0); } else { - x_102 = x_74; + x_100 = x_72; } -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_72); -return x_102; +lean::cnstr_set(x_100, 0, x_99); +lean::cnstr_set(x_100, 1, x_70); +return x_100; } } } @@ -6077,209 +6060,207 @@ _start: { if (lean::obj_tag(x_0) == 0) { -obj* x_6; obj* x_7; obj* x_8; obj* x_12; +obj* x_6; obj* x_7; obj* x_8; obj* x_11; lean::dec(x_1); x_6 = lean::box(0); x_7 = l_lean_parser_combinators_choice__aux___main___rarg___closed__1; x_8 = l_mjoin___rarg___closed__1; -lean::inc(x_6); lean::inc(x_8); lean::inc(x_7); -x_12 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_7, x_8, x_6, x_6, x_2, x_3, x_4); -return x_12; +x_11 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_7, x_8, x_6, x_6, x_2, x_3, x_4); +return x_11; } else { -obj* x_13; obj* x_15; obj* x_17; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_27; -x_13 = lean::cnstr_get(x_0, 0); -lean::inc(x_13); -x_15 = lean::cnstr_get(x_0, 1); -lean::inc(x_15); +obj* x_12; obj* x_14; obj* x_16; obj* x_19; obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; +x_12 = lean::cnstr_get(x_0, 0); +lean::inc(x_12); +x_14 = lean::cnstr_get(x_0, 1); +lean::inc(x_14); if (lean::is_shared(x_0)) { lean::dec(x_0); - x_17 = lean::box(0); + x_16 = lean::box(0); } else { lean::cnstr_release(x_0, 0); lean::cnstr_release(x_0, 1); - x_17 = x_0; + x_16 = x_0; } lean::inc(x_3); lean::inc(x_2); -x_20 = lean::apply_3(x_13, x_2, x_3, x_4); -x_21 = lean::cnstr_get(x_20, 0); -lean::inc(x_21); -x_23 = lean::cnstr_get(x_20, 1); -lean::inc(x_23); +x_19 = lean::apply_3(x_12, x_2, x_3, x_4); +x_20 = lean::cnstr_get(x_19, 0); +lean::inc(x_20); +x_22 = lean::cnstr_get(x_19, 1); +lean::inc(x_22); +if (lean::is_shared(x_19)) { + lean::dec(x_19); + x_24 = lean::box(0); +} else { + lean::cnstr_release(x_19, 0); + lean::cnstr_release(x_19, 1); + x_24 = x_19; +} +x_25 = lean::mk_nat_obj(1u); +x_26 = lean::nat_add(x_1, x_25); +lean::dec(x_25); +if (lean::obj_tag(x_20) == 0) +{ +obj* x_28; obj* x_30; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_41; obj* x_42; +x_28 = lean::cnstr_get(x_20, 0); +lean::inc(x_28); +x_30 = lean::cnstr_get(x_20, 1); +lean::inc(x_30); +x_32 = lean::cnstr_get(x_20, 2); +lean::inc(x_32); if (lean::is_shared(x_20)) { lean::dec(x_20); - x_25 = lean::box(0); + x_34 = lean::box(0); } else { lean::cnstr_release(x_20, 0); lean::cnstr_release(x_20, 1); - x_25 = x_20; + lean::cnstr_release(x_20, 2); + x_34 = x_20; } -x_26 = lean::mk_nat_obj(1u); -x_27 = lean::nat_add(x_1, x_26); +x_35 = lean::box(0); +x_36 = lean_name_mk_numeral(x_35, x_1); +if (lean::is_scalar(x_16)) { + x_37 = lean::alloc_cnstr(1, 2, 0); +} else { + x_37 = x_16; +} +lean::cnstr_set(x_37, 0, x_28); +lean::cnstr_set(x_37, 1, x_35); +x_38 = l_lean_parser_syntax_mk__node(x_36, x_37); +x_39 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_39); +if (lean::is_scalar(x_34)) { + x_41 = lean::alloc_cnstr(0, 3, 0); +} else { + x_41 = x_34; +} +lean::cnstr_set(x_41, 0, x_38); +lean::cnstr_set(x_41, 1, x_30); +lean::cnstr_set(x_41, 2, x_39); +x_42 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_32, x_41); +if (lean::obj_tag(x_42) == 0) +{ +obj* x_47; +lean::dec(x_3); +lean::dec(x_2); lean::dec(x_26); -if (lean::obj_tag(x_21) == 0) -{ -obj* x_29; obj* x_31; obj* x_33; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; -x_29 = lean::cnstr_get(x_21, 0); -lean::inc(x_29); -x_31 = lean::cnstr_get(x_21, 1); -lean::inc(x_31); -x_33 = lean::cnstr_get(x_21, 2); -lean::inc(x_33); -if (lean::is_shared(x_21)) { - lean::dec(x_21); - x_35 = lean::box(0); +lean::dec(x_14); +if (lean::is_scalar(x_24)) { + x_47 = lean::alloc_cnstr(0, 2, 0); } else { - lean::cnstr_release(x_21, 0); - lean::cnstr_release(x_21, 1); - lean::cnstr_release(x_21, 2); - x_35 = x_21; + x_47 = x_24; } -x_36 = lean::box(0); -lean::inc(x_36); -x_38 = lean_name_mk_numeral(x_36, x_1); -if (lean::is_scalar(x_17)) { - x_39 = lean::alloc_cnstr(1, 2, 0); -} else { - x_39 = x_17; -} -lean::cnstr_set(x_39, 0, x_29); -lean::cnstr_set(x_39, 1, x_36); -x_40 = l_lean_parser_syntax_mk__node(x_38, x_39); -x_41 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_41); -if (lean::is_scalar(x_35)) { - x_43 = lean::alloc_cnstr(0, 3, 0); -} else { - x_43 = x_35; -} -lean::cnstr_set(x_43, 0, x_40); -lean::cnstr_set(x_43, 1, x_31); -lean::cnstr_set(x_43, 2, x_41); -x_44 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_33, x_43); -if (lean::obj_tag(x_44) == 0) -{ -obj* x_49; -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_27); -lean::dec(x_15); -if (lean::is_scalar(x_25)) { - x_49 = lean::alloc_cnstr(0, 2, 0); -} else { - x_49 = x_25; -} -lean::cnstr_set(x_49, 0, x_44); -lean::cnstr_set(x_49, 1, x_23); -return x_49; +lean::cnstr_set(x_47, 0, x_42); +lean::cnstr_set(x_47, 1, x_22); +return x_47; } else { -obj* x_50; uint8 x_52; -x_50 = lean::cnstr_get(x_44, 0); -lean::inc(x_50); -x_52 = lean::cnstr_get_scalar(x_44, sizeof(void*)*1); -if (x_52 == 0) +obj* x_48; uint8 x_50; +x_48 = lean::cnstr_get(x_42, 0); +lean::inc(x_48); +x_50 = lean::cnstr_get_scalar(x_42, sizeof(void*)*1); +if (x_50 == 0) { -obj* x_54; obj* x_55; obj* x_57; obj* x_60; obj* x_61; -lean::dec(x_44); -x_54 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__29(x_15, x_27, x_2, x_3, x_23); -x_55 = lean::cnstr_get(x_54, 0); +obj* x_52; obj* x_53; obj* x_55; obj* x_58; obj* x_59; +lean::dec(x_42); +x_52 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__29(x_14, x_26, x_2, x_3, x_22); +x_53 = lean::cnstr_get(x_52, 0); +lean::inc(x_53); +x_55 = lean::cnstr_get(x_52, 1); lean::inc(x_55); -x_57 = lean::cnstr_get(x_54, 1); -lean::inc(x_57); -lean::dec(x_54); -x_60 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_50, x_55); -if (lean::is_scalar(x_25)) { - x_61 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_52); +x_58 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_48, x_53); +if (lean::is_scalar(x_24)) { + x_59 = lean::alloc_cnstr(0, 2, 0); } else { - x_61 = x_25; + x_59 = x_24; } -lean::cnstr_set(x_61, 0, x_60); -lean::cnstr_set(x_61, 1, x_57); -return x_61; +lean::cnstr_set(x_59, 0, x_58); +lean::cnstr_set(x_59, 1, x_55); +return x_59; } else { -obj* x_67; +obj* x_65; lean::dec(x_3); lean::dec(x_2); -lean::dec(x_50); -lean::dec(x_27); -lean::dec(x_15); -if (lean::is_scalar(x_25)) { - x_67 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_48); +lean::dec(x_26); +lean::dec(x_14); +if (lean::is_scalar(x_24)) { + x_65 = lean::alloc_cnstr(0, 2, 0); } else { - x_67 = x_25; + x_65 = x_24; } -lean::cnstr_set(x_67, 0, x_44); -lean::cnstr_set(x_67, 1, x_23); -return x_67; +lean::cnstr_set(x_65, 0, x_42); +lean::cnstr_set(x_65, 1, x_22); +return x_65; } } } else { -obj* x_70; uint8 x_72; obj* x_73; +obj* x_68; uint8 x_70; obj* x_71; lean::dec(x_1); -lean::dec(x_17); -x_70 = lean::cnstr_get(x_21, 0); -lean::inc(x_70); -x_72 = lean::cnstr_get_scalar(x_21, sizeof(void*)*1); -if (lean::is_shared(x_21)) { - lean::dec(x_21); - x_73 = lean::box(0); +lean::dec(x_16); +x_68 = lean::cnstr_get(x_20, 0); +lean::inc(x_68); +x_70 = lean::cnstr_get_scalar(x_20, sizeof(void*)*1); +if (lean::is_shared(x_20)) { + lean::dec(x_20); + x_71 = lean::box(0); } else { - lean::cnstr_release(x_21, 0); - x_73 = x_21; + lean::cnstr_release(x_20, 0); + x_71 = x_20; } -if (x_72 == 0) +if (x_70 == 0) { -obj* x_75; obj* x_76; obj* x_78; obj* x_81; obj* x_82; -lean::dec(x_73); -x_75 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__29(x_15, x_27, x_2, x_3, x_23); -x_76 = lean::cnstr_get(x_75, 0); +obj* x_73; obj* x_74; obj* x_76; obj* x_79; obj* x_80; +lean::dec(x_71); +x_73 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__29(x_14, x_26, x_2, x_3, x_22); +x_74 = lean::cnstr_get(x_73, 0); +lean::inc(x_74); +x_76 = lean::cnstr_get(x_73, 1); lean::inc(x_76); -x_78 = lean::cnstr_get(x_75, 1); -lean::inc(x_78); -lean::dec(x_75); -x_81 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_70, x_76); -if (lean::is_scalar(x_25)) { - x_82 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_73); +x_79 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_68, x_74); +if (lean::is_scalar(x_24)) { + x_80 = lean::alloc_cnstr(0, 2, 0); } else { - x_82 = x_25; + x_80 = x_24; } -lean::cnstr_set(x_82, 0, x_81); -lean::cnstr_set(x_82, 1, x_78); -return x_82; +lean::cnstr_set(x_80, 0, x_79); +lean::cnstr_set(x_80, 1, x_76); +return x_80; } else { -obj* x_87; obj* x_88; obj* x_89; +obj* x_85; obj* x_86; obj* x_87; lean::dec(x_3); lean::dec(x_2); -lean::dec(x_27); -lean::dec(x_15); -if (lean::is_scalar(x_73)) { - x_87 = lean::alloc_cnstr(1, 1, 1); +lean::dec(x_26); +lean::dec(x_14); +if (lean::is_scalar(x_71)) { + x_85 = lean::alloc_cnstr(1, 1, 1); } else { - x_87 = x_73; + x_85 = x_71; } -lean::cnstr_set(x_87, 0, x_70); -lean::cnstr_set_scalar(x_87, sizeof(void*)*1, x_72); -x_88 = x_87; -if (lean::is_scalar(x_25)) { - x_89 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_85, 0, x_68); +lean::cnstr_set_scalar(x_85, sizeof(void*)*1, x_70); +x_86 = x_85; +if (lean::is_scalar(x_24)) { + x_87 = lean::alloc_cnstr(0, 2, 0); } else { - x_89 = x_25; + x_87 = x_24; } -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_23); -return x_89; +lean::cnstr_set(x_87, 0, x_86); +lean::cnstr_set(x_87, 1, x_22); +return x_87; } } } @@ -6288,22 +6269,18 @@ return x_89; obj* _init_l_lean_parser_detail__ident__part_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_3; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; x_0 = lean::box(0); -lean::inc(x_0); -lean::inc(x_0); -x_3 = l_lean_parser_list_cons_tokens___rarg(x_0, x_0); -lean::inc(x_3); -lean::inc(x_0); -x_6 = l_lean_parser_list_cons_tokens___rarg(x_0, x_3); -lean::inc(x_0); -x_8 = l_lean_parser_list_cons_tokens___rarg(x_0, x_6); +x_1 = l_lean_parser_list_cons_tokens___rarg(x_0, x_0); +lean::inc(x_1); +x_3 = l_lean_parser_list_cons_tokens___rarg(x_0, x_1); +x_4 = l_lean_parser_list_cons_tokens___rarg(x_0, x_3); +x_5 = l_lean_parser_tokens___rarg(x_4); +x_6 = l_lean_parser_list_cons_tokens___rarg(x_5, x_1); +x_7 = l_lean_parser_tokens___rarg(x_6); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_7, x_0); x_9 = l_lean_parser_tokens___rarg(x_8); -x_10 = l_lean_parser_list_cons_tokens___rarg(x_9, x_3); -x_11 = l_lean_parser_tokens___rarg(x_10); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_11, x_0); -x_13 = l_lean_parser_tokens___rarg(x_12); -return x_13; +return x_9; } } obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__2___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -6564,212 +6541,210 @@ uint8 x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { -obj* x_4; obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; +obj* x_4; obj* x_5; obj* x_6; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; x_4 = lean::box(0); x_5 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_6 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); -x_11 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -if (lean::is_shared(x_11)) { - lean::dec(x_11); - x_16 = lean::box(0); +x_10 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); +x_11 = lean::cnstr_get(x_10, 0); +lean::inc(x_11); +x_13 = lean::cnstr_get(x_10, 1); +lean::inc(x_13); +if (lean::is_shared(x_10)) { + lean::dec(x_10); + x_15 = lean::box(0); } else { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - x_16 = x_11; + lean::cnstr_release(x_10, 0); + lean::cnstr_release(x_10, 1); + x_15 = x_10; } -x_17 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_17); -x_19 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_12); -if (lean::obj_tag(x_19) == 0) +x_16 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_16); +x_18 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_11); +if (lean::obj_tag(x_18) == 0) { -obj* x_20; obj* x_22; obj* x_24; uint32 x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -x_22 = lean::cnstr_get(x_19, 1); -lean::inc(x_22); -x_24 = lean::cnstr_get(x_19, 2); -lean::inc(x_24); +obj* x_19; obj* x_21; obj* x_23; uint32 x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_34; obj* x_35; +x_19 = lean::cnstr_get(x_18, 0); +lean::inc(x_19); +x_21 = lean::cnstr_get(x_18, 1); +lean::inc(x_21); +x_23 = lean::cnstr_get(x_18, 2); +lean::inc(x_23); +lean::dec(x_18); +x_26 = lean::unbox_uint32(x_19); lean::dec(x_19); -x_27 = lean::unbox_uint32(x_20); -lean::dec(x_20); -x_29 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__2(x_27, x_0, x_22, x_14); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_32 = lean::cnstr_get(x_29, 1); -lean::inc(x_32); -lean::dec(x_29); -x_35 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_24, x_30); -if (lean::is_scalar(x_16)) { - x_36 = lean::alloc_cnstr(0, 2, 0); +x_28 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__2(x_26, x_0, x_21, x_13); +x_29 = lean::cnstr_get(x_28, 0); +lean::inc(x_29); +x_31 = lean::cnstr_get(x_28, 1); +lean::inc(x_31); +lean::dec(x_28); +x_34 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_29); +if (lean::is_scalar(x_15)) { + x_35 = lean::alloc_cnstr(0, 2, 0); } else { - x_36 = x_16; + x_35 = x_15; } -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_32); -return x_36; +lean::cnstr_set(x_35, 0, x_34); +lean::cnstr_set(x_35, 1, x_31); +return x_35; } else { -obj* x_38; uint8 x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; +obj* x_37; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; lean::dec(x_0); -x_38 = lean::cnstr_get(x_19, 0); -lean::inc(x_38); -x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); -if (lean::is_shared(x_19)) { - lean::dec(x_19); - x_41 = lean::box(0); +x_37 = lean::cnstr_get(x_18, 0); +lean::inc(x_37); +x_39 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); +if (lean::is_shared(x_18)) { + lean::dec(x_18); + x_40 = lean::box(0); } else { - lean::cnstr_release(x_19, 0); - x_41 = x_19; + lean::cnstr_release(x_18, 0); + x_40 = x_18; } -if (lean::is_scalar(x_41)) { - x_42 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_40)) { + x_41 = lean::alloc_cnstr(1, 1, 1); } else { - x_42 = x_41; + x_41 = x_40; } -lean::cnstr_set(x_42, 0, x_38); -lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); -x_43 = x_42; -if (lean::is_scalar(x_16)) { - x_44 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_41, 0, x_37); +lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); +x_42 = x_41; +if (lean::is_scalar(x_15)) { + x_43 = lean::alloc_cnstr(0, 2, 0); } else { - x_44 = x_16; + x_43 = x_15; } -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_14); -return x_44; +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_13); +return x_43; } } else { -uint32 x_45; uint8 x_46; -x_45 = lean::string_iterator_curr(x_1); -x_46 = l_lean_is__id__end__escape(x_45); -if (x_46 == 0) +uint32 x_44; uint8 x_45; +x_44 = lean::string_iterator_curr(x_1); +x_45 = l_lean_is__id__end__escape(x_44); +if (x_45 == 0) { -obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; +obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_56; lean::inc(x_1); -x_48 = lean::string_iterator_next(x_1); -x_49 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__4(x_1, x_0, x_48, x_2); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_52 = lean::cnstr_get(x_49, 1); -lean::inc(x_52); -if (lean::is_shared(x_49)) { - lean::dec(x_49); - x_54 = lean::box(0); +x_47 = lean::string_iterator_next(x_1); +x_48 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__4(x_1, x_0, x_47, x_2); +x_49 = lean::cnstr_get(x_48, 0); +lean::inc(x_49); +x_51 = lean::cnstr_get(x_48, 1); +lean::inc(x_51); +if (lean::is_shared(x_48)) { + lean::dec(x_48); + x_53 = lean::box(0); } else { - lean::cnstr_release(x_49, 0); - lean::cnstr_release(x_49, 1); - x_54 = x_49; + lean::cnstr_release(x_48, 0); + lean::cnstr_release(x_48, 1); + x_53 = x_48; } -x_55 = lean::box(0); -x_56 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_50); -if (lean::is_scalar(x_54)) { - x_57 = lean::alloc_cnstr(0, 2, 0); +x_54 = lean::box(0); +x_55 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_54, x_49); +if (lean::is_scalar(x_53)) { + x_56 = lean::alloc_cnstr(0, 2, 0); } else { - x_57 = x_54; + x_56 = x_53; } -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_52); -return x_57; +lean::cnstr_set(x_56, 0, x_55); +lean::cnstr_set(x_56, 1, x_51); +return x_56; } else { -obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; -x_58 = l_char_quote__core(x_45); -x_59 = l_char_has__repr___closed__1; -lean::inc(x_59); -x_61 = lean::string_append(x_59, x_58); -lean::dec(x_58); -x_63 = lean::string_append(x_61, x_59); -x_64 = lean::box(0); -x_65 = l_mjoin___rarg___closed__1; +obj* x_57; obj* x_58; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_67; obj* x_68; obj* x_70; obj* x_72; obj* x_73; obj* x_75; +x_57 = l_char_quote__core(x_44); +x_58 = l_char_has__repr___closed__1; +lean::inc(x_58); +x_60 = lean::string_append(x_58, x_57); +lean::dec(x_57); +x_62 = lean::string_append(x_60, x_58); +x_63 = lean::box(0); +x_64 = l_mjoin___rarg___closed__1; lean::inc(x_0); lean::inc(x_64); -lean::inc(x_65); -x_69 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_63, x_65, x_64, x_64, x_0, x_1, x_2); -x_70 = lean::cnstr_get(x_69, 0); +x_67 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_62, x_64, x_63, x_63, x_0, x_1, x_2); +x_68 = lean::cnstr_get(x_67, 0); +lean::inc(x_68); +x_70 = lean::cnstr_get(x_67, 1); lean::inc(x_70); -x_72 = lean::cnstr_get(x_69, 1); -lean::inc(x_72); -if (lean::is_shared(x_69)) { - lean::dec(x_69); - x_74 = lean::box(0); +if (lean::is_shared(x_67)) { + lean::dec(x_67); + x_72 = lean::box(0); } else { - lean::cnstr_release(x_69, 0); - lean::cnstr_release(x_69, 1); - x_74 = x_69; + lean::cnstr_release(x_67, 0); + lean::cnstr_release(x_67, 1); + x_72 = x_67; } -x_75 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_75); -x_77 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_75, x_70); -if (lean::obj_tag(x_77) == 0) +x_73 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_73); +x_75 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_73, x_68); +if (lean::obj_tag(x_75) == 0) { -obj* x_78; obj* x_80; obj* x_82; uint32 x_85; obj* x_87; obj* x_88; obj* x_90; obj* x_93; obj* x_94; -x_78 = lean::cnstr_get(x_77, 0); +obj* x_76; obj* x_78; obj* x_80; uint32 x_83; obj* x_85; obj* x_86; obj* x_88; obj* x_91; obj* x_92; +x_76 = lean::cnstr_get(x_75, 0); +lean::inc(x_76); +x_78 = lean::cnstr_get(x_75, 1); lean::inc(x_78); -x_80 = lean::cnstr_get(x_77, 1); +x_80 = lean::cnstr_get(x_75, 2); lean::inc(x_80); -x_82 = lean::cnstr_get(x_77, 2); -lean::inc(x_82); -lean::dec(x_77); -x_85 = lean::unbox_uint32(x_78); -lean::dec(x_78); -x_87 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__6(x_85, x_0, x_80, x_72); -x_88 = lean::cnstr_get(x_87, 0); +lean::dec(x_75); +x_83 = lean::unbox_uint32(x_76); +lean::dec(x_76); +x_85 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__6(x_83, x_0, x_78, x_70); +x_86 = lean::cnstr_get(x_85, 0); +lean::inc(x_86); +x_88 = lean::cnstr_get(x_85, 1); lean::inc(x_88); -x_90 = lean::cnstr_get(x_87, 1); -lean::inc(x_90); -lean::dec(x_87); -x_93 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_82, x_88); -if (lean::is_scalar(x_74)) { - x_94 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_85); +x_91 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_80, x_86); +if (lean::is_scalar(x_72)) { + x_92 = lean::alloc_cnstr(0, 2, 0); } else { - x_94 = x_74; + x_92 = x_72; } -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_90); -return x_94; +lean::cnstr_set(x_92, 0, x_91); +lean::cnstr_set(x_92, 1, x_88); +return x_92; } else { -obj* x_96; uint8 x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; +obj* x_94; uint8 x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; lean::dec(x_0); -x_96 = lean::cnstr_get(x_77, 0); -lean::inc(x_96); -x_98 = lean::cnstr_get_scalar(x_77, sizeof(void*)*1); -if (lean::is_shared(x_77)) { - lean::dec(x_77); - x_99 = lean::box(0); +x_94 = lean::cnstr_get(x_75, 0); +lean::inc(x_94); +x_96 = lean::cnstr_get_scalar(x_75, sizeof(void*)*1); +if (lean::is_shared(x_75)) { + lean::dec(x_75); + x_97 = lean::box(0); } else { - lean::cnstr_release(x_77, 0); - x_99 = x_77; + lean::cnstr_release(x_75, 0); + x_97 = x_75; } -if (lean::is_scalar(x_99)) { - x_100 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_97)) { + x_98 = lean::alloc_cnstr(1, 1, 1); } else { - x_100 = x_99; + x_98 = x_97; } -lean::cnstr_set(x_100, 0, x_96); -lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_98); -x_101 = x_100; -if (lean::is_scalar(x_74)) { - x_102 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_98, 0, x_94); +lean::cnstr_set_scalar(x_98, sizeof(void*)*1, x_96); +x_99 = x_98; +if (lean::is_scalar(x_72)) { + x_100 = lean::alloc_cnstr(0, 2, 0); } else { - x_102 = x_74; + x_100 = x_72; } -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_72); -return x_102; +lean::cnstr_set(x_100, 0, x_99); +lean::cnstr_set(x_100, 1, x_70); +return x_100; } } } @@ -7192,154 +7167,152 @@ obj* x_4; obj* x_5; uint8 x_7; x_7 = lean::string_iterator_has_next(x_2); if (x_7 == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; obj* x_15; obj* x_17; obj* x_20; obj* x_22; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; obj* x_14; obj* x_16; obj* x_19; obj* x_21; x_8 = lean::box(0); x_9 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_9, x_10, x_8, x_8, x_1, x_2, x_3); -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_17 = lean::cnstr_get(x_14, 1); -lean::inc(x_17); -lean::dec(x_14); -x_20 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_20); -x_22 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_20, x_15); -if (lean::obj_tag(x_22) == 0) +x_13 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_9, x_10, x_8, x_8, x_1, x_2, x_3); +x_14 = lean::cnstr_get(x_13, 0); +lean::inc(x_14); +x_16 = lean::cnstr_get(x_13, 1); +lean::inc(x_16); +lean::dec(x_13); +x_19 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_19); +x_21 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_14); +if (lean::obj_tag(x_21) == 0) { -obj* x_23; obj* x_25; obj* x_28; obj* x_29; obj* x_31; obj* x_34; -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -x_25 = lean::cnstr_get(x_22, 2); -lean::inc(x_25); -lean::dec(x_22); -x_28 = l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8___rarg(x_23, x_17); -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -x_31 = lean::cnstr_get(x_28, 1); -lean::inc(x_31); -lean::dec(x_28); -x_34 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_25, x_29); -x_4 = x_34; -x_5 = x_31; +obj* x_22; obj* x_24; obj* x_27; obj* x_28; obj* x_30; obj* x_33; +x_22 = lean::cnstr_get(x_21, 1); +lean::inc(x_22); +x_24 = lean::cnstr_get(x_21, 2); +lean::inc(x_24); +lean::dec(x_21); +x_27 = l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8___rarg(x_22, x_16); +x_28 = lean::cnstr_get(x_27, 0); +lean::inc(x_28); +x_30 = lean::cnstr_get(x_27, 1); +lean::inc(x_30); +lean::dec(x_27); +x_33 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_24, x_28); +x_4 = x_33; +x_5 = x_30; goto lbl_6; } else { -obj* x_35; uint8 x_37; obj* x_38; obj* x_39; obj* x_40; -x_35 = lean::cnstr_get(x_22, 0); -lean::inc(x_35); -x_37 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); -if (lean::is_shared(x_22)) { - lean::dec(x_22); - x_38 = lean::box(0); +obj* x_34; uint8 x_36; obj* x_37; obj* x_38; obj* x_39; +x_34 = lean::cnstr_get(x_21, 0); +lean::inc(x_34); +x_36 = lean::cnstr_get_scalar(x_21, sizeof(void*)*1); +if (lean::is_shared(x_21)) { + lean::dec(x_21); + x_37 = lean::box(0); } else { - lean::cnstr_release(x_22, 0); - x_38 = x_22; + lean::cnstr_release(x_21, 0); + x_37 = x_21; } -if (lean::is_scalar(x_38)) { - x_39 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_37)) { + x_38 = lean::alloc_cnstr(1, 1, 1); } else { - x_39 = x_38; + x_38 = x_37; } -lean::cnstr_set(x_39, 0, x_35); -lean::cnstr_set_scalar(x_39, sizeof(void*)*1, x_37); -x_40 = x_39; -x_4 = x_40; -x_5 = x_17; +lean::cnstr_set(x_38, 0, x_34); +lean::cnstr_set_scalar(x_38, sizeof(void*)*1, x_36); +x_39 = x_38; +x_4 = x_39; +x_5 = x_16; goto lbl_6; } } else { -uint32 x_41; uint8 x_42; -x_41 = lean::string_iterator_curr(x_2); -x_42 = l_lean_is__id__first(x_41); -if (x_42 == 0) +uint32 x_40; uint8 x_41; +x_40 = lean::string_iterator_curr(x_2); +x_41 = l_lean_is__id__first(x_40); +if (x_41 == 0) { -obj* x_43; obj* x_44; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_53; obj* x_54; obj* x_56; obj* x_59; obj* x_61; -x_43 = l_char_quote__core(x_41); -x_44 = l_char_has__repr___closed__1; -lean::inc(x_44); -x_46 = lean::string_append(x_44, x_43); -lean::dec(x_43); -x_48 = lean::string_append(x_46, x_44); -x_49 = lean::box(0); -x_50 = l_mjoin___rarg___closed__1; +obj* x_42; obj* x_43; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_54; obj* x_57; obj* x_59; +x_42 = l_char_quote__core(x_40); +x_43 = l_char_has__repr___closed__1; +lean::inc(x_43); +x_45 = lean::string_append(x_43, x_42); +lean::dec(x_42); +x_47 = lean::string_append(x_45, x_43); +x_48 = lean::box(0); +x_49 = l_mjoin___rarg___closed__1; lean::inc(x_49); -lean::inc(x_50); -x_53 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_48, x_50, x_49, x_49, x_1, x_2, x_3); -x_54 = lean::cnstr_get(x_53, 0); +x_51 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_47, x_49, x_48, x_48, x_1, x_2, x_3); +x_52 = lean::cnstr_get(x_51, 0); +lean::inc(x_52); +x_54 = lean::cnstr_get(x_51, 1); lean::inc(x_54); -x_56 = lean::cnstr_get(x_53, 1); -lean::inc(x_56); -lean::dec(x_53); -x_59 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_59); -x_61 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_59, x_54); -if (lean::obj_tag(x_61) == 0) +lean::dec(x_51); +x_57 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_57); +x_59 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_57, x_52); +if (lean::obj_tag(x_59) == 0) { -obj* x_62; obj* x_64; obj* x_67; obj* x_68; obj* x_70; obj* x_73; -x_62 = lean::cnstr_get(x_61, 1); +obj* x_60; obj* x_62; obj* x_65; obj* x_66; obj* x_68; obj* x_71; +x_60 = lean::cnstr_get(x_59, 1); +lean::inc(x_60); +x_62 = lean::cnstr_get(x_59, 2); lean::inc(x_62); -x_64 = lean::cnstr_get(x_61, 2); -lean::inc(x_64); -lean::dec(x_61); -x_67 = l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__10___rarg(x_62, x_56); -x_68 = lean::cnstr_get(x_67, 0); +lean::dec(x_59); +x_65 = l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__10___rarg(x_60, x_54); +x_66 = lean::cnstr_get(x_65, 0); +lean::inc(x_66); +x_68 = lean::cnstr_get(x_65, 1); lean::inc(x_68); -x_70 = lean::cnstr_get(x_67, 1); -lean::inc(x_70); -lean::dec(x_67); -x_73 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_64, x_68); -x_4 = x_73; -x_5 = x_70; +lean::dec(x_65); +x_71 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_62, x_66); +x_4 = x_71; +x_5 = x_68; goto lbl_6; } else { -obj* x_74; uint8 x_76; obj* x_77; obj* x_78; obj* x_79; -x_74 = lean::cnstr_get(x_61, 0); -lean::inc(x_74); -x_76 = lean::cnstr_get_scalar(x_61, sizeof(void*)*1); -if (lean::is_shared(x_61)) { - lean::dec(x_61); - x_77 = lean::box(0); +obj* x_72; uint8 x_74; obj* x_75; obj* x_76; obj* x_77; +x_72 = lean::cnstr_get(x_59, 0); +lean::inc(x_72); +x_74 = lean::cnstr_get_scalar(x_59, sizeof(void*)*1); +if (lean::is_shared(x_59)) { + lean::dec(x_59); + x_75 = lean::box(0); } else { - lean::cnstr_release(x_61, 0); - x_77 = x_61; + lean::cnstr_release(x_59, 0); + x_75 = x_59; } -if (lean::is_scalar(x_77)) { - x_78 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_75)) { + x_76 = lean::alloc_cnstr(1, 1, 1); } else { - x_78 = x_77; + x_76 = x_75; } -lean::cnstr_set(x_78, 0, x_74); -lean::cnstr_set_scalar(x_78, sizeof(void*)*1, x_76); -x_79 = x_78; -x_4 = x_79; -x_5 = x_56; +lean::cnstr_set(x_76, 0, x_72); +lean::cnstr_set_scalar(x_76, sizeof(void*)*1, x_74); +x_77 = x_76; +x_4 = x_77; +x_5 = x_54; goto lbl_6; } } else { -obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_88; obj* x_89; +obj* x_79; obj* x_80; obj* x_81; obj* x_83; obj* x_86; obj* x_87; lean::dec(x_1); -x_81 = lean::string_iterator_next(x_2); -x_82 = l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__12___rarg(x_81, x_3); -x_83 = lean::cnstr_get(x_82, 0); +x_79 = lean::string_iterator_next(x_2); +x_80 = l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__12___rarg(x_79, x_3); +x_81 = lean::cnstr_get(x_80, 0); +lean::inc(x_81); +x_83 = lean::cnstr_get(x_80, 1); lean::inc(x_83); -x_85 = lean::cnstr_get(x_82, 1); -lean::inc(x_85); -lean::dec(x_82); -x_88 = lean::box(0); -x_89 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_88, x_83); -x_4 = x_89; -x_5 = x_85; +lean::dec(x_80); +x_86 = lean::box(0); +x_87 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_86, x_81); +x_4 = x_87; +x_5 = x_83; goto lbl_6; } } @@ -7347,64 +7320,64 @@ lbl_6: { if (lean::obj_tag(x_4) == 0) { -obj* x_90; obj* x_92; obj* x_94; obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_101; -x_90 = lean::cnstr_get(x_4, 1); +obj* x_88; obj* x_90; obj* x_92; obj* x_94; obj* x_95; obj* x_97; obj* x_98; obj* x_99; +x_88 = lean::cnstr_get(x_4, 1); +lean::inc(x_88); +x_90 = lean::cnstr_get(x_4, 2); lean::inc(x_90); -x_92 = lean::cnstr_get(x_4, 2); -lean::inc(x_92); if (lean::is_shared(x_4)) { lean::dec(x_4); - x_94 = lean::box(0); + x_92 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); lean::cnstr_release(x_4, 2); - x_94 = x_4; + x_92 = x_4; } -lean::inc(x_90); -x_96 = l_lean_parser_mk__raw__res(x_0, x_90); -x_97 = l_lean_parser_finish__comment__block___closed__2; -lean::inc(x_97); -if (lean::is_scalar(x_94)) { - x_99 = lean::alloc_cnstr(0, 3, 0); +lean::inc(x_88); +x_94 = l_lean_parser_mk__raw__res(x_0, x_88); +x_95 = l_lean_parser_finish__comment__block___closed__2; +lean::inc(x_95); +if (lean::is_scalar(x_92)) { + x_97 = lean::alloc_cnstr(0, 3, 0); } else { - x_99 = x_94; + x_97 = x_92; } -lean::cnstr_set(x_99, 0, x_96); -lean::cnstr_set(x_99, 1, x_90); -lean::cnstr_set(x_99, 2, x_97); -x_100 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_92, x_99); -x_101 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_101, 0, x_100); -lean::cnstr_set(x_101, 1, x_5); -return x_101; +lean::cnstr_set(x_97, 0, x_94); +lean::cnstr_set(x_97, 1, x_88); +lean::cnstr_set(x_97, 2, x_95); +x_98 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_90, x_97); +x_99 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_99, 0, x_98); +lean::cnstr_set(x_99, 1, x_5); +return x_99; } else { -obj* x_103; uint8 x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; +obj* x_101; uint8 x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; lean::dec(x_0); -x_103 = lean::cnstr_get(x_4, 0); -lean::inc(x_103); -x_105 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); +x_101 = lean::cnstr_get(x_4, 0); +lean::inc(x_101); +x_103 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); if (lean::is_shared(x_4)) { lean::dec(x_4); - x_106 = lean::box(0); + x_104 = lean::box(0); } else { lean::cnstr_release(x_4, 0); - x_106 = x_4; + x_104 = x_4; } -if (lean::is_scalar(x_106)) { - x_107 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_104)) { + x_105 = lean::alloc_cnstr(1, 1, 1); } else { - x_107 = x_106; + x_105 = x_104; } -lean::cnstr_set(x_107, 0, x_103); -lean::cnstr_set_scalar(x_107, sizeof(void*)*1, x_105); -x_108 = x_107; -x_109 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_109, 0, x_108); -lean::cnstr_set(x_109, 1, x_5); -return x_109; +lean::cnstr_set(x_105, 0, x_101); +lean::cnstr_set_scalar(x_105, sizeof(void*)*1, x_103); +x_106 = x_105; +x_107 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_107, 0, x_106); +lean::cnstr_set(x_107, 1, x_5); +return x_107; } } } @@ -7412,7 +7385,7 @@ return x_109; obj* _init_l_lean_parser_detail__ident__part_parser_lean_parser_has__view() { _start: { -obj* x_0; uint32 x_1; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; uint32 x_15; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_51; +obj* x_0; uint32 x_1; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; uint32 x_15; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_49; x_0 = lean::mk_string(""); x_1 = l_lean_id__begin__escape; lean::inc(x_0); @@ -7450,53 +7423,51 @@ x_22 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_pa lean::closure_set(x_22, 0, x_8); lean::closure_set(x_22, 1, x_20); x_23 = lean::box(0); -lean::inc(x_23); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_22); +lean::cnstr_set(x_24, 1, x_23); x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_22); -lean::cnstr_set(x_25, 1, x_23); +lean::cnstr_set(x_25, 0, x_14); +lean::cnstr_set(x_25, 1, x_24); x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_14); +lean::cnstr_set(x_26, 0, x_11); lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_11); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_lean_parser_detail__ident__part__escaped; -lean::inc(x_28); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15), 5, 2); -lean::closure_set(x_30, 0, x_28); -lean::closure_set(x_30, 1, x_27); -x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__3), 4, 0); -x_32 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg), 5, 2); -lean::closure_set(x_32, 0, x_8); -lean::closure_set(x_32, 1, x_31); -lean::inc(x_23); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_32); -lean::cnstr_set(x_34, 1, x_23); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_30); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::mk_nat_obj(0u); -x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__29), 5, 2); -lean::closure_set(x_37, 0, x_35); -lean::closure_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_23); -x_39 = l_lean_parser_basic__parser__m_monad; -x_40 = l_lean_parser_basic__parser__m_monad__except; -x_41 = l_lean_parser_basic__parser__m_lean_parser_monad__parsec; -x_42 = l_lean_parser_basic__parser__m_alternative; -x_43 = l_lean_parser_detail__ident__part; -x_44 = l_lean_parser_detail__ident__part_has__view; -lean::inc(x_44); -lean::inc(x_43); +x_27 = l_lean_parser_detail__ident__part__escaped; +lean::inc(x_27); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15), 5, 2); +lean::closure_set(x_29, 0, x_27); +lean::closure_set(x_29, 1, x_26); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__3), 4, 0); +x_31 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg), 5, 2); +lean::closure_set(x_31, 0, x_8); +lean::closure_set(x_31, 1, x_30); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_31); +lean::cnstr_set(x_32, 1, x_23); +x_33 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_33, 0, x_29); +lean::cnstr_set(x_33, 1, x_32); +x_34 = lean::mk_nat_obj(0u); +x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__29), 5, 2); +lean::closure_set(x_35, 0, x_33); +lean::closure_set(x_35, 1, x_34); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_35); +lean::cnstr_set(x_36, 1, x_23); +x_37 = l_lean_parser_basic__parser__m_monad; +x_38 = l_lean_parser_basic__parser__m_monad__except; +x_39 = l_lean_parser_basic__parser__m_lean_parser_monad__parsec; +x_40 = l_lean_parser_basic__parser__m_alternative; +x_41 = l_lean_parser_detail__ident__part; +x_42 = l_lean_parser_detail__ident__part_has__view; lean::inc(x_42); lean::inc(x_41); lean::inc(x_40); lean::inc(x_39); -x_51 = l_lean_parser_combinators_node_view___rarg(x_39, x_40, x_41, x_42, x_43, x_38, x_44); -return x_51; +lean::inc(x_38); +lean::inc(x_37); +x_49 = l_lean_parser_combinators_node_view___rarg(x_37, x_38, x_39, x_40, x_41, x_36, x_42); +return x_49; } } obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__2___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -7739,212 +7710,210 @@ uint8 x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { -obj* x_4; obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; +obj* x_4; obj* x_5; obj* x_6; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; x_4 = lean::box(0); x_5 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_6 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); -x_11 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -if (lean::is_shared(x_11)) { - lean::dec(x_11); - x_16 = lean::box(0); +x_10 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); +x_11 = lean::cnstr_get(x_10, 0); +lean::inc(x_11); +x_13 = lean::cnstr_get(x_10, 1); +lean::inc(x_13); +if (lean::is_shared(x_10)) { + lean::dec(x_10); + x_15 = lean::box(0); } else { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - x_16 = x_11; + lean::cnstr_release(x_10, 0); + lean::cnstr_release(x_10, 1); + x_15 = x_10; } -x_17 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_17); -x_19 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_12); -if (lean::obj_tag(x_19) == 0) +x_16 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_16); +x_18 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_11); +if (lean::obj_tag(x_18) == 0) { -obj* x_20; obj* x_22; obj* x_24; uint32 x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -x_22 = lean::cnstr_get(x_19, 1); -lean::inc(x_22); -x_24 = lean::cnstr_get(x_19, 2); -lean::inc(x_24); +obj* x_19; obj* x_21; obj* x_23; uint32 x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_34; obj* x_35; +x_19 = lean::cnstr_get(x_18, 0); +lean::inc(x_19); +x_21 = lean::cnstr_get(x_18, 1); +lean::inc(x_21); +x_23 = lean::cnstr_get(x_18, 2); +lean::inc(x_23); +lean::dec(x_18); +x_26 = lean::unbox_uint32(x_19); lean::dec(x_19); -x_27 = lean::unbox_uint32(x_20); -lean::dec(x_20); -x_29 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser___spec__2(x_27, x_0, x_22, x_14); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_32 = lean::cnstr_get(x_29, 1); -lean::inc(x_32); -lean::dec(x_29); -x_35 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_24, x_30); -if (lean::is_scalar(x_16)) { - x_36 = lean::alloc_cnstr(0, 2, 0); +x_28 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser___spec__2(x_26, x_0, x_21, x_13); +x_29 = lean::cnstr_get(x_28, 0); +lean::inc(x_29); +x_31 = lean::cnstr_get(x_28, 1); +lean::inc(x_31); +lean::dec(x_28); +x_34 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_29); +if (lean::is_scalar(x_15)) { + x_35 = lean::alloc_cnstr(0, 2, 0); } else { - x_36 = x_16; + x_35 = x_15; } -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_32); -return x_36; +lean::cnstr_set(x_35, 0, x_34); +lean::cnstr_set(x_35, 1, x_31); +return x_35; } else { -obj* x_38; uint8 x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; +obj* x_37; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; lean::dec(x_0); -x_38 = lean::cnstr_get(x_19, 0); -lean::inc(x_38); -x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); -if (lean::is_shared(x_19)) { - lean::dec(x_19); - x_41 = lean::box(0); +x_37 = lean::cnstr_get(x_18, 0); +lean::inc(x_37); +x_39 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); +if (lean::is_shared(x_18)) { + lean::dec(x_18); + x_40 = lean::box(0); } else { - lean::cnstr_release(x_19, 0); - x_41 = x_19; + lean::cnstr_release(x_18, 0); + x_40 = x_18; } -if (lean::is_scalar(x_41)) { - x_42 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_40)) { + x_41 = lean::alloc_cnstr(1, 1, 1); } else { - x_42 = x_41; + x_41 = x_40; } -lean::cnstr_set(x_42, 0, x_38); -lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); -x_43 = x_42; -if (lean::is_scalar(x_16)) { - x_44 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_41, 0, x_37); +lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); +x_42 = x_41; +if (lean::is_scalar(x_15)) { + x_43 = lean::alloc_cnstr(0, 2, 0); } else { - x_44 = x_16; + x_43 = x_15; } -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_14); -return x_44; +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_13); +return x_43; } } else { -uint32 x_45; uint8 x_46; -x_45 = lean::string_iterator_curr(x_1); -x_46 = l_lean_is__id__end__escape(x_45); -if (x_46 == 0) +uint32 x_44; uint8 x_45; +x_44 = lean::string_iterator_curr(x_1); +x_45 = l_lean_is__id__end__escape(x_44); +if (x_45 == 0) { -obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; +obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_56; lean::inc(x_1); -x_48 = lean::string_iterator_next(x_1); -x_49 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser___spec__4(x_1, x_0, x_48, x_2); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_52 = lean::cnstr_get(x_49, 1); -lean::inc(x_52); -if (lean::is_shared(x_49)) { - lean::dec(x_49); - x_54 = lean::box(0); +x_47 = lean::string_iterator_next(x_1); +x_48 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser___spec__4(x_1, x_0, x_47, x_2); +x_49 = lean::cnstr_get(x_48, 0); +lean::inc(x_49); +x_51 = lean::cnstr_get(x_48, 1); +lean::inc(x_51); +if (lean::is_shared(x_48)) { + lean::dec(x_48); + x_53 = lean::box(0); } else { - lean::cnstr_release(x_49, 0); - lean::cnstr_release(x_49, 1); - x_54 = x_49; + lean::cnstr_release(x_48, 0); + lean::cnstr_release(x_48, 1); + x_53 = x_48; } -x_55 = lean::box(0); -x_56 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_50); -if (lean::is_scalar(x_54)) { - x_57 = lean::alloc_cnstr(0, 2, 0); +x_54 = lean::box(0); +x_55 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_54, x_49); +if (lean::is_scalar(x_53)) { + x_56 = lean::alloc_cnstr(0, 2, 0); } else { - x_57 = x_54; + x_56 = x_53; } -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_52); -return x_57; +lean::cnstr_set(x_56, 0, x_55); +lean::cnstr_set(x_56, 1, x_51); +return x_56; } else { -obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; -x_58 = l_char_quote__core(x_45); -x_59 = l_char_has__repr___closed__1; -lean::inc(x_59); -x_61 = lean::string_append(x_59, x_58); -lean::dec(x_58); -x_63 = lean::string_append(x_61, x_59); -x_64 = lean::box(0); -x_65 = l_mjoin___rarg___closed__1; +obj* x_57; obj* x_58; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_67; obj* x_68; obj* x_70; obj* x_72; obj* x_73; obj* x_75; +x_57 = l_char_quote__core(x_44); +x_58 = l_char_has__repr___closed__1; +lean::inc(x_58); +x_60 = lean::string_append(x_58, x_57); +lean::dec(x_57); +x_62 = lean::string_append(x_60, x_58); +x_63 = lean::box(0); +x_64 = l_mjoin___rarg___closed__1; lean::inc(x_0); lean::inc(x_64); -lean::inc(x_65); -x_69 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_63, x_65, x_64, x_64, x_0, x_1, x_2); -x_70 = lean::cnstr_get(x_69, 0); +x_67 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_62, x_64, x_63, x_63, x_0, x_1, x_2); +x_68 = lean::cnstr_get(x_67, 0); +lean::inc(x_68); +x_70 = lean::cnstr_get(x_67, 1); lean::inc(x_70); -x_72 = lean::cnstr_get(x_69, 1); -lean::inc(x_72); -if (lean::is_shared(x_69)) { - lean::dec(x_69); - x_74 = lean::box(0); +if (lean::is_shared(x_67)) { + lean::dec(x_67); + x_72 = lean::box(0); } else { - lean::cnstr_release(x_69, 0); - lean::cnstr_release(x_69, 1); - x_74 = x_69; + lean::cnstr_release(x_67, 0); + lean::cnstr_release(x_67, 1); + x_72 = x_67; } -x_75 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_75); -x_77 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_75, x_70); -if (lean::obj_tag(x_77) == 0) +x_73 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_73); +x_75 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_73, x_68); +if (lean::obj_tag(x_75) == 0) { -obj* x_78; obj* x_80; obj* x_82; uint32 x_85; obj* x_87; obj* x_88; obj* x_90; obj* x_93; obj* x_94; -x_78 = lean::cnstr_get(x_77, 0); +obj* x_76; obj* x_78; obj* x_80; uint32 x_83; obj* x_85; obj* x_86; obj* x_88; obj* x_91; obj* x_92; +x_76 = lean::cnstr_get(x_75, 0); +lean::inc(x_76); +x_78 = lean::cnstr_get(x_75, 1); lean::inc(x_78); -x_80 = lean::cnstr_get(x_77, 1); +x_80 = lean::cnstr_get(x_75, 2); lean::inc(x_80); -x_82 = lean::cnstr_get(x_77, 2); -lean::inc(x_82); -lean::dec(x_77); -x_85 = lean::unbox_uint32(x_78); -lean::dec(x_78); -x_87 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser___spec__6(x_85, x_0, x_80, x_72); -x_88 = lean::cnstr_get(x_87, 0); +lean::dec(x_75); +x_83 = lean::unbox_uint32(x_76); +lean::dec(x_76); +x_85 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser___spec__6(x_83, x_0, x_78, x_70); +x_86 = lean::cnstr_get(x_85, 0); +lean::inc(x_86); +x_88 = lean::cnstr_get(x_85, 1); lean::inc(x_88); -x_90 = lean::cnstr_get(x_87, 1); -lean::inc(x_90); -lean::dec(x_87); -x_93 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_82, x_88); -if (lean::is_scalar(x_74)) { - x_94 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_85); +x_91 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_80, x_86); +if (lean::is_scalar(x_72)) { + x_92 = lean::alloc_cnstr(0, 2, 0); } else { - x_94 = x_74; + x_92 = x_72; } -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_90); -return x_94; +lean::cnstr_set(x_92, 0, x_91); +lean::cnstr_set(x_92, 1, x_88); +return x_92; } else { -obj* x_96; uint8 x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; +obj* x_94; uint8 x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; lean::dec(x_0); -x_96 = lean::cnstr_get(x_77, 0); -lean::inc(x_96); -x_98 = lean::cnstr_get_scalar(x_77, sizeof(void*)*1); -if (lean::is_shared(x_77)) { - lean::dec(x_77); - x_99 = lean::box(0); +x_94 = lean::cnstr_get(x_75, 0); +lean::inc(x_94); +x_96 = lean::cnstr_get_scalar(x_75, sizeof(void*)*1); +if (lean::is_shared(x_75)) { + lean::dec(x_75); + x_97 = lean::box(0); } else { - lean::cnstr_release(x_77, 0); - x_99 = x_77; + lean::cnstr_release(x_75, 0); + x_97 = x_75; } -if (lean::is_scalar(x_99)) { - x_100 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_97)) { + x_98 = lean::alloc_cnstr(1, 1, 1); } else { - x_100 = x_99; + x_98 = x_97; } -lean::cnstr_set(x_100, 0, x_96); -lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_98); -x_101 = x_100; -if (lean::is_scalar(x_74)) { - x_102 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_98, 0, x_94); +lean::cnstr_set_scalar(x_98, sizeof(void*)*1, x_96); +x_99 = x_98; +if (lean::is_scalar(x_72)) { + x_100 = lean::alloc_cnstr(0, 2, 0); } else { - x_102 = x_74; + x_100 = x_72; } -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_72); -return x_102; +lean::cnstr_set(x_100, 0, x_99); +lean::cnstr_set(x_100, 1, x_70); +return x_100; } } } @@ -8279,154 +8248,152 @@ obj* x_4; obj* x_5; uint8 x_7; x_7 = lean::string_iterator_has_next(x_2); if (x_7 == 0) { -obj* x_8; obj* x_9; obj* x_10; obj* x_14; obj* x_15; obj* x_17; obj* x_20; obj* x_22; +obj* x_8; obj* x_9; obj* x_10; obj* x_13; obj* x_14; obj* x_16; obj* x_19; obj* x_21; x_8 = lean::box(0); x_9 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_10 = l_mjoin___rarg___closed__1; -lean::inc(x_8); lean::inc(x_10); lean::inc(x_9); -x_14 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_9, x_10, x_8, x_8, x_1, x_2, x_3); -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_17 = lean::cnstr_get(x_14, 1); -lean::inc(x_17); -lean::dec(x_14); -x_20 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_20); -x_22 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_20, x_15); -if (lean::obj_tag(x_22) == 0) +x_13 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_9, x_10, x_8, x_8, x_1, x_2, x_3); +x_14 = lean::cnstr_get(x_13, 0); +lean::inc(x_14); +x_16 = lean::cnstr_get(x_13, 1); +lean::inc(x_16); +lean::dec(x_13); +x_19 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_19); +x_21 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_14); +if (lean::obj_tag(x_21) == 0) { -obj* x_23; obj* x_25; obj* x_28; obj* x_29; obj* x_31; obj* x_34; -x_23 = lean::cnstr_get(x_22, 1); -lean::inc(x_23); -x_25 = lean::cnstr_get(x_22, 2); -lean::inc(x_25); -lean::dec(x_22); -x_28 = l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser___spec__8___rarg(x_23, x_17); -x_29 = lean::cnstr_get(x_28, 0); -lean::inc(x_29); -x_31 = lean::cnstr_get(x_28, 1); -lean::inc(x_31); -lean::dec(x_28); -x_34 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_25, x_29); -x_4 = x_34; -x_5 = x_31; +obj* x_22; obj* x_24; obj* x_27; obj* x_28; obj* x_30; obj* x_33; +x_22 = lean::cnstr_get(x_21, 1); +lean::inc(x_22); +x_24 = lean::cnstr_get(x_21, 2); +lean::inc(x_24); +lean::dec(x_21); +x_27 = l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser___spec__8___rarg(x_22, x_16); +x_28 = lean::cnstr_get(x_27, 0); +lean::inc(x_28); +x_30 = lean::cnstr_get(x_27, 1); +lean::inc(x_30); +lean::dec(x_27); +x_33 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_24, x_28); +x_4 = x_33; +x_5 = x_30; goto lbl_6; } else { -obj* x_35; uint8 x_37; obj* x_38; obj* x_39; obj* x_40; -x_35 = lean::cnstr_get(x_22, 0); -lean::inc(x_35); -x_37 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); -if (lean::is_shared(x_22)) { - lean::dec(x_22); - x_38 = lean::box(0); +obj* x_34; uint8 x_36; obj* x_37; obj* x_38; obj* x_39; +x_34 = lean::cnstr_get(x_21, 0); +lean::inc(x_34); +x_36 = lean::cnstr_get_scalar(x_21, sizeof(void*)*1); +if (lean::is_shared(x_21)) { + lean::dec(x_21); + x_37 = lean::box(0); } else { - lean::cnstr_release(x_22, 0); - x_38 = x_22; + lean::cnstr_release(x_21, 0); + x_37 = x_21; } -if (lean::is_scalar(x_38)) { - x_39 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_37)) { + x_38 = lean::alloc_cnstr(1, 1, 1); } else { - x_39 = x_38; + x_38 = x_37; } -lean::cnstr_set(x_39, 0, x_35); -lean::cnstr_set_scalar(x_39, sizeof(void*)*1, x_37); -x_40 = x_39; -x_4 = x_40; -x_5 = x_17; +lean::cnstr_set(x_38, 0, x_34); +lean::cnstr_set_scalar(x_38, sizeof(void*)*1, x_36); +x_39 = x_38; +x_4 = x_39; +x_5 = x_16; goto lbl_6; } } else { -uint32 x_41; uint8 x_42; -x_41 = lean::string_iterator_curr(x_2); -x_42 = l_lean_is__id__first(x_41); -if (x_42 == 0) +uint32 x_40; uint8 x_41; +x_40 = lean::string_iterator_curr(x_2); +x_41 = l_lean_is__id__first(x_40); +if (x_41 == 0) { -obj* x_43; obj* x_44; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_53; obj* x_54; obj* x_56; obj* x_59; obj* x_61; -x_43 = l_char_quote__core(x_41); -x_44 = l_char_has__repr___closed__1; -lean::inc(x_44); -x_46 = lean::string_append(x_44, x_43); -lean::dec(x_43); -x_48 = lean::string_append(x_46, x_44); -x_49 = lean::box(0); -x_50 = l_mjoin___rarg___closed__1; +obj* x_42; obj* x_43; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_52; obj* x_54; obj* x_57; obj* x_59; +x_42 = l_char_quote__core(x_40); +x_43 = l_char_has__repr___closed__1; +lean::inc(x_43); +x_45 = lean::string_append(x_43, x_42); +lean::dec(x_42); +x_47 = lean::string_append(x_45, x_43); +x_48 = lean::box(0); +x_49 = l_mjoin___rarg___closed__1; lean::inc(x_49); -lean::inc(x_50); -x_53 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_48, x_50, x_49, x_49, x_1, x_2, x_3); -x_54 = lean::cnstr_get(x_53, 0); +x_51 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_47, x_49, x_48, x_48, x_1, x_2, x_3); +x_52 = lean::cnstr_get(x_51, 0); +lean::inc(x_52); +x_54 = lean::cnstr_get(x_51, 1); lean::inc(x_54); -x_56 = lean::cnstr_get(x_53, 1); -lean::inc(x_56); -lean::dec(x_53); -x_59 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_59); -x_61 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_59, x_54); -if (lean::obj_tag(x_61) == 0) +lean::dec(x_51); +x_57 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_57); +x_59 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_57, x_52); +if (lean::obj_tag(x_59) == 0) { -obj* x_62; obj* x_64; obj* x_67; obj* x_68; obj* x_70; obj* x_73; -x_62 = lean::cnstr_get(x_61, 1); +obj* x_60; obj* x_62; obj* x_65; obj* x_66; obj* x_68; obj* x_71; +x_60 = lean::cnstr_get(x_59, 1); +lean::inc(x_60); +x_62 = lean::cnstr_get(x_59, 2); lean::inc(x_62); -x_64 = lean::cnstr_get(x_61, 2); -lean::inc(x_64); -lean::dec(x_61); -x_67 = l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser___spec__10___rarg(x_62, x_56); -x_68 = lean::cnstr_get(x_67, 0); +lean::dec(x_59); +x_65 = l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser___spec__10___rarg(x_60, x_54); +x_66 = lean::cnstr_get(x_65, 0); +lean::inc(x_66); +x_68 = lean::cnstr_get(x_65, 1); lean::inc(x_68); -x_70 = lean::cnstr_get(x_67, 1); -lean::inc(x_70); -lean::dec(x_67); -x_73 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_64, x_68); -x_4 = x_73; -x_5 = x_70; +lean::dec(x_65); +x_71 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_62, x_66); +x_4 = x_71; +x_5 = x_68; goto lbl_6; } else { -obj* x_74; uint8 x_76; obj* x_77; obj* x_78; obj* x_79; -x_74 = lean::cnstr_get(x_61, 0); -lean::inc(x_74); -x_76 = lean::cnstr_get_scalar(x_61, sizeof(void*)*1); -if (lean::is_shared(x_61)) { - lean::dec(x_61); - x_77 = lean::box(0); +obj* x_72; uint8 x_74; obj* x_75; obj* x_76; obj* x_77; +x_72 = lean::cnstr_get(x_59, 0); +lean::inc(x_72); +x_74 = lean::cnstr_get_scalar(x_59, sizeof(void*)*1); +if (lean::is_shared(x_59)) { + lean::dec(x_59); + x_75 = lean::box(0); } else { - lean::cnstr_release(x_61, 0); - x_77 = x_61; + lean::cnstr_release(x_59, 0); + x_75 = x_59; } -if (lean::is_scalar(x_77)) { - x_78 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_75)) { + x_76 = lean::alloc_cnstr(1, 1, 1); } else { - x_78 = x_77; + x_76 = x_75; } -lean::cnstr_set(x_78, 0, x_74); -lean::cnstr_set_scalar(x_78, sizeof(void*)*1, x_76); -x_79 = x_78; -x_4 = x_79; -x_5 = x_56; +lean::cnstr_set(x_76, 0, x_72); +lean::cnstr_set_scalar(x_76, sizeof(void*)*1, x_74); +x_77 = x_76; +x_4 = x_77; +x_5 = x_54; goto lbl_6; } } else { -obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_88; obj* x_89; +obj* x_79; obj* x_80; obj* x_81; obj* x_83; obj* x_86; obj* x_87; lean::dec(x_1); -x_81 = lean::string_iterator_next(x_2); -x_82 = l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser___spec__12___rarg(x_81, x_3); -x_83 = lean::cnstr_get(x_82, 0); +x_79 = lean::string_iterator_next(x_2); +x_80 = l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser___spec__12___rarg(x_79, x_3); +x_81 = lean::cnstr_get(x_80, 0); +lean::inc(x_81); +x_83 = lean::cnstr_get(x_80, 1); lean::inc(x_83); -x_85 = lean::cnstr_get(x_82, 1); -lean::inc(x_85); -lean::dec(x_82); -x_88 = lean::box(0); -x_89 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_88, x_83); -x_4 = x_89; -x_5 = x_85; +lean::dec(x_80); +x_86 = lean::box(0); +x_87 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_86, x_81); +x_4 = x_87; +x_5 = x_83; goto lbl_6; } } @@ -8434,64 +8401,64 @@ lbl_6: { if (lean::obj_tag(x_4) == 0) { -obj* x_90; obj* x_92; obj* x_94; obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_101; -x_90 = lean::cnstr_get(x_4, 1); +obj* x_88; obj* x_90; obj* x_92; obj* x_94; obj* x_95; obj* x_97; obj* x_98; obj* x_99; +x_88 = lean::cnstr_get(x_4, 1); +lean::inc(x_88); +x_90 = lean::cnstr_get(x_4, 2); lean::inc(x_90); -x_92 = lean::cnstr_get(x_4, 2); -lean::inc(x_92); if (lean::is_shared(x_4)) { lean::dec(x_4); - x_94 = lean::box(0); + x_92 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); lean::cnstr_release(x_4, 2); - x_94 = x_4; + x_92 = x_4; } -lean::inc(x_90); -x_96 = l_lean_parser_mk__raw__res(x_0, x_90); -x_97 = l_lean_parser_finish__comment__block___closed__2; -lean::inc(x_97); -if (lean::is_scalar(x_94)) { - x_99 = lean::alloc_cnstr(0, 3, 0); +lean::inc(x_88); +x_94 = l_lean_parser_mk__raw__res(x_0, x_88); +x_95 = l_lean_parser_finish__comment__block___closed__2; +lean::inc(x_95); +if (lean::is_scalar(x_92)) { + x_97 = lean::alloc_cnstr(0, 3, 0); } else { - x_99 = x_94; + x_97 = x_92; } -lean::cnstr_set(x_99, 0, x_96); -lean::cnstr_set(x_99, 1, x_90); -lean::cnstr_set(x_99, 2, x_97); -x_100 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_92, x_99); -x_101 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_101, 0, x_100); -lean::cnstr_set(x_101, 1, x_5); -return x_101; +lean::cnstr_set(x_97, 0, x_94); +lean::cnstr_set(x_97, 1, x_88); +lean::cnstr_set(x_97, 2, x_95); +x_98 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_90, x_97); +x_99 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_99, 0, x_98); +lean::cnstr_set(x_99, 1, x_5); +return x_99; } else { -obj* x_103; uint8 x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; +obj* x_101; uint8 x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; lean::dec(x_0); -x_103 = lean::cnstr_get(x_4, 0); -lean::inc(x_103); -x_105 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); +x_101 = lean::cnstr_get(x_4, 0); +lean::inc(x_101); +x_103 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); if (lean::is_shared(x_4)) { lean::dec(x_4); - x_106 = lean::box(0); + x_104 = lean::box(0); } else { lean::cnstr_release(x_4, 0); - x_106 = x_4; + x_104 = x_4; } -if (lean::is_scalar(x_106)) { - x_107 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_104)) { + x_105 = lean::alloc_cnstr(1, 1, 1); } else { - x_107 = x_106; + x_105 = x_104; } -lean::cnstr_set(x_107, 0, x_103); -lean::cnstr_set_scalar(x_107, sizeof(void*)*1, x_105); -x_108 = x_107; -x_109 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_109, 0, x_108); -lean::cnstr_set(x_109, 1, x_5); -return x_109; +lean::cnstr_set(x_105, 0, x_101); +lean::cnstr_set_scalar(x_105, sizeof(void*)*1, x_103); +x_106 = x_105; +x_107 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_107, 0, x_106); +lean::cnstr_set(x_107, 1, x_5); +return x_107; } } } @@ -8499,7 +8466,7 @@ return x_109; obj* _init_l_lean_parser_detail__ident__part_parser___closed__1() { _start: { -obj* x_0; uint32 x_1; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; uint32 x_15; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; +obj* x_0; uint32 x_1; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; uint32 x_15; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; x_0 = lean::mk_string(""); x_1 = l_lean_id__begin__escape; lean::inc(x_0); @@ -8537,40 +8504,38 @@ x_22 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_pa lean::closure_set(x_22, 0, x_8); lean::closure_set(x_22, 1, x_20); x_23 = lean::box(0); -lean::inc(x_23); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_22); +lean::cnstr_set(x_24, 1, x_23); x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_22); -lean::cnstr_set(x_25, 1, x_23); +lean::cnstr_set(x_25, 0, x_14); +lean::cnstr_set(x_25, 1, x_24); x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_14); +lean::cnstr_set(x_26, 0, x_11); lean::cnstr_set(x_26, 1, x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_11); -lean::cnstr_set(x_27, 1, x_26); -x_28 = l_lean_parser_detail__ident__part__escaped; -lean::inc(x_28); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15), 5, 2); -lean::closure_set(x_30, 0, x_28); -lean::closure_set(x_30, 1, x_27); -x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__part_parser___lambda__2), 4, 0); -x_32 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg), 5, 2); -lean::closure_set(x_32, 0, x_8); -lean::closure_set(x_32, 1, x_31); -lean::inc(x_23); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_32); -lean::cnstr_set(x_34, 1, x_23); -x_35 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_35, 0, x_30); -lean::cnstr_set(x_35, 1, x_34); -x_36 = lean::mk_nat_obj(0u); -x_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__29), 5, 2); -lean::closure_set(x_37, 0, x_35); -lean::closure_set(x_37, 1, x_36); -x_38 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_38, 0, x_37); -lean::cnstr_set(x_38, 1, x_23); -return x_38; +x_27 = l_lean_parser_detail__ident__part__escaped; +lean::inc(x_27); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15), 5, 2); +lean::closure_set(x_29, 0, x_27); +lean::closure_set(x_29, 1, x_26); +x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__part_parser___lambda__2), 4, 0); +x_31 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg), 5, 2); +lean::closure_set(x_31, 0, x_8); +lean::closure_set(x_31, 1, x_30); +x_32 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_32, 0, x_31); +lean::cnstr_set(x_32, 1, x_23); +x_33 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_33, 0, x_29); +lean::cnstr_set(x_33, 1, x_32); +x_34 = lean::mk_nat_obj(0u); +x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__29), 5, 2); +lean::closure_set(x_35, 0, x_33); +lean::closure_set(x_35, 1, x_34); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_35); +lean::cnstr_set(x_36, 1, x_23); +return x_36; } } obj* l_lean_parser_detail__ident__part_parser(obj* x_0, obj* x_1, obj* x_2) { @@ -8860,97 +8825,95 @@ uint8 x_5; x_5 = lean::string_iterator_has_next(x_3); if (x_5 == 0) { -obj* x_6; obj* x_7; obj* x_8; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_20; obj* x_21; +obj* x_6; obj* x_7; obj* x_8; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; x_6 = lean::box(0); x_7 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_8 = l_mjoin___rarg___closed__1; -lean::inc(x_6); lean::inc(x_8); lean::inc(x_7); -x_12 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__2___rarg(x_7, x_8, x_6, x_6, x_1, x_2, x_3, x_4); -x_13 = lean::cnstr_get(x_12, 0); -lean::inc(x_13); -x_15 = lean::cnstr_get(x_12, 1); -lean::inc(x_15); -if (lean::is_shared(x_12)) { - lean::dec(x_12); - x_17 = lean::box(0); +x_11 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__2___rarg(x_7, x_8, x_6, x_6, x_1, x_2, x_3, x_4); +x_12 = lean::cnstr_get(x_11, 0); +lean::inc(x_12); +x_14 = lean::cnstr_get(x_11, 1); +lean::inc(x_14); +if (lean::is_shared(x_11)) { + lean::dec(x_11); + x_16 = lean::box(0); } else { - lean::cnstr_release(x_12, 0); - lean::cnstr_release(x_12, 1); - x_17 = x_12; + lean::cnstr_release(x_11, 0); + lean::cnstr_release(x_11, 1); + x_16 = x_11; } -x_18 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_18); -x_20 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_18, x_13); -if (lean::is_scalar(x_17)) { - x_21 = lean::alloc_cnstr(0, 2, 0); +x_17 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_17); +x_19 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_12); +if (lean::is_scalar(x_16)) { + x_20 = lean::alloc_cnstr(0, 2, 0); } else { - x_21 = x_17; + x_20 = x_16; } -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_15); -return x_21; +lean::cnstr_set(x_20, 0, x_19); +lean::cnstr_set(x_20, 1, x_14); +return x_20; } else { -uint32 x_22; uint8 x_23; -x_22 = lean::string_iterator_curr(x_3); -x_23 = x_22 == x_0; -if (x_23 == 0) +uint32 x_21; uint8 x_22; +x_21 = lean::string_iterator_curr(x_3); +x_22 = x_21 == x_0; +if (x_22 == 0) { -obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_34; obj* x_35; obj* x_37; obj* x_39; obj* x_40; obj* x_42; obj* x_43; -x_24 = l_char_quote__core(x_22); -x_25 = l_char_has__repr___closed__1; -lean::inc(x_25); -x_27 = lean::string_append(x_25, x_24); -lean::dec(x_24); -x_29 = lean::string_append(x_27, x_25); -x_30 = lean::box(0); -x_31 = l_mjoin___rarg___closed__1; +obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_41; +x_23 = l_char_quote__core(x_21); +x_24 = l_char_has__repr___closed__1; +lean::inc(x_24); +x_26 = lean::string_append(x_24, x_23); +lean::dec(x_23); +x_28 = lean::string_append(x_26, x_24); +x_29 = lean::box(0); +x_30 = l_mjoin___rarg___closed__1; lean::inc(x_30); -lean::inc(x_31); -x_34 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__2___rarg(x_29, x_31, x_30, x_30, x_1, x_2, x_3, x_4); -x_35 = lean::cnstr_get(x_34, 0); +x_32 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__2___rarg(x_28, x_30, x_29, x_29, x_1, x_2, x_3, x_4); +x_33 = lean::cnstr_get(x_32, 0); +lean::inc(x_33); +x_35 = lean::cnstr_get(x_32, 1); lean::inc(x_35); -x_37 = lean::cnstr_get(x_34, 1); -lean::inc(x_37); -if (lean::is_shared(x_34)) { - lean::dec(x_34); - x_39 = lean::box(0); +if (lean::is_shared(x_32)) { + lean::dec(x_32); + x_37 = lean::box(0); } else { - lean::cnstr_release(x_34, 0); - lean::cnstr_release(x_34, 1); - x_39 = x_34; + lean::cnstr_release(x_32, 0); + lean::cnstr_release(x_32, 1); + x_37 = x_32; } -x_40 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_40); -x_42 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_40, x_35); -if (lean::is_scalar(x_39)) { - x_43 = lean::alloc_cnstr(0, 2, 0); +x_38 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_38); +x_40 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_38, x_33); +if (lean::is_scalar(x_37)) { + x_41 = lean::alloc_cnstr(0, 2, 0); } else { - x_43 = x_39; + x_41 = x_37; } -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_37); -return x_43; +lean::cnstr_set(x_41, 0, x_40); +lean::cnstr_set(x_41, 1, x_35); +return x_41; } else { -obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; +obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; lean::dec(x_1); lean::dec(x_2); -x_46 = lean::string_iterator_next(x_3); -x_47 = lean::box(0); -x_48 = lean::box_uint32(x_22); -x_49 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_46); -lean::cnstr_set(x_49, 2, x_47); -x_50 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_50, 0, x_49); -lean::cnstr_set(x_50, 1, x_4); -return x_50; +x_44 = lean::string_iterator_next(x_3); +x_45 = lean::box(0); +x_46 = lean::box_uint32(x_21); +x_47 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_47, 0, x_46); +lean::cnstr_set(x_47, 1, x_44); +lean::cnstr_set(x_47, 2, x_45); +x_48 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_48, 0, x_47); +lean::cnstr_set(x_48, 1, x_4); +return x_48; } } } @@ -9052,82 +9015,80 @@ lean::dec(x_27); x_41 = lean::string_iterator_has_next(x_17); if (x_41 == 0) { -obj* x_43; obj* x_44; obj* x_45; obj* x_49; obj* x_50; obj* x_52; obj* x_55; obj* x_57; obj* x_58; obj* x_59; +obj* x_43; obj* x_44; obj* x_45; obj* x_48; obj* x_49; obj* x_51; obj* x_54; obj* x_56; obj* x_57; obj* x_58; lean::dec(x_21); x_43 = lean::box(0); x_44 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_45 = l_mjoin___rarg___closed__1; -lean::inc(x_43); lean::inc(x_45); lean::inc(x_44); -x_49 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg(x_44, x_45, x_43, x_43, x_0, x_1, x_17, x_29); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_52 = lean::cnstr_get(x_49, 1); -lean::inc(x_52); -lean::dec(x_49); -x_55 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_55); -x_57 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_50); -x_58 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_37, x_57); -x_59 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_58); -x_4 = x_59; -x_5 = x_52; +x_48 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg(x_44, x_45, x_43, x_43, x_0, x_1, x_17, x_29); +x_49 = lean::cnstr_get(x_48, 0); +lean::inc(x_49); +x_51 = lean::cnstr_get(x_48, 1); +lean::inc(x_51); +lean::dec(x_48); +x_54 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_54); +x_56 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_54, x_49); +x_57 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_37, x_56); +x_58 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_57); +x_4 = x_58; +x_5 = x_51; goto lbl_6; } else { -uint32 x_60; uint8 x_61; -x_60 = lean::string_iterator_curr(x_17); -x_61 = l_lean_is__id__first(x_60); -if (x_61 == 0) +uint32 x_59; uint8 x_60; +x_59 = lean::string_iterator_curr(x_17); +x_60 = l_lean_is__id__first(x_59); +if (x_60 == 0) { -obj* x_63; obj* x_64; obj* x_66; obj* x_68; obj* x_69; obj* x_70; obj* x_73; obj* x_74; obj* x_76; obj* x_79; obj* x_81; obj* x_82; obj* x_83; +obj* x_62; obj* x_63; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_74; obj* x_77; obj* x_79; obj* x_80; obj* x_81; lean::dec(x_21); -x_63 = l_char_quote__core(x_60); -x_64 = l_char_has__repr___closed__1; -lean::inc(x_64); -x_66 = lean::string_append(x_64, x_63); -lean::dec(x_63); -x_68 = lean::string_append(x_66, x_64); -x_69 = lean::box(0); -x_70 = l_mjoin___rarg___closed__1; +x_62 = l_char_quote__core(x_59); +x_63 = l_char_has__repr___closed__1; +lean::inc(x_63); +x_65 = lean::string_append(x_63, x_62); +lean::dec(x_62); +x_67 = lean::string_append(x_65, x_63); +x_68 = lean::box(0); +x_69 = l_mjoin___rarg___closed__1; lean::inc(x_69); -lean::inc(x_70); -x_73 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg(x_68, x_70, x_69, x_69, x_0, x_1, x_17, x_29); -x_74 = lean::cnstr_get(x_73, 0); +x_71 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg(x_67, x_69, x_68, x_68, x_0, x_1, x_17, x_29); +x_72 = lean::cnstr_get(x_71, 0); +lean::inc(x_72); +x_74 = lean::cnstr_get(x_71, 1); lean::inc(x_74); -x_76 = lean::cnstr_get(x_73, 1); -lean::inc(x_76); -lean::dec(x_73); -x_79 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_79); -x_81 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_79, x_74); -x_82 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_37, x_81); -x_83 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_82); -x_4 = x_83; -x_5 = x_76; +lean::dec(x_71); +x_77 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_77); +x_79 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_77, x_72); +x_80 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_37, x_79); +x_81 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_80); +x_4 = x_81; +x_5 = x_74; goto lbl_6; } else { -obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; +obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; lean::dec(x_1); lean::dec(x_0); lean::dec(x_37); -x_87 = lean::string_iterator_next(x_17); -x_88 = lean::box(0); -x_89 = lean::box_uint32(x_60); +x_85 = lean::string_iterator_next(x_17); +x_86 = lean::box(0); +x_87 = lean::box_uint32(x_59); if (lean::is_scalar(x_21)) { - x_90 = lean::alloc_cnstr(0, 3, 0); + x_88 = lean::alloc_cnstr(0, 3, 0); } else { - x_90 = x_21; + x_88 = x_21; } -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_87); -lean::cnstr_set(x_90, 2, x_88); -x_91 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_90); -x_4 = x_91; +lean::cnstr_set(x_88, 0, x_87); +lean::cnstr_set(x_88, 1, x_85); +lean::cnstr_set(x_88, 2, x_86); +x_89 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_88); +x_4 = x_89; x_5 = x_29; goto lbl_6; } @@ -9135,14 +9096,14 @@ goto lbl_6; } else { -obj* x_97; +obj* x_95; lean::dec(x_17); lean::dec(x_1); lean::dec(x_0); lean::dec(x_37); lean::dec(x_21); -x_97 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_27); -x_4 = x_97; +x_95 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_27); +x_4 = x_95; x_5 = x_29; goto lbl_6; } @@ -9150,28 +9111,28 @@ goto lbl_6; } else { -obj* x_100; uint8 x_102; obj* x_103; obj* x_104; obj* x_105; +obj* x_98; uint8 x_100; obj* x_101; obj* x_102; obj* x_103; lean::dec(x_1); lean::dec(x_0); -x_100 = lean::cnstr_get(x_12, 0); -lean::inc(x_100); -x_102 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); +x_98 = lean::cnstr_get(x_12, 0); +lean::inc(x_98); +x_100 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); if (lean::is_shared(x_12)) { lean::dec(x_12); - x_103 = lean::box(0); + x_101 = lean::box(0); } else { lean::cnstr_release(x_12, 0); - x_103 = x_12; + x_101 = x_12; } -if (lean::is_scalar(x_103)) { - x_104 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_101)) { + x_102 = lean::alloc_cnstr(1, 1, 1); } else { - x_104 = x_103; + x_102 = x_101; } -lean::cnstr_set(x_104, 0, x_100); -lean::cnstr_set_scalar(x_104, sizeof(void*)*1, x_102); -x_105 = x_104; -x_4 = x_105; +lean::cnstr_set(x_102, 0, x_98); +lean::cnstr_set_scalar(x_102, sizeof(void*)*1, x_100); +x_103 = x_102; +x_4 = x_103; x_5 = x_14; goto lbl_6; } @@ -9179,41 +9140,41 @@ lbl_6: { if (lean::obj_tag(x_4) == 0) { -obj* x_106; obj* x_108; obj* x_109; obj* x_111; obj* x_112; -x_106 = lean::cnstr_get(x_4, 0); -lean::inc(x_106); +obj* x_104; obj* x_106; obj* x_107; obj* x_109; obj* x_110; +x_104 = lean::cnstr_get(x_4, 0); +lean::inc(x_104); if (lean::is_shared(x_4)) { lean::dec(x_4); - x_108 = lean::box(0); + x_106 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); lean::cnstr_release(x_4, 2); - x_108 = x_4; + x_106 = x_4; } -x_109 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_109); -if (lean::is_scalar(x_108)) { - x_111 = lean::alloc_cnstr(0, 3, 0); +x_107 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_107); +if (lean::is_scalar(x_106)) { + x_109 = lean::alloc_cnstr(0, 3, 0); } else { - x_111 = x_108; + x_109 = x_106; } -lean::cnstr_set(x_111, 0, x_106); -lean::cnstr_set(x_111, 1, x_2); -lean::cnstr_set(x_111, 2, x_109); -x_112 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_112, 0, x_111); -lean::cnstr_set(x_112, 1, x_5); -return x_112; +lean::cnstr_set(x_109, 0, x_104); +lean::cnstr_set(x_109, 1, x_2); +lean::cnstr_set(x_109, 2, x_107); +x_110 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_110, 0, x_109); +lean::cnstr_set(x_110, 1, x_5); +return x_110; } else { -obj* x_114; +obj* x_112; lean::dec(x_2); -x_114 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_114, 0, x_4); -lean::cnstr_set(x_114, 1, x_5); -return x_114; +x_112 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_112, 0, x_4); +lean::cnstr_set(x_112, 1, x_5); +return x_112; } } } @@ -9822,15 +9783,13 @@ return x_35; obj* _init_l_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens() { _start: { -obj* x_0; obj* x_3; obj* x_4; obj* x_5; obj* x_6; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; x_0 = lean::box(0); -lean::inc(x_0); -lean::inc(x_0); -x_3 = l_lean_parser_list_cons_tokens___rarg(x_0, x_0); -x_4 = l_lean_parser_list_cons_tokens___rarg(x_0, x_3); -x_5 = l_lean_parser_tokens___rarg(x_4); -x_6 = l_lean_parser_tokens___rarg(x_5); -return x_6; +x_1 = l_lean_parser_list_cons_tokens___rarg(x_0, x_0); +x_2 = l_lean_parser_list_cons_tokens___rarg(x_0, x_1); +x_3 = l_lean_parser_tokens___rarg(x_2); +x_4 = l_lean_parser_tokens___rarg(x_3); +return x_4; } } obj* l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { @@ -9907,82 +9866,80 @@ lean::dec(x_27); x_41 = lean::string_iterator_has_next(x_17); if (x_41 == 0) { -obj* x_43; obj* x_44; obj* x_45; obj* x_49; obj* x_50; obj* x_52; obj* x_55; obj* x_57; obj* x_58; obj* x_59; +obj* x_43; obj* x_44; obj* x_45; obj* x_48; obj* x_49; obj* x_51; obj* x_54; obj* x_56; obj* x_57; obj* x_58; lean::dec(x_21); x_43 = lean::box(0); x_44 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_45 = l_mjoin___rarg___closed__1; -lean::inc(x_43); lean::inc(x_45); lean::inc(x_44); -x_49 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg(x_44, x_45, x_43, x_43, x_0, x_1, x_17, x_29); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_52 = lean::cnstr_get(x_49, 1); -lean::inc(x_52); -lean::dec(x_49); -x_55 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_55); -x_57 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_50); -x_58 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_37, x_57); -x_59 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_58); -x_4 = x_59; -x_5 = x_52; +x_48 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg(x_44, x_45, x_43, x_43, x_0, x_1, x_17, x_29); +x_49 = lean::cnstr_get(x_48, 0); +lean::inc(x_49); +x_51 = lean::cnstr_get(x_48, 1); +lean::inc(x_51); +lean::dec(x_48); +x_54 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_54); +x_56 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_54, x_49); +x_57 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_37, x_56); +x_58 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_57); +x_4 = x_58; +x_5 = x_51; goto lbl_6; } else { -uint32 x_60; uint8 x_61; -x_60 = lean::string_iterator_curr(x_17); -x_61 = l_lean_is__id__first(x_60); -if (x_61 == 0) +uint32 x_59; uint8 x_60; +x_59 = lean::string_iterator_curr(x_17); +x_60 = l_lean_is__id__first(x_59); +if (x_60 == 0) { -obj* x_63; obj* x_64; obj* x_66; obj* x_68; obj* x_69; obj* x_70; obj* x_73; obj* x_74; obj* x_76; obj* x_79; obj* x_81; obj* x_82; obj* x_83; +obj* x_62; obj* x_63; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_74; obj* x_77; obj* x_79; obj* x_80; obj* x_81; lean::dec(x_21); -x_63 = l_char_quote__core(x_60); -x_64 = l_char_has__repr___closed__1; -lean::inc(x_64); -x_66 = lean::string_append(x_64, x_63); -lean::dec(x_63); -x_68 = lean::string_append(x_66, x_64); -x_69 = lean::box(0); -x_70 = l_mjoin___rarg___closed__1; +x_62 = l_char_quote__core(x_59); +x_63 = l_char_has__repr___closed__1; +lean::inc(x_63); +x_65 = lean::string_append(x_63, x_62); +lean::dec(x_62); +x_67 = lean::string_append(x_65, x_63); +x_68 = lean::box(0); +x_69 = l_mjoin___rarg___closed__1; lean::inc(x_69); -lean::inc(x_70); -x_73 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg(x_68, x_70, x_69, x_69, x_0, x_1, x_17, x_29); -x_74 = lean::cnstr_get(x_73, 0); +x_71 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg(x_67, x_69, x_68, x_68, x_0, x_1, x_17, x_29); +x_72 = lean::cnstr_get(x_71, 0); +lean::inc(x_72); +x_74 = lean::cnstr_get(x_71, 1); lean::inc(x_74); -x_76 = lean::cnstr_get(x_73, 1); -lean::inc(x_76); -lean::dec(x_73); -x_79 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_79); -x_81 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_79, x_74); -x_82 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_37, x_81); -x_83 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_82); -x_4 = x_83; -x_5 = x_76; +lean::dec(x_71); +x_77 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_77); +x_79 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_77, x_72); +x_80 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_37, x_79); +x_81 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_80); +x_4 = x_81; +x_5 = x_74; goto lbl_6; } else { -obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; +obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; lean::dec(x_1); lean::dec(x_0); lean::dec(x_37); -x_87 = lean::string_iterator_next(x_17); -x_88 = lean::box(0); -x_89 = lean::box_uint32(x_60); +x_85 = lean::string_iterator_next(x_17); +x_86 = lean::box(0); +x_87 = lean::box_uint32(x_59); if (lean::is_scalar(x_21)) { - x_90 = lean::alloc_cnstr(0, 3, 0); + x_88 = lean::alloc_cnstr(0, 3, 0); } else { - x_90 = x_21; + x_88 = x_21; } -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_87); -lean::cnstr_set(x_90, 2, x_88); -x_91 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_90); -x_4 = x_91; +lean::cnstr_set(x_88, 0, x_87); +lean::cnstr_set(x_88, 1, x_85); +lean::cnstr_set(x_88, 2, x_86); +x_89 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_88); +x_4 = x_89; x_5 = x_29; goto lbl_6; } @@ -9990,14 +9947,14 @@ goto lbl_6; } else { -obj* x_97; +obj* x_95; lean::dec(x_17); lean::dec(x_1); lean::dec(x_0); lean::dec(x_37); lean::dec(x_21); -x_97 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_27); -x_4 = x_97; +x_95 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_27); +x_4 = x_95; x_5 = x_29; goto lbl_6; } @@ -10005,28 +9962,28 @@ goto lbl_6; } else { -obj* x_100; uint8 x_102; obj* x_103; obj* x_104; obj* x_105; +obj* x_98; uint8 x_100; obj* x_101; obj* x_102; obj* x_103; lean::dec(x_1); lean::dec(x_0); -x_100 = lean::cnstr_get(x_12, 0); -lean::inc(x_100); -x_102 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); +x_98 = lean::cnstr_get(x_12, 0); +lean::inc(x_98); +x_100 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); if (lean::is_shared(x_12)) { lean::dec(x_12); - x_103 = lean::box(0); + x_101 = lean::box(0); } else { lean::cnstr_release(x_12, 0); - x_103 = x_12; + x_101 = x_12; } -if (lean::is_scalar(x_103)) { - x_104 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_101)) { + x_102 = lean::alloc_cnstr(1, 1, 1); } else { - x_104 = x_103; + x_102 = x_101; } -lean::cnstr_set(x_104, 0, x_100); -lean::cnstr_set_scalar(x_104, sizeof(void*)*1, x_102); -x_105 = x_104; -x_4 = x_105; +lean::cnstr_set(x_102, 0, x_98); +lean::cnstr_set_scalar(x_102, sizeof(void*)*1, x_100); +x_103 = x_102; +x_4 = x_103; x_5 = x_14; goto lbl_6; } @@ -10034,41 +9991,41 @@ lbl_6: { if (lean::obj_tag(x_4) == 0) { -obj* x_106; obj* x_108; obj* x_109; obj* x_111; obj* x_112; -x_106 = lean::cnstr_get(x_4, 0); -lean::inc(x_106); +obj* x_104; obj* x_106; obj* x_107; obj* x_109; obj* x_110; +x_104 = lean::cnstr_get(x_4, 0); +lean::inc(x_104); if (lean::is_shared(x_4)) { lean::dec(x_4); - x_108 = lean::box(0); + x_106 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); lean::cnstr_release(x_4, 2); - x_108 = x_4; + x_106 = x_4; } -x_109 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_109); -if (lean::is_scalar(x_108)) { - x_111 = lean::alloc_cnstr(0, 3, 0); +x_107 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_107); +if (lean::is_scalar(x_106)) { + x_109 = lean::alloc_cnstr(0, 3, 0); } else { - x_111 = x_108; + x_109 = x_106; } -lean::cnstr_set(x_111, 0, x_106); -lean::cnstr_set(x_111, 1, x_2); -lean::cnstr_set(x_111, 2, x_109); -x_112 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_112, 0, x_111); -lean::cnstr_set(x_112, 1, x_5); -return x_112; +lean::cnstr_set(x_109, 0, x_104); +lean::cnstr_set(x_109, 1, x_2); +lean::cnstr_set(x_109, 2, x_107); +x_110 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_110, 0, x_109); +lean::cnstr_set(x_110, 1, x_5); +return x_110; } else { -obj* x_114; +obj* x_112; lean::dec(x_2); -x_114 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_114, 0, x_4); -lean::cnstr_set(x_114, 1, x_5); -return x_114; +x_112 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_112, 0, x_4); +lean::cnstr_set(x_112, 1, x_5); +return x_112; } } } @@ -10194,7 +10151,7 @@ return x_33; obj* _init_l_lean_parser_detail__ident__suffix_parser_lean_parser_has__view() { _start: { -obj* x_0; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_9; obj* x_10; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_30; obj* x_31; obj* x_35; obj* x_36; obj* x_37; +obj* x_0; obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_9; obj* x_10; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_29; obj* x_30; obj* x_34; obj* x_35; obj* x_36; x_0 = l_lean_parser_basic__parser__m_monad; lean::inc(x_0); x_2 = l_reader__t_monad___rarg(x_0); @@ -10224,29 +10181,28 @@ x_21 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_pa lean::closure_set(x_21, 0, x_19); lean::closure_set(x_21, 1, x_20); x_22 = lean::box(0); -lean::inc(x_22); -x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__8), 5, 1); -lean::closure_set(x_24, 0, x_22); +x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__8), 5, 1); +lean::closure_set(x_23, 0, x_22); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_22); x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_24); -lean::cnstr_set(x_25, 1, x_22); -x_26 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_26, 0, x_21); -lean::cnstr_set(x_26, 1, x_25); -x_27 = l_lean_parser_detail__ident__suffix; +lean::cnstr_set(x_25, 0, x_21); +lean::cnstr_set(x_25, 1, x_24); +x_26 = l_lean_parser_detail__ident__suffix; +lean::inc(x_25); +lean::inc(x_26); +x_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__9), 6, 2); +lean::closure_set(x_29, 0, x_26); +lean::closure_set(x_29, 1, x_25); +x_30 = l_lean_parser_detail__ident__suffix_has__view; +lean::inc(x_30); lean::inc(x_26); -lean::inc(x_27); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__9), 6, 2); -lean::closure_set(x_30, 0, x_27); -lean::closure_set(x_30, 1, x_26); -x_31 = l_lean_parser_detail__ident__suffix_has__view; -lean::inc(x_31); -lean::inc(x_27); lean::inc(x_13); -x_35 = l_lean_parser_combinators_node_view___rarg(x_2, x_5, x_9, x_13, x_27, x_26, x_31); -x_36 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___lambda__1), 4, 0); -x_37 = l_lean_parser_combinators_seq__right_view___rarg(x_13, lean::box(0), lean::box(0), x_36, x_30, x_35); -return x_37; +x_34 = l_lean_parser_combinators_node_view___rarg(x_2, x_5, x_9, x_13, x_26, x_25, x_30); +x_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___lambda__1), 4, 0); +x_36 = l_lean_parser_combinators_seq__right_view___rarg(x_13, lean::box(0), lean::box(0), x_35, x_29, x_34); +return x_36; } } obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -10314,82 +10270,80 @@ lean::dec(x_27); x_41 = lean::string_iterator_has_next(x_17); if (x_41 == 0) { -obj* x_43; obj* x_44; obj* x_45; obj* x_49; obj* x_50; obj* x_52; obj* x_55; obj* x_57; obj* x_58; obj* x_59; +obj* x_43; obj* x_44; obj* x_45; obj* x_48; obj* x_49; obj* x_51; obj* x_54; obj* x_56; obj* x_57; obj* x_58; lean::dec(x_21); x_43 = lean::box(0); x_44 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_45 = l_mjoin___rarg___closed__1; -lean::inc(x_43); lean::inc(x_45); lean::inc(x_44); -x_49 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg(x_44, x_45, x_43, x_43, x_0, x_1, x_17, x_29); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_52 = lean::cnstr_get(x_49, 1); -lean::inc(x_52); -lean::dec(x_49); -x_55 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_55); -x_57 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_50); -x_58 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_37, x_57); -x_59 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_58); -x_4 = x_59; -x_5 = x_52; +x_48 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg(x_44, x_45, x_43, x_43, x_0, x_1, x_17, x_29); +x_49 = lean::cnstr_get(x_48, 0); +lean::inc(x_49); +x_51 = lean::cnstr_get(x_48, 1); +lean::inc(x_51); +lean::dec(x_48); +x_54 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_54); +x_56 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_54, x_49); +x_57 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_37, x_56); +x_58 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_57); +x_4 = x_58; +x_5 = x_51; goto lbl_6; } else { -uint32 x_60; uint8 x_61; -x_60 = lean::string_iterator_curr(x_17); -x_61 = l_lean_is__id__first(x_60); -if (x_61 == 0) +uint32 x_59; uint8 x_60; +x_59 = lean::string_iterator_curr(x_17); +x_60 = l_lean_is__id__first(x_59); +if (x_60 == 0) { -obj* x_63; obj* x_64; obj* x_66; obj* x_68; obj* x_69; obj* x_70; obj* x_73; obj* x_74; obj* x_76; obj* x_79; obj* x_81; obj* x_82; obj* x_83; +obj* x_62; obj* x_63; obj* x_65; obj* x_67; obj* x_68; obj* x_69; obj* x_71; obj* x_72; obj* x_74; obj* x_77; obj* x_79; obj* x_80; obj* x_81; lean::dec(x_21); -x_63 = l_char_quote__core(x_60); -x_64 = l_char_has__repr___closed__1; -lean::inc(x_64); -x_66 = lean::string_append(x_64, x_63); -lean::dec(x_63); -x_68 = lean::string_append(x_66, x_64); -x_69 = lean::box(0); -x_70 = l_mjoin___rarg___closed__1; +x_62 = l_char_quote__core(x_59); +x_63 = l_char_has__repr___closed__1; +lean::inc(x_63); +x_65 = lean::string_append(x_63, x_62); +lean::dec(x_62); +x_67 = lean::string_append(x_65, x_63); +x_68 = lean::box(0); +x_69 = l_mjoin___rarg___closed__1; lean::inc(x_69); -lean::inc(x_70); -x_73 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg(x_68, x_70, x_69, x_69, x_0, x_1, x_17, x_29); -x_74 = lean::cnstr_get(x_73, 0); +x_71 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg(x_67, x_69, x_68, x_68, x_0, x_1, x_17, x_29); +x_72 = lean::cnstr_get(x_71, 0); +lean::inc(x_72); +x_74 = lean::cnstr_get(x_71, 1); lean::inc(x_74); -x_76 = lean::cnstr_get(x_73, 1); -lean::inc(x_76); -lean::dec(x_73); -x_79 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_79); -x_81 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_79, x_74); -x_82 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_37, x_81); -x_83 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_82); -x_4 = x_83; -x_5 = x_76; +lean::dec(x_71); +x_77 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_77); +x_79 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_77, x_72); +x_80 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_37, x_79); +x_81 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_80); +x_4 = x_81; +x_5 = x_74; goto lbl_6; } else { -obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; +obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; lean::dec(x_1); lean::dec(x_0); lean::dec(x_37); -x_87 = lean::string_iterator_next(x_17); -x_88 = lean::box(0); -x_89 = lean::box_uint32(x_60); +x_85 = lean::string_iterator_next(x_17); +x_86 = lean::box(0); +x_87 = lean::box_uint32(x_59); if (lean::is_scalar(x_21)) { - x_90 = lean::alloc_cnstr(0, 3, 0); + x_88 = lean::alloc_cnstr(0, 3, 0); } else { - x_90 = x_21; + x_88 = x_21; } -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_87); -lean::cnstr_set(x_90, 2, x_88); -x_91 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_90); -x_4 = x_91; +lean::cnstr_set(x_88, 0, x_87); +lean::cnstr_set(x_88, 1, x_85); +lean::cnstr_set(x_88, 2, x_86); +x_89 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_88); +x_4 = x_89; x_5 = x_29; goto lbl_6; } @@ -10397,14 +10351,14 @@ goto lbl_6; } else { -obj* x_97; +obj* x_95; lean::dec(x_17); lean::dec(x_1); lean::dec(x_0); lean::dec(x_37); lean::dec(x_21); -x_97 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_27); -x_4 = x_97; +x_95 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_27); +x_4 = x_95; x_5 = x_29; goto lbl_6; } @@ -10412,28 +10366,28 @@ goto lbl_6; } else { -obj* x_100; uint8 x_102; obj* x_103; obj* x_104; obj* x_105; +obj* x_98; uint8 x_100; obj* x_101; obj* x_102; obj* x_103; lean::dec(x_1); lean::dec(x_0); -x_100 = lean::cnstr_get(x_12, 0); -lean::inc(x_100); -x_102 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); +x_98 = lean::cnstr_get(x_12, 0); +lean::inc(x_98); +x_100 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); if (lean::is_shared(x_12)) { lean::dec(x_12); - x_103 = lean::box(0); + x_101 = lean::box(0); } else { lean::cnstr_release(x_12, 0); - x_103 = x_12; + x_101 = x_12; } -if (lean::is_scalar(x_103)) { - x_104 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_101)) { + x_102 = lean::alloc_cnstr(1, 1, 1); } else { - x_104 = x_103; + x_102 = x_101; } -lean::cnstr_set(x_104, 0, x_100); -lean::cnstr_set_scalar(x_104, sizeof(void*)*1, x_102); -x_105 = x_104; -x_4 = x_105; +lean::cnstr_set(x_102, 0, x_98); +lean::cnstr_set_scalar(x_102, sizeof(void*)*1, x_100); +x_103 = x_102; +x_4 = x_103; x_5 = x_14; goto lbl_6; } @@ -10441,41 +10395,41 @@ lbl_6: { if (lean::obj_tag(x_4) == 0) { -obj* x_106; obj* x_108; obj* x_109; obj* x_111; obj* x_112; -x_106 = lean::cnstr_get(x_4, 0); -lean::inc(x_106); +obj* x_104; obj* x_106; obj* x_107; obj* x_109; obj* x_110; +x_104 = lean::cnstr_get(x_4, 0); +lean::inc(x_104); if (lean::is_shared(x_4)) { lean::dec(x_4); - x_108 = lean::box(0); + x_106 = lean::box(0); } else { lean::cnstr_release(x_4, 0); lean::cnstr_release(x_4, 1); lean::cnstr_release(x_4, 2); - x_108 = x_4; + x_106 = x_4; } -x_109 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_109); -if (lean::is_scalar(x_108)) { - x_111 = lean::alloc_cnstr(0, 3, 0); +x_107 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_107); +if (lean::is_scalar(x_106)) { + x_109 = lean::alloc_cnstr(0, 3, 0); } else { - x_111 = x_108; + x_109 = x_106; } -lean::cnstr_set(x_111, 0, x_106); -lean::cnstr_set(x_111, 1, x_2); -lean::cnstr_set(x_111, 2, x_109); -x_112 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_112, 0, x_111); -lean::cnstr_set(x_112, 1, x_5); -return x_112; +lean::cnstr_set(x_109, 0, x_104); +lean::cnstr_set(x_109, 1, x_2); +lean::cnstr_set(x_109, 2, x_107); +x_110 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_110, 0, x_109); +lean::cnstr_set(x_110, 1, x_5); +return x_110; } else { -obj* x_114; +obj* x_112; lean::dec(x_2); -x_114 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_114, 0, x_4); -lean::cnstr_set(x_114, 1, x_5); -return x_114; +x_112 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_112, 0, x_4); +lean::cnstr_set(x_112, 1, x_5); +return x_112; } } } @@ -10483,7 +10437,7 @@ return x_114; obj* _init_l_lean_parser_detail__ident__suffix_parser___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; x_0 = lean::mk_string("."); x_1 = l_string_quote(x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); @@ -10499,16 +10453,15 @@ x_7 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_par lean::closure_set(x_7, 0, x_5); lean::closure_set(x_7, 1, x_6); x_8 = lean::box(0); -lean::inc(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__8), 5, 1); -lean::closure_set(x_10, 0, x_8); +x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__8), 5, 1); +lean::closure_set(x_9, 0, x_8); +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_8); x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_10); -lean::cnstr_set(x_11, 1, x_8); -x_12 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_12, 0, x_7); -lean::cnstr_set(x_12, 1, x_11); -return x_12; +lean::cnstr_set(x_11, 0, x_7); +lean::cnstr_set(x_11, 1, x_10); +return x_11; } } obj* l_lean_parser_detail__ident__suffix_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { @@ -11027,16 +10980,15 @@ return x_86; obj* _init_l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_4; obj* x_5; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; x_0 = lean::box(0); x_1 = l_lean_parser_no__kind; -lean::inc(x_0); lean::inc(x_1); -x_4 = l_lean_parser_syntax_mk__node(x_1, x_0); -x_5 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_5, 0, x_4); -lean::cnstr_set(x_5, 1, x_0); -return x_5; +x_3 = l_lean_parser_syntax_mk__node(x_1, x_0); +x_4 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_4, 0, x_3); +lean::cnstr_set(x_4, 1, x_0); +return x_4; } } obj* l_lean_parser_detail__ident_has__view_x_27___lambda__2(obj* x_0) { @@ -11067,7 +11019,7 @@ return x_15; } else { -obj* x_16; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_33; +obj* x_16; 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_29; obj* x_30; obj* x_32; x_16 = lean::cnstr_get(x_3, 0); lean::inc(x_16); lean::dec(x_3); @@ -11076,23 +11028,22 @@ x_20 = l_lean_parser_detail__ident__suffix_has__view; x_21 = lean::cnstr_get(x_20, 1); lean::inc(x_21); x_23 = lean::apply_1(x_21, x_16); -lean::inc(x_19); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_23); -lean::cnstr_set(x_25, 1, x_19); -x_26 = l_lean_parser_no__kind; -lean::inc(x_26); -x_28 = l_lean_parser_syntax_mk__node(x_26, x_25); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_23); +lean::cnstr_set(x_24, 1, x_19); +x_25 = l_lean_parser_no__kind; +lean::inc(x_25); +x_27 = l_lean_parser_syntax_mk__node(x_25, x_24); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_27); +lean::cnstr_set(x_28, 1, x_19); x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_19); -x_30 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_30, 0, x_9); -lean::cnstr_set(x_30, 1, x_29); -x_31 = l_lean_parser_detail__ident; -lean::inc(x_31); -x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); -return x_33; +lean::cnstr_set(x_29, 0, x_9); +lean::cnstr_set(x_29, 1, x_28); +x_30 = l_lean_parser_detail__ident; +lean::inc(x_30); +x_32 = l_lean_parser_syntax_mk__node(x_30, x_29); +return x_32; } } } @@ -11212,7 +11163,7 @@ goto lbl_11; } else { -obj* x_37; uint8 x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_47; obj* x_50; obj* x_52; obj* x_53; obj* x_55; obj* x_56; obj* x_57; +obj* x_37; uint8 x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_47; obj* x_50; obj* x_51; obj* x_52; obj* x_54; obj* x_55; obj* x_56; x_37 = lean::cnstr_get(x_14, 0); lean::inc(x_37); x_39 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); @@ -11233,48 +11184,47 @@ x_47 = lean::cnstr_get(x_37, 3); lean::inc(x_47); lean::dec(x_37); x_50 = l_option_get___main___at_lean_parser_run___spec__2(x_47); -lean::inc(x_8); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_50); -lean::cnstr_set(x_52, 1, x_8); -x_53 = l_lean_parser_no__kind; -lean::inc(x_53); -x_55 = l_lean_parser_syntax_mk__node(x_53, x_52); -x_56 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_56, 0, x_55); -x_57 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_57, 0, x_41); -lean::cnstr_set(x_57, 1, x_43); -lean::cnstr_set(x_57, 2, x_45); -lean::cnstr_set(x_57, 3, x_56); +x_51 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_51, 0, x_50); +lean::cnstr_set(x_51, 1, x_8); +x_52 = l_lean_parser_no__kind; +lean::inc(x_52); +x_54 = l_lean_parser_syntax_mk__node(x_52, x_51); +x_55 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_55, 0, x_54); +x_56 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_56, 0, x_41); +lean::cnstr_set(x_56, 1, x_43); +lean::cnstr_set(x_56, 2, x_45); +lean::cnstr_set(x_56, 3, x_55); if (x_39 == 0) { -uint8 x_58; obj* x_59; obj* x_60; -x_58 = 0; +uint8 x_57; obj* x_58; obj* x_59; +x_57 = 0; if (lean::is_scalar(x_40)) { - x_59 = lean::alloc_cnstr(1, 1, 1); + x_58 = lean::alloc_cnstr(1, 1, 1); } else { - x_59 = x_40; + x_58 = x_40; } -lean::cnstr_set(x_59, 0, x_57); -lean::cnstr_set_scalar(x_59, sizeof(void*)*1, x_58); -x_60 = x_59; -x_9 = x_60; +lean::cnstr_set(x_58, 0, x_56); +lean::cnstr_set_scalar(x_58, sizeof(void*)*1, x_57); +x_59 = x_58; +x_9 = x_59; x_10 = x_16; goto lbl_11; } else { -obj* x_61; obj* x_62; +obj* x_60; obj* x_61; if (lean::is_scalar(x_40)) { - x_61 = lean::alloc_cnstr(1, 1, 1); + x_60 = lean::alloc_cnstr(1, 1, 1); } else { - x_61 = x_40; + x_60 = x_40; } -lean::cnstr_set(x_61, 0, x_57); -lean::cnstr_set_scalar(x_61, sizeof(void*)*1, x_39); -x_62 = x_61; -x_9 = x_62; +lean::cnstr_set(x_60, 0, x_56); +lean::cnstr_set_scalar(x_60, sizeof(void*)*1, x_39); +x_61 = x_60; +x_9 = x_61; x_10 = x_16; goto lbl_11; } @@ -11283,105 +11233,104 @@ lbl_7: { if (lean::obj_tag(x_5) == 0) { -obj* x_63; obj* x_65; obj* x_67; obj* x_69; -x_63 = lean::cnstr_get(x_5, 0); -lean::inc(x_63); -x_65 = lean::cnstr_get(x_5, 1); -lean::inc(x_65); -x_67 = lean::cnstr_get(x_5, 2); -lean::inc(x_67); +obj* x_62; obj* x_64; obj* x_66; obj* x_68; +x_62 = lean::cnstr_get(x_5, 0); +lean::inc(x_62); +x_64 = lean::cnstr_get(x_5, 1); +lean::inc(x_64); +x_66 = lean::cnstr_get(x_5, 2); +lean::inc(x_66); if (lean::is_shared(x_5)) { lean::dec(x_5); - x_69 = lean::box(0); + x_68 = lean::box(0); } else { lean::cnstr_release(x_5, 0); lean::cnstr_release(x_5, 1); lean::cnstr_release(x_5, 2); - x_69 = x_5; + x_68 = x_5; } -if (lean::obj_tag(x_63) == 0) +if (lean::obj_tag(x_62) == 0) { -obj* x_70; obj* x_71; obj* x_74; obj* x_75; obj* x_76; -x_70 = l_lean_parser_combinators_many___rarg___closed__1; -x_71 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_71); +obj* x_69; obj* x_70; obj* x_73; obj* x_74; obj* x_75; +x_69 = l_lean_parser_combinators_many___rarg___closed__1; +x_70 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_70); -if (lean::is_scalar(x_69)) { - x_74 = lean::alloc_cnstr(0, 3, 0); +lean::inc(x_69); +if (lean::is_scalar(x_68)) { + x_73 = lean::alloc_cnstr(0, 3, 0); } else { - x_74 = x_69; + x_73 = x_68; } -lean::cnstr_set(x_74, 0, x_70); -lean::cnstr_set(x_74, 1, x_65); -lean::cnstr_set(x_74, 2, x_71); -x_75 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_67, x_74); -x_76 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_76, 0, x_75); -lean::cnstr_set(x_76, 1, x_6); -return x_76; +lean::cnstr_set(x_73, 0, x_69); +lean::cnstr_set(x_73, 1, x_64); +lean::cnstr_set(x_73, 2, x_70); +x_74 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_66, x_73); +x_75 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_75, 0, x_74); +lean::cnstr_set(x_75, 1, x_6); +return x_75; } else { -obj* x_77; obj* x_80; obj* x_81; obj* x_82; obj* x_84; obj* x_85; obj* x_87; obj* x_88; obj* x_89; -x_77 = lean::cnstr_get(x_63, 0); -lean::inc(x_77); -lean::dec(x_63); -x_80 = lean::box(0); -x_81 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_81, 0, x_77); -lean::cnstr_set(x_81, 1, x_80); -x_82 = l_lean_parser_no__kind; -lean::inc(x_82); -x_84 = l_lean_parser_syntax_mk__node(x_82, x_81); -x_85 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_85); -if (lean::is_scalar(x_69)) { - x_87 = lean::alloc_cnstr(0, 3, 0); +obj* x_76; obj* x_79; obj* x_80; obj* x_81; obj* x_83; obj* x_84; obj* x_86; obj* x_87; obj* x_88; +x_76 = lean::cnstr_get(x_62, 0); +lean::inc(x_76); +lean::dec(x_62); +x_79 = lean::box(0); +x_80 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_80, 0, x_76); +lean::cnstr_set(x_80, 1, x_79); +x_81 = l_lean_parser_no__kind; +lean::inc(x_81); +x_83 = l_lean_parser_syntax_mk__node(x_81, x_80); +x_84 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_84); +if (lean::is_scalar(x_68)) { + x_86 = lean::alloc_cnstr(0, 3, 0); } else { - x_87 = x_69; + x_86 = x_68; } -lean::cnstr_set(x_87, 0, x_84); -lean::cnstr_set(x_87, 1, x_65); -lean::cnstr_set(x_87, 2, x_85); -x_88 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_67, x_87); -x_89 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_89, 0, x_88); -lean::cnstr_set(x_89, 1, x_6); -return x_89; +lean::cnstr_set(x_86, 0, x_83); +lean::cnstr_set(x_86, 1, x_64); +lean::cnstr_set(x_86, 2, x_84); +x_87 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_66, x_86); +x_88 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_88, 0, x_87); +lean::cnstr_set(x_88, 1, x_6); +return x_88; } } else { -obj* x_90; uint8 x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; -x_90 = lean::cnstr_get(x_5, 0); -lean::inc(x_90); -x_92 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); +obj* x_89; uint8 x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; +x_89 = lean::cnstr_get(x_5, 0); +lean::inc(x_89); +x_91 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); if (lean::is_shared(x_5)) { lean::dec(x_5); - x_93 = lean::box(0); + x_92 = lean::box(0); } else { lean::cnstr_release(x_5, 0); - x_93 = x_5; + x_92 = x_5; } -if (lean::is_scalar(x_93)) { - x_94 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_92)) { + x_93 = lean::alloc_cnstr(1, 1, 1); } else { - x_94 = x_93; + x_93 = x_92; } -lean::cnstr_set(x_94, 0, x_90); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_92); -x_95 = x_94; -x_96 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_96, 0, x_95); -lean::cnstr_set(x_96, 1, x_6); -return x_96; +lean::cnstr_set(x_93, 0, x_89); +lean::cnstr_set_scalar(x_93, sizeof(void*)*1, x_91); +x_94 = x_93; +x_95 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_95, 0, x_94); +lean::cnstr_set(x_95, 1, x_6); +return x_95; } } lbl_11: { if (lean::obj_tag(x_9) == 0) { -lean::dec(x_8); lean::dec(x_3); x_5 = x_9; x_6 = x_10; @@ -11389,37 +11338,36 @@ goto lbl_7; } else { -obj* x_99; uint8 x_101; -x_99 = lean::cnstr_get(x_9, 0); -lean::inc(x_99); -x_101 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); -if (x_101 == 0) +obj* x_97; uint8 x_99; +x_97 = lean::cnstr_get(x_9, 0); +lean::inc(x_97); +x_99 = lean::cnstr_get_scalar(x_9, sizeof(void*)*1); +if (x_99 == 0) { -obj* x_103; obj* x_106; obj* x_108; obj* x_109; obj* x_110; +obj* x_101; obj* x_104; obj* x_106; obj* x_107; obj* x_108; lean::dec(x_9); -x_103 = lean::cnstr_get(x_99, 2); -lean::inc(x_103); -lean::dec(x_99); -x_106 = l_mjoin___rarg___closed__1; -lean::inc(x_106); -x_108 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_108, 0, x_103); -lean::closure_set(x_108, 1, x_106); -x_109 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_109, 0, x_108); -x_110 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_110, 0, x_8); -lean::cnstr_set(x_110, 1, x_3); -lean::cnstr_set(x_110, 2, x_109); -x_5 = x_110; +x_101 = lean::cnstr_get(x_97, 2); +lean::inc(x_101); +lean::dec(x_97); +x_104 = l_mjoin___rarg___closed__1; +lean::inc(x_104); +x_106 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_106, 0, x_101); +lean::closure_set(x_106, 1, x_104); +x_107 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_107, 0, x_106); +x_108 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_108, 0, x_8); +lean::cnstr_set(x_108, 1, x_3); +lean::cnstr_set(x_108, 2, x_107); +x_5 = x_108; x_6 = x_10; goto lbl_7; } else { -lean::dec(x_8); lean::dec(x_3); -lean::dec(x_99); +lean::dec(x_97); x_5 = x_9; x_6 = x_10; goto lbl_7; @@ -11484,16 +11432,15 @@ return x_8; obj* l_lean_parser_rec__t_run__parsec___at_lean_parser_detail__ident_parser___spec__1___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { -obj* x_5; obj* x_6; obj* x_7; obj* x_11; +obj* x_5; obj* x_6; obj* x_7; obj* x_10; lean::dec(x_0); x_5 = lean::box(0); x_6 = l_lean_parser_rec__t_run__parsec___rarg___lambda__1___closed__1; x_7 = l_mjoin___rarg___closed__1; -lean::inc(x_5); lean::inc(x_7); lean::inc(x_6); -x_11 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_6, x_7, x_5, x_5, x_1, x_2, x_3); -return x_11; +x_10 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_6, x_7, x_5, x_5, x_1, x_2, x_3); +return x_10; } } obj* _init_l_lean_parser_rec__t_run__parsec___at_lean_parser_detail__ident_parser___spec__1___closed__1() { @@ -11831,213 +11778,211 @@ uint8 x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { -obj* x_4; obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; +obj* x_4; obj* x_5; obj* x_6; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; x_4 = lean::box(0); x_5 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_6 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); -x_11 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -if (lean::is_shared(x_11)) { - lean::dec(x_11); - x_16 = lean::box(0); +x_10 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); +x_11 = lean::cnstr_get(x_10, 0); +lean::inc(x_11); +x_13 = lean::cnstr_get(x_10, 1); +lean::inc(x_13); +if (lean::is_shared(x_10)) { + lean::dec(x_10); + x_15 = lean::box(0); } else { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - x_16 = x_11; + lean::cnstr_release(x_10, 0); + lean::cnstr_release(x_10, 1); + x_15 = x_10; } -x_17 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_17); -x_19 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_12); -if (lean::obj_tag(x_19) == 0) +x_16 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_16); +x_18 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_11); +if (lean::obj_tag(x_18) == 0) { -obj* x_20; obj* x_22; obj* x_24; uint32 x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -x_22 = lean::cnstr_get(x_19, 1); -lean::inc(x_22); -x_24 = lean::cnstr_get(x_19, 2); -lean::inc(x_24); +obj* x_19; obj* x_21; obj* x_23; uint32 x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_34; obj* x_35; +x_19 = lean::cnstr_get(x_18, 0); +lean::inc(x_19); +x_21 = lean::cnstr_get(x_18, 1); +lean::inc(x_21); +x_23 = lean::cnstr_get(x_18, 2); +lean::inc(x_23); +lean::dec(x_18); +x_26 = lean::unbox_uint32(x_19); lean::dec(x_19); -x_27 = lean::unbox_uint32(x_20); -lean::dec(x_20); -x_29 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__4(x_27, x_0, x_22, x_14); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_32 = lean::cnstr_get(x_29, 1); -lean::inc(x_32); -lean::dec(x_29); -x_35 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_24, x_30); -if (lean::is_scalar(x_16)) { - x_36 = lean::alloc_cnstr(0, 2, 0); +x_28 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__4(x_26, x_0, x_21, x_13); +x_29 = lean::cnstr_get(x_28, 0); +lean::inc(x_29); +x_31 = lean::cnstr_get(x_28, 1); +lean::inc(x_31); +lean::dec(x_28); +x_34 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_29); +if (lean::is_scalar(x_15)) { + x_35 = lean::alloc_cnstr(0, 2, 0); } else { - x_36 = x_16; + x_35 = x_15; } -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_32); -return x_36; +lean::cnstr_set(x_35, 0, x_34); +lean::cnstr_set(x_35, 1, x_31); +return x_35; } else { -obj* x_38; uint8 x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; +obj* x_37; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; lean::dec(x_0); -x_38 = lean::cnstr_get(x_19, 0); -lean::inc(x_38); -x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); -if (lean::is_shared(x_19)) { - lean::dec(x_19); - x_41 = lean::box(0); +x_37 = lean::cnstr_get(x_18, 0); +lean::inc(x_37); +x_39 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); +if (lean::is_shared(x_18)) { + lean::dec(x_18); + x_40 = lean::box(0); } else { - lean::cnstr_release(x_19, 0); - x_41 = x_19; + lean::cnstr_release(x_18, 0); + x_40 = x_18; } -if (lean::is_scalar(x_41)) { - x_42 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_40)) { + x_41 = lean::alloc_cnstr(1, 1, 1); } else { - x_42 = x_41; + x_41 = x_40; } -lean::cnstr_set(x_42, 0, x_38); -lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); -x_43 = x_42; -if (lean::is_scalar(x_16)) { - x_44 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_41, 0, x_37); +lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); +x_42 = x_41; +if (lean::is_scalar(x_15)) { + x_43 = lean::alloc_cnstr(0, 2, 0); } else { - x_44 = x_16; + x_43 = x_15; } -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_14); -return x_44; +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_13); +return x_43; } } else { -uint32 x_45; uint8 x_46; -x_45 = lean::string_iterator_curr(x_1); -x_46 = l_lean_is__id__first(x_45); -if (x_46 == 0) +uint32 x_44; uint8 x_45; +x_44 = lean::string_iterator_curr(x_1); +x_45 = l_lean_is__id__first(x_44); +if (x_45 == 0) { -obj* x_47; obj* x_48; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_66; -x_47 = l_char_quote__core(x_45); -x_48 = l_char_has__repr___closed__1; -lean::inc(x_48); -x_50 = lean::string_append(x_48, x_47); -lean::dec(x_47); -x_52 = lean::string_append(x_50, x_48); -x_53 = lean::box(0); -x_54 = l_mjoin___rarg___closed__1; +obj* x_46; obj* x_47; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_56; obj* x_57; obj* x_59; obj* x_61; obj* x_62; obj* x_64; +x_46 = l_char_quote__core(x_44); +x_47 = l_char_has__repr___closed__1; +lean::inc(x_47); +x_49 = lean::string_append(x_47, x_46); +lean::dec(x_46); +x_51 = lean::string_append(x_49, x_47); +x_52 = lean::box(0); +x_53 = l_mjoin___rarg___closed__1; lean::inc(x_0); lean::inc(x_53); -lean::inc(x_54); -x_58 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_52, x_54, x_53, x_53, x_0, x_1, x_2); -x_59 = lean::cnstr_get(x_58, 0); +x_56 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_51, x_53, x_52, x_52, x_0, x_1, x_2); +x_57 = lean::cnstr_get(x_56, 0); +lean::inc(x_57); +x_59 = lean::cnstr_get(x_56, 1); lean::inc(x_59); -x_61 = lean::cnstr_get(x_58, 1); -lean::inc(x_61); -if (lean::is_shared(x_58)) { - lean::dec(x_58); - x_63 = lean::box(0); +if (lean::is_shared(x_56)) { + lean::dec(x_56); + x_61 = lean::box(0); } else { - lean::cnstr_release(x_58, 0); - lean::cnstr_release(x_58, 1); - x_63 = x_58; + lean::cnstr_release(x_56, 0); + lean::cnstr_release(x_56, 1); + x_61 = x_56; } -x_64 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_64); -x_66 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_64, x_59); -if (lean::obj_tag(x_66) == 0) +x_62 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_62); +x_64 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_62, x_57); +if (lean::obj_tag(x_64) == 0) { -obj* x_67; obj* x_69; obj* x_71; uint32 x_74; obj* x_76; obj* x_77; obj* x_79; obj* x_82; obj* x_83; -x_67 = lean::cnstr_get(x_66, 0); +obj* x_65; obj* x_67; obj* x_69; uint32 x_72; obj* x_74; obj* x_75; obj* x_77; obj* x_80; obj* x_81; +x_65 = lean::cnstr_get(x_64, 0); +lean::inc(x_65); +x_67 = lean::cnstr_get(x_64, 1); lean::inc(x_67); -x_69 = lean::cnstr_get(x_66, 1); +x_69 = lean::cnstr_get(x_64, 2); lean::inc(x_69); -x_71 = lean::cnstr_get(x_66, 2); -lean::inc(x_71); -lean::dec(x_66); -x_74 = lean::unbox_uint32(x_67); -lean::dec(x_67); -x_76 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__6(x_74, x_0, x_69, x_61); -x_77 = lean::cnstr_get(x_76, 0); +lean::dec(x_64); +x_72 = lean::unbox_uint32(x_65); +lean::dec(x_65); +x_74 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__6(x_72, x_0, x_67, x_59); +x_75 = lean::cnstr_get(x_74, 0); +lean::inc(x_75); +x_77 = lean::cnstr_get(x_74, 1); lean::inc(x_77); -x_79 = lean::cnstr_get(x_76, 1); -lean::inc(x_79); -lean::dec(x_76); -x_82 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_71, x_77); -if (lean::is_scalar(x_63)) { - x_83 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_74); +x_80 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_69, x_75); +if (lean::is_scalar(x_61)) { + x_81 = lean::alloc_cnstr(0, 2, 0); } else { - x_83 = x_63; + x_81 = x_61; } -lean::cnstr_set(x_83, 0, x_82); -lean::cnstr_set(x_83, 1, x_79); -return x_83; +lean::cnstr_set(x_81, 0, x_80); +lean::cnstr_set(x_81, 1, x_77); +return x_81; } else { -obj* x_85; uint8 x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; +obj* x_83; uint8 x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; lean::dec(x_0); -x_85 = lean::cnstr_get(x_66, 0); -lean::inc(x_85); -x_87 = lean::cnstr_get_scalar(x_66, sizeof(void*)*1); -if (lean::is_shared(x_66)) { - lean::dec(x_66); - x_88 = lean::box(0); +x_83 = lean::cnstr_get(x_64, 0); +lean::inc(x_83); +x_85 = lean::cnstr_get_scalar(x_64, sizeof(void*)*1); +if (lean::is_shared(x_64)) { + lean::dec(x_64); + x_86 = lean::box(0); } else { - lean::cnstr_release(x_66, 0); - x_88 = x_66; + lean::cnstr_release(x_64, 0); + x_86 = x_64; } -if (lean::is_scalar(x_88)) { - x_89 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_86)) { + x_87 = lean::alloc_cnstr(1, 1, 1); } else { - x_89 = x_88; + x_87 = x_86; } -lean::cnstr_set(x_89, 0, x_85); -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_87); -x_90 = x_89; -if (lean::is_scalar(x_63)) { - x_91 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_87, 0, x_83); +lean::cnstr_set_scalar(x_87, sizeof(void*)*1, x_85); +x_88 = x_87; +if (lean::is_scalar(x_61)) { + x_89 = lean::alloc_cnstr(0, 2, 0); } else { - x_91 = x_63; + x_89 = x_61; } -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_61); -return x_91; +lean::cnstr_set(x_89, 0, x_88); +lean::cnstr_set(x_89, 1, x_59); +return x_89; } } else { -obj* x_93; obj* x_94; obj* x_95; obj* x_97; obj* x_99; obj* x_100; obj* x_101; obj* x_102; +obj* x_91; obj* x_92; obj* x_93; obj* x_95; obj* x_97; obj* x_98; obj* x_99; obj* x_100; lean::inc(x_1); -x_93 = lean::string_iterator_next(x_1); -x_94 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__8(x_1, x_0, x_93, x_2); -x_95 = lean::cnstr_get(x_94, 0); +x_91 = lean::string_iterator_next(x_1); +x_92 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__8(x_1, x_0, x_91, x_2); +x_93 = lean::cnstr_get(x_92, 0); +lean::inc(x_93); +x_95 = lean::cnstr_get(x_92, 1); lean::inc(x_95); -x_97 = lean::cnstr_get(x_94, 1); -lean::inc(x_97); -if (lean::is_shared(x_94)) { - lean::dec(x_94); - x_99 = lean::box(0); +if (lean::is_shared(x_92)) { + lean::dec(x_92); + x_97 = lean::box(0); } else { - lean::cnstr_release(x_94, 0); - lean::cnstr_release(x_94, 1); - x_99 = x_94; + lean::cnstr_release(x_92, 0); + lean::cnstr_release(x_92, 1); + x_97 = x_92; } -x_100 = lean::box(0); -x_101 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_100, x_95); -if (lean::is_scalar(x_99)) { - x_102 = lean::alloc_cnstr(0, 2, 0); +x_98 = lean::box(0); +x_99 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_98, x_93); +if (lean::is_scalar(x_97)) { + x_100 = lean::alloc_cnstr(0, 2, 0); } else { - x_102 = x_99; + x_100 = x_97; } -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_97); -return x_102; +lean::cnstr_set(x_100, 0, x_99); +lean::cnstr_set(x_100, 1, x_95); +return x_100; } } } @@ -12049,96 +11994,94 @@ uint8 x_4; x_4 = lean::string_iterator_has_next(x_2); if (x_4 == 0) { -obj* x_5; obj* x_6; obj* x_7; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; +obj* x_5; obj* x_6; obj* x_7; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_19; x_5 = lean::box(0); x_6 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_7 = l_mjoin___rarg___closed__1; -lean::inc(x_5); lean::inc(x_7); lean::inc(x_6); -x_11 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_6, x_7, x_5, x_5, x_1, x_2, x_3); -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -if (lean::is_shared(x_11)) { - lean::dec(x_11); - x_16 = lean::box(0); +x_10 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_6, x_7, x_5, x_5, x_1, x_2, x_3); +x_11 = lean::cnstr_get(x_10, 0); +lean::inc(x_11); +x_13 = lean::cnstr_get(x_10, 1); +lean::inc(x_13); +if (lean::is_shared(x_10)) { + lean::dec(x_10); + x_15 = lean::box(0); } else { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - x_16 = x_11; + lean::cnstr_release(x_10, 0); + lean::cnstr_release(x_10, 1); + x_15 = x_10; } -x_17 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_17); -x_19 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_12); -if (lean::is_scalar(x_16)) { - x_20 = lean::alloc_cnstr(0, 2, 0); +x_16 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_16); +x_18 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_11); +if (lean::is_scalar(x_15)) { + x_19 = lean::alloc_cnstr(0, 2, 0); } else { - x_20 = x_16; + x_19 = x_15; } -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_14); -return x_20; +lean::cnstr_set(x_19, 0, x_18); +lean::cnstr_set(x_19, 1, x_13); +return x_19; } else { -uint32 x_21; uint8 x_22; -x_21 = lean::string_iterator_curr(x_2); -x_22 = x_21 == x_0; -if (x_22 == 0) +uint32 x_20; uint8 x_21; +x_20 = lean::string_iterator_curr(x_2); +x_21 = x_20 == x_0; +if (x_21 == 0) { -obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_33; obj* x_34; obj* x_36; obj* x_38; obj* x_39; obj* x_41; obj* x_42; -x_23 = l_char_quote__core(x_21); -x_24 = l_char_has__repr___closed__1; -lean::inc(x_24); -x_26 = lean::string_append(x_24, x_23); -lean::dec(x_23); -x_28 = lean::string_append(x_26, x_24); -x_29 = lean::box(0); -x_30 = l_mjoin___rarg___closed__1; +obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_39; obj* x_40; +x_22 = l_char_quote__core(x_20); +x_23 = l_char_has__repr___closed__1; +lean::inc(x_23); +x_25 = lean::string_append(x_23, x_22); +lean::dec(x_22); +x_27 = lean::string_append(x_25, x_23); +x_28 = lean::box(0); +x_29 = l_mjoin___rarg___closed__1; lean::inc(x_29); -lean::inc(x_30); -x_33 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_28, x_30, x_29, x_29, x_1, x_2, x_3); -x_34 = lean::cnstr_get(x_33, 0); +x_31 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_27, x_29, x_28, x_28, x_1, x_2, x_3); +x_32 = lean::cnstr_get(x_31, 0); +lean::inc(x_32); +x_34 = lean::cnstr_get(x_31, 1); lean::inc(x_34); -x_36 = lean::cnstr_get(x_33, 1); -lean::inc(x_36); -if (lean::is_shared(x_33)) { - lean::dec(x_33); - x_38 = lean::box(0); +if (lean::is_shared(x_31)) { + lean::dec(x_31); + x_36 = lean::box(0); } else { - lean::cnstr_release(x_33, 0); - lean::cnstr_release(x_33, 1); - x_38 = x_33; + lean::cnstr_release(x_31, 0); + lean::cnstr_release(x_31, 1); + x_36 = x_31; } -x_39 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_39); -x_41 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_39, x_34); -if (lean::is_scalar(x_38)) { - x_42 = lean::alloc_cnstr(0, 2, 0); +x_37 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_37); +x_39 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_37, x_32); +if (lean::is_scalar(x_36)) { + x_40 = lean::alloc_cnstr(0, 2, 0); } else { - x_42 = x_38; + x_40 = x_36; } -lean::cnstr_set(x_42, 0, x_41); -lean::cnstr_set(x_42, 1, x_36); -return x_42; +lean::cnstr_set(x_40, 0, x_39); +lean::cnstr_set(x_40, 1, x_34); +return x_40; } else { -obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; +obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; lean::dec(x_1); -x_44 = lean::string_iterator_next(x_2); -x_45 = lean::box(0); -x_46 = lean::box_uint32(x_21); -x_47 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_44); -lean::cnstr_set(x_47, 2, x_45); -x_48 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_48, 0, x_47); -lean::cnstr_set(x_48, 1, x_3); -return x_48; +x_42 = lean::string_iterator_next(x_2); +x_43 = lean::box(0); +x_44 = lean::box_uint32(x_20); +x_45 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_45, 0, x_44); +lean::cnstr_set(x_45, 1, x_42); +lean::cnstr_set(x_45, 2, x_43); +x_46 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_46, 0, x_45); +lean::cnstr_set(x_46, 1, x_3); +return x_46; } } } @@ -12365,212 +12308,210 @@ uint8 x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { -obj* x_4; obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; +obj* x_4; obj* x_5; obj* x_6; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; x_4 = lean::box(0); x_5 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_6 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); -x_11 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -if (lean::is_shared(x_11)) { - lean::dec(x_11); - x_16 = lean::box(0); +x_10 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); +x_11 = lean::cnstr_get(x_10, 0); +lean::inc(x_11); +x_13 = lean::cnstr_get(x_10, 1); +lean::inc(x_13); +if (lean::is_shared(x_10)) { + lean::dec(x_10); + x_15 = lean::box(0); } else { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - x_16 = x_11; + lean::cnstr_release(x_10, 0); + lean::cnstr_release(x_10, 1); + x_15 = x_10; } -x_17 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_17); -x_19 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_12); -if (lean::obj_tag(x_19) == 0) +x_16 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_16); +x_18 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_11); +if (lean::obj_tag(x_18) == 0) { -obj* x_20; obj* x_22; obj* x_24; uint32 x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -x_22 = lean::cnstr_get(x_19, 1); -lean::inc(x_22); -x_24 = lean::cnstr_get(x_19, 2); -lean::inc(x_24); +obj* x_19; obj* x_21; obj* x_23; uint32 x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_34; obj* x_35; +x_19 = lean::cnstr_get(x_18, 0); +lean::inc(x_19); +x_21 = lean::cnstr_get(x_18, 1); +lean::inc(x_21); +x_23 = lean::cnstr_get(x_18, 2); +lean::inc(x_23); +lean::dec(x_18); +x_26 = lean::unbox_uint32(x_19); lean::dec(x_19); -x_27 = lean::unbox_uint32(x_20); -lean::dec(x_20); -x_29 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__13(x_27, x_0, x_22, x_14); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_32 = lean::cnstr_get(x_29, 1); -lean::inc(x_32); -lean::dec(x_29); -x_35 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_24, x_30); -if (lean::is_scalar(x_16)) { - x_36 = lean::alloc_cnstr(0, 2, 0); +x_28 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__13(x_26, x_0, x_21, x_13); +x_29 = lean::cnstr_get(x_28, 0); +lean::inc(x_29); +x_31 = lean::cnstr_get(x_28, 1); +lean::inc(x_31); +lean::dec(x_28); +x_34 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_29); +if (lean::is_scalar(x_15)) { + x_35 = lean::alloc_cnstr(0, 2, 0); } else { - x_36 = x_16; + x_35 = x_15; } -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_32); -return x_36; +lean::cnstr_set(x_35, 0, x_34); +lean::cnstr_set(x_35, 1, x_31); +return x_35; } else { -obj* x_38; uint8 x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; +obj* x_37; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; lean::dec(x_0); -x_38 = lean::cnstr_get(x_19, 0); -lean::inc(x_38); -x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); -if (lean::is_shared(x_19)) { - lean::dec(x_19); - x_41 = lean::box(0); +x_37 = lean::cnstr_get(x_18, 0); +lean::inc(x_37); +x_39 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); +if (lean::is_shared(x_18)) { + lean::dec(x_18); + x_40 = lean::box(0); } else { - lean::cnstr_release(x_19, 0); - x_41 = x_19; + lean::cnstr_release(x_18, 0); + x_40 = x_18; } -if (lean::is_scalar(x_41)) { - x_42 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_40)) { + x_41 = lean::alloc_cnstr(1, 1, 1); } else { - x_42 = x_41; + x_41 = x_40; } -lean::cnstr_set(x_42, 0, x_38); -lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); -x_43 = x_42; -if (lean::is_scalar(x_16)) { - x_44 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_41, 0, x_37); +lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); +x_42 = x_41; +if (lean::is_scalar(x_15)) { + x_43 = lean::alloc_cnstr(0, 2, 0); } else { - x_44 = x_16; + x_43 = x_15; } -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_14); -return x_44; +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_13); +return x_43; } } else { -uint32 x_45; uint8 x_46; -x_45 = lean::string_iterator_curr(x_1); -x_46 = l_lean_is__id__end__escape(x_45); -if (x_46 == 0) +uint32 x_44; uint8 x_45; +x_44 = lean::string_iterator_curr(x_1); +x_45 = l_lean_is__id__end__escape(x_44); +if (x_45 == 0) { -obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; +obj* x_47; obj* x_48; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_56; lean::inc(x_1); -x_48 = lean::string_iterator_next(x_1); -x_49 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__15(x_1, x_0, x_48, x_2); -x_50 = lean::cnstr_get(x_49, 0); -lean::inc(x_50); -x_52 = lean::cnstr_get(x_49, 1); -lean::inc(x_52); -if (lean::is_shared(x_49)) { - lean::dec(x_49); - x_54 = lean::box(0); +x_47 = lean::string_iterator_next(x_1); +x_48 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__15(x_1, x_0, x_47, x_2); +x_49 = lean::cnstr_get(x_48, 0); +lean::inc(x_49); +x_51 = lean::cnstr_get(x_48, 1); +lean::inc(x_51); +if (lean::is_shared(x_48)) { + lean::dec(x_48); + x_53 = lean::box(0); } else { - lean::cnstr_release(x_49, 0); - lean::cnstr_release(x_49, 1); - x_54 = x_49; + lean::cnstr_release(x_48, 0); + lean::cnstr_release(x_48, 1); + x_53 = x_48; } -x_55 = lean::box(0); -x_56 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_55, x_50); -if (lean::is_scalar(x_54)) { - x_57 = lean::alloc_cnstr(0, 2, 0); +x_54 = lean::box(0); +x_55 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_54, x_49); +if (lean::is_scalar(x_53)) { + x_56 = lean::alloc_cnstr(0, 2, 0); } else { - x_57 = x_54; + x_56 = x_53; } -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_52); -return x_57; +lean::cnstr_set(x_56, 0, x_55); +lean::cnstr_set(x_56, 1, x_51); +return x_56; } else { -obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; -x_58 = l_char_quote__core(x_45); -x_59 = l_char_has__repr___closed__1; -lean::inc(x_59); -x_61 = lean::string_append(x_59, x_58); -lean::dec(x_58); -x_63 = lean::string_append(x_61, x_59); -x_64 = lean::box(0); -x_65 = l_mjoin___rarg___closed__1; +obj* x_57; obj* x_58; obj* x_60; obj* x_62; obj* x_63; obj* x_64; obj* x_67; obj* x_68; obj* x_70; obj* x_72; obj* x_73; obj* x_75; +x_57 = l_char_quote__core(x_44); +x_58 = l_char_has__repr___closed__1; +lean::inc(x_58); +x_60 = lean::string_append(x_58, x_57); +lean::dec(x_57); +x_62 = lean::string_append(x_60, x_58); +x_63 = lean::box(0); +x_64 = l_mjoin___rarg___closed__1; lean::inc(x_0); lean::inc(x_64); -lean::inc(x_65); -x_69 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_63, x_65, x_64, x_64, x_0, x_1, x_2); -x_70 = lean::cnstr_get(x_69, 0); +x_67 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_62, x_64, x_63, x_63, x_0, x_1, x_2); +x_68 = lean::cnstr_get(x_67, 0); +lean::inc(x_68); +x_70 = lean::cnstr_get(x_67, 1); lean::inc(x_70); -x_72 = lean::cnstr_get(x_69, 1); -lean::inc(x_72); -if (lean::is_shared(x_69)) { - lean::dec(x_69); - x_74 = lean::box(0); +if (lean::is_shared(x_67)) { + lean::dec(x_67); + x_72 = lean::box(0); } else { - lean::cnstr_release(x_69, 0); - lean::cnstr_release(x_69, 1); - x_74 = x_69; + lean::cnstr_release(x_67, 0); + lean::cnstr_release(x_67, 1); + x_72 = x_67; } -x_75 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_75); -x_77 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_75, x_70); -if (lean::obj_tag(x_77) == 0) +x_73 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_73); +x_75 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_73, x_68); +if (lean::obj_tag(x_75) == 0) { -obj* x_78; obj* x_80; obj* x_82; uint32 x_85; obj* x_87; obj* x_88; obj* x_90; obj* x_93; obj* x_94; -x_78 = lean::cnstr_get(x_77, 0); +obj* x_76; obj* x_78; obj* x_80; uint32 x_83; obj* x_85; obj* x_86; obj* x_88; obj* x_91; obj* x_92; +x_76 = lean::cnstr_get(x_75, 0); +lean::inc(x_76); +x_78 = lean::cnstr_get(x_75, 1); lean::inc(x_78); -x_80 = lean::cnstr_get(x_77, 1); +x_80 = lean::cnstr_get(x_75, 2); lean::inc(x_80); -x_82 = lean::cnstr_get(x_77, 2); -lean::inc(x_82); -lean::dec(x_77); -x_85 = lean::unbox_uint32(x_78); -lean::dec(x_78); -x_87 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__17(x_85, x_0, x_80, x_72); -x_88 = lean::cnstr_get(x_87, 0); +lean::dec(x_75); +x_83 = lean::unbox_uint32(x_76); +lean::dec(x_76); +x_85 = l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__17(x_83, x_0, x_78, x_70); +x_86 = lean::cnstr_get(x_85, 0); +lean::inc(x_86); +x_88 = lean::cnstr_get(x_85, 1); lean::inc(x_88); -x_90 = lean::cnstr_get(x_87, 1); -lean::inc(x_90); -lean::dec(x_87); -x_93 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_82, x_88); -if (lean::is_scalar(x_74)) { - x_94 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_85); +x_91 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_80, x_86); +if (lean::is_scalar(x_72)) { + x_92 = lean::alloc_cnstr(0, 2, 0); } else { - x_94 = x_74; + x_92 = x_72; } -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_90); -return x_94; +lean::cnstr_set(x_92, 0, x_91); +lean::cnstr_set(x_92, 1, x_88); +return x_92; } else { -obj* x_96; uint8 x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; +obj* x_94; uint8 x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; lean::dec(x_0); -x_96 = lean::cnstr_get(x_77, 0); -lean::inc(x_96); -x_98 = lean::cnstr_get_scalar(x_77, sizeof(void*)*1); -if (lean::is_shared(x_77)) { - lean::dec(x_77); - x_99 = lean::box(0); +x_94 = lean::cnstr_get(x_75, 0); +lean::inc(x_94); +x_96 = lean::cnstr_get_scalar(x_75, sizeof(void*)*1); +if (lean::is_shared(x_75)) { + lean::dec(x_75); + x_97 = lean::box(0); } else { - lean::cnstr_release(x_77, 0); - x_99 = x_77; + lean::cnstr_release(x_75, 0); + x_97 = x_75; } -if (lean::is_scalar(x_99)) { - x_100 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_97)) { + x_98 = lean::alloc_cnstr(1, 1, 1); } else { - x_100 = x_99; + x_98 = x_97; } -lean::cnstr_set(x_100, 0, x_96); -lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_98); -x_101 = x_100; -if (lean::is_scalar(x_74)) { - x_102 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_98, 0, x_94); +lean::cnstr_set_scalar(x_98, sizeof(void*)*1, x_96); +x_99 = x_98; +if (lean::is_scalar(x_72)) { + x_100 = lean::alloc_cnstr(0, 2, 0); } else { - x_102 = x_74; + x_100 = x_72; } -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_72); -return x_102; +lean::cnstr_set(x_100, 0, x_99); +lean::cnstr_set(x_100, 1, x_70); +return x_100; } } } @@ -12993,81 +12934,79 @@ lean::dec(x_24); x_37 = lean::string_iterator_has_next(x_15); if (x_37 == 0) { -obj* x_39; obj* x_40; obj* x_41; obj* x_45; obj* x_46; obj* x_48; obj* x_51; obj* x_53; obj* x_54; obj* x_55; +obj* x_39; obj* x_40; obj* x_41; obj* x_44; obj* x_45; obj* x_47; obj* x_50; obj* x_52; obj* x_53; obj* x_54; lean::dec(x_19); x_39 = lean::box(0); x_40 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_41 = l_mjoin___rarg___closed__1; -lean::inc(x_39); lean::inc(x_41); lean::inc(x_40); -x_45 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_40, x_41, x_39, x_39, x_0, x_15, x_26); -x_46 = lean::cnstr_get(x_45, 0); -lean::inc(x_46); -x_48 = lean::cnstr_get(x_45, 1); -lean::inc(x_48); -lean::dec(x_45); -x_51 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_51); -x_53 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_51, x_46); -x_54 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_33, x_53); -x_55 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_54); -x_3 = x_55; -x_4 = x_48; +x_44 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_40, x_41, x_39, x_39, x_0, x_15, x_26); +x_45 = lean::cnstr_get(x_44, 0); +lean::inc(x_45); +x_47 = lean::cnstr_get(x_44, 1); +lean::inc(x_47); +lean::dec(x_44); +x_50 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_50); +x_52 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_50, x_45); +x_53 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_33, x_52); +x_54 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_53); +x_3 = x_54; +x_4 = x_47; goto lbl_5; } else { -uint32 x_56; uint8 x_57; -x_56 = lean::string_iterator_curr(x_15); -x_57 = l_lean_is__id__first(x_56); -if (x_57 == 0) +uint32 x_55; uint8 x_56; +x_55 = lean::string_iterator_curr(x_15); +x_56 = l_lean_is__id__first(x_55); +if (x_56 == 0) { -obj* x_59; obj* x_60; obj* x_62; obj* x_64; obj* x_65; obj* x_66; obj* x_69; obj* x_70; obj* x_72; obj* x_75; obj* x_77; obj* x_78; obj* x_79; +obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_67; obj* x_68; obj* x_70; obj* x_73; obj* x_75; obj* x_76; obj* x_77; lean::dec(x_19); -x_59 = l_char_quote__core(x_56); -x_60 = l_char_has__repr___closed__1; -lean::inc(x_60); -x_62 = lean::string_append(x_60, x_59); -lean::dec(x_59); -x_64 = lean::string_append(x_62, x_60); -x_65 = lean::box(0); -x_66 = l_mjoin___rarg___closed__1; +x_58 = l_char_quote__core(x_55); +x_59 = l_char_has__repr___closed__1; +lean::inc(x_59); +x_61 = lean::string_append(x_59, x_58); +lean::dec(x_58); +x_63 = lean::string_append(x_61, x_59); +x_64 = lean::box(0); +x_65 = l_mjoin___rarg___closed__1; lean::inc(x_65); -lean::inc(x_66); -x_69 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_64, x_66, x_65, x_65, x_0, x_15, x_26); -x_70 = lean::cnstr_get(x_69, 0); +x_67 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_63, x_65, x_64, x_64, x_0, x_15, x_26); +x_68 = lean::cnstr_get(x_67, 0); +lean::inc(x_68); +x_70 = lean::cnstr_get(x_67, 1); lean::inc(x_70); -x_72 = lean::cnstr_get(x_69, 1); -lean::inc(x_72); -lean::dec(x_69); -x_75 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_75); -x_77 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_75, x_70); -x_78 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_33, x_77); -x_79 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_78); -x_3 = x_79; -x_4 = x_72; +lean::dec(x_67); +x_73 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_73); +x_75 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_73, x_68); +x_76 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_33, x_75); +x_77 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_76); +x_3 = x_77; +x_4 = x_70; goto lbl_5; } else { -obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; +obj* x_80; obj* x_81; obj* x_82; obj* x_83; obj* x_84; lean::dec(x_0); lean::dec(x_33); -x_82 = lean::string_iterator_next(x_15); -x_83 = lean::box(0); -x_84 = lean::box_uint32(x_56); +x_80 = lean::string_iterator_next(x_15); +x_81 = lean::box(0); +x_82 = lean::box_uint32(x_55); if (lean::is_scalar(x_19)) { - x_85 = lean::alloc_cnstr(0, 3, 0); + x_83 = lean::alloc_cnstr(0, 3, 0); } else { - x_85 = x_19; + x_83 = x_19; } -lean::cnstr_set(x_85, 0, x_84); -lean::cnstr_set(x_85, 1, x_82); -lean::cnstr_set(x_85, 2, x_83); -x_86 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_85); -x_3 = x_86; +lean::cnstr_set(x_83, 0, x_82); +lean::cnstr_set(x_83, 1, x_80); +lean::cnstr_set(x_83, 2, x_81); +x_84 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_83); +x_3 = x_84; x_4 = x_26; goto lbl_5; } @@ -13075,13 +13014,13 @@ goto lbl_5; } else { -obj* x_91; +obj* x_89; lean::dec(x_19); lean::dec(x_0); lean::dec(x_15); lean::dec(x_33); -x_91 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_24); -x_3 = x_91; +x_89 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_24); +x_3 = x_89; x_4 = x_26; goto lbl_5; } @@ -13089,27 +13028,27 @@ goto lbl_5; } else { -obj* x_93; uint8 x_95; obj* x_96; obj* x_97; obj* x_98; +obj* x_91; uint8 x_93; obj* x_94; obj* x_95; obj* x_96; lean::dec(x_0); -x_93 = lean::cnstr_get(x_10, 0); -lean::inc(x_93); -x_95 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); +x_91 = lean::cnstr_get(x_10, 0); +lean::inc(x_91); +x_93 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); if (lean::is_shared(x_10)) { lean::dec(x_10); - x_96 = lean::box(0); + x_94 = lean::box(0); } else { lean::cnstr_release(x_10, 0); - x_96 = x_10; + x_94 = x_10; } -if (lean::is_scalar(x_96)) { - x_97 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_94)) { + x_95 = lean::alloc_cnstr(1, 1, 1); } else { - x_97 = x_96; + x_95 = x_94; } -lean::cnstr_set(x_97, 0, x_93); -lean::cnstr_set_scalar(x_97, sizeof(void*)*1, x_95); -x_98 = x_97; -x_3 = x_98; +lean::cnstr_set(x_95, 0, x_91); +lean::cnstr_set_scalar(x_95, sizeof(void*)*1, x_93); +x_96 = x_95; +x_3 = x_96; x_4 = x_12; goto lbl_5; } @@ -13117,41 +13056,41 @@ lbl_5: { if (lean::obj_tag(x_3) == 0) { -obj* x_99; obj* x_101; obj* x_102; obj* x_104; obj* x_105; -x_99 = lean::cnstr_get(x_3, 0); -lean::inc(x_99); +obj* x_97; obj* x_99; obj* x_100; obj* x_102; obj* x_103; +x_97 = lean::cnstr_get(x_3, 0); +lean::inc(x_97); if (lean::is_shared(x_3)) { lean::dec(x_3); - x_101 = lean::box(0); + x_99 = lean::box(0); } else { lean::cnstr_release(x_3, 0); lean::cnstr_release(x_3, 1); lean::cnstr_release(x_3, 2); - x_101 = x_3; + x_99 = x_3; } -x_102 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_102); -if (lean::is_scalar(x_101)) { - x_104 = lean::alloc_cnstr(0, 3, 0); +x_100 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_100); +if (lean::is_scalar(x_99)) { + x_102 = lean::alloc_cnstr(0, 3, 0); } else { - x_104 = x_101; + x_102 = x_99; } -lean::cnstr_set(x_104, 0, x_99); -lean::cnstr_set(x_104, 1, x_1); -lean::cnstr_set(x_104, 2, x_102); -x_105 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_105, 0, x_104); -lean::cnstr_set(x_105, 1, x_4); -return x_105; +lean::cnstr_set(x_102, 0, x_97); +lean::cnstr_set(x_102, 1, x_1); +lean::cnstr_set(x_102, 2, x_100); +x_103 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_103, 0, x_102); +lean::cnstr_set(x_103, 1, x_4); +return x_103; } else { -obj* x_107; +obj* x_105; lean::dec(x_1); -x_107 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_107, 0, x_3); -lean::cnstr_set(x_107, 1, x_4); -return x_107; +x_105 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_105, 0, x_3); +lean::cnstr_set(x_105, 1, x_4); +return x_105; } } } @@ -13570,7 +13509,7 @@ lean::inc(x_21); lean::dec(x_18); if (lean::obj_tag(x_19) == 0) { -obj* x_24; obj* x_26; obj* x_28; obj* x_33; obj* x_34; obj* x_37; obj* x_38; obj* x_39; obj* x_41; obj* x_42; obj* x_44; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_53; obj* x_54; +obj* x_24; obj* x_26; obj* x_28; obj* x_33; obj* x_34; obj* x_37; obj* x_38; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_53; x_24 = lean::cnstr_get(x_19, 0); lean::inc(x_24); x_26 = lean::cnstr_get(x_19, 1); @@ -13600,110 +13539,109 @@ x_41 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_41, 0, x_1); lean::cnstr_set(x_41, 1, x_26); x_42 = lean::box(0); -lean::inc(x_42); -x_44 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_44, 0, x_39); -lean::cnstr_set(x_44, 1, x_41); -lean::cnstr_set(x_44, 2, x_24); -lean::cnstr_set(x_44, 3, x_42); -lean::cnstr_set(x_44, 4, x_42); -x_45 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_45, 0, x_44); -x_46 = l_lean_parser_finish__comment__block___closed__2; -lean::inc(x_46); +x_43 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_43, 0, x_39); +lean::cnstr_set(x_43, 1, x_41); +lean::cnstr_set(x_43, 2, x_24); +lean::cnstr_set(x_43, 3, x_42); +lean::cnstr_set(x_43, 4, x_42); +x_44 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_44, 0, x_43); +x_45 = l_lean_parser_finish__comment__block___closed__2; +lean::inc(x_45); if (lean::is_scalar(x_17)) { - x_48 = lean::alloc_cnstr(0, 3, 0); + x_47 = lean::alloc_cnstr(0, 3, 0); } else { - x_48 = x_17; + x_47 = x_17; } -lean::cnstr_set(x_48, 0, x_45); -lean::cnstr_set(x_48, 1, x_26); -lean::cnstr_set(x_48, 2, x_46); -x_49 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_28, x_48); -x_50 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_49); -x_51 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_51); -x_53 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_51, x_50); +lean::cnstr_set(x_47, 0, x_44); +lean::cnstr_set(x_47, 1, x_26); +lean::cnstr_set(x_47, 2, x_45); +x_48 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_28, x_47); +x_49 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_48); +x_50 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_50); +x_52 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_50, x_49); if (lean::is_scalar(x_10)) { - x_54 = lean::alloc_cnstr(0, 2, 0); + x_53 = lean::alloc_cnstr(0, 2, 0); } else { - x_54 = x_10; + x_53 = x_10; } -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_21); -return x_54; +lean::cnstr_set(x_53, 0, x_52); +lean::cnstr_set(x_53, 1, x_21); +return x_53; } else { -obj* x_57; uint8 x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_66; obj* x_67; +obj* x_56; uint8 x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_65; obj* x_66; lean::dec(x_17); lean::dec(x_1); -x_57 = lean::cnstr_get(x_19, 0); -lean::inc(x_57); -x_59 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); +x_56 = lean::cnstr_get(x_19, 0); +lean::inc(x_56); +x_58 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); if (lean::is_shared(x_19)) { lean::dec(x_19); - x_60 = lean::box(0); + x_59 = lean::box(0); } else { lean::cnstr_release(x_19, 0); - x_60 = x_19; + x_59 = x_19; } -if (lean::is_scalar(x_60)) { - x_61 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_59)) { + x_60 = lean::alloc_cnstr(1, 1, 1); } else { - x_61 = x_60; + x_60 = x_59; } -lean::cnstr_set(x_61, 0, x_57); -lean::cnstr_set_scalar(x_61, sizeof(void*)*1, x_59); -x_62 = x_61; -x_63 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_62); -x_64 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_64); -x_66 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_64, x_63); +lean::cnstr_set(x_60, 0, x_56); +lean::cnstr_set_scalar(x_60, sizeof(void*)*1, x_58); +x_61 = x_60; +x_62 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_61); +x_63 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_63); +x_65 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_63, x_62); if (lean::is_scalar(x_10)) { - x_67 = lean::alloc_cnstr(0, 2, 0); + x_66 = lean::alloc_cnstr(0, 2, 0); } else { - x_67 = x_10; + x_66 = x_10; } -lean::cnstr_set(x_67, 0, x_66); -lean::cnstr_set(x_67, 1, x_21); -return x_67; +lean::cnstr_set(x_66, 0, x_65); +lean::cnstr_set(x_66, 1, x_21); +return x_66; } } else { -obj* x_70; uint8 x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_78; obj* x_79; +obj* x_69; uint8 x_71; obj* x_72; obj* x_73; obj* x_74; obj* x_75; obj* x_77; obj* x_78; lean::dec(x_1); lean::dec(x_0); -x_70 = lean::cnstr_get(x_6, 0); -lean::inc(x_70); -x_72 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); +x_69 = lean::cnstr_get(x_6, 0); +lean::inc(x_69); +x_71 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); if (lean::is_shared(x_6)) { lean::dec(x_6); - x_73 = lean::box(0); + x_72 = lean::box(0); } else { lean::cnstr_release(x_6, 0); - x_73 = x_6; + x_72 = x_6; } -if (lean::is_scalar(x_73)) { - x_74 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_72)) { + x_73 = lean::alloc_cnstr(1, 1, 1); } else { - x_74 = x_73; + x_73 = x_72; } -lean::cnstr_set(x_74, 0, x_70); -lean::cnstr_set_scalar(x_74, sizeof(void*)*1, x_72); -x_75 = x_74; -x_76 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_76); -x_78 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_76, x_75); +lean::cnstr_set(x_73, 0, x_69); +lean::cnstr_set_scalar(x_73, sizeof(void*)*1, x_71); +x_74 = x_73; +x_75 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_75); +x_77 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_75, x_74); if (lean::is_scalar(x_10)) { - x_79 = lean::alloc_cnstr(0, 2, 0); + x_78 = lean::alloc_cnstr(0, 2, 0); } else { - x_79 = x_10; + x_78 = x_10; } -lean::cnstr_set(x_79, 0, x_78); -lean::cnstr_set(x_79, 1, x_8); -return x_79; +lean::cnstr_set(x_78, 0, x_77); +lean::cnstr_set(x_78, 1, x_8); +return x_78; } } } @@ -14381,103 +14319,100 @@ obj* x_3; obj* x_4; uint8 x_6; x_6 = lean::string_iterator_has_next(x_1); if (x_6 == 0) { -obj* x_7; obj* x_8; obj* x_9; obj* x_14; obj* x_15; obj* x_17; obj* x_20; obj* x_22; +obj* x_7; obj* x_8; obj* x_9; obj* x_13; obj* x_14; obj* x_16; obj* x_19; obj* x_21; x_7 = lean::box(0); x_8 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_9 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_7); lean::inc(x_9); lean::inc(x_8); -x_14 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_8, x_9, x_7, x_7, x_0, x_1, x_2); -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_17 = lean::cnstr_get(x_14, 1); -lean::inc(x_17); -lean::dec(x_14); -x_20 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_20); -x_22 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_20, x_15); -x_3 = x_22; -x_4 = x_17; +x_13 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_8, x_9, x_7, x_7, x_0, x_1, x_2); +x_14 = lean::cnstr_get(x_13, 0); +lean::inc(x_14); +x_16 = lean::cnstr_get(x_13, 1); +lean::inc(x_16); +lean::dec(x_13); +x_19 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_19); +x_21 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_14); +x_3 = x_21; +x_4 = x_16; goto lbl_5; } else { -uint32 x_23; uint32 x_24; uint8 x_25; -x_23 = 48; -x_24 = lean::string_iterator_curr(x_1); -x_25 = x_23 <= x_24; -if (x_25 == 0) +uint32 x_22; uint32 x_23; uint8 x_24; +x_22 = 48; +x_23 = lean::string_iterator_curr(x_1); +x_24 = x_22 <= x_23; +if (x_24 == 0) { -obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_37; obj* x_38; obj* x_40; obj* x_43; obj* x_45; -x_26 = l_char_quote__core(x_24); -x_27 = l_char_has__repr___closed__1; -lean::inc(x_27); -x_29 = lean::string_append(x_27, x_26); -lean::dec(x_26); -x_31 = lean::string_append(x_29, x_27); -x_32 = lean::box(0); -x_33 = l_mjoin___rarg___closed__1; +obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_35; obj* x_36; obj* x_38; obj* x_41; obj* x_43; +x_25 = l_char_quote__core(x_23); +x_26 = l_char_has__repr___closed__1; +lean::inc(x_26); +x_28 = lean::string_append(x_26, x_25); +lean::dec(x_25); +x_30 = lean::string_append(x_28, x_26); +x_31 = lean::box(0); +x_32 = l_mjoin___rarg___closed__1; lean::inc(x_0); lean::inc(x_32); -lean::inc(x_33); -x_37 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_31, x_33, x_32, x_32, x_0, x_1, x_2); -x_38 = lean::cnstr_get(x_37, 0); +x_35 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_30, x_32, x_31, x_31, x_0, x_1, x_2); +x_36 = lean::cnstr_get(x_35, 0); +lean::inc(x_36); +x_38 = lean::cnstr_get(x_35, 1); lean::inc(x_38); -x_40 = lean::cnstr_get(x_37, 1); -lean::inc(x_40); -lean::dec(x_37); -x_43 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_43); -x_45 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_43, x_38); -x_3 = x_45; -x_4 = x_40; +lean::dec(x_35); +x_41 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_41); +x_43 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_41, x_36); +x_3 = x_43; +x_4 = x_38; goto lbl_5; } else { -uint32 x_46; uint8 x_47; -x_46 = 56; -x_47 = x_24 < x_46; -if (x_47 == 0) +uint32 x_44; uint8 x_45; +x_44 = 56; +x_45 = x_23 < x_44; +if (x_45 == 0) { -obj* x_48; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_59; obj* x_60; obj* x_62; obj* x_65; obj* x_67; -x_48 = l_char_quote__core(x_24); -x_49 = l_char_has__repr___closed__1; -lean::inc(x_49); -x_51 = lean::string_append(x_49, x_48); -lean::dec(x_48); -x_53 = lean::string_append(x_51, x_49); -x_54 = lean::box(0); -x_55 = l_mjoin___rarg___closed__1; +obj* x_46; obj* x_47; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_56; obj* x_57; obj* x_59; obj* x_62; obj* x_64; +x_46 = l_char_quote__core(x_23); +x_47 = l_char_has__repr___closed__1; +lean::inc(x_47); +x_49 = lean::string_append(x_47, x_46); +lean::dec(x_46); +x_51 = lean::string_append(x_49, x_47); +x_52 = lean::box(0); +x_53 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_54); -lean::inc(x_55); -x_59 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_53, x_55, x_54, x_54, x_0, x_1, x_2); -x_60 = lean::cnstr_get(x_59, 0); -lean::inc(x_60); -x_62 = lean::cnstr_get(x_59, 1); +lean::inc(x_53); +x_56 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_51, x_53, x_52, x_52, x_0, x_1, x_2); +x_57 = lean::cnstr_get(x_56, 0); +lean::inc(x_57); +x_59 = lean::cnstr_get(x_56, 1); +lean::inc(x_59); +lean::dec(x_56); +x_62 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_62); -lean::dec(x_59); -x_65 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_65); -x_67 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_65, x_60); -x_3 = x_67; -x_4 = x_62; +x_64 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_62, x_57); +x_3 = x_64; +x_4 = x_59; goto lbl_5; } else { -obj* x_68; obj* x_69; obj* x_70; obj* x_71; -x_68 = lean::string_iterator_next(x_1); -x_69 = lean::box(0); -x_70 = lean::box_uint32(x_24); -x_71 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_71, 0, x_70); -lean::cnstr_set(x_71, 1, x_68); -lean::cnstr_set(x_71, 2, x_69); -x_3 = x_71; +obj* x_65; obj* x_66; obj* x_67; obj* x_68; +x_65 = lean::string_iterator_next(x_1); +x_66 = lean::box(0); +x_67 = lean::box_uint32(x_23); +x_68 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_68, 0, x_67); +lean::cnstr_set(x_68, 1, x_65); +lean::cnstr_set(x_68, 2, x_66); +x_3 = x_68; x_4 = x_2; goto lbl_5; } @@ -14487,65 +14422,65 @@ lbl_5: { if (lean::obj_tag(x_3) == 0) { -obj* x_72; obj* x_74; obj* x_76; uint32 x_79; obj* x_81; obj* x_82; obj* x_84; obj* x_86; obj* x_87; obj* x_88; -x_72 = lean::cnstr_get(x_3, 0); -lean::inc(x_72); -x_74 = lean::cnstr_get(x_3, 1); -lean::inc(x_74); -x_76 = lean::cnstr_get(x_3, 2); -lean::inc(x_76); +obj* x_69; obj* x_71; obj* x_73; uint32 x_76; obj* x_78; obj* x_79; obj* x_81; obj* x_83; obj* x_84; obj* x_85; +x_69 = lean::cnstr_get(x_3, 0); +lean::inc(x_69); +x_71 = lean::cnstr_get(x_3, 1); +lean::inc(x_71); +x_73 = lean::cnstr_get(x_3, 2); +lean::inc(x_73); lean::dec(x_3); -x_79 = lean::unbox_uint32(x_72); -lean::dec(x_72); -x_81 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_parse__oct__lit___spec__2(x_79, x_0, x_74, x_4); -x_82 = lean::cnstr_get(x_81, 0); -lean::inc(x_82); -x_84 = lean::cnstr_get(x_81, 1); -lean::inc(x_84); -if (lean::is_shared(x_81)) { - lean::dec(x_81); - x_86 = lean::box(0); +x_76 = lean::unbox_uint32(x_69); +lean::dec(x_69); +x_78 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_parse__oct__lit___spec__2(x_76, x_0, x_71, x_4); +x_79 = lean::cnstr_get(x_78, 0); +lean::inc(x_79); +x_81 = lean::cnstr_get(x_78, 1); +lean::inc(x_81); +if (lean::is_shared(x_78)) { + lean::dec(x_78); + x_83 = lean::box(0); } else { - lean::cnstr_release(x_81, 0); - lean::cnstr_release(x_81, 1); - x_86 = x_81; + lean::cnstr_release(x_78, 0); + lean::cnstr_release(x_78, 1); + x_83 = x_78; } -x_87 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_76, x_82); -if (lean::is_scalar(x_86)) { - x_88 = lean::alloc_cnstr(0, 2, 0); +x_84 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_73, x_79); +if (lean::is_scalar(x_83)) { + x_85 = lean::alloc_cnstr(0, 2, 0); } else { - x_88 = x_86; + x_85 = x_83; } -lean::cnstr_set(x_88, 0, x_87); -lean::cnstr_set(x_88, 1, x_84); -return x_88; +lean::cnstr_set(x_85, 0, x_84); +lean::cnstr_set(x_85, 1, x_81); +return x_85; } else { -obj* x_90; uint8 x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; +obj* x_87; uint8 x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; lean::dec(x_0); -x_90 = lean::cnstr_get(x_3, 0); -lean::inc(x_90); -x_92 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); +x_87 = lean::cnstr_get(x_3, 0); +lean::inc(x_87); +x_89 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); if (lean::is_shared(x_3)) { lean::dec(x_3); - x_93 = lean::box(0); + x_90 = lean::box(0); } else { lean::cnstr_release(x_3, 0); - x_93 = x_3; + x_90 = x_3; } -if (lean::is_scalar(x_93)) { - x_94 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_90)) { + x_91 = lean::alloc_cnstr(1, 1, 1); } else { - x_94 = x_93; + x_91 = x_90; } -lean::cnstr_set(x_94, 0, x_90); -lean::cnstr_set_scalar(x_94, sizeof(void*)*1, x_92); -x_95 = x_94; -x_96 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_96, 0, x_95); -lean::cnstr_set(x_96, 1, x_4); -return x_96; +lean::cnstr_set(x_91, 0, x_87); +lean::cnstr_set_scalar(x_91, sizeof(void*)*1, x_89); +x_92 = x_91; +x_93 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_93, 0, x_92); +lean::cnstr_set(x_93, 1, x_4); +return x_93; } } } @@ -14824,118 +14759,115 @@ obj* x_3; obj* x_4; uint8 x_6; x_6 = lean::string_iterator_has_next(x_1); if (x_6 == 0) { -obj* x_7; obj* x_8; obj* x_9; obj* x_14; obj* x_15; obj* x_17; obj* x_20; obj* x_22; +obj* x_7; obj* x_8; obj* x_9; obj* x_13; obj* x_14; obj* x_16; obj* x_19; obj* x_21; x_7 = lean::box(0); x_8 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_9 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_7); lean::inc(x_9); lean::inc(x_8); -x_14 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_8, x_9, x_7, x_7, x_0, x_1, x_2); -x_15 = lean::cnstr_get(x_14, 0); -lean::inc(x_15); -x_17 = lean::cnstr_get(x_14, 1); -lean::inc(x_17); -lean::dec(x_14); -x_20 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_20); -x_22 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_20, x_15); -x_3 = x_22; -x_4 = x_17; +x_13 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_8, x_9, x_7, x_7, x_0, x_1, x_2); +x_14 = lean::cnstr_get(x_13, 0); +lean::inc(x_14); +x_16 = lean::cnstr_get(x_13, 1); +lean::inc(x_16); +lean::dec(x_13); +x_19 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_19); +x_21 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_14); +x_3 = x_21; +x_4 = x_16; goto lbl_5; } else { -uint32 x_23; uint8 x_24; -x_23 = lean::string_iterator_curr(x_1); -x_24 = l_char_is__digit(x_23); +uint32 x_22; uint8 x_23; +x_22 = lean::string_iterator_curr(x_1); +x_23 = l_char_is__digit(x_22); +if (x_23 == 0) +{ +uint8 x_24; +x_24 = l_char_is__alpha(x_22); if (x_24 == 0) { -uint8 x_25; -x_25 = l_char_is__alpha(x_23); -if (x_25 == 0) -{ -obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_37; obj* x_38; obj* x_40; obj* x_43; obj* x_45; -x_26 = l_char_quote__core(x_23); -x_27 = l_char_has__repr___closed__1; -lean::inc(x_27); -x_29 = lean::string_append(x_27, x_26); -lean::dec(x_26); -x_31 = lean::string_append(x_29, x_27); -x_32 = lean::box(0); -x_33 = l_mjoin___rarg___closed__1; +obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_35; obj* x_36; obj* x_38; obj* x_41; obj* x_43; +x_25 = l_char_quote__core(x_22); +x_26 = l_char_has__repr___closed__1; +lean::inc(x_26); +x_28 = lean::string_append(x_26, x_25); +lean::dec(x_25); +x_30 = lean::string_append(x_28, x_26); +x_31 = lean::box(0); +x_32 = l_mjoin___rarg___closed__1; lean::inc(x_0); lean::inc(x_32); -lean::inc(x_33); -x_37 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_31, x_33, x_32, x_32, x_0, x_1, x_2); -x_38 = lean::cnstr_get(x_37, 0); +x_35 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_30, x_32, x_31, x_31, x_0, x_1, x_2); +x_36 = lean::cnstr_get(x_35, 0); +lean::inc(x_36); +x_38 = lean::cnstr_get(x_35, 1); lean::inc(x_38); -x_40 = lean::cnstr_get(x_37, 1); -lean::inc(x_40); -lean::dec(x_37); -x_43 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_43); -x_45 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_43, x_38); -x_3 = x_45; -x_4 = x_40; +lean::dec(x_35); +x_41 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_41); +x_43 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_41, x_36); +x_3 = x_43; +x_4 = x_38; goto lbl_5; } else { -obj* x_46; obj* x_47; obj* x_48; obj* x_49; -x_46 = lean::string_iterator_next(x_1); -x_47 = lean::box(0); -x_48 = lean::box_uint32(x_23); -x_49 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_46); -lean::cnstr_set(x_49, 2, x_47); -x_3 = x_49; +obj* x_44; obj* x_45; obj* x_46; obj* x_47; +x_44 = lean::string_iterator_next(x_1); +x_45 = lean::box(0); +x_46 = lean::box_uint32(x_22); +x_47 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_47, 0, x_46); +lean::cnstr_set(x_47, 1, x_44); +lean::cnstr_set(x_47, 2, x_45); +x_3 = x_47; x_4 = x_2; goto lbl_5; } } else { -if (x_24 == 0) +if (x_23 == 0) { -obj* x_50; obj* x_51; obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_61; obj* x_62; obj* x_64; obj* x_67; obj* x_69; -x_50 = l_char_quote__core(x_23); -x_51 = l_char_has__repr___closed__1; -lean::inc(x_51); -x_53 = lean::string_append(x_51, x_50); -lean::dec(x_50); -x_55 = lean::string_append(x_53, x_51); -x_56 = lean::box(0); -x_57 = l_mjoin___rarg___closed__1; +obj* x_48; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_55; obj* x_58; obj* x_59; obj* x_61; obj* x_64; obj* x_66; +x_48 = l_char_quote__core(x_22); +x_49 = l_char_has__repr___closed__1; +lean::inc(x_49); +x_51 = lean::string_append(x_49, x_48); +lean::dec(x_48); +x_53 = lean::string_append(x_51, x_49); +x_54 = lean::box(0); +x_55 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_56); -lean::inc(x_57); -x_61 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_55, x_57, x_56, x_56, x_0, x_1, x_2); -x_62 = lean::cnstr_get(x_61, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_61, 1); +lean::inc(x_55); +x_58 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_53, x_55, x_54, x_54, x_0, x_1, x_2); +x_59 = lean::cnstr_get(x_58, 0); +lean::inc(x_59); +x_61 = lean::cnstr_get(x_58, 1); +lean::inc(x_61); +lean::dec(x_58); +x_64 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_64); -lean::dec(x_61); -x_67 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_67); -x_69 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_67, x_62); -x_3 = x_69; -x_4 = x_64; +x_66 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_64, x_59); +x_3 = x_66; +x_4 = x_61; goto lbl_5; } else { -obj* x_70; obj* x_71; obj* x_72; obj* x_73; -x_70 = lean::string_iterator_next(x_1); -x_71 = lean::box(0); -x_72 = lean::box_uint32(x_23); -x_73 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_73, 0, x_72); -lean::cnstr_set(x_73, 1, x_70); -lean::cnstr_set(x_73, 2, x_71); -x_3 = x_73; +obj* x_67; obj* x_68; obj* x_69; obj* x_70; +x_67 = lean::string_iterator_next(x_1); +x_68 = lean::box(0); +x_69 = lean::box_uint32(x_22); +x_70 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_70, 0, x_69); +lean::cnstr_set(x_70, 1, x_67); +lean::cnstr_set(x_70, 2, x_68); +x_3 = x_70; x_4 = x_2; goto lbl_5; } @@ -14945,65 +14877,65 @@ lbl_5: { if (lean::obj_tag(x_3) == 0) { -obj* x_74; obj* x_76; obj* x_78; uint32 x_81; obj* x_83; obj* x_84; obj* x_86; obj* x_88; obj* x_89; obj* x_90; -x_74 = lean::cnstr_get(x_3, 0); -lean::inc(x_74); -x_76 = lean::cnstr_get(x_3, 1); -lean::inc(x_76); -x_78 = lean::cnstr_get(x_3, 2); -lean::inc(x_78); +obj* x_71; obj* x_73; obj* x_75; uint32 x_78; obj* x_80; obj* x_81; obj* x_83; obj* x_85; obj* x_86; obj* x_87; +x_71 = lean::cnstr_get(x_3, 0); +lean::inc(x_71); +x_73 = lean::cnstr_get(x_3, 1); +lean::inc(x_73); +x_75 = lean::cnstr_get(x_3, 2); +lean::inc(x_75); lean::dec(x_3); -x_81 = lean::unbox_uint32(x_74); -lean::dec(x_74); -x_83 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_parse__hex__lit___spec__2(x_81, x_0, x_76, x_4); -x_84 = lean::cnstr_get(x_83, 0); -lean::inc(x_84); -x_86 = lean::cnstr_get(x_83, 1); -lean::inc(x_86); -if (lean::is_shared(x_83)) { - lean::dec(x_83); - x_88 = lean::box(0); +x_78 = lean::unbox_uint32(x_71); +lean::dec(x_71); +x_80 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_parse__hex__lit___spec__2(x_78, x_0, x_73, x_4); +x_81 = lean::cnstr_get(x_80, 0); +lean::inc(x_81); +x_83 = lean::cnstr_get(x_80, 1); +lean::inc(x_83); +if (lean::is_shared(x_80)) { + lean::dec(x_80); + x_85 = lean::box(0); } else { - lean::cnstr_release(x_83, 0); - lean::cnstr_release(x_83, 1); - x_88 = x_83; + lean::cnstr_release(x_80, 0); + lean::cnstr_release(x_80, 1); + x_85 = x_80; } -x_89 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_78, x_84); -if (lean::is_scalar(x_88)) { - x_90 = lean::alloc_cnstr(0, 2, 0); +x_86 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_75, x_81); +if (lean::is_scalar(x_85)) { + x_87 = lean::alloc_cnstr(0, 2, 0); } else { - x_90 = x_88; + x_87 = x_85; } -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_86); -return x_90; +lean::cnstr_set(x_87, 0, x_86); +lean::cnstr_set(x_87, 1, x_83); +return x_87; } else { -obj* x_92; uint8 x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; +obj* x_89; uint8 x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; lean::dec(x_0); -x_92 = lean::cnstr_get(x_3, 0); -lean::inc(x_92); -x_94 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); +x_89 = lean::cnstr_get(x_3, 0); +lean::inc(x_89); +x_91 = lean::cnstr_get_scalar(x_3, sizeof(void*)*1); if (lean::is_shared(x_3)) { lean::dec(x_3); - x_95 = lean::box(0); + x_92 = lean::box(0); } else { lean::cnstr_release(x_3, 0); - x_95 = x_3; + x_92 = x_3; } -if (lean::is_scalar(x_95)) { - x_96 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_92)) { + x_93 = lean::alloc_cnstr(1, 1, 1); } else { - x_96 = x_95; + x_93 = x_92; } -lean::cnstr_set(x_96, 0, x_92); -lean::cnstr_set_scalar(x_96, sizeof(void*)*1, x_94); -x_97 = x_96; -x_98 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_98, 0, x_97); -lean::cnstr_set(x_98, 1, x_4); -return x_98; +lean::cnstr_set(x_93, 0, x_89); +lean::cnstr_set_scalar(x_93, sizeof(void*)*1, x_91); +x_94 = x_93; +x_95 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_95, 0, x_94); +lean::cnstr_set(x_95, 1, x_4); +return x_95; } } } @@ -15511,50 +15443,49 @@ lean::inc(x_48); lean::dec(x_34); x_51 = lean::box(0); x_52 = lean_name_dec_eq(x_46, x_51); -lean::dec(x_51); lean::dec(x_46); if (x_52 == 0) { -obj* x_57; +obj* x_56; lean::dec(x_36); lean::dec(x_48); -x_57 = l_lean_parser_number_has__view_x_27___lambda__1___closed__5; -lean::inc(x_57); -return x_57; +x_56 = l_lean_parser_number_has__view_x_27___lambda__1___closed__5; +lean::inc(x_56); +return x_56; } else { if (lean::obj_tag(x_36) == 0) { -obj* x_60; +obj* x_59; lean::dec(x_48); -x_60 = l_lean_parser_number_has__view_x_27___lambda__1___closed__5; -lean::inc(x_60); -return x_60; +x_59 = l_lean_parser_number_has__view_x_27___lambda__1___closed__5; +lean::inc(x_59); +return x_59; } else { -obj* x_62; obj* x_64; -x_62 = lean::cnstr_get(x_36, 0); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_36, 1); -lean::inc(x_64); +obj* x_61; obj* x_63; +x_61 = lean::cnstr_get(x_36, 0); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_36, 1); +lean::inc(x_63); lean::dec(x_36); -if (lean::obj_tag(x_64) == 0) +if (lean::obj_tag(x_63) == 0) { -x_1 = x_62; +x_1 = x_61; x_2 = x_48; goto lbl_3; } else { -obj* x_70; -lean::dec(x_62); -lean::dec(x_64); +obj* x_69; +lean::dec(x_61); +lean::dec(x_63); lean::dec(x_48); -x_70 = l_lean_parser_number_has__view_x_27___lambda__1___closed__5; -lean::inc(x_70); -return x_70; +x_69 = l_lean_parser_number_has__view_x_27___lambda__1___closed__5; +lean::inc(x_69); +return x_69; } } } @@ -15564,64 +15495,64 @@ return x_70; } else { -obj* x_74; +obj* x_73; lean::dec(x_23); lean::dec(x_25); -x_74 = l_lean_parser_number_has__view_x_27___lambda__1___closed__5; -lean::inc(x_74); -return x_74; +x_73 = l_lean_parser_number_has__view_x_27___lambda__1___closed__5; +lean::inc(x_73); +return x_73; } } } } lbl_3: { -obj* x_76; uint8 x_77; -x_76 = lean::mk_nat_obj(0u); -x_77 = lean::nat_dec_eq(x_2, x_76); -lean::dec(x_76); -if (x_77 == 0) +obj* x_75; uint8 x_76; +x_75 = lean::mk_nat_obj(0u); +x_76 = lean::nat_dec_eq(x_2, x_75); +lean::dec(x_75); +if (x_76 == 0) { -obj* x_79; uint8 x_80; -x_79 = lean::mk_nat_obj(1u); -x_80 = lean::nat_dec_eq(x_2, x_79); -lean::dec(x_79); -if (x_80 == 0) +obj* x_78; uint8 x_79; +x_78 = lean::mk_nat_obj(1u); +x_79 = lean::nat_dec_eq(x_2, x_78); +lean::dec(x_78); +if (x_79 == 0) { -obj* x_82; uint8 x_83; -x_82 = lean::mk_nat_obj(2u); -x_83 = lean::nat_dec_eq(x_2, x_82); -lean::dec(x_82); +obj* x_81; uint8 x_82; +x_81 = lean::mk_nat_obj(2u); +x_82 = lean::nat_dec_eq(x_2, x_81); +lean::dec(x_81); lean::dec(x_2); -if (x_83 == 0) +if (x_82 == 0) { switch (lean::obj_tag(x_1)) { case 0: { -obj* x_86; obj* x_89; obj* x_90; -x_86 = lean::cnstr_get(x_1, 0); -lean::inc(x_86); +obj* x_85; obj* x_88; obj* x_89; +x_85 = lean::cnstr_get(x_1, 0); +lean::inc(x_85); lean::dec(x_1); -x_89 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_89, 0, x_86); -x_90 = lean::alloc_cnstr(3, 1, 0); -lean::cnstr_set(x_90, 0, x_89); +x_88 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_88, 0, x_85); +x_89 = lean::alloc_cnstr(3, 1, 0); +lean::cnstr_set(x_89, 0, x_88); +return x_89; +} +case 3: +{ +obj* x_90; +x_90 = l_lean_parser_number_has__view_x_27___lambda__1___closed__1; +lean::inc(x_90); return x_90; } -case 3: -{ -obj* x_91; -x_91 = l_lean_parser_number_has__view_x_27___lambda__1___closed__1; -lean::inc(x_91); -return x_91; -} default: { -obj* x_94; +obj* x_93; lean::dec(x_1); -x_94 = l_lean_parser_number_has__view_x_27___lambda__1___closed__1; -lean::inc(x_94); -return x_94; +x_93 = l_lean_parser_number_has__view_x_27___lambda__1___closed__1; +lean::inc(x_93); +return x_93; } } } @@ -15630,30 +15561,30 @@ else switch (lean::obj_tag(x_1)) { case 0: { -obj* x_96; obj* x_99; obj* x_100; -x_96 = lean::cnstr_get(x_1, 0); -lean::inc(x_96); +obj* x_95; obj* x_98; obj* x_99; +x_95 = lean::cnstr_get(x_1, 0); +lean::inc(x_95); lean::dec(x_1); -x_99 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_99, 0, x_96); -x_100 = lean::alloc_cnstr(2, 1, 0); -lean::cnstr_set(x_100, 0, x_99); +x_98 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_98, 0, x_95); +x_99 = lean::alloc_cnstr(2, 1, 0); +lean::cnstr_set(x_99, 0, x_98); +return x_99; +} +case 3: +{ +obj* x_100; +x_100 = l_lean_parser_number_has__view_x_27___lambda__1___closed__2; +lean::inc(x_100); return x_100; } -case 3: -{ -obj* x_101; -x_101 = l_lean_parser_number_has__view_x_27___lambda__1___closed__2; -lean::inc(x_101); -return x_101; -} default: { -obj* x_104; +obj* x_103; lean::dec(x_1); -x_104 = l_lean_parser_number_has__view_x_27___lambda__1___closed__2; -lean::inc(x_104); -return x_104; +x_103 = l_lean_parser_number_has__view_x_27___lambda__1___closed__2; +lean::inc(x_103); +return x_103; } } } @@ -15664,30 +15595,30 @@ lean::dec(x_2); switch (lean::obj_tag(x_1)) { case 0: { -obj* x_107; obj* x_110; obj* x_111; -x_107 = lean::cnstr_get(x_1, 0); -lean::inc(x_107); +obj* x_106; obj* x_109; obj* x_110; +x_106 = lean::cnstr_get(x_1, 0); +lean::inc(x_106); lean::dec(x_1); +x_109 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_109, 0, x_106); x_110 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_110, 0, x_107); -x_111 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_111, 0, x_110); +lean::cnstr_set(x_110, 0, x_109); +return x_110; +} +case 3: +{ +obj* x_111; +x_111 = l_lean_parser_number_has__view_x_27___lambda__1___closed__3; +lean::inc(x_111); return x_111; } -case 3: -{ -obj* x_112; -x_112 = l_lean_parser_number_has__view_x_27___lambda__1___closed__3; -lean::inc(x_112); -return x_112; -} default: { -obj* x_115; +obj* x_114; lean::dec(x_1); -x_115 = l_lean_parser_number_has__view_x_27___lambda__1___closed__3; -lean::inc(x_115); -return x_115; +x_114 = l_lean_parser_number_has__view_x_27___lambda__1___closed__3; +lean::inc(x_114); +return x_114; } } } @@ -15698,30 +15629,30 @@ lean::dec(x_2); switch (lean::obj_tag(x_1)) { case 0: { -obj* x_118; obj* x_121; obj* x_122; -x_118 = lean::cnstr_get(x_1, 0); -lean::inc(x_118); +obj* x_117; obj* x_120; obj* x_121; +x_117 = lean::cnstr_get(x_1, 0); +lean::inc(x_117); lean::dec(x_1); -x_121 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_121, 0, x_118); -x_122 = lean::alloc_cnstr(0, 1, 0); -lean::cnstr_set(x_122, 0, x_121); -return x_122; +x_120 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_120, 0, x_117); +x_121 = lean::alloc_cnstr(0, 1, 0); +lean::cnstr_set(x_121, 0, x_120); +return x_121; } case 3: { -obj* x_123; -x_123 = l_lean_parser_number_has__view_x_27___lambda__1___closed__4; -lean::inc(x_123); -return x_123; +obj* x_122; +x_122 = l_lean_parser_number_has__view_x_27___lambda__1___closed__4; +lean::inc(x_122); +return x_122; } default: { -obj* x_126; +obj* x_125; lean::dec(x_1); -x_126 = l_lean_parser_number_has__view_x_27___lambda__1___closed__4; -lean::inc(x_126); -return x_126; +x_125 = l_lean_parser_number_has__view_x_27___lambda__1___closed__4; +lean::inc(x_125); +return x_125; } } } @@ -15756,7 +15687,7 @@ x_1 = lean::box(0); switch (lean::obj_tag(x_0)) { case 0: { -obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_18; +obj* x_2; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; x_2 = lean::cnstr_get(x_0, 0); lean::inc(x_2); lean::dec(x_0); @@ -15765,98 +15696,94 @@ lean::inc(x_5); x_7 = l_option_map___rarg(x_5, x_2); x_8 = lean::box(3); x_9 = l_option_get__or__else___main___rarg(x_7, x_8); -lean::inc(x_1); -x_11 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_11, 0, x_9); -lean::cnstr_set(x_11, 1, x_1); -x_12 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -lean::inc(x_12); -x_14 = l_lean_parser_syntax_mk__node(x_12, x_11); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_14); -lean::cnstr_set(x_15, 1, x_1); -x_16 = l_lean_parser_number; -lean::inc(x_16); -x_18 = l_lean_parser_syntax_mk__node(x_16, x_15); -return x_18; +x_10 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_1); +x_11 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; +lean::inc(x_11); +x_13 = l_lean_parser_syntax_mk__node(x_11, x_10); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_1); +x_15 = l_lean_parser_number; +lean::inc(x_15); +x_17 = l_lean_parser_syntax_mk__node(x_15, x_14); +return x_17; } case 1: { -obj* x_19; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_35; -x_19 = lean::cnstr_get(x_0, 0); -lean::inc(x_19); +obj* x_18; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_33; +x_18 = lean::cnstr_get(x_0, 0); +lean::inc(x_18); lean::dec(x_0); -x_22 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_22); -x_24 = l_option_map___rarg(x_22, x_19); -x_25 = lean::box(3); -x_26 = l_option_get__or__else___main___rarg(x_24, x_25); -lean::inc(x_1); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_26); -lean::cnstr_set(x_28, 1, x_1); -x_29 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; -lean::inc(x_29); -x_31 = l_lean_parser_syntax_mk__node(x_29, x_28); -x_32 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_1); -x_33 = l_lean_parser_number; -lean::inc(x_33); -x_35 = l_lean_parser_syntax_mk__node(x_33, x_32); -return x_35; +x_21 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_21); +x_23 = l_option_map___rarg(x_21, x_18); +x_24 = lean::box(3); +x_25 = l_option_get__or__else___main___rarg(x_23, x_24); +x_26 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_1); +x_27 = l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; +lean::inc(x_27); +x_29 = l_lean_parser_syntax_mk__node(x_27, x_26); +x_30 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_1); +x_31 = l_lean_parser_number; +lean::inc(x_31); +x_33 = l_lean_parser_syntax_mk__node(x_31, x_30); +return x_33; } case 2: { -obj* x_36; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_52; -x_36 = lean::cnstr_get(x_0, 0); -lean::inc(x_36); +obj* x_34; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_47; obj* x_49; +x_34 = lean::cnstr_get(x_0, 0); +lean::inc(x_34); lean::dec(x_0); -x_39 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_39); -x_41 = l_option_map___rarg(x_39, x_36); -x_42 = lean::box(3); -x_43 = l_option_get__or__else___main___rarg(x_41, x_42); -lean::inc(x_1); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_1); -x_46 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; -lean::inc(x_46); -x_48 = l_lean_parser_syntax_mk__node(x_46, x_45); -x_49 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_1); -x_50 = l_lean_parser_number; -lean::inc(x_50); -x_52 = l_lean_parser_syntax_mk__node(x_50, x_49); -return x_52; +x_37 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_37); +x_39 = l_option_map___rarg(x_37, x_34); +x_40 = lean::box(3); +x_41 = l_option_get__or__else___main___rarg(x_39, x_40); +x_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_41); +lean::cnstr_set(x_42, 1, x_1); +x_43 = l_lean_parser_number_has__view_x_27___lambda__2___closed__1; +lean::inc(x_43); +x_45 = l_lean_parser_syntax_mk__node(x_43, x_42); +x_46 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_46, 0, x_45); +lean::cnstr_set(x_46, 1, x_1); +x_47 = l_lean_parser_number; +lean::inc(x_47); +x_49 = l_lean_parser_syntax_mk__node(x_47, x_46); +return x_49; } default: { -obj* x_53; obj* x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_62; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_69; -x_53 = lean::cnstr_get(x_0, 0); -lean::inc(x_53); +obj* x_50; obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_65; +x_50 = lean::cnstr_get(x_0, 0); +lean::inc(x_50); lean::dec(x_0); -x_56 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; -lean::inc(x_56); -x_58 = l_option_map___rarg(x_56, x_53); -x_59 = lean::box(3); -x_60 = l_option_get__or__else___main___rarg(x_58, x_59); -lean::inc(x_1); +x_53 = l_lean_parser_raw_view___rarg___lambda__3___closed__1; +lean::inc(x_53); +x_55 = l_option_map___rarg(x_53, x_50); +x_56 = lean::box(3); +x_57 = l_option_get__or__else___main___rarg(x_55, x_56); +x_58 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_58, 0, x_57); +lean::cnstr_set(x_58, 1, x_1); +x_59 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +lean::inc(x_59); +x_61 = l_lean_parser_syntax_mk__node(x_59, x_58); x_62 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_62, 0, x_60); +lean::cnstr_set(x_62, 0, x_61); lean::cnstr_set(x_62, 1, x_1); -x_63 = l_lean_parser_number_has__view_x_27___lambda__2___closed__2; +x_63 = l_lean_parser_number; lean::inc(x_63); x_65 = l_lean_parser_syntax_mk__node(x_63, x_62); -x_66 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_1); -x_67 = l_lean_parser_number; -lean::inc(x_67); -x_69 = l_lean_parser_syntax_mk__node(x_67, x_66); -return x_69; +return x_65; } } } @@ -16104,213 +16031,211 @@ uint8 x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { -obj* x_4; obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; +obj* x_4; obj* x_5; obj* x_6; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; x_4 = lean::box(0); x_5 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_6 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); -x_11 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -if (lean::is_shared(x_11)) { - lean::dec(x_11); - x_16 = lean::box(0); +x_10 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); +x_11 = lean::cnstr_get(x_10, 0); +lean::inc(x_11); +x_13 = lean::cnstr_get(x_10, 1); +lean::inc(x_13); +if (lean::is_shared(x_10)) { + lean::dec(x_10); + x_15 = lean::box(0); } else { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - x_16 = x_11; + lean::cnstr_release(x_10, 0); + lean::cnstr_release(x_10, 1); + x_15 = x_10; } -x_17 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_17); -x_19 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_12); -if (lean::obj_tag(x_19) == 0) +x_16 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_16); +x_18 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_11); +if (lean::obj_tag(x_18) == 0) { -obj* x_20; obj* x_22; obj* x_24; uint32 x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_35; obj* x_36; -x_20 = lean::cnstr_get(x_19, 0); -lean::inc(x_20); -x_22 = lean::cnstr_get(x_19, 1); -lean::inc(x_22); -x_24 = lean::cnstr_get(x_19, 2); -lean::inc(x_24); +obj* x_19; obj* x_21; obj* x_23; uint32 x_26; obj* x_28; obj* x_29; obj* x_31; obj* x_34; obj* x_35; +x_19 = lean::cnstr_get(x_18, 0); +lean::inc(x_19); +x_21 = lean::cnstr_get(x_18, 1); +lean::inc(x_21); +x_23 = lean::cnstr_get(x_18, 2); +lean::inc(x_23); +lean::dec(x_18); +x_26 = lean::unbox_uint32(x_19); lean::dec(x_19); -x_27 = lean::unbox_uint32(x_20); -lean::dec(x_20); -x_29 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_number_x_27___spec__2(x_27, x_0, x_22, x_14); -x_30 = lean::cnstr_get(x_29, 0); -lean::inc(x_30); -x_32 = lean::cnstr_get(x_29, 1); -lean::inc(x_32); -lean::dec(x_29); -x_35 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_24, x_30); -if (lean::is_scalar(x_16)) { - x_36 = lean::alloc_cnstr(0, 2, 0); +x_28 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_number_x_27___spec__2(x_26, x_0, x_21, x_13); +x_29 = lean::cnstr_get(x_28, 0); +lean::inc(x_29); +x_31 = lean::cnstr_get(x_28, 1); +lean::inc(x_31); +lean::dec(x_28); +x_34 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_29); +if (lean::is_scalar(x_15)) { + x_35 = lean::alloc_cnstr(0, 2, 0); } else { - x_36 = x_16; + x_35 = x_15; } -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_32); -return x_36; +lean::cnstr_set(x_35, 0, x_34); +lean::cnstr_set(x_35, 1, x_31); +return x_35; } else { -obj* x_38; uint8 x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; +obj* x_37; uint8 x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; lean::dec(x_0); -x_38 = lean::cnstr_get(x_19, 0); -lean::inc(x_38); -x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); -if (lean::is_shared(x_19)) { - lean::dec(x_19); - x_41 = lean::box(0); +x_37 = lean::cnstr_get(x_18, 0); +lean::inc(x_37); +x_39 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); +if (lean::is_shared(x_18)) { + lean::dec(x_18); + x_40 = lean::box(0); } else { - lean::cnstr_release(x_19, 0); - x_41 = x_19; + lean::cnstr_release(x_18, 0); + x_40 = x_18; } -if (lean::is_scalar(x_41)) { - x_42 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_40)) { + x_41 = lean::alloc_cnstr(1, 1, 1); } else { - x_42 = x_41; + x_41 = x_40; } -lean::cnstr_set(x_42, 0, x_38); -lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); -x_43 = x_42; -if (lean::is_scalar(x_16)) { - x_44 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_41, 0, x_37); +lean::cnstr_set_scalar(x_41, sizeof(void*)*1, x_39); +x_42 = x_41; +if (lean::is_scalar(x_15)) { + x_43 = lean::alloc_cnstr(0, 2, 0); } else { - x_44 = x_16; + x_43 = x_15; } -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_14); -return x_44; +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_13); +return x_43; } } else { -uint32 x_45; uint8 x_46; -x_45 = lean::string_iterator_curr(x_1); -x_46 = l_char_is__digit(x_45); -if (x_46 == 0) +uint32 x_44; uint8 x_45; +x_44 = lean::string_iterator_curr(x_1); +x_45 = l_char_is__digit(x_44); +if (x_45 == 0) { -obj* x_47; obj* x_48; obj* x_50; obj* x_52; obj* x_53; obj* x_54; obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_66; -x_47 = l_char_quote__core(x_45); -x_48 = l_char_has__repr___closed__1; -lean::inc(x_48); -x_50 = lean::string_append(x_48, x_47); -lean::dec(x_47); -x_52 = lean::string_append(x_50, x_48); -x_53 = lean::box(0); -x_54 = l_mjoin___rarg___closed__1; +obj* x_46; obj* x_47; obj* x_49; obj* x_51; obj* x_52; obj* x_53; obj* x_56; obj* x_57; obj* x_59; obj* x_61; obj* x_62; obj* x_64; +x_46 = l_char_quote__core(x_44); +x_47 = l_char_has__repr___closed__1; +lean::inc(x_47); +x_49 = lean::string_append(x_47, x_46); +lean::dec(x_46); +x_51 = lean::string_append(x_49, x_47); +x_52 = lean::box(0); +x_53 = l_mjoin___rarg___closed__1; lean::inc(x_0); lean::inc(x_53); -lean::inc(x_54); -x_58 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_52, x_54, x_53, x_53, x_0, x_1, x_2); -x_59 = lean::cnstr_get(x_58, 0); +x_56 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_51, x_53, x_52, x_52, x_0, x_1, x_2); +x_57 = lean::cnstr_get(x_56, 0); +lean::inc(x_57); +x_59 = lean::cnstr_get(x_56, 1); lean::inc(x_59); -x_61 = lean::cnstr_get(x_58, 1); -lean::inc(x_61); -if (lean::is_shared(x_58)) { - lean::dec(x_58); - x_63 = lean::box(0); +if (lean::is_shared(x_56)) { + lean::dec(x_56); + x_61 = lean::box(0); } else { - lean::cnstr_release(x_58, 0); - lean::cnstr_release(x_58, 1); - x_63 = x_58; + lean::cnstr_release(x_56, 0); + lean::cnstr_release(x_56, 1); + x_61 = x_56; } -x_64 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_64); -x_66 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_64, x_59); -if (lean::obj_tag(x_66) == 0) +x_62 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_62); +x_64 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_62, x_57); +if (lean::obj_tag(x_64) == 0) { -obj* x_67; obj* x_69; obj* x_71; uint32 x_74; obj* x_76; obj* x_77; obj* x_79; obj* x_82; obj* x_83; -x_67 = lean::cnstr_get(x_66, 0); +obj* x_65; obj* x_67; obj* x_69; uint32 x_72; obj* x_74; obj* x_75; obj* x_77; obj* x_80; obj* x_81; +x_65 = lean::cnstr_get(x_64, 0); +lean::inc(x_65); +x_67 = lean::cnstr_get(x_64, 1); lean::inc(x_67); -x_69 = lean::cnstr_get(x_66, 1); +x_69 = lean::cnstr_get(x_64, 2); lean::inc(x_69); -x_71 = lean::cnstr_get(x_66, 2); -lean::inc(x_71); -lean::dec(x_66); -x_74 = lean::unbox_uint32(x_67); -lean::dec(x_67); -x_76 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_number_x_27___spec__4(x_74, x_0, x_69, x_61); -x_77 = lean::cnstr_get(x_76, 0); +lean::dec(x_64); +x_72 = lean::unbox_uint32(x_65); +lean::dec(x_65); +x_74 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_number_x_27___spec__4(x_72, x_0, x_67, x_59); +x_75 = lean::cnstr_get(x_74, 0); +lean::inc(x_75); +x_77 = lean::cnstr_get(x_74, 1); lean::inc(x_77); -x_79 = lean::cnstr_get(x_76, 1); -lean::inc(x_79); -lean::dec(x_76); -x_82 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_71, x_77); -if (lean::is_scalar(x_63)) { - x_83 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_74); +x_80 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_69, x_75); +if (lean::is_scalar(x_61)) { + x_81 = lean::alloc_cnstr(0, 2, 0); } else { - x_83 = x_63; + x_81 = x_61; } -lean::cnstr_set(x_83, 0, x_82); -lean::cnstr_set(x_83, 1, x_79); -return x_83; +lean::cnstr_set(x_81, 0, x_80); +lean::cnstr_set(x_81, 1, x_77); +return x_81; } else { -obj* x_85; uint8 x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; +obj* x_83; uint8 x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; lean::dec(x_0); -x_85 = lean::cnstr_get(x_66, 0); -lean::inc(x_85); -x_87 = lean::cnstr_get_scalar(x_66, sizeof(void*)*1); -if (lean::is_shared(x_66)) { - lean::dec(x_66); - x_88 = lean::box(0); +x_83 = lean::cnstr_get(x_64, 0); +lean::inc(x_83); +x_85 = lean::cnstr_get_scalar(x_64, sizeof(void*)*1); +if (lean::is_shared(x_64)) { + lean::dec(x_64); + x_86 = lean::box(0); } else { - lean::cnstr_release(x_66, 0); - x_88 = x_66; + lean::cnstr_release(x_64, 0); + x_86 = x_64; } -if (lean::is_scalar(x_88)) { - x_89 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_86)) { + x_87 = lean::alloc_cnstr(1, 1, 1); } else { - x_89 = x_88; + x_87 = x_86; } -lean::cnstr_set(x_89, 0, x_85); -lean::cnstr_set_scalar(x_89, sizeof(void*)*1, x_87); -x_90 = x_89; -if (lean::is_scalar(x_63)) { - x_91 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_87, 0, x_83); +lean::cnstr_set_scalar(x_87, sizeof(void*)*1, x_85); +x_88 = x_87; +if (lean::is_scalar(x_61)) { + x_89 = lean::alloc_cnstr(0, 2, 0); } else { - x_91 = x_63; + x_89 = x_61; } -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_61); -return x_91; +lean::cnstr_set(x_89, 0, x_88); +lean::cnstr_set(x_89, 1, x_59); +return x_89; } } else { -obj* x_93; obj* x_94; obj* x_95; obj* x_97; obj* x_99; obj* x_100; obj* x_101; obj* x_102; +obj* x_91; obj* x_92; obj* x_93; obj* x_95; obj* x_97; obj* x_98; obj* x_99; obj* x_100; lean::inc(x_1); -x_93 = lean::string_iterator_next(x_1); -x_94 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_number_x_27___spec__6(x_1, x_0, x_93, x_2); -x_95 = lean::cnstr_get(x_94, 0); +x_91 = lean::string_iterator_next(x_1); +x_92 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_number_x_27___spec__6(x_1, x_0, x_91, x_2); +x_93 = lean::cnstr_get(x_92, 0); +lean::inc(x_93); +x_95 = lean::cnstr_get(x_92, 1); lean::inc(x_95); -x_97 = lean::cnstr_get(x_94, 1); -lean::inc(x_97); -if (lean::is_shared(x_94)) { - lean::dec(x_94); - x_99 = lean::box(0); +if (lean::is_shared(x_92)) { + lean::dec(x_92); + x_97 = lean::box(0); } else { - lean::cnstr_release(x_94, 0); - lean::cnstr_release(x_94, 1); - x_99 = x_94; + lean::cnstr_release(x_92, 0); + lean::cnstr_release(x_92, 1); + x_97 = x_92; } -x_100 = lean::box(0); -x_101 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_100, x_95); -if (lean::is_scalar(x_99)) { - x_102 = lean::alloc_cnstr(0, 2, 0); +x_98 = lean::box(0); +x_99 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_98, x_93); +if (lean::is_scalar(x_97)) { + x_100 = lean::alloc_cnstr(0, 2, 0); } else { - x_102 = x_99; + x_100 = x_97; } -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_97); -return x_102; +lean::cnstr_set(x_100, 0, x_99); +lean::cnstr_set(x_100, 1, x_95); +return x_100; } } } @@ -16339,7 +16264,7 @@ lean::inc(x_12); lean::dec(x_9); if (lean::obj_tag(x_10) == 0) { -obj* x_15; obj* x_17; obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; +obj* x_15; obj* x_17; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_29; obj* x_30; x_15 = lean::cnstr_get(x_10, 0); lean::inc(x_15); x_17 = lean::cnstr_get(x_10, 1); @@ -16356,62 +16281,61 @@ if (lean::is_shared(x_10)) { x_21 = x_10; } x_22 = lean::box(0); -lean::inc(x_22); -x_24 = lean_name_mk_numeral(x_22, x_4); -x_25 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_25, 0, x_15); -lean::cnstr_set(x_25, 1, x_22); -x_26 = l_lean_parser_syntax_mk__node(x_24, x_25); -x_27 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_27); +x_23 = lean_name_mk_numeral(x_22, x_4); +x_24 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_24, 0, x_15); +lean::cnstr_set(x_24, 1, x_22); +x_25 = l_lean_parser_syntax_mk__node(x_23, x_24); +x_26 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_26); if (lean::is_scalar(x_21)) { - x_29 = lean::alloc_cnstr(0, 3, 0); + x_28 = lean::alloc_cnstr(0, 3, 0); } else { - x_29 = x_21; + x_28 = x_21; } -lean::cnstr_set(x_29, 0, x_26); -lean::cnstr_set(x_29, 1, x_17); -lean::cnstr_set(x_29, 2, x_27); -x_30 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_29); +lean::cnstr_set(x_28, 0, x_25); +lean::cnstr_set(x_28, 1, x_17); +lean::cnstr_set(x_28, 2, x_26); +x_29 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_28); if (lean::is_scalar(x_8)) { - x_31 = lean::alloc_cnstr(0, 2, 0); + x_30 = lean::alloc_cnstr(0, 2, 0); } else { - x_31 = x_8; + x_30 = x_8; } -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_12); -return x_31; +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_12); +return x_30; } else { -obj* x_33; uint8 x_35; obj* x_36; obj* x_37; obj* x_38; obj* x_39; +obj* x_32; uint8 x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; lean::dec(x_4); -x_33 = lean::cnstr_get(x_10, 0); -lean::inc(x_33); -x_35 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); +x_32 = lean::cnstr_get(x_10, 0); +lean::inc(x_32); +x_34 = lean::cnstr_get_scalar(x_10, sizeof(void*)*1); if (lean::is_shared(x_10)) { lean::dec(x_10); - x_36 = lean::box(0); + x_35 = lean::box(0); } else { lean::cnstr_release(x_10, 0); - x_36 = x_10; + x_35 = x_10; } -if (lean::is_scalar(x_36)) { - x_37 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_35)) { + x_36 = lean::alloc_cnstr(1, 1, 1); } else { - x_37 = x_36; + x_36 = x_35; } -lean::cnstr_set(x_37, 0, x_33); -lean::cnstr_set_scalar(x_37, sizeof(void*)*1, x_35); -x_38 = x_37; +lean::cnstr_set(x_36, 0, x_32); +lean::cnstr_set_scalar(x_36, sizeof(void*)*1, x_34); +x_37 = x_36; if (lean::is_scalar(x_8)) { - x_39 = lean::alloc_cnstr(0, 2, 0); + x_38 = lean::alloc_cnstr(0, 2, 0); } else { - x_39 = x_8; + x_38 = x_8; } -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_12); -return x_39; +lean::cnstr_set(x_38, 0, x_37); +lean::cnstr_set(x_38, 1, x_12); +return x_38; } } } @@ -16592,56 +16516,55 @@ goto lbl_27; } lbl_27: { -obj* x_73; obj* x_75; obj* x_77; obj* x_78; obj* x_80; obj* x_81; +obj* x_73; obj* x_74; obj* x_76; obj* x_77; obj* x_79; obj* x_80; lean::dec(x_26); x_73 = lean::box(0); -lean::inc(x_73); -x_75 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_75, 0, x_19); -lean::cnstr_set(x_75, 1, x_73); +x_74 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_74, 0, x_19); +lean::cnstr_set(x_74, 1, x_73); lean::inc(x_21); if (lean::is_scalar(x_25)) { - x_77 = lean::alloc_cnstr(0, 3, 0); + x_76 = lean::alloc_cnstr(0, 3, 0); } else { - x_77 = x_25; + x_76 = x_25; } -lean::cnstr_set(x_77, 0, x_75); -lean::cnstr_set(x_77, 1, x_21); -lean::cnstr_set(x_77, 2, x_73); -x_78 = l_lean_parser_finish__comment__block___closed__2; -lean::inc(x_78); -x_80 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_80, 0, x_77); -lean::cnstr_set(x_80, 1, x_21); -lean::cnstr_set(x_80, 2, x_78); -x_81 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_80); -x_9 = x_81; +lean::cnstr_set(x_76, 0, x_74); +lean::cnstr_set(x_76, 1, x_21); +lean::cnstr_set(x_76, 2, x_73); +x_77 = l_lean_parser_finish__comment__block___closed__2; +lean::inc(x_77); +x_79 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_79, 0, x_76); +lean::cnstr_set(x_79, 1, x_21); +lean::cnstr_set(x_79, 2, x_77); +x_80 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_79); +x_9 = x_80; x_10 = x_16; goto lbl_11; } } else { -obj* x_82; uint8 x_84; obj* x_85; obj* x_86; obj* x_87; -x_82 = lean::cnstr_get(x_14, 0); -lean::inc(x_82); -x_84 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); +obj* x_81; uint8 x_83; obj* x_84; obj* x_85; obj* x_86; +x_81 = lean::cnstr_get(x_14, 0); +lean::inc(x_81); +x_83 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); if (lean::is_shared(x_14)) { lean::dec(x_14); - x_85 = lean::box(0); + x_84 = lean::box(0); } else { lean::cnstr_release(x_14, 0); - x_85 = x_14; + x_84 = x_14; } -if (lean::is_scalar(x_85)) { - x_86 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_84)) { + x_85 = lean::alloc_cnstr(1, 1, 1); } else { - x_86 = x_85; + x_85 = x_84; } -lean::cnstr_set(x_86, 0, x_82); -lean::cnstr_set_scalar(x_86, sizeof(void*)*1, x_84); -x_87 = x_86; -x_9 = x_87; +lean::cnstr_set(x_85, 0, x_81); +lean::cnstr_set_scalar(x_85, sizeof(void*)*1, x_83); +x_86 = x_85; +x_9 = x_86; x_10 = x_16; goto lbl_11; } @@ -16649,41 +16572,41 @@ lbl_8: { if (lean::obj_tag(x_6) == 0) { -obj* x_88; obj* x_90; obj* x_91; obj* x_93; obj* x_94; -x_88 = lean::cnstr_get(x_6, 0); -lean::inc(x_88); +obj* x_87; obj* x_89; obj* x_90; obj* x_92; obj* x_93; +x_87 = lean::cnstr_get(x_6, 0); +lean::inc(x_87); if (lean::is_shared(x_6)) { lean::dec(x_6); - x_90 = lean::box(0); + x_89 = lean::box(0); } else { lean::cnstr_release(x_6, 0); lean::cnstr_release(x_6, 1); lean::cnstr_release(x_6, 2); - x_90 = x_6; + x_89 = x_6; } -x_91 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_91); -if (lean::is_scalar(x_90)) { - x_93 = lean::alloc_cnstr(0, 3, 0); +x_90 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_90); +if (lean::is_scalar(x_89)) { + x_92 = lean::alloc_cnstr(0, 3, 0); } else { - x_93 = x_90; + x_92 = x_89; } -lean::cnstr_set(x_93, 0, x_88); -lean::cnstr_set(x_93, 1, x_4); -lean::cnstr_set(x_93, 2, x_91); -x_94 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_7); -return x_94; +lean::cnstr_set(x_92, 0, x_87); +lean::cnstr_set(x_92, 1, x_4); +lean::cnstr_set(x_92, 2, x_90); +x_93 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_93, 0, x_92); +lean::cnstr_set(x_93, 1, x_7); +return x_93; } else { -obj* x_96; +obj* x_95; lean::dec(x_4); -x_96 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_96, 0, x_6); -lean::cnstr_set(x_96, 1, x_7); -return x_96; +x_95 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_95, 0, x_6); +lean::cnstr_set(x_95, 1, x_7); +return x_95; } } lbl_11: @@ -16698,147 +16621,147 @@ goto lbl_8; } else { -obj* x_99; obj* x_101; obj* x_102; -x_99 = lean::cnstr_get(x_9, 0); -lean::inc(x_99); +obj* x_98; obj* x_100; obj* x_101; +x_98 = lean::cnstr_get(x_9, 0); +lean::inc(x_98); if (lean::is_shared(x_9)) { lean::dec(x_9); - x_101 = lean::box(0); + x_100 = lean::box(0); } else { lean::cnstr_release(x_9, 0); - x_101 = x_9; + x_100 = x_9; } -x_102 = lean::cnstr_get(x_99, 0); -lean::inc(x_102); +x_101 = lean::cnstr_get(x_98, 0); +lean::inc(x_101); if (lean::obj_tag(x_2) == 0) { -obj* x_107; obj* x_109; +obj* x_106; obj* x_108; lean::dec(x_0); -lean::dec(x_99); -lean::dec(x_101); -x_107 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_107); -x_109 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_109, 0, x_2); -lean::cnstr_set(x_109, 1, x_102); -lean::cnstr_set(x_109, 2, x_107); -x_6 = x_109; +lean::dec(x_100); +lean::dec(x_98); +x_106 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_106); +x_108 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_108, 0, x_2); +lean::cnstr_set(x_108, 1, x_101); +lean::cnstr_set(x_108, 2, x_106); +x_6 = x_108; x_7 = x_10; goto lbl_8; } else { -obj* x_110; obj* x_112; obj* x_113; obj* x_115; uint8 x_117; -x_110 = lean::cnstr_get(x_2, 0); -lean::inc(x_110); -x_112 = lean::string_iterator_offset(x_102); -x_113 = lean::cnstr_get(x_110, 0); -lean::inc(x_113); -x_115 = lean::string_iterator_offset(x_113); -lean::dec(x_113); -x_117 = lean::nat_dec_lt(x_112, x_115); -if (x_117 == 0) +obj* x_109; obj* x_111; obj* x_112; obj* x_114; uint8 x_116; +x_109 = lean::cnstr_get(x_2, 0); +lean::inc(x_109); +x_111 = lean::string_iterator_offset(x_101); +x_112 = lean::cnstr_get(x_109, 0); +lean::inc(x_112); +x_114 = lean::string_iterator_offset(x_112); +lean::dec(x_112); +x_116 = lean::nat_dec_lt(x_111, x_114); +if (x_116 == 0) { -uint8 x_119; +uint8 x_118; lean::dec(x_2); -x_119 = lean::nat_dec_lt(x_115, x_112); -lean::dec(x_115); -if (x_119 == 0) +x_118 = lean::nat_dec_lt(x_114, x_111); +lean::dec(x_114); +if (x_118 == 0) { -obj* x_121; obj* x_122; uint8 x_124; -x_121 = l_lean_parser_parsec__t_merge___rarg(x_99, x_110); -x_122 = lean::string_iterator_offset(x_0); +obj* x_120; obj* x_121; uint8 x_123; +x_120 = l_lean_parser_parsec__t_merge___rarg(x_98, x_109); +x_121 = lean::string_iterator_offset(x_0); lean::dec(x_0); -x_124 = lean::nat_dec_lt(x_122, x_112); -lean::dec(x_112); -lean::dec(x_122); -if (x_124 == 0) +x_123 = lean::nat_dec_lt(x_121, x_111); +lean::dec(x_111); +lean::dec(x_121); +if (x_123 == 0) { -uint8 x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_132; -x_127 = 0; -if (lean::is_scalar(x_101)) { - x_128 = lean::alloc_cnstr(1, 1, 1); +uint8 x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_131; +x_126 = 0; +if (lean::is_scalar(x_100)) { + x_127 = lean::alloc_cnstr(1, 1, 1); } else { - x_128 = x_101; + x_127 = x_100; } -lean::cnstr_set(x_128, 0, x_121); -lean::cnstr_set_scalar(x_128, sizeof(void*)*1, x_127); -x_129 = x_128; -x_130 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_130); -x_132 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_132, 0, x_129); -lean::cnstr_set(x_132, 1, x_102); -lean::cnstr_set(x_132, 2, x_130); -x_6 = x_132; +lean::cnstr_set(x_127, 0, x_120); +lean::cnstr_set_scalar(x_127, sizeof(void*)*1, x_126); +x_128 = x_127; +x_129 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_129); +x_131 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_131, 0, x_128); +lean::cnstr_set(x_131, 1, x_101); +lean::cnstr_set(x_131, 2, x_129); +x_6 = x_131; x_7 = x_10; goto lbl_8; } else { -uint8 x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_138; -x_133 = 1; -if (lean::is_scalar(x_101)) { - x_134 = lean::alloc_cnstr(1, 1, 1); +uint8 x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_137; +x_132 = 1; +if (lean::is_scalar(x_100)) { + x_133 = lean::alloc_cnstr(1, 1, 1); } else { - x_134 = x_101; + x_133 = x_100; } -lean::cnstr_set(x_134, 0, x_121); -lean::cnstr_set_scalar(x_134, sizeof(void*)*1, x_133); -x_135 = x_134; -x_136 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_136); -x_138 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_138, 0, x_135); -lean::cnstr_set(x_138, 1, x_102); -lean::cnstr_set(x_138, 2, x_136); -x_6 = x_138; +lean::cnstr_set(x_133, 0, x_120); +lean::cnstr_set_scalar(x_133, sizeof(void*)*1, x_132); +x_134 = x_133; +x_135 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_135); +x_137 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_137, 0, x_134); +lean::cnstr_set(x_137, 1, x_101); +lean::cnstr_set(x_137, 2, x_135); +x_6 = x_137; x_7 = x_10; goto lbl_8; } } else { -uint8 x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_147; +uint8 x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_146; lean::dec(x_0); -lean::dec(x_110); -lean::dec(x_112); -x_142 = 1; -if (lean::is_scalar(x_101)) { - x_143 = lean::alloc_cnstr(1, 1, 1); +lean::dec(x_111); +lean::dec(x_109); +x_141 = 1; +if (lean::is_scalar(x_100)) { + x_142 = lean::alloc_cnstr(1, 1, 1); } else { - x_143 = x_101; + x_142 = x_100; } -lean::cnstr_set(x_143, 0, x_99); -lean::cnstr_set_scalar(x_143, sizeof(void*)*1, x_142); -x_144 = x_143; -x_145 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_145); -x_147 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_147, 0, x_144); -lean::cnstr_set(x_147, 1, x_102); -lean::cnstr_set(x_147, 2, x_145); -x_6 = x_147; +lean::cnstr_set(x_142, 0, x_98); +lean::cnstr_set_scalar(x_142, sizeof(void*)*1, x_141); +x_143 = x_142; +x_144 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_144); +x_146 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_146, 0, x_143); +lean::cnstr_set(x_146, 1, x_101); +lean::cnstr_set(x_146, 2, x_144); +x_6 = x_146; x_7 = x_10; goto lbl_8; } } else { -obj* x_154; obj* x_156; +obj* x_153; obj* x_155; lean::dec(x_0); -lean::dec(x_110); -lean::dec(x_99); -lean::dec(x_101); -lean::dec(x_112); -lean::dec(x_115); -x_154 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_154); -x_156 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_156, 0, x_2); -lean::cnstr_set(x_156, 1, x_102); -lean::cnstr_set(x_156, 2, x_154); -x_6 = x_156; +lean::dec(x_111); +lean::dec(x_100); +lean::dec(x_109); +lean::dec(x_114); +lean::dec(x_98); +x_153 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_153); +x_155 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_155, 0, x_2); +lean::cnstr_set(x_155, 1, x_101); +lean::cnstr_set(x_155, 2, x_153); +x_6 = x_155; x_7 = x_10; goto lbl_8; } @@ -16879,107 +16802,106 @@ _start: { if (lean::obj_tag(x_1) == 0) { -obj* x_6; obj* x_7; obj* x_8; obj* x_12; obj* x_13; obj* x_15; obj* x_16; +obj* x_6; obj* x_7; obj* x_8; obj* x_11; obj* x_12; obj* x_14; obj* x_15; lean::dec(x_2); x_6 = lean::box(0); x_7 = l_list_mfoldr___main___at_lean_parser_monad__parsec_longest__match___spec__2___rarg___closed__1; x_8 = l_mjoin___rarg___closed__1; -lean::inc(x_6); lean::inc(x_8); lean::inc(x_7); -x_12 = l_lean_parser_monad__parsec_error___at_lean_parser_number_x_27___spec__12___rarg(x_7, x_8, x_6, x_6, x_0); -x_13 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_13); -x_15 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_15, 0, x_12); -lean::cnstr_set(x_15, 1, x_3); -lean::cnstr_set(x_15, 2, x_13); -x_16 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_16, 0, x_15); -lean::cnstr_set(x_16, 1, x_4); -return x_16; +x_11 = l_lean_parser_monad__parsec_error___at_lean_parser_number_x_27___spec__12___rarg(x_7, x_8, x_6, x_6, x_0); +x_12 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_12); +x_14 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_14, 0, x_11); +lean::cnstr_set(x_14, 1, x_3); +lean::cnstr_set(x_14, 2, x_12); +x_15 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_15, 0, x_14); +lean::cnstr_set(x_15, 1, x_4); +return x_15; } else { -obj* x_17; obj* x_19; obj* x_24; obj* x_25; obj* x_27; obj* x_29; -x_17 = lean::cnstr_get(x_1, 0); -lean::inc(x_17); -x_19 = lean::cnstr_get(x_1, 1); -lean::inc(x_19); +obj* x_16; obj* x_18; obj* x_23; obj* x_24; obj* x_26; obj* x_28; +x_16 = lean::cnstr_get(x_1, 0); +lean::inc(x_16); +x_18 = lean::cnstr_get(x_1, 1); +lean::inc(x_18); lean::dec(x_1); lean::inc(x_2); lean::inc(x_0); -x_24 = l_list_mfoldr___main___at_lean_parser_number_x_27___spec__13(x_0, x_19, x_2, x_3, x_4); -x_25 = lean::cnstr_get(x_24, 0); -lean::inc(x_25); -x_27 = lean::cnstr_get(x_24, 1); -lean::inc(x_27); -if (lean::is_shared(x_24)) { - lean::dec(x_24); - x_29 = lean::box(0); +x_23 = l_list_mfoldr___main___at_lean_parser_number_x_27___spec__13(x_0, x_18, x_2, x_3, x_4); +x_24 = lean::cnstr_get(x_23, 0); +lean::inc(x_24); +x_26 = lean::cnstr_get(x_23, 1); +lean::inc(x_26); +if (lean::is_shared(x_23)) { + lean::dec(x_23); + x_28 = lean::box(0); } else { - lean::cnstr_release(x_24, 0); - lean::cnstr_release(x_24, 1); - x_29 = x_24; + lean::cnstr_release(x_23, 0); + lean::cnstr_release(x_23, 1); + x_28 = x_23; } -if (lean::obj_tag(x_25) == 0) +if (lean::obj_tag(x_24) == 0) { -obj* x_30; obj* x_32; obj* x_34; obj* x_37; obj* x_38; obj* x_40; obj* x_43; obj* x_44; -x_30 = lean::cnstr_get(x_25, 0); -lean::inc(x_30); -x_32 = lean::cnstr_get(x_25, 1); -lean::inc(x_32); -x_34 = lean::cnstr_get(x_25, 2); -lean::inc(x_34); -lean::dec(x_25); -x_37 = l_lean_parser_parsec__t_lookahead___at_lean_parser_number_x_27___spec__11(x_0, x_17, x_30, x_2, x_32, x_27); -x_38 = lean::cnstr_get(x_37, 0); -lean::inc(x_38); -x_40 = lean::cnstr_get(x_37, 1); -lean::inc(x_40); -lean::dec(x_37); -x_43 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_34, x_38); -if (lean::is_scalar(x_29)) { - x_44 = lean::alloc_cnstr(0, 2, 0); +obj* x_29; obj* x_31; obj* x_33; obj* x_36; obj* x_37; obj* x_39; obj* x_42; obj* x_43; +x_29 = lean::cnstr_get(x_24, 0); +lean::inc(x_29); +x_31 = lean::cnstr_get(x_24, 1); +lean::inc(x_31); +x_33 = lean::cnstr_get(x_24, 2); +lean::inc(x_33); +lean::dec(x_24); +x_36 = l_lean_parser_parsec__t_lookahead___at_lean_parser_number_x_27___spec__11(x_0, x_16, x_29, x_2, x_31, x_26); +x_37 = lean::cnstr_get(x_36, 0); +lean::inc(x_37); +x_39 = lean::cnstr_get(x_36, 1); +lean::inc(x_39); +lean::dec(x_36); +x_42 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_33, x_37); +if (lean::is_scalar(x_28)) { + x_43 = lean::alloc_cnstr(0, 2, 0); } else { - x_44 = x_29; + x_43 = x_28; } -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_40); -return x_44; +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_39); +return x_43; } else { -obj* x_48; uint8 x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; -lean::dec(x_17); +obj* x_47; uint8 x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; lean::dec(x_0); lean::dec(x_2); -x_48 = lean::cnstr_get(x_25, 0); -lean::inc(x_48); -x_50 = lean::cnstr_get_scalar(x_25, sizeof(void*)*1); -if (lean::is_shared(x_25)) { - lean::dec(x_25); - x_51 = lean::box(0); +lean::dec(x_16); +x_47 = lean::cnstr_get(x_24, 0); +lean::inc(x_47); +x_49 = lean::cnstr_get_scalar(x_24, sizeof(void*)*1); +if (lean::is_shared(x_24)) { + lean::dec(x_24); + x_50 = lean::box(0); } else { - lean::cnstr_release(x_25, 0); - x_51 = x_25; + lean::cnstr_release(x_24, 0); + x_50 = x_24; } -if (lean::is_scalar(x_51)) { - x_52 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_50)) { + x_51 = lean::alloc_cnstr(1, 1, 1); } else { - x_52 = x_51; + x_51 = x_50; } -lean::cnstr_set(x_52, 0, x_48); -lean::cnstr_set_scalar(x_52, sizeof(void*)*1, x_50); -x_53 = x_52; -if (lean::is_scalar(x_29)) { - x_54 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_51, 0, x_47); +lean::cnstr_set_scalar(x_51, sizeof(void*)*1, x_49); +x_52 = x_51; +if (lean::is_scalar(x_28)) { + x_53 = lean::alloc_cnstr(0, 2, 0); } else { - x_54 = x_29; + x_53 = x_28; } -lean::cnstr_set(x_54, 0, x_53); -lean::cnstr_set(x_54, 1, x_27); -return x_54; +lean::cnstr_set(x_53, 0, x_52); +lean::cnstr_set(x_53, 1, x_26); +return x_53; } } } @@ -17099,88 +17021,87 @@ if (lean::is_shared(x_6)) { } if (lean::obj_tag(x_11) == 0) { -obj* x_19; obj* x_20; obj* x_21; obj* x_25; obj* x_26; obj* x_28; obj* x_31; obj* x_32; +obj* x_19; obj* x_20; obj* x_21; obj* x_24; obj* x_25; obj* x_27; obj* x_30; obj* x_31; lean::dec(x_17); x_19 = lean::box(0); x_20 = l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; x_21 = l_mjoin___rarg___closed__1; -lean::inc(x_19); lean::inc(x_21); lean::inc(x_20); -x_25 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_20, x_21, x_19, x_19, x_1, x_13, x_8); -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -x_28 = lean::cnstr_get(x_25, 1); -lean::inc(x_28); -lean::dec(x_25); -x_31 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_26); +x_24 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_20, x_21, x_19, x_19, x_1, x_13, x_8); +x_25 = lean::cnstr_get(x_24, 0); +lean::inc(x_25); +x_27 = lean::cnstr_get(x_24, 1); +lean::inc(x_27); +lean::dec(x_24); +x_30 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_25); if (lean::is_scalar(x_10)) { - x_32 = lean::alloc_cnstr(0, 2, 0); + x_31 = lean::alloc_cnstr(0, 2, 0); } else { - x_32 = x_10; + x_31 = x_10; } -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_28); -return x_32; +lean::cnstr_set(x_31, 0, x_30); +lean::cnstr_set(x_31, 1, x_27); +return x_31; } else { -obj* x_34; obj* x_37; obj* x_39; obj* x_40; obj* x_41; +obj* x_33; obj* x_36; obj* x_38; obj* x_39; obj* x_40; lean::dec(x_1); -x_34 = lean::cnstr_get(x_11, 0); -lean::inc(x_34); +x_33 = lean::cnstr_get(x_11, 0); +lean::inc(x_33); lean::dec(x_11); -x_37 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_37); +x_36 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_36); if (lean::is_scalar(x_17)) { - x_39 = lean::alloc_cnstr(0, 3, 0); + x_38 = lean::alloc_cnstr(0, 3, 0); } else { - x_39 = x_17; + x_38 = x_17; } -lean::cnstr_set(x_39, 0, x_34); -lean::cnstr_set(x_39, 1, x_13); -lean::cnstr_set(x_39, 2, x_37); -x_40 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_39); +lean::cnstr_set(x_38, 0, x_33); +lean::cnstr_set(x_38, 1, x_13); +lean::cnstr_set(x_38, 2, x_36); +x_39 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_38); if (lean::is_scalar(x_10)) { - x_41 = lean::alloc_cnstr(0, 2, 0); + x_40 = lean::alloc_cnstr(0, 2, 0); } else { - x_41 = x_10; + x_40 = x_10; } -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_8); -return x_41; +lean::cnstr_set(x_40, 0, x_39); +lean::cnstr_set(x_40, 1, x_8); +return x_40; } } else { -obj* x_43; uint8 x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; +obj* x_42; uint8 x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; lean::dec(x_1); -x_43 = lean::cnstr_get(x_6, 0); -lean::inc(x_43); -x_45 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); +x_42 = lean::cnstr_get(x_6, 0); +lean::inc(x_42); +x_44 = lean::cnstr_get_scalar(x_6, sizeof(void*)*1); if (lean::is_shared(x_6)) { lean::dec(x_6); - x_46 = lean::box(0); + x_45 = lean::box(0); } else { lean::cnstr_release(x_6, 0); - x_46 = x_6; + x_45 = x_6; } -if (lean::is_scalar(x_46)) { - x_47 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_45)) { + x_46 = lean::alloc_cnstr(1, 1, 1); } else { - x_47 = x_46; + x_46 = x_45; } -lean::cnstr_set(x_47, 0, x_43); -lean::cnstr_set_scalar(x_47, sizeof(void*)*1, x_45); -x_48 = x_47; +lean::cnstr_set(x_46, 0, x_42); +lean::cnstr_set_scalar(x_46, sizeof(void*)*1, x_44); +x_47 = x_46; if (lean::is_scalar(x_10)) { - x_49 = lean::alloc_cnstr(0, 2, 0); + x_48 = lean::alloc_cnstr(0, 2, 0); } else { - x_49 = x_10; + x_48 = x_10; } -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_8); -return x_49; +lean::cnstr_set(x_48, 0, x_47); +lean::cnstr_set(x_48, 1, x_8); +return x_48; } } } @@ -17539,7 +17460,7 @@ return x_29; obj* _init_l_lean_parser_number_x_27___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; +obj* x_0; obj* x_1; obj* x_2; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_with__trailing___rarg___lambda__1), 2, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_with__trailing___spec__1___rarg), 4, 1); lean::closure_set(x_1, 0, x_0); @@ -17563,25 +17484,24 @@ x_12 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_pa lean::closure_set(x_12, 0, x_1); lean::closure_set(x_12, 1, x_11); x_13 = lean::box(0); -lean::inc(x_13); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_12); +lean::cnstr_set(x_14, 1, x_13); x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_12); -lean::cnstr_set(x_15, 1, x_13); +lean::cnstr_set(x_15, 0, x_10); +lean::cnstr_set(x_15, 1, x_14); x_16 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_16, 0, x_10); +lean::cnstr_set(x_16, 0, x_7); lean::cnstr_set(x_16, 1, x_15); x_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_7); +lean::cnstr_set(x_17, 0, x_4); lean::cnstr_set(x_17, 1, x_16); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_4); -lean::cnstr_set(x_18, 1, x_17); -x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_longest__choice___at_lean_parser_number_x_27___spec__8), 4, 1); -lean::closure_set(x_19, 0, x_18); -x_20 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_20, 0, x_19); -lean::cnstr_set(x_20, 1, x_13); -return x_20; +x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_longest__choice___at_lean_parser_number_x_27___spec__8), 4, 1); +lean::closure_set(x_18, 0, x_17); +x_19 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_19, 0, x_18); +lean::cnstr_set(x_19, 1, x_13); +return x_19; } } obj* l_lean_parser_number_x_27(obj* x_0, obj* x_1, obj* x_2) { @@ -17771,96 +17691,94 @@ uint8 x_3; x_3 = lean::string_iterator_has_next(x_1); if (x_3 == 0) { -obj* x_4; obj* x_5; obj* x_6; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_18; obj* x_19; +obj* x_4; obj* x_5; obj* x_6; obj* x_9; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_18; x_4 = lean::box(0); x_5 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_6 = l_mjoin___rarg___closed__1; -lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); -x_10 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); -x_11 = lean::cnstr_get(x_10, 0); -lean::inc(x_11); -x_13 = lean::cnstr_get(x_10, 1); -lean::inc(x_13); -if (lean::is_shared(x_10)) { - lean::dec(x_10); - x_15 = lean::box(0); +x_9 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_0, x_1, x_2); +x_10 = lean::cnstr_get(x_9, 0); +lean::inc(x_10); +x_12 = lean::cnstr_get(x_9, 1); +lean::inc(x_12); +if (lean::is_shared(x_9)) { + lean::dec(x_9); + x_14 = lean::box(0); } else { - lean::cnstr_release(x_10, 0); - lean::cnstr_release(x_10, 1); - x_15 = x_10; + lean::cnstr_release(x_9, 0); + lean::cnstr_release(x_9, 1); + x_14 = x_9; } -x_16 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_16); -x_18 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_16, x_11); -if (lean::is_scalar(x_15)) { - x_19 = lean::alloc_cnstr(0, 2, 0); +x_15 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_15); +x_17 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_10); +if (lean::is_scalar(x_14)) { + x_18 = lean::alloc_cnstr(0, 2, 0); } else { - x_19 = x_15; + x_18 = x_14; } -lean::cnstr_set(x_19, 0, x_18); -lean::cnstr_set(x_19, 1, x_13); -return x_19; +lean::cnstr_set(x_18, 0, x_17); +lean::cnstr_set(x_18, 1, x_12); +return x_18; } else { -uint32 x_20; uint8 x_21; -x_20 = lean::string_iterator_curr(x_1); -x_21 = l_char_is__digit(x_20); -if (x_21 == 0) +uint32 x_19; uint8 x_20; +x_19 = lean::string_iterator_curr(x_1); +x_20 = l_char_is__digit(x_19); +if (x_20 == 0) { -obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_32; obj* x_33; obj* x_35; obj* x_37; obj* x_38; obj* x_40; obj* x_41; -x_22 = l_char_quote__core(x_20); -x_23 = l_char_has__repr___closed__1; -lean::inc(x_23); -x_25 = lean::string_append(x_23, x_22); -lean::dec(x_22); -x_27 = lean::string_append(x_25, x_23); -x_28 = lean::box(0); -x_29 = l_mjoin___rarg___closed__1; +obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_33; obj* x_35; obj* x_36; obj* x_38; obj* x_39; +x_21 = l_char_quote__core(x_19); +x_22 = l_char_has__repr___closed__1; +lean::inc(x_22); +x_24 = lean::string_append(x_22, x_21); +lean::dec(x_21); +x_26 = lean::string_append(x_24, x_22); +x_27 = lean::box(0); +x_28 = l_mjoin___rarg___closed__1; lean::inc(x_28); -lean::inc(x_29); -x_32 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_27, x_29, x_28, x_28, x_0, x_1, x_2); -x_33 = lean::cnstr_get(x_32, 0); +x_30 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_26, x_28, x_27, x_27, x_0, x_1, x_2); +x_31 = lean::cnstr_get(x_30, 0); +lean::inc(x_31); +x_33 = lean::cnstr_get(x_30, 1); lean::inc(x_33); -x_35 = lean::cnstr_get(x_32, 1); -lean::inc(x_35); -if (lean::is_shared(x_32)) { - lean::dec(x_32); - x_37 = lean::box(0); +if (lean::is_shared(x_30)) { + lean::dec(x_30); + x_35 = lean::box(0); } else { - lean::cnstr_release(x_32, 0); - lean::cnstr_release(x_32, 1); - x_37 = x_32; + lean::cnstr_release(x_30, 0); + lean::cnstr_release(x_30, 1); + x_35 = x_30; } -x_38 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_38); -x_40 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_38, x_33); -if (lean::is_scalar(x_37)) { - x_41 = lean::alloc_cnstr(0, 2, 0); +x_36 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_36); +x_38 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_36, x_31); +if (lean::is_scalar(x_35)) { + x_39 = lean::alloc_cnstr(0, 2, 0); } else { - x_41 = x_37; + x_39 = x_35; } -lean::cnstr_set(x_41, 0, x_40); -lean::cnstr_set(x_41, 1, x_35); -return x_41; +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_33); +return x_39; } else { -obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; +obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; lean::dec(x_0); -x_43 = lean::string_iterator_next(x_1); -x_44 = lean::box(0); -x_45 = lean::box_uint32(x_20); -x_46 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_43); -lean::cnstr_set(x_46, 2, x_44); -x_47 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_47, 0, x_46); -lean::cnstr_set(x_47, 1, x_2); -return x_47; +x_41 = lean::string_iterator_next(x_1); +x_42 = lean::box(0); +x_43 = lean::box_uint32(x_19); +x_44 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_44, 0, x_43); +lean::cnstr_set(x_44, 1, x_41); +lean::cnstr_set(x_44, 2, x_42); +x_45 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_45, 0, x_44); +lean::cnstr_set(x_45, 1, x_2); +return x_45; } } } @@ -17979,144 +17897,140 @@ lean::dec(x_3); x_53 = lean::string_iterator_has_next(x_1); if (x_53 == 0) { -obj* x_54; obj* x_55; obj* x_56; obj* x_62; obj* x_63; obj* x_65; obj* x_68; obj* x_70; +obj* x_54; obj* x_55; obj* x_56; obj* x_61; obj* x_62; obj* x_64; obj* x_67; obj* x_69; x_54 = lean::box(0); x_55 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_56 = l_mjoin___rarg___closed__1; lean::inc(x_1); lean::inc(x_0); -lean::inc(x_54); lean::inc(x_56); lean::inc(x_55); -x_62 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_55, x_56, x_54, x_54, x_0, x_1, x_4); -x_63 = lean::cnstr_get(x_62, 0); -lean::inc(x_63); -x_65 = lean::cnstr_get(x_62, 1); -lean::inc(x_65); -lean::dec(x_62); -x_68 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_68); -x_70 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_68, x_63); -x_49 = x_70; -x_50 = x_65; +x_61 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_55, x_56, x_54, x_54, x_0, x_1, x_4); +x_62 = lean::cnstr_get(x_61, 0); +lean::inc(x_62); +x_64 = lean::cnstr_get(x_61, 1); +lean::inc(x_64); +lean::dec(x_61); +x_67 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_67); +x_69 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_67, x_62); +x_49 = x_69; +x_50 = x_64; goto lbl_51; } else { -uint32 x_71; uint32 x_72; uint8 x_73; uint8 x_75; -x_71 = lean::string_iterator_curr(x_1); -x_72 = 97; -x_75 = x_72 <= x_71; -if (x_75 == 0) +uint32 x_70; uint32 x_71; uint8 x_72; uint8 x_74; +x_70 = lean::string_iterator_curr(x_1); +x_71 = 97; +x_74 = x_71 <= x_70; +if (x_74 == 0) { -obj* x_76; obj* x_77; obj* x_79; obj* x_81; obj* x_82; obj* x_83; obj* x_88; obj* x_89; obj* x_91; obj* x_94; obj* x_96; -x_76 = l_char_quote__core(x_71); -x_77 = l_char_has__repr___closed__1; -lean::inc(x_77); -x_79 = lean::string_append(x_77, x_76); -lean::dec(x_76); -x_81 = lean::string_append(x_79, x_77); -x_82 = lean::box(0); -x_83 = l_mjoin___rarg___closed__1; +obj* x_75; obj* x_76; obj* x_78; obj* x_80; obj* x_81; obj* x_82; obj* x_86; obj* x_87; obj* x_89; obj* x_92; obj* x_94; +x_75 = l_char_quote__core(x_70); +x_76 = l_char_has__repr___closed__1; +lean::inc(x_76); +x_78 = lean::string_append(x_76, x_75); +lean::dec(x_75); +x_80 = lean::string_append(x_78, x_76); +x_81 = lean::box(0); +x_82 = l_mjoin___rarg___closed__1; lean::inc(x_1); lean::inc(x_0); lean::inc(x_82); -lean::inc(x_83); -x_88 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_81, x_83, x_82, x_82, x_0, x_1, x_4); -x_89 = lean::cnstr_get(x_88, 0); +x_86 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_80, x_82, x_81, x_81, x_0, x_1, x_4); +x_87 = lean::cnstr_get(x_86, 0); +lean::inc(x_87); +x_89 = lean::cnstr_get(x_86, 1); lean::inc(x_89); -x_91 = lean::cnstr_get(x_88, 1); -lean::inc(x_91); -lean::dec(x_88); -x_94 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_94); -x_96 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_94, x_89); -x_49 = x_96; -x_50 = x_91; +lean::dec(x_86); +x_92 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_92); +x_94 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_92, x_87); +x_49 = x_94; +x_50 = x_89; goto lbl_51; } else { -uint8 x_97; -x_97 = 1; -x_73 = x_97; -goto lbl_74; +uint8 x_95; +x_95 = 1; +x_72 = x_95; +goto lbl_73; } -lbl_74: +lbl_73: { -uint32 x_98; uint8 x_99; -x_98 = 102; -x_99 = x_71 <= x_98; -if (x_99 == 0) +uint32 x_96; uint8 x_97; +x_96 = 102; +x_97 = x_70 <= x_96; +if (x_97 == 0) { -obj* x_100; obj* x_101; obj* x_103; obj* x_105; obj* x_106; obj* x_107; obj* x_112; obj* x_113; obj* x_115; obj* x_118; obj* x_120; -x_100 = l_char_quote__core(x_71); -x_101 = l_char_has__repr___closed__1; -lean::inc(x_101); -x_103 = lean::string_append(x_101, x_100); -lean::dec(x_100); -x_105 = lean::string_append(x_103, x_101); -x_106 = lean::box(0); -x_107 = l_mjoin___rarg___closed__1; +obj* x_98; obj* x_99; obj* x_101; obj* x_103; obj* x_104; obj* x_105; obj* x_109; obj* x_110; obj* x_112; obj* x_115; obj* x_117; +x_98 = l_char_quote__core(x_70); +x_99 = l_char_has__repr___closed__1; +lean::inc(x_99); +x_101 = lean::string_append(x_99, x_98); +lean::dec(x_98); +x_103 = lean::string_append(x_101, x_99); +x_104 = lean::box(0); +x_105 = l_mjoin___rarg___closed__1; lean::inc(x_1); lean::inc(x_0); -lean::inc(x_106); -lean::inc(x_107); -x_112 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_105, x_107, x_106, x_106, x_0, x_1, x_4); -x_113 = lean::cnstr_get(x_112, 0); -lean::inc(x_113); -x_115 = lean::cnstr_get(x_112, 1); +lean::inc(x_105); +x_109 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_103, x_105, x_104, x_104, x_0, x_1, x_4); +x_110 = lean::cnstr_get(x_109, 0); +lean::inc(x_110); +x_112 = lean::cnstr_get(x_109, 1); +lean::inc(x_112); +lean::dec(x_109); +x_115 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_115); -lean::dec(x_112); -x_118 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_118); -x_120 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_118, x_113); -x_49 = x_120; -x_50 = x_115; +x_117 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_115, x_110); +x_49 = x_117; +x_50 = x_112; goto lbl_51; } else { -if (x_73 == 0) +if (x_72 == 0) { -obj* x_121; obj* x_122; obj* x_124; obj* x_126; obj* x_127; obj* x_128; obj* x_133; obj* x_134; obj* x_136; obj* x_139; obj* x_141; -x_121 = l_char_quote__core(x_71); -x_122 = l_char_has__repr___closed__1; -lean::inc(x_122); -x_124 = lean::string_append(x_122, x_121); -lean::dec(x_121); -x_126 = lean::string_append(x_124, x_122); -x_127 = lean::box(0); -x_128 = l_mjoin___rarg___closed__1; +obj* x_118; obj* x_119; obj* x_121; obj* x_123; obj* x_124; obj* x_125; obj* x_129; obj* x_130; obj* x_132; obj* x_135; obj* x_137; +x_118 = l_char_quote__core(x_70); +x_119 = l_char_has__repr___closed__1; +lean::inc(x_119); +x_121 = lean::string_append(x_119, x_118); +lean::dec(x_118); +x_123 = lean::string_append(x_121, x_119); +x_124 = lean::box(0); +x_125 = l_mjoin___rarg___closed__1; lean::inc(x_1); lean::inc(x_0); -lean::inc(x_127); -lean::inc(x_128); -x_133 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_126, x_128, x_127, x_127, x_0, x_1, x_4); -x_134 = lean::cnstr_get(x_133, 0); -lean::inc(x_134); -x_136 = lean::cnstr_get(x_133, 1); -lean::inc(x_136); -lean::dec(x_133); -x_139 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_139); -x_141 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_139, x_134); -x_49 = x_141; -x_50 = x_136; +lean::inc(x_125); +x_129 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_123, x_125, x_124, x_124, x_0, x_1, x_4); +x_130 = lean::cnstr_get(x_129, 0); +lean::inc(x_130); +x_132 = lean::cnstr_get(x_129, 1); +lean::inc(x_132); +lean::dec(x_129); +x_135 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_135); +x_137 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_135, x_130); +x_49 = x_137; +x_50 = x_132; goto lbl_51; } else { -obj* x_143; obj* x_144; obj* x_145; obj* x_146; +obj* x_139; obj* x_140; obj* x_141; obj* x_142; lean::inc(x_1); -x_143 = lean::string_iterator_next(x_1); -x_144 = lean::box(0); -x_145 = lean::box_uint32(x_71); -x_146 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_146, 0, x_145); -lean::cnstr_set(x_146, 1, x_143); -lean::cnstr_set(x_146, 2, x_144); -x_49 = x_146; +x_139 = lean::string_iterator_next(x_1); +x_140 = lean::box(0); +x_141 = lean::box_uint32(x_70); +x_142 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_142, 0, x_141); +lean::cnstr_set(x_142, 1, x_139); +lean::cnstr_set(x_142, 2, x_140); +x_49 = x_142; x_50 = x_4; goto lbl_51; } @@ -18126,179 +18040,175 @@ goto lbl_51; } else { -obj* x_150; obj* x_152; obj* x_153; +obj* x_146; obj* x_148; obj* x_149; lean::dec(x_1); lean::dec(x_0); lean::dec(x_43); -x_150 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; -lean::inc(x_150); -x_152 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_3, x_150); -x_153 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_153, 0, x_152); -lean::cnstr_set(x_153, 1, x_4); -return x_153; +x_146 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; +lean::inc(x_146); +x_148 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_3, x_146); +x_149 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_149, 0, x_148); +lean::cnstr_set(x_149, 1, x_4); +return x_149; } lbl_48: { if (lean::obj_tag(x_46) == 0) { -obj* x_156; obj* x_157; obj* x_159; obj* x_160; +obj* x_152; obj* x_153; obj* x_155; obj* x_156; lean::dec(x_1); lean::dec(x_0); -x_156 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_43, x_46); -x_157 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; +x_152 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_43, x_46); +x_153 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; +lean::inc(x_153); +x_155 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_152, x_153); +x_156 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_156, 0, x_155); +lean::cnstr_set(x_156, 1, x_47); +return x_156; +} +else +{ +obj* x_157; uint8 x_159; obj* x_160; obj* x_161; +x_157 = lean::cnstr_get(x_46, 0); lean::inc(x_157); -x_159 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_156, x_157); -x_160 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_160, 0, x_159); -lean::cnstr_set(x_160, 1, x_47); -return x_160; -} -else +x_159 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); +if (x_159 == 0) { -obj* x_161; uint8 x_163; obj* x_164; obj* x_165; -x_161 = lean::cnstr_get(x_46, 0); -lean::inc(x_161); -x_163 = lean::cnstr_get_scalar(x_46, sizeof(void*)*1); -if (x_163 == 0) -{ -uint8 x_168; +uint8 x_164; lean::dec(x_46); -x_168 = lean::string_iterator_has_next(x_1); -if (x_168 == 0) +x_164 = lean::string_iterator_has_next(x_1); +if (x_164 == 0) { -obj* x_169; obj* x_170; obj* x_171; obj* x_175; obj* x_176; obj* x_178; obj* x_181; obj* x_183; -x_169 = lean::box(0); -x_170 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; -x_171 = l_mjoin___rarg___closed__1; -lean::inc(x_169); +obj* x_165; obj* x_166; obj* x_167; obj* x_170; obj* x_171; obj* x_173; obj* x_176; obj* x_178; +x_165 = lean::box(0); +x_166 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; +x_167 = l_mjoin___rarg___closed__1; +lean::inc(x_167); +lean::inc(x_166); +x_170 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_166, x_167, x_165, x_165, x_0, x_1, x_47); +x_171 = lean::cnstr_get(x_170, 0); lean::inc(x_171); -lean::inc(x_170); -x_175 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_170, x_171, x_169, x_169, x_0, x_1, x_47); -x_176 = lean::cnstr_get(x_175, 0); +x_173 = lean::cnstr_get(x_170, 1); +lean::inc(x_173); +lean::dec(x_170); +x_176 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_176); -x_178 = lean::cnstr_get(x_175, 1); -lean::inc(x_178); -lean::dec(x_175); -x_181 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_181); -x_183 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_181, x_176); -x_164 = x_183; -x_165 = x_178; -goto lbl_166; +x_178 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_176, x_171); +x_160 = x_178; +x_161 = x_173; +goto lbl_162; } else { -uint32 x_184; uint32 x_185; uint8 x_186; uint8 x_188; -x_184 = lean::string_iterator_curr(x_1); -x_185 = 65; -x_188 = x_185 <= x_184; -if (x_188 == 0) +uint32 x_179; uint32 x_180; uint8 x_181; uint8 x_183; +x_179 = lean::string_iterator_curr(x_1); +x_180 = 65; +x_183 = x_180 <= x_179; +if (x_183 == 0) { -obj* x_189; obj* x_190; obj* x_192; obj* x_194; obj* x_195; obj* x_196; obj* x_199; obj* x_200; obj* x_202; obj* x_205; obj* x_207; -x_189 = l_char_quote__core(x_184); -x_190 = l_char_has__repr___closed__1; -lean::inc(x_190); -x_192 = lean::string_append(x_190, x_189); -lean::dec(x_189); -x_194 = lean::string_append(x_192, x_190); -x_195 = lean::box(0); -x_196 = l_mjoin___rarg___closed__1; -lean::inc(x_195); +obj* x_184; obj* x_185; obj* x_187; obj* x_189; obj* x_190; obj* x_191; obj* x_193; obj* x_194; obj* x_196; obj* x_199; obj* x_201; +x_184 = l_char_quote__core(x_179); +x_185 = l_char_has__repr___closed__1; +lean::inc(x_185); +x_187 = lean::string_append(x_185, x_184); +lean::dec(x_184); +x_189 = lean::string_append(x_187, x_185); +x_190 = lean::box(0); +x_191 = l_mjoin___rarg___closed__1; +lean::inc(x_191); +x_193 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_189, x_191, x_190, x_190, x_0, x_1, x_47); +x_194 = lean::cnstr_get(x_193, 0); +lean::inc(x_194); +x_196 = lean::cnstr_get(x_193, 1); lean::inc(x_196); -x_199 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_194, x_196, x_195, x_195, x_0, x_1, x_47); -x_200 = lean::cnstr_get(x_199, 0); -lean::inc(x_200); -x_202 = lean::cnstr_get(x_199, 1); -lean::inc(x_202); -lean::dec(x_199); -x_205 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_205); -x_207 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_205, x_200); -x_164 = x_207; -x_165 = x_202; -goto lbl_166; +lean::dec(x_193); +x_199 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_199); +x_201 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_199, x_194); +x_160 = x_201; +x_161 = x_196; +goto lbl_162; } else { -uint8 x_208; -x_208 = 1; -x_186 = x_208; -goto lbl_187; +uint8 x_202; +x_202 = 1; +x_181 = x_202; +goto lbl_182; } -lbl_187: +lbl_182: { -uint32 x_209; uint8 x_210; -x_209 = 70; -x_210 = x_184 <= x_209; -if (x_210 == 0) +uint32 x_203; uint8 x_204; +x_203 = 70; +x_204 = x_179 <= x_203; +if (x_204 == 0) { -obj* x_211; obj* x_212; obj* x_214; obj* x_216; obj* x_217; obj* x_218; obj* x_221; obj* x_222; obj* x_224; obj* x_227; obj* x_229; -x_211 = l_char_quote__core(x_184); -x_212 = l_char_has__repr___closed__1; +obj* x_205; obj* x_206; obj* x_208; obj* x_210; obj* x_211; obj* x_212; obj* x_214; obj* x_215; obj* x_217; obj* x_220; obj* x_222; +x_205 = l_char_quote__core(x_179); +x_206 = l_char_has__repr___closed__1; +lean::inc(x_206); +x_208 = lean::string_append(x_206, x_205); +lean::dec(x_205); +x_210 = lean::string_append(x_208, x_206); +x_211 = lean::box(0); +x_212 = l_mjoin___rarg___closed__1; lean::inc(x_212); -x_214 = lean::string_append(x_212, x_211); -lean::dec(x_211); -x_216 = lean::string_append(x_214, x_212); -x_217 = lean::box(0); -x_218 = l_mjoin___rarg___closed__1; +x_214 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_210, x_212, x_211, x_211, x_0, x_1, x_47); +x_215 = lean::cnstr_get(x_214, 0); +lean::inc(x_215); +x_217 = lean::cnstr_get(x_214, 1); lean::inc(x_217); -lean::inc(x_218); -x_221 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_216, x_218, x_217, x_217, x_0, x_1, x_47); -x_222 = lean::cnstr_get(x_221, 0); -lean::inc(x_222); -x_224 = lean::cnstr_get(x_221, 1); +lean::dec(x_214); +x_220 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_220); +x_222 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_220, x_215); +x_160 = x_222; +x_161 = x_217; +goto lbl_162; +} +else +{ +if (x_181 == 0) +{ +obj* x_223; obj* x_224; obj* x_226; obj* x_228; obj* x_229; obj* x_230; obj* x_232; obj* x_233; obj* x_235; obj* x_238; obj* x_240; +x_223 = l_char_quote__core(x_179); +x_224 = l_char_has__repr___closed__1; lean::inc(x_224); -lean::dec(x_221); -x_227 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_227); -x_229 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_227, x_222); -x_164 = x_229; -x_165 = x_224; -goto lbl_166; +x_226 = lean::string_append(x_224, x_223); +lean::dec(x_223); +x_228 = lean::string_append(x_226, x_224); +x_229 = lean::box(0); +x_230 = l_mjoin___rarg___closed__1; +lean::inc(x_230); +x_232 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_228, x_230, x_229, x_229, x_0, x_1, x_47); +x_233 = lean::cnstr_get(x_232, 0); +lean::inc(x_233); +x_235 = lean::cnstr_get(x_232, 1); +lean::inc(x_235); +lean::dec(x_232); +x_238 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_238); +x_240 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_238, x_233); +x_160 = x_240; +x_161 = x_235; +goto lbl_162; } else { -if (x_186 == 0) -{ -obj* x_230; obj* x_231; obj* x_233; obj* x_235; obj* x_236; obj* x_237; obj* x_240; obj* x_241; obj* x_243; obj* x_246; obj* x_248; -x_230 = l_char_quote__core(x_184); -x_231 = l_char_has__repr___closed__1; -lean::inc(x_231); -x_233 = lean::string_append(x_231, x_230); -lean::dec(x_230); -x_235 = lean::string_append(x_233, x_231); -x_236 = lean::box(0); -x_237 = l_mjoin___rarg___closed__1; -lean::inc(x_236); -lean::inc(x_237); -x_240 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_235, x_237, x_236, x_236, x_0, x_1, x_47); -x_241 = lean::cnstr_get(x_240, 0); -lean::inc(x_241); -x_243 = lean::cnstr_get(x_240, 1); -lean::inc(x_243); -lean::dec(x_240); -x_246 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_246); -x_248 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_246, x_241); -x_164 = x_248; -x_165 = x_243; -goto lbl_166; -} -else -{ -obj* x_250; obj* x_251; obj* x_252; obj* x_253; +obj* x_242; obj* x_243; obj* x_244; obj* x_245; lean::dec(x_0); -x_250 = lean::string_iterator_next(x_1); -x_251 = lean::box(0); -x_252 = lean::box_uint32(x_184); -x_253 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_253, 0, x_252); -lean::cnstr_set(x_253, 1, x_250); -lean::cnstr_set(x_253, 2, x_251); -x_164 = x_253; -x_165 = x_47; -goto lbl_166; +x_242 = lean::string_iterator_next(x_1); +x_243 = lean::box(0); +x_244 = lean::box_uint32(x_179); +x_245 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_245, 0, x_244); +lean::cnstr_set(x_245, 1, x_242); +lean::cnstr_set(x_245, 2, x_243); +x_160 = x_245; +x_161 = x_47; +goto lbl_162; } } } @@ -18306,100 +18216,100 @@ goto lbl_166; } else { -obj* x_257; obj* x_258; obj* x_260; obj* x_261; +obj* x_249; obj* x_250; obj* x_252; obj* x_253; lean::dec(x_1); lean::dec(x_0); -lean::dec(x_161); -x_257 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_43, x_46); -x_258 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; +lean::dec(x_157); +x_249 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_43, x_46); +x_250 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; +lean::inc(x_250); +x_252 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_249, x_250); +x_253 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_253, 0, x_252); +lean::cnstr_set(x_253, 1, x_47); +return x_253; +} +lbl_162: +{ +if (lean::obj_tag(x_160) == 0) +{ +obj* x_254; obj* x_256; obj* x_258; obj* x_260; uint32 x_261; obj* x_263; obj* x_264; obj* x_265; obj* x_267; obj* x_268; obj* x_271; obj* x_273; obj* x_274; obj* x_275; obj* x_276; obj* x_277; obj* x_279; obj* x_280; +x_254 = lean::cnstr_get(x_160, 0); +lean::inc(x_254); +x_256 = lean::cnstr_get(x_160, 1); +lean::inc(x_256); +x_258 = lean::cnstr_get(x_160, 2); lean::inc(x_258); -x_260 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_257, x_258); -x_261 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_261, 0, x_260); -lean::cnstr_set(x_261, 1, x_47); -return x_261; -} -lbl_166: -{ -if (lean::obj_tag(x_164) == 0) -{ -obj* x_262; obj* x_264; obj* x_266; obj* x_268; uint32 x_269; obj* x_271; obj* x_272; obj* x_273; obj* x_275; obj* x_276; obj* x_279; obj* x_281; obj* x_282; obj* x_283; obj* x_284; obj* x_285; obj* x_287; obj* x_288; -x_262 = lean::cnstr_get(x_164, 0); -lean::inc(x_262); -x_264 = lean::cnstr_get(x_164, 1); -lean::inc(x_264); -x_266 = lean::cnstr_get(x_164, 2); -lean::inc(x_266); -if (lean::is_shared(x_164)) { - lean::dec(x_164); - x_268 = lean::box(0); +if (lean::is_shared(x_160)) { + lean::dec(x_160); + x_260 = lean::box(0); } else { - lean::cnstr_release(x_164, 0); - lean::cnstr_release(x_164, 1); - lean::cnstr_release(x_164, 2); - x_268 = x_164; + lean::cnstr_release(x_160, 0); + lean::cnstr_release(x_160, 1); + lean::cnstr_release(x_160, 2); + x_260 = x_160; } -x_269 = lean::unbox_uint32(x_262); -lean::dec(x_262); -x_271 = lean::uint32_to_nat(x_269); -x_272 = l_lean_parser_parse__hex__digit___rarg___lambda__5___closed__1; -x_273 = lean::nat_sub(x_271, x_272); -lean::dec(x_271); -x_275 = lean::mk_nat_obj(10u); -x_276 = lean::nat_add(x_275, x_273); -lean::dec(x_273); -lean::dec(x_275); -x_279 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_279); -if (lean::is_scalar(x_268)) { - x_281 = lean::alloc_cnstr(0, 3, 0); +x_261 = lean::unbox_uint32(x_254); +lean::dec(x_254); +x_263 = lean::uint32_to_nat(x_261); +x_264 = l_lean_parser_parse__hex__digit___rarg___lambda__5___closed__1; +x_265 = lean::nat_sub(x_263, x_264); +lean::dec(x_263); +x_267 = lean::mk_nat_obj(10u); +x_268 = lean::nat_add(x_267, x_265); +lean::dec(x_265); +lean::dec(x_267); +x_271 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_271); +if (lean::is_scalar(x_260)) { + x_273 = lean::alloc_cnstr(0, 3, 0); } else { - x_281 = x_268; + x_273 = x_260; } -lean::cnstr_set(x_281, 0, x_276); -lean::cnstr_set(x_281, 1, x_264); -lean::cnstr_set(x_281, 2, x_279); -x_282 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_266, x_281); -x_283 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_161, x_282); -x_284 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_43, x_283); -x_285 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; -lean::inc(x_285); -x_287 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_284, x_285); -x_288 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_288, 0, x_287); -lean::cnstr_set(x_288, 1, x_165); -return x_288; +lean::cnstr_set(x_273, 0, x_268); +lean::cnstr_set(x_273, 1, x_256); +lean::cnstr_set(x_273, 2, x_271); +x_274 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_258, x_273); +x_275 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_157, x_274); +x_276 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_43, x_275); +x_277 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; +lean::inc(x_277); +x_279 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_276, x_277); +x_280 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_280, 0, x_279); +lean::cnstr_set(x_280, 1, x_161); +return x_280; } else { -obj* x_289; uint8 x_291; obj* x_292; obj* x_293; obj* x_294; obj* x_295; obj* x_296; obj* x_297; obj* x_299; obj* x_300; -x_289 = lean::cnstr_get(x_164, 0); +obj* x_281; uint8 x_283; obj* x_284; obj* x_285; obj* x_286; obj* x_287; obj* x_288; obj* x_289; obj* x_291; obj* x_292; +x_281 = lean::cnstr_get(x_160, 0); +lean::inc(x_281); +x_283 = lean::cnstr_get_scalar(x_160, sizeof(void*)*1); +if (lean::is_shared(x_160)) { + lean::dec(x_160); + x_284 = lean::box(0); +} else { + lean::cnstr_release(x_160, 0); + x_284 = x_160; +} +if (lean::is_scalar(x_284)) { + x_285 = lean::alloc_cnstr(1, 1, 1); +} else { + x_285 = x_284; +} +lean::cnstr_set(x_285, 0, x_281); +lean::cnstr_set_scalar(x_285, sizeof(void*)*1, x_283); +x_286 = x_285; +x_287 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_157, x_286); +x_288 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_43, x_287); +x_289 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; lean::inc(x_289); -x_291 = lean::cnstr_get_scalar(x_164, sizeof(void*)*1); -if (lean::is_shared(x_164)) { - lean::dec(x_164); - x_292 = lean::box(0); -} else { - lean::cnstr_release(x_164, 0); - x_292 = x_164; -} -if (lean::is_scalar(x_292)) { - x_293 = lean::alloc_cnstr(1, 1, 1); -} else { - x_293 = x_292; -} -lean::cnstr_set(x_293, 0, x_289); -lean::cnstr_set_scalar(x_293, sizeof(void*)*1, x_291); -x_294 = x_293; -x_295 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_161, x_294); -x_296 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_43, x_295); -x_297 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; -lean::inc(x_297); -x_299 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_296, x_297); -x_300 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_300, 0, x_299); -lean::cnstr_set(x_300, 1, x_165); -return x_300; +x_291 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_288, x_289); +x_292 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_292, 0, x_291); +lean::cnstr_set(x_292, 1, x_161); +return x_292; } } } @@ -18408,69 +18318,69 @@ lbl_51: { if (lean::obj_tag(x_49) == 0) { -obj* x_301; obj* x_303; obj* x_305; obj* x_307; uint32 x_308; obj* x_310; obj* x_311; obj* x_312; obj* x_314; obj* x_315; obj* x_318; obj* x_320; obj* x_321; -x_301 = lean::cnstr_get(x_49, 0); -lean::inc(x_301); -x_303 = lean::cnstr_get(x_49, 1); -lean::inc(x_303); -x_305 = lean::cnstr_get(x_49, 2); -lean::inc(x_305); +obj* x_293; obj* x_295; obj* x_297; obj* x_299; uint32 x_300; obj* x_302; obj* x_303; obj* x_304; obj* x_306; obj* x_307; obj* x_310; obj* x_312; obj* x_313; +x_293 = lean::cnstr_get(x_49, 0); +lean::inc(x_293); +x_295 = lean::cnstr_get(x_49, 1); +lean::inc(x_295); +x_297 = lean::cnstr_get(x_49, 2); +lean::inc(x_297); if (lean::is_shared(x_49)) { lean::dec(x_49); - x_307 = lean::box(0); + x_299 = lean::box(0); } else { lean::cnstr_release(x_49, 0); lean::cnstr_release(x_49, 1); lean::cnstr_release(x_49, 2); - x_307 = x_49; + x_299 = x_49; } -x_308 = lean::unbox_uint32(x_301); -lean::dec(x_301); -x_310 = lean::uint32_to_nat(x_308); -x_311 = l_lean_parser_parse__hex__digit___rarg___lambda__3___closed__1; -x_312 = lean::nat_sub(x_310, x_311); -lean::dec(x_310); -x_314 = lean::mk_nat_obj(10u); -x_315 = lean::nat_add(x_314, x_312); -lean::dec(x_312); -lean::dec(x_314); -x_318 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_318); -if (lean::is_scalar(x_307)) { - x_320 = lean::alloc_cnstr(0, 3, 0); +x_300 = lean::unbox_uint32(x_293); +lean::dec(x_293); +x_302 = lean::uint32_to_nat(x_300); +x_303 = l_lean_parser_parse__hex__digit___rarg___lambda__3___closed__1; +x_304 = lean::nat_sub(x_302, x_303); +lean::dec(x_302); +x_306 = lean::mk_nat_obj(10u); +x_307 = lean::nat_add(x_306, x_304); +lean::dec(x_304); +lean::dec(x_306); +x_310 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_310); +if (lean::is_scalar(x_299)) { + x_312 = lean::alloc_cnstr(0, 3, 0); } else { - x_320 = x_307; + x_312 = x_299; } -lean::cnstr_set(x_320, 0, x_315); -lean::cnstr_set(x_320, 1, x_303); -lean::cnstr_set(x_320, 2, x_318); -x_321 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_305, x_320); -x_46 = x_321; +lean::cnstr_set(x_312, 0, x_307); +lean::cnstr_set(x_312, 1, x_295); +lean::cnstr_set(x_312, 2, x_310); +x_313 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_297, x_312); +x_46 = x_313; x_47 = x_50; goto lbl_48; } else { -obj* x_322; uint8 x_324; obj* x_325; obj* x_326; obj* x_327; -x_322 = lean::cnstr_get(x_49, 0); -lean::inc(x_322); -x_324 = lean::cnstr_get_scalar(x_49, sizeof(void*)*1); +obj* x_314; uint8 x_316; obj* x_317; obj* x_318; obj* x_319; +x_314 = lean::cnstr_get(x_49, 0); +lean::inc(x_314); +x_316 = lean::cnstr_get_scalar(x_49, sizeof(void*)*1); if (lean::is_shared(x_49)) { lean::dec(x_49); - x_325 = lean::box(0); + x_317 = lean::box(0); } else { lean::cnstr_release(x_49, 0); - x_325 = x_49; + x_317 = x_49; } -if (lean::is_scalar(x_325)) { - x_326 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_317)) { + x_318 = lean::alloc_cnstr(1, 1, 1); } else { - x_326 = x_325; + x_318 = x_317; } -lean::cnstr_set(x_326, 0, x_322); -lean::cnstr_set_scalar(x_326, sizeof(void*)*1, x_324); -x_327 = x_326; -x_46 = x_327; +lean::cnstr_set(x_318, 0, x_314); +lean::cnstr_set_scalar(x_318, sizeof(void*)*1, x_316); +x_319 = x_318; +x_46 = x_319; x_47 = x_50; goto lbl_48; } @@ -19953,146 +19863,144 @@ obj* x_3; obj* x_4; uint8 x_6; x_6 = lean::string_iterator_has_next(x_1); if (x_6 == 0) { -obj* x_7; obj* x_8; obj* x_9; obj* x_15; obj* x_16; obj* x_18; obj* x_21; obj* x_23; +obj* x_7; obj* x_8; obj* x_9; obj* x_14; obj* x_15; obj* x_17; obj* x_20; obj* x_22; x_7 = lean::box(0); x_8 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_9 = l_mjoin___rarg___closed__1; lean::inc(x_1); lean::inc(x_0); -lean::inc(x_7); lean::inc(x_9); lean::inc(x_8); -x_15 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_8, x_9, x_7, x_7, x_0, x_1, x_2); -x_16 = lean::cnstr_get(x_15, 0); -lean::inc(x_16); -x_18 = lean::cnstr_get(x_15, 1); -lean::inc(x_18); -lean::dec(x_15); -x_21 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_21); -x_23 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_21, x_16); -if (lean::obj_tag(x_23) == 0) +x_14 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_8, x_9, x_7, x_7, x_0, x_1, x_2); +x_15 = lean::cnstr_get(x_14, 0); +lean::inc(x_15); +x_17 = lean::cnstr_get(x_14, 1); +lean::inc(x_17); +lean::dec(x_14); +x_20 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_20); +x_22 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_20, x_15); +if (lean::obj_tag(x_22) == 0) { lean::dec(x_0); -x_3 = x_23; -x_4 = x_18; +x_3 = x_22; +x_4 = x_17; goto lbl_5; } else { -obj* x_25; uint8 x_27; -x_25 = lean::cnstr_get(x_23, 0); -lean::inc(x_25); -x_27 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); -if (x_27 == 0) +obj* x_24; uint8 x_26; +x_24 = lean::cnstr_get(x_22, 0); +lean::inc(x_24); +x_26 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); +if (x_26 == 0) { -uint32 x_29; obj* x_31; obj* x_32; obj* x_34; obj* x_37; -lean::dec(x_23); -x_29 = l_lean_id__begin__escape; +uint32 x_28; obj* x_30; obj* x_31; obj* x_33; obj* x_36; +lean::dec(x_22); +x_28 = l_lean_id__begin__escape; lean::inc(x_1); -x_31 = l_lean_parser_monad__parsec_ch___at___private_init_lean_parser_token_4__ident_x_27___spec__11(x_29, x_0, x_1, x_18); -x_32 = lean::cnstr_get(x_31, 0); -lean::inc(x_32); -x_34 = lean::cnstr_get(x_31, 1); -lean::inc(x_34); -lean::dec(x_31); -x_37 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_25, x_32); -x_3 = x_37; -x_4 = x_34; +x_30 = l_lean_parser_monad__parsec_ch___at___private_init_lean_parser_token_4__ident_x_27___spec__11(x_28, x_0, x_1, x_17); +x_31 = lean::cnstr_get(x_30, 0); +lean::inc(x_31); +x_33 = lean::cnstr_get(x_30, 1); +lean::inc(x_33); +lean::dec(x_30); +x_36 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_24, x_31); +x_3 = x_36; +x_4 = x_33; goto lbl_5; } else { lean::dec(x_0); -lean::dec(x_25); -x_3 = x_23; -x_4 = x_18; +lean::dec(x_24); +x_3 = x_22; +x_4 = x_17; goto lbl_5; } } } else { -uint32 x_40; uint8 x_41; -x_40 = lean::string_iterator_curr(x_1); -x_41 = l_lean_is__id__first(x_40); -if (x_41 == 0) +uint32 x_39; uint8 x_40; +x_39 = lean::string_iterator_curr(x_1); +x_40 = l_lean_is__id__first(x_39); +if (x_40 == 0) { -obj* x_42; obj* x_43; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_54; obj* x_55; obj* x_57; obj* x_60; obj* x_62; -x_42 = l_char_quote__core(x_40); -x_43 = l_char_has__repr___closed__1; -lean::inc(x_43); -x_45 = lean::string_append(x_43, x_42); -lean::dec(x_42); -x_47 = lean::string_append(x_45, x_43); -x_48 = lean::box(0); -x_49 = l_mjoin___rarg___closed__1; +obj* x_41; obj* x_42; obj* x_44; obj* x_46; obj* x_47; obj* x_48; obj* x_52; obj* x_53; obj* x_55; obj* x_58; obj* x_60; +x_41 = l_char_quote__core(x_39); +x_42 = l_char_has__repr___closed__1; +lean::inc(x_42); +x_44 = lean::string_append(x_42, x_41); +lean::dec(x_41); +x_46 = lean::string_append(x_44, x_42); +x_47 = lean::box(0); +x_48 = l_mjoin___rarg___closed__1; lean::inc(x_1); lean::inc(x_0); lean::inc(x_48); -lean::inc(x_49); -x_54 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_47, x_49, x_48, x_48, x_0, x_1, x_2); -x_55 = lean::cnstr_get(x_54, 0); +x_52 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_46, x_48, x_47, x_47, x_0, x_1, x_2); +x_53 = lean::cnstr_get(x_52, 0); +lean::inc(x_53); +x_55 = lean::cnstr_get(x_52, 1); lean::inc(x_55); -x_57 = lean::cnstr_get(x_54, 1); -lean::inc(x_57); -lean::dec(x_54); -x_60 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_60); -x_62 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_60, x_55); -if (lean::obj_tag(x_62) == 0) +lean::dec(x_52); +x_58 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_58); +x_60 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_58, x_53); +if (lean::obj_tag(x_60) == 0) { lean::dec(x_0); -x_3 = x_62; -x_4 = x_57; +x_3 = x_60; +x_4 = x_55; goto lbl_5; } else { -obj* x_64; uint8 x_66; -x_64 = lean::cnstr_get(x_62, 0); -lean::inc(x_64); -x_66 = lean::cnstr_get_scalar(x_62, sizeof(void*)*1); -if (x_66 == 0) +obj* x_62; uint8 x_64; +x_62 = lean::cnstr_get(x_60, 0); +lean::inc(x_62); +x_64 = lean::cnstr_get_scalar(x_60, sizeof(void*)*1); +if (x_64 == 0) { -uint32 x_68; obj* x_70; obj* x_71; obj* x_73; obj* x_76; -lean::dec(x_62); -x_68 = l_lean_id__begin__escape; +uint32 x_66; obj* x_68; obj* x_69; obj* x_71; obj* x_74; +lean::dec(x_60); +x_66 = l_lean_id__begin__escape; lean::inc(x_1); -x_70 = l_lean_parser_monad__parsec_ch___at___private_init_lean_parser_token_4__ident_x_27___spec__11(x_68, x_0, x_1, x_57); -x_71 = lean::cnstr_get(x_70, 0); +x_68 = l_lean_parser_monad__parsec_ch___at___private_init_lean_parser_token_4__ident_x_27___spec__11(x_66, x_0, x_1, x_55); +x_69 = lean::cnstr_get(x_68, 0); +lean::inc(x_69); +x_71 = lean::cnstr_get(x_68, 1); lean::inc(x_71); -x_73 = lean::cnstr_get(x_70, 1); -lean::inc(x_73); -lean::dec(x_70); -x_76 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_64, x_71); -x_3 = x_76; -x_4 = x_73; +lean::dec(x_68); +x_74 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_62, x_69); +x_3 = x_74; +x_4 = x_71; goto lbl_5; } else { lean::dec(x_0); -lean::dec(x_64); -x_3 = x_62; -x_4 = x_57; +lean::dec(x_62); +x_3 = x_60; +x_4 = x_55; goto lbl_5; } } } else { -obj* x_81; obj* x_82; obj* x_83; obj* x_84; +obj* x_79; obj* x_80; obj* x_81; obj* x_82; lean::dec(x_0); lean::inc(x_1); -x_81 = lean::string_iterator_next(x_1); -x_82 = lean::box(0); -x_83 = lean::box_uint32(x_40); -x_84 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_84, 0, x_83); -lean::cnstr_set(x_84, 1, x_81); -lean::cnstr_set(x_84, 2, x_82); -x_3 = x_84; +x_79 = lean::string_iterator_next(x_1); +x_80 = lean::box(0); +x_81 = lean::box_uint32(x_39); +x_82 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_82, 0, x_81); +lean::cnstr_set(x_82, 1, x_79); +lean::cnstr_set(x_82, 2, x_80); +x_3 = x_82; x_4 = x_2; goto lbl_5; } @@ -20101,41 +20009,41 @@ lbl_5: { if (lean::obj_tag(x_3) == 0) { -obj* x_85; obj* x_87; obj* x_88; obj* x_90; obj* x_91; -x_85 = lean::cnstr_get(x_3, 0); -lean::inc(x_85); +obj* x_83; obj* x_85; obj* x_86; obj* x_88; obj* x_89; +x_83 = lean::cnstr_get(x_3, 0); +lean::inc(x_83); if (lean::is_shared(x_3)) { lean::dec(x_3); - x_87 = lean::box(0); + x_85 = lean::box(0); } else { lean::cnstr_release(x_3, 0); lean::cnstr_release(x_3, 1); lean::cnstr_release(x_3, 2); - x_87 = x_3; + x_85 = x_3; } -x_88 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_88); -if (lean::is_scalar(x_87)) { - x_90 = lean::alloc_cnstr(0, 3, 0); +x_86 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_86); +if (lean::is_scalar(x_85)) { + x_88 = lean::alloc_cnstr(0, 3, 0); } else { - x_90 = x_87; + x_88 = x_85; } -lean::cnstr_set(x_90, 0, x_85); -lean::cnstr_set(x_90, 1, x_1); -lean::cnstr_set(x_90, 2, x_88); -x_91 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_4); -return x_91; +lean::cnstr_set(x_88, 0, x_83); +lean::cnstr_set(x_88, 1, x_1); +lean::cnstr_set(x_88, 2, x_86); +x_89 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_89, 0, x_88); +lean::cnstr_set(x_89, 1, x_4); +return x_89; } else { -obj* x_93; +obj* x_91; lean::dec(x_1); -x_93 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_93, 0, x_3); -lean::cnstr_set(x_93, 1, x_4); -return x_93; +x_91 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_91, 0, x_3); +lean::cnstr_set(x_91, 1, x_4); +return x_91; } } } @@ -20969,83 +20877,82 @@ goto lbl_103; } lbl_139: { -obj* x_250; obj* x_251; obj* x_252; obj* x_257; obj* x_258; obj* x_260; +obj* x_250; obj* x_251; obj* x_252; obj* x_256; obj* x_257; obj* x_259; lean::dec(x_138); x_250 = lean::box(0); x_251 = l_lean_parser_token___closed__1; x_252 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_250); lean::inc(x_252); lean::inc(x_251); -x_257 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_251, x_252, x_250, x_250, x_0, x_130, x_125); -x_258 = lean::cnstr_get(x_257, 0); -lean::inc(x_258); -x_260 = lean::cnstr_get(x_257, 1); -lean::inc(x_260); -lean::dec(x_257); -x_135 = x_258; -x_136 = x_260; +x_256 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_251, x_252, x_250, x_250, x_0, x_130, x_125); +x_257 = lean::cnstr_get(x_256, 0); +lean::inc(x_257); +x_259 = lean::cnstr_get(x_256, 1); +lean::inc(x_259); +lean::dec(x_256); +x_135 = x_257; +x_136 = x_259; goto lbl_137; } } else { -obj* x_268; uint8 x_270; obj* x_271; obj* x_272; obj* x_273; obj* x_274; +obj* x_267; uint8 x_269; obj* x_270; obj* x_271; obj* x_272; obj* x_273; lean::dec(x_1); lean::dec(x_0); lean::dec(x_2); lean::dec(x_114); lean::dec(x_120); -x_268 = lean::cnstr_get(x_123, 0); -lean::inc(x_268); -x_270 = lean::cnstr_get_scalar(x_123, sizeof(void*)*1); +x_267 = lean::cnstr_get(x_123, 0); +lean::inc(x_267); +x_269 = lean::cnstr_get_scalar(x_123, sizeof(void*)*1); if (lean::is_shared(x_123)) { lean::dec(x_123); - x_271 = lean::box(0); + x_270 = lean::box(0); } else { lean::cnstr_release(x_123, 0); - x_271 = x_123; + x_270 = x_123; } -if (lean::is_scalar(x_271)) { - x_272 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_270)) { + x_271 = lean::alloc_cnstr(1, 1, 1); } else { - x_272 = x_271; + x_271 = x_270; } -lean::cnstr_set(x_272, 0, x_268); -lean::cnstr_set_scalar(x_272, sizeof(void*)*1, x_270); -x_273 = x_272; -x_274 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_118, x_273); -x_101 = x_274; +lean::cnstr_set(x_271, 0, x_267); +lean::cnstr_set_scalar(x_271, sizeof(void*)*1, x_269); +x_272 = x_271; +x_273 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_118, x_272); +x_101 = x_273; x_102 = x_125; goto lbl_103; } } else { -obj* x_278; uint8 x_280; obj* x_281; obj* x_282; obj* x_283; +obj* x_277; uint8 x_279; obj* x_280; obj* x_281; obj* x_282; lean::dec(x_1); lean::dec(x_0); lean::dec(x_2); -x_278 = lean::cnstr_get(x_109, 0); -lean::inc(x_278); -x_280 = lean::cnstr_get_scalar(x_109, sizeof(void*)*1); +x_277 = lean::cnstr_get(x_109, 0); +lean::inc(x_277); +x_279 = lean::cnstr_get_scalar(x_109, sizeof(void*)*1); if (lean::is_shared(x_109)) { lean::dec(x_109); - x_281 = lean::box(0); + x_280 = lean::box(0); } else { lean::cnstr_release(x_109, 0); - x_281 = x_109; + x_280 = x_109; } -if (lean::is_scalar(x_281)) { - x_282 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_280)) { + x_281 = lean::alloc_cnstr(1, 1, 1); } else { - x_282 = x_281; + x_281 = x_280; } -lean::cnstr_set(x_282, 0, x_278); -lean::cnstr_set_scalar(x_282, sizeof(void*)*1, x_280); -x_283 = x_282; -x_101 = x_283; +lean::cnstr_set(x_281, 0, x_277); +lean::cnstr_set_scalar(x_281, sizeof(void*)*1, x_279); +x_282 = x_281; +x_101 = x_282; x_102 = x_111; goto lbl_103; } @@ -21053,66 +20960,66 @@ lbl_103: { if (lean::obj_tag(x_101) == 0) { -obj* x_285; obj* x_287; obj* x_289; obj* x_290; +obj* x_284; obj* x_286; obj* x_288; obj* x_289; lean::dec(x_100); -x_285 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_285); -x_287 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_285, x_101); -lean::inc(x_285); -x_289 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_285, x_287); -x_290 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_290, 0, x_289); -lean::cnstr_set(x_290, 1, x_102); -return x_290; +x_284 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_284); +x_286 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_284, x_101); +lean::inc(x_284); +x_288 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_284, x_286); +x_289 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_289, 0, x_288); +lean::cnstr_set(x_289, 1, x_102); +return x_289; } else { -obj* x_291; uint8 x_293; -x_291 = lean::cnstr_get(x_101, 0); -lean::inc(x_291); -x_293 = lean::cnstr_get_scalar(x_101, sizeof(void*)*1); +obj* x_290; uint8 x_292; +x_290 = lean::cnstr_get(x_101, 0); +lean::inc(x_290); +x_292 = lean::cnstr_get_scalar(x_101, sizeof(void*)*1); lean::dec(x_101); if (x_99 == 0) { -obj* x_295; obj* x_296; obj* x_297; obj* x_299; obj* x_301; obj* x_302; +obj* x_294; obj* x_295; obj* x_296; obj* x_298; obj* x_300; obj* x_301; if (lean::is_scalar(x_100)) { - x_295 = lean::alloc_cnstr(1, 1, 1); + x_294 = lean::alloc_cnstr(1, 1, 1); } else { - x_295 = x_100; + x_294 = x_100; } -lean::cnstr_set(x_295, 0, x_291); -lean::cnstr_set_scalar(x_295, sizeof(void*)*1, x_293); -x_296 = x_295; -x_297 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_297); -x_299 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_297, x_296); -lean::inc(x_297); -x_301 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_297, x_299); -x_302 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_302, 0, x_301); -lean::cnstr_set(x_302, 1, x_102); -return x_302; +lean::cnstr_set(x_294, 0, x_290); +lean::cnstr_set_scalar(x_294, sizeof(void*)*1, x_292); +x_295 = x_294; +x_296 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_296); +x_298 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_296, x_295); +lean::inc(x_296); +x_300 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_296, x_298); +x_301 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_301, 0, x_300); +lean::cnstr_set(x_301, 1, x_102); +return x_301; } else { -obj* x_303; obj* x_304; obj* x_305; obj* x_307; obj* x_309; obj* x_310; +obj* x_302; obj* x_303; obj* x_304; obj* x_306; obj* x_308; obj* x_309; if (lean::is_scalar(x_100)) { - x_303 = lean::alloc_cnstr(1, 1, 1); + x_302 = lean::alloc_cnstr(1, 1, 1); } else { - x_303 = x_100; + x_302 = x_100; } -lean::cnstr_set(x_303, 0, x_291); -lean::cnstr_set_scalar(x_303, sizeof(void*)*1, x_99); -x_304 = x_303; -x_305 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_305); -x_307 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_305, x_304); -lean::inc(x_305); -x_309 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_305, x_307); -x_310 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_310, 0, x_309); -lean::cnstr_set(x_310, 1, x_102); -return x_310; +lean::cnstr_set(x_302, 0, x_290); +lean::cnstr_set_scalar(x_302, sizeof(void*)*1, x_99); +x_303 = x_302; +x_304 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_304); +x_306 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_304, x_303); +lean::inc(x_304); +x_308 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_304, x_306); +x_309 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_309, 0, x_308); +lean::cnstr_set(x_309, 1, x_102); +return x_309; } } } @@ -21617,18 +21524,17 @@ return x_2; obj* l_lean_parser_symbol_tokens___rarg(obj* x_0, obj* x_1) { _start: { -obj* x_2; obj* x_3; obj* x_5; obj* x_6; +obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_2 = l_string_trim(x_0); x_3 = lean::box(0); -lean::inc(x_3); -x_5 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_5, 0, x_2); -lean::cnstr_set(x_5, 1, x_1); -lean::cnstr_set(x_5, 2, x_3); -x_6 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_3); -return x_6; +x_4 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_4, 0, x_2); +lean::cnstr_set(x_4, 1, x_1); +lean::cnstr_set(x_4, 2, x_3); +x_5 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_5, 0, x_4); +lean::cnstr_set(x_5, 1, x_3); +return x_5; } } obj* l_lean_parser_symbol_tokens(obj* x_0, obj* x_1) { @@ -22499,54 +22405,52 @@ uint8 x_2; x_2 = lean::string_iterator_has_next(x_1); if (x_2 == 0) { -obj* x_3; obj* x_4; obj* x_5; obj* x_9; obj* x_10; obj* x_12; +obj* x_3; obj* x_4; obj* x_5; obj* x_8; obj* x_9; obj* x_11; x_3 = lean::box(0); x_4 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_5 = l_mjoin___rarg___closed__1; -lean::inc(x_3); lean::inc(x_5); lean::inc(x_4); -x_9 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_4, x_5, x_3, x_3, x_1); -x_10 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_10); -x_12 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_10, x_9); -return x_12; +x_8 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_4, x_5, x_3, x_3, x_1); +x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_9); +x_11 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_9, x_8); +return x_11; } else { -uint32 x_13; uint8 x_14; -x_13 = lean::string_iterator_curr(x_1); -x_14 = x_13 == x_0; -if (x_14 == 0) +uint32 x_12; uint8 x_13; +x_12 = lean::string_iterator_curr(x_1); +x_13 = x_12 == x_0; +if (x_13 == 0) { -obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_25; obj* x_26; obj* x_28; -x_15 = l_char_quote__core(x_13); -x_16 = l_char_has__repr___closed__1; -lean::inc(x_16); -x_18 = lean::string_append(x_16, x_15); -lean::dec(x_15); -x_20 = lean::string_append(x_18, x_16); -x_21 = lean::box(0); -x_22 = l_mjoin___rarg___closed__1; +obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_26; +x_14 = l_char_quote__core(x_12); +x_15 = l_char_has__repr___closed__1; +lean::inc(x_15); +x_17 = lean::string_append(x_15, x_14); +lean::dec(x_14); +x_19 = lean::string_append(x_17, x_15); +x_20 = lean::box(0); +x_21 = l_mjoin___rarg___closed__1; lean::inc(x_21); -lean::inc(x_22); -x_25 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_20, x_22, x_21, x_21, x_1); -x_26 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_26); -x_28 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_26, x_25); -return x_28; +x_23 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_19, x_21, x_20, x_20, x_1); +x_24 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_24); +x_26 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_24, x_23); +return x_26; } else { -obj* x_29; obj* x_30; obj* x_31; obj* x_32; -x_29 = lean::string_iterator_next(x_1); -x_30 = lean::box(0); -x_31 = lean::box_uint32(x_13); -x_32 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_32, 0, x_31); -lean::cnstr_set(x_32, 1, x_29); -lean::cnstr_set(x_32, 2, x_30); -return x_32; +obj* x_27; obj* x_28; obj* x_29; obj* x_30; +x_27 = lean::string_iterator_next(x_1); +x_28 = lean::box(0); +x_29 = lean::box_uint32(x_12); +x_30 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_27); +lean::cnstr_set(x_30, 2, x_28); +return x_30; } } } @@ -22558,54 +22462,52 @@ uint8 x_1; x_1 = lean::string_iterator_has_next(x_0); if (x_1 == 0) { -obj* x_2; obj* x_3; obj* x_4; obj* x_8; obj* x_9; obj* x_11; +obj* x_2; obj* x_3; obj* x_4; obj* x_7; obj* x_8; obj* x_10; x_2 = lean::box(0); x_3 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_4 = l_mjoin___rarg___closed__1; -lean::inc(x_2); lean::inc(x_4); lean::inc(x_3); -x_8 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_3, x_4, x_2, x_2, x_0); -x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_9); -x_11 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_9, x_8); -return x_11; +x_7 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_3, x_4, x_2, x_2, x_0); +x_8 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_8); +x_10 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_8, x_7); +return x_10; } else { -uint32 x_12; uint8 x_13; -x_12 = lean::string_iterator_curr(x_0); -x_13 = l_true_decidable; -if (x_13 == 0) +uint32 x_11; uint8 x_12; +x_11 = lean::string_iterator_curr(x_0); +x_12 = l_true_decidable; +if (x_12 == 0) { -obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_24; obj* x_25; obj* x_27; -x_14 = l_char_quote__core(x_12); -x_15 = l_char_has__repr___closed__1; -lean::inc(x_15); -x_17 = lean::string_append(x_15, x_14); -lean::dec(x_14); -x_19 = lean::string_append(x_17, x_15); -x_20 = lean::box(0); -x_21 = l_mjoin___rarg___closed__1; +obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_25; +x_13 = l_char_quote__core(x_11); +x_14 = l_char_has__repr___closed__1; +lean::inc(x_14); +x_16 = lean::string_append(x_14, x_13); +lean::dec(x_13); +x_18 = lean::string_append(x_16, x_14); +x_19 = lean::box(0); +x_20 = l_mjoin___rarg___closed__1; lean::inc(x_20); -lean::inc(x_21); -x_24 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_19, x_21, x_20, x_20, x_0); -x_25 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_25); -x_27 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_25, x_24); -return x_27; +x_22 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_18, x_20, x_19, x_19, x_0); +x_23 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_23); +x_25 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_22); +return x_25; } else { -obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_28 = lean::string_iterator_next(x_0); -x_29 = lean::box(0); -x_30 = lean::box_uint32(x_12); -x_31 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_28); -lean::cnstr_set(x_31, 2, x_29); -return x_31; +obj* x_26; obj* x_27; obj* x_28; obj* x_29; +x_26 = lean::string_iterator_next(x_0); +x_27 = lean::box(0); +x_28 = lean::box_uint32(x_11); +x_29 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_26); +lean::cnstr_set(x_29, 2, x_27); +return x_29; } } } @@ -22639,54 +22541,52 @@ uint8 x_1; x_1 = lean::string_iterator_has_next(x_0); if (x_1 == 0) { -obj* x_2; obj* x_3; obj* x_4; obj* x_8; obj* x_9; obj* x_11; +obj* x_2; obj* x_3; obj* x_4; obj* x_7; obj* x_8; obj* x_10; x_2 = lean::box(0); x_3 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_4 = l_mjoin___rarg___closed__1; -lean::inc(x_2); lean::inc(x_4); lean::inc(x_3); -x_8 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_3, x_4, x_2, x_2, x_0); -x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_9); -x_11 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_9, x_8); -return x_11; +x_7 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_3, x_4, x_2, x_2, x_0); +x_8 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_8); +x_10 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_8, x_7); +return x_10; } else { -uint32 x_12; uint8 x_13; -x_12 = lean::string_iterator_curr(x_0); -x_13 = l_char_is__digit(x_12); -if (x_13 == 0) +uint32 x_11; uint8 x_12; +x_11 = lean::string_iterator_curr(x_0); +x_12 = l_char_is__digit(x_11); +if (x_12 == 0) { -obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_24; obj* x_25; obj* x_27; -x_14 = l_char_quote__core(x_12); -x_15 = l_char_has__repr___closed__1; -lean::inc(x_15); -x_17 = lean::string_append(x_15, x_14); -lean::dec(x_14); -x_19 = lean::string_append(x_17, x_15); -x_20 = lean::box(0); -x_21 = l_mjoin___rarg___closed__1; +obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_25; +x_13 = l_char_quote__core(x_11); +x_14 = l_char_has__repr___closed__1; +lean::inc(x_14); +x_16 = lean::string_append(x_14, x_13); +lean::dec(x_13); +x_18 = lean::string_append(x_16, x_14); +x_19 = lean::box(0); +x_20 = l_mjoin___rarg___closed__1; lean::inc(x_20); -lean::inc(x_21); -x_24 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_19, x_21, x_20, x_20, x_0); -x_25 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_25); -x_27 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_25, x_24); -return x_27; +x_22 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_18, x_20, x_19, x_19, x_0); +x_23 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_23); +x_25 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_23, x_22); +return x_25; } else { -obj* x_28; obj* x_29; obj* x_30; obj* x_31; -x_28 = lean::string_iterator_next(x_0); -x_29 = lean::box(0); -x_30 = lean::box_uint32(x_12); -x_31 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_28); -lean::cnstr_set(x_31, 2, x_29); -return x_31; +obj* x_26; obj* x_27; obj* x_28; obj* x_29; +x_26 = lean::string_iterator_next(x_0); +x_27 = lean::box(0); +x_28 = lean::box_uint32(x_11); +x_29 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_26); +lean::cnstr_set(x_29, 2, x_27); +return x_29; } } } @@ -22790,104 +22690,100 @@ lean::dec(x_1); x_45 = lean::string_iterator_has_next(x_0); if (x_45 == 0) { -obj* x_46; obj* x_47; obj* x_48; obj* x_53; +obj* x_46; obj* x_47; obj* x_48; obj* x_52; x_46 = lean::box(0); x_47 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; x_48 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_46); lean::inc(x_48); lean::inc(x_47); -x_53 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_47, x_48, x_46, x_46, x_0); -x_43 = x_53; +x_52 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_47, x_48, x_46, x_46, x_0); +x_43 = x_52; goto lbl_44; } else { -uint32 x_54; uint32 x_55; uint8 x_56; uint8 x_58; -x_54 = lean::string_iterator_curr(x_0); -x_55 = 97; -x_58 = x_55 <= x_54; -if (x_58 == 0) +uint32 x_53; uint32 x_54; uint8 x_55; uint8 x_57; +x_53 = lean::string_iterator_curr(x_0); +x_54 = 97; +x_57 = x_54 <= x_53; +if (x_57 == 0) { -obj* x_59; obj* x_60; obj* x_62; obj* x_64; obj* x_65; obj* x_66; obj* x_70; -x_59 = l_char_quote__core(x_54); -x_60 = l_char_has__repr___closed__1; -lean::inc(x_60); -x_62 = lean::string_append(x_60, x_59); -lean::dec(x_59); -x_64 = lean::string_append(x_62, x_60); -x_65 = lean::box(0); -x_66 = l_mjoin___rarg___closed__1; +obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_68; +x_58 = l_char_quote__core(x_53); +x_59 = l_char_has__repr___closed__1; +lean::inc(x_59); +x_61 = lean::string_append(x_59, x_58); +lean::dec(x_58); +x_63 = lean::string_append(x_61, x_59); +x_64 = lean::box(0); +x_65 = l_mjoin___rarg___closed__1; lean::inc(x_0); lean::inc(x_65); -lean::inc(x_66); -x_70 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_64, x_66, x_65, x_65, x_0); -x_43 = x_70; +x_68 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_63, x_65, x_64, x_64, x_0); +x_43 = x_68; goto lbl_44; } else { -uint8 x_71; -x_71 = 1; -x_56 = x_71; -goto lbl_57; +uint8 x_69; +x_69 = 1; +x_55 = x_69; +goto lbl_56; } -lbl_57: +lbl_56: { -uint32 x_72; uint8 x_73; -x_72 = 102; -x_73 = x_54 <= x_72; -if (x_73 == 0) +uint32 x_70; uint8 x_71; +x_70 = 102; +x_71 = x_53 <= x_70; +if (x_71 == 0) { -obj* x_74; obj* x_75; obj* x_77; obj* x_79; obj* x_80; obj* x_81; obj* x_85; -x_74 = l_char_quote__core(x_54); -x_75 = l_char_has__repr___closed__1; -lean::inc(x_75); -x_77 = lean::string_append(x_75, x_74); -lean::dec(x_74); -x_79 = lean::string_append(x_77, x_75); -x_80 = lean::box(0); -x_81 = l_mjoin___rarg___closed__1; +obj* x_72; obj* x_73; obj* x_75; obj* x_77; obj* x_78; obj* x_79; obj* x_82; +x_72 = l_char_quote__core(x_53); +x_73 = l_char_has__repr___closed__1; +lean::inc(x_73); +x_75 = lean::string_append(x_73, x_72); +lean::dec(x_72); +x_77 = lean::string_append(x_75, x_73); +x_78 = lean::box(0); +x_79 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_80); -lean::inc(x_81); -x_85 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_79, x_81, x_80, x_80, x_0); -x_43 = x_85; +lean::inc(x_79); +x_82 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_77, x_79, x_78, x_78, x_0); +x_43 = x_82; goto lbl_44; } else { -if (x_56 == 0) +if (x_55 == 0) { -obj* x_86; obj* x_87; obj* x_89; obj* x_91; obj* x_92; obj* x_93; obj* x_97; -x_86 = l_char_quote__core(x_54); -x_87 = l_char_has__repr___closed__1; -lean::inc(x_87); -x_89 = lean::string_append(x_87, x_86); -lean::dec(x_86); -x_91 = lean::string_append(x_89, x_87); -x_92 = lean::box(0); -x_93 = l_mjoin___rarg___closed__1; +obj* x_83; obj* x_84; obj* x_86; obj* x_88; obj* x_89; obj* x_90; obj* x_93; +x_83 = l_char_quote__core(x_53); +x_84 = l_char_has__repr___closed__1; +lean::inc(x_84); +x_86 = lean::string_append(x_84, x_83); +lean::dec(x_83); +x_88 = lean::string_append(x_86, x_84); +x_89 = lean::box(0); +x_90 = l_mjoin___rarg___closed__1; lean::inc(x_0); -lean::inc(x_92); -lean::inc(x_93); -x_97 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_91, x_93, x_92, x_92, x_0); -x_43 = x_97; +lean::inc(x_90); +x_93 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_88, x_90, x_89, x_89, x_0); +x_43 = x_93; goto lbl_44; } else { -obj* x_99; obj* x_100; obj* x_101; obj* x_102; +obj* x_95; obj* x_96; obj* x_97; obj* x_98; lean::inc(x_0); -x_99 = lean::string_iterator_next(x_0); -x_100 = lean::box(0); -x_101 = lean::box_uint32(x_54); -x_102 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_99); -lean::cnstr_set(x_102, 2, x_100); -x_43 = x_102; +x_95 = lean::string_iterator_next(x_0); +x_96 = lean::box(0); +x_97 = lean::box_uint32(x_53); +x_98 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_98, 0, x_97); +lean::cnstr_set(x_98, 1, x_95); +lean::cnstr_set(x_98, 2, x_96); +x_43 = x_98; goto lbl_44; } } @@ -22895,307 +22791,303 @@ goto lbl_44; } lbl_44: { -obj* x_103; obj* x_105; -x_103 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_103); -x_105 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_103, x_43); -if (lean::obj_tag(x_105) == 0) +obj* x_99; obj* x_101; +x_99 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_99); +x_101 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_99, x_43); +if (lean::obj_tag(x_101) == 0) { -obj* x_106; obj* x_108; obj* x_110; obj* x_112; uint32 x_113; obj* x_115; obj* x_116; obj* x_117; obj* x_119; obj* x_120; obj* x_124; obj* x_125; -x_106 = lean::cnstr_get(x_105, 0); +obj* x_102; obj* x_104; obj* x_106; obj* x_108; uint32 x_109; obj* x_111; obj* x_112; obj* x_113; obj* x_115; obj* x_116; obj* x_120; obj* x_121; +x_102 = lean::cnstr_get(x_101, 0); +lean::inc(x_102); +x_104 = lean::cnstr_get(x_101, 1); +lean::inc(x_104); +x_106 = lean::cnstr_get(x_101, 2); lean::inc(x_106); -x_108 = lean::cnstr_get(x_105, 1); -lean::inc(x_108); -x_110 = lean::cnstr_get(x_105, 2); -lean::inc(x_110); -if (lean::is_shared(x_105)) { - lean::dec(x_105); - x_112 = lean::box(0); +if (lean::is_shared(x_101)) { + lean::dec(x_101); + x_108 = lean::box(0); } else { - lean::cnstr_release(x_105, 0); - lean::cnstr_release(x_105, 1); - lean::cnstr_release(x_105, 2); - x_112 = x_105; + lean::cnstr_release(x_101, 0); + lean::cnstr_release(x_101, 1); + lean::cnstr_release(x_101, 2); + x_108 = x_101; } -x_113 = lean::unbox_uint32(x_106); -lean::dec(x_106); -x_115 = lean::uint32_to_nat(x_113); -x_116 = l_lean_parser_parse__hex__digit___rarg___lambda__3___closed__1; -x_117 = lean::nat_sub(x_115, x_116); +x_109 = lean::unbox_uint32(x_102); +lean::dec(x_102); +x_111 = lean::uint32_to_nat(x_109); +x_112 = l_lean_parser_parse__hex__digit___rarg___lambda__3___closed__1; +x_113 = lean::nat_sub(x_111, x_112); +lean::dec(x_111); +x_115 = lean::mk_nat_obj(10u); +x_116 = lean::nat_add(x_115, x_113); +lean::dec(x_113); lean::dec(x_115); -x_119 = lean::mk_nat_obj(10u); -x_120 = lean::nat_add(x_119, x_117); -lean::dec(x_117); -lean::dec(x_119); -lean::inc(x_103); -if (lean::is_scalar(x_112)) { - x_124 = lean::alloc_cnstr(0, 3, 0); +lean::inc(x_99); +if (lean::is_scalar(x_108)) { + x_120 = lean::alloc_cnstr(0, 3, 0); } else { - x_124 = x_112; + x_120 = x_108; } -lean::cnstr_set(x_124, 0, x_120); -lean::cnstr_set(x_124, 1, x_108); -lean::cnstr_set(x_124, 2, x_103); -x_125 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_110, x_124); -if (lean::obj_tag(x_125) == 0) +lean::cnstr_set(x_120, 0, x_116); +lean::cnstr_set(x_120, 1, x_104); +lean::cnstr_set(x_120, 2, x_99); +x_121 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_106, x_120); +if (lean::obj_tag(x_121) == 0) { -obj* x_127; obj* x_128; obj* x_130; +obj* x_123; obj* x_124; obj* x_126; lean::dec(x_0); -x_127 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_125); -x_128 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; -lean::inc(x_128); -x_130 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_127, x_128); -return x_130; +x_123 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_121); +x_124 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; +lean::inc(x_124); +x_126 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_123, x_124); +return x_126; } else { -obj* x_131; uint8 x_133; -x_131 = lean::cnstr_get(x_125, 0); -lean::inc(x_131); -x_133 = lean::cnstr_get_scalar(x_125, sizeof(void*)*1); -x_38 = x_125; -x_39 = x_131; -x_40 = x_133; +obj* x_127; uint8 x_129; +x_127 = lean::cnstr_get(x_121, 0); +lean::inc(x_127); +x_129 = lean::cnstr_get_scalar(x_121, sizeof(void*)*1); +x_38 = x_121; +x_39 = x_127; +x_40 = x_129; goto lbl_41; } } else { -obj* x_134; uint8 x_136; obj* x_137; obj* x_139; obj* x_140; -x_134 = lean::cnstr_get(x_105, 0); -lean::inc(x_134); -x_136 = lean::cnstr_get_scalar(x_105, sizeof(void*)*1); -if (lean::is_shared(x_105)) { - lean::dec(x_105); - x_137 = lean::box(0); +obj* x_130; uint8 x_132; obj* x_133; obj* x_135; obj* x_136; +x_130 = lean::cnstr_get(x_101, 0); +lean::inc(x_130); +x_132 = lean::cnstr_get_scalar(x_101, sizeof(void*)*1); +if (lean::is_shared(x_101)) { + lean::dec(x_101); + x_133 = lean::box(0); } else { - lean::cnstr_release(x_105, 0); - x_137 = x_105; + lean::cnstr_release(x_101, 0); + x_133 = x_101; } -lean::inc(x_134); -if (lean::is_scalar(x_137)) { - x_139 = lean::alloc_cnstr(1, 1, 1); +lean::inc(x_130); +if (lean::is_scalar(x_133)) { + x_135 = lean::alloc_cnstr(1, 1, 1); } else { - x_139 = x_137; + x_135 = x_133; } -lean::cnstr_set(x_139, 0, x_134); -lean::cnstr_set_scalar(x_139, sizeof(void*)*1, x_136); -x_140 = x_139; -x_38 = x_140; -x_39 = x_134; -x_40 = x_136; +lean::cnstr_set(x_135, 0, x_130); +lean::cnstr_set_scalar(x_135, sizeof(void*)*1, x_132); +x_136 = x_135; +x_38 = x_136; +x_39 = x_130; +x_40 = x_132; goto lbl_41; } } } else { -obj* x_143; obj* x_145; +obj* x_139; obj* x_141; lean::dec(x_0); lean::dec(x_2); -x_143 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; -lean::inc(x_143); -x_145 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_1, x_143); -return x_145; +x_139 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; +lean::inc(x_139); +x_141 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_1, x_139); +return x_141; } lbl_41: { if (x_40 == 0) { -obj* x_147; uint8 x_149; +obj* x_143; uint8 x_145; lean::dec(x_38); -x_149 = lean::string_iterator_has_next(x_0); -if (x_149 == 0) +x_145 = lean::string_iterator_has_next(x_0); +if (x_145 == 0) { -obj* x_150; obj* x_151; obj* x_152; obj* x_156; -x_150 = lean::box(0); -x_151 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; -x_152 = l_mjoin___rarg___closed__1; -lean::inc(x_150); -lean::inc(x_152); -lean::inc(x_151); -x_156 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_151, x_152, x_150, x_150, x_0); -x_147 = x_156; -goto lbl_148; +obj* x_146; obj* x_147; obj* x_148; obj* x_151; +x_146 = lean::box(0); +x_147 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; +x_148 = l_mjoin___rarg___closed__1; +lean::inc(x_148); +lean::inc(x_147); +x_151 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_147, x_148, x_146, x_146, x_0); +x_143 = x_151; +goto lbl_144; } else { -uint32 x_157; uint32 x_158; uint8 x_159; uint8 x_161; -x_157 = lean::string_iterator_curr(x_0); -x_158 = 65; -x_161 = x_158 <= x_157; -if (x_161 == 0) +uint32 x_152; uint32 x_153; uint8 x_154; uint8 x_156; +x_152 = lean::string_iterator_curr(x_0); +x_153 = 65; +x_156 = x_153 <= x_152; +if (x_156 == 0) { -obj* x_162; obj* x_163; obj* x_165; obj* x_167; obj* x_168; obj* x_169; obj* x_172; -x_162 = l_char_quote__core(x_157); -x_163 = l_char_has__repr___closed__1; -lean::inc(x_163); -x_165 = lean::string_append(x_163, x_162); -lean::dec(x_162); -x_167 = lean::string_append(x_165, x_163); -x_168 = lean::box(0); -x_169 = l_mjoin___rarg___closed__1; -lean::inc(x_168); -lean::inc(x_169); -x_172 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_167, x_169, x_168, x_168, x_0); -x_147 = x_172; -goto lbl_148; +obj* x_157; obj* x_158; obj* x_160; obj* x_162; obj* x_163; obj* x_164; obj* x_166; +x_157 = l_char_quote__core(x_152); +x_158 = l_char_has__repr___closed__1; +lean::inc(x_158); +x_160 = lean::string_append(x_158, x_157); +lean::dec(x_157); +x_162 = lean::string_append(x_160, x_158); +x_163 = lean::box(0); +x_164 = l_mjoin___rarg___closed__1; +lean::inc(x_164); +x_166 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_162, x_164, x_163, x_163, x_0); +x_143 = x_166; +goto lbl_144; } else { -uint8 x_173; -x_173 = 1; -x_159 = x_173; -goto lbl_160; +uint8 x_167; +x_167 = 1; +x_154 = x_167; +goto lbl_155; } -lbl_160: +lbl_155: { -uint32 x_174; uint8 x_175; -x_174 = 70; -x_175 = x_157 <= x_174; -if (x_175 == 0) +uint32 x_168; uint8 x_169; +x_168 = 70; +x_169 = x_152 <= x_168; +if (x_169 == 0) { -obj* x_176; obj* x_177; obj* x_179; obj* x_181; obj* x_182; obj* x_183; obj* x_186; -x_176 = l_char_quote__core(x_157); -x_177 = l_char_has__repr___closed__1; +obj* x_170; obj* x_171; obj* x_173; obj* x_175; obj* x_176; obj* x_177; obj* x_179; +x_170 = l_char_quote__core(x_152); +x_171 = l_char_has__repr___closed__1; +lean::inc(x_171); +x_173 = lean::string_append(x_171, x_170); +lean::dec(x_170); +x_175 = lean::string_append(x_173, x_171); +x_176 = lean::box(0); +x_177 = l_mjoin___rarg___closed__1; lean::inc(x_177); -x_179 = lean::string_append(x_177, x_176); -lean::dec(x_176); -x_181 = lean::string_append(x_179, x_177); -x_182 = lean::box(0); -x_183 = l_mjoin___rarg___closed__1; -lean::inc(x_182); -lean::inc(x_183); -x_186 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_181, x_183, x_182, x_182, x_0); -x_147 = x_186; -goto lbl_148; +x_179 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_175, x_177, x_176, x_176, x_0); +x_143 = x_179; +goto lbl_144; } else { -if (x_159 == 0) +if (x_154 == 0) { -obj* x_187; obj* x_188; obj* x_190; obj* x_192; obj* x_193; obj* x_194; obj* x_197; -x_187 = l_char_quote__core(x_157); -x_188 = l_char_has__repr___closed__1; -lean::inc(x_188); -x_190 = lean::string_append(x_188, x_187); -lean::dec(x_187); -x_192 = lean::string_append(x_190, x_188); -x_193 = lean::box(0); -x_194 = l_mjoin___rarg___closed__1; -lean::inc(x_193); +obj* x_180; obj* x_181; obj* x_183; obj* x_185; obj* x_186; obj* x_187; obj* x_189; +x_180 = l_char_quote__core(x_152); +x_181 = l_char_has__repr___closed__1; +lean::inc(x_181); +x_183 = lean::string_append(x_181, x_180); +lean::dec(x_180); +x_185 = lean::string_append(x_183, x_181); +x_186 = lean::box(0); +x_187 = l_mjoin___rarg___closed__1; +lean::inc(x_187); +x_189 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_185, x_187, x_186, x_186, x_0); +x_143 = x_189; +goto lbl_144; +} +else +{ +obj* x_190; obj* x_191; obj* x_192; obj* x_193; +x_190 = lean::string_iterator_next(x_0); +x_191 = lean::box(0); +x_192 = lean::box_uint32(x_152); +x_193 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_193, 0, x_192); +lean::cnstr_set(x_193, 1, x_190); +lean::cnstr_set(x_193, 2, x_191); +x_143 = x_193; +goto lbl_144; +} +} +} +} +lbl_144: +{ +obj* x_194; obj* x_196; +x_194 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_194); -x_197 = l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3___rarg(x_192, x_194, x_193, x_193, x_0); -x_147 = x_197; -goto lbl_148; +x_196 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_194, x_143); +if (lean::obj_tag(x_196) == 0) +{ +obj* x_197; obj* x_199; obj* x_201; obj* x_203; uint32 x_204; obj* x_206; obj* x_207; obj* x_208; obj* x_210; obj* x_211; obj* x_215; obj* x_216; obj* x_217; obj* x_218; obj* x_219; obj* x_221; +x_197 = lean::cnstr_get(x_196, 0); +lean::inc(x_197); +x_199 = lean::cnstr_get(x_196, 1); +lean::inc(x_199); +x_201 = lean::cnstr_get(x_196, 2); +lean::inc(x_201); +if (lean::is_shared(x_196)) { + lean::dec(x_196); + x_203 = lean::box(0); +} else { + lean::cnstr_release(x_196, 0); + lean::cnstr_release(x_196, 1); + lean::cnstr_release(x_196, 2); + x_203 = x_196; +} +x_204 = lean::unbox_uint32(x_197); +lean::dec(x_197); +x_206 = lean::uint32_to_nat(x_204); +x_207 = l_lean_parser_parse__hex__digit___rarg___lambda__5___closed__1; +x_208 = lean::nat_sub(x_206, x_207); +lean::dec(x_206); +x_210 = lean::mk_nat_obj(10u); +x_211 = lean::nat_add(x_210, x_208); +lean::dec(x_208); +lean::dec(x_210); +lean::inc(x_194); +if (lean::is_scalar(x_203)) { + x_215 = lean::alloc_cnstr(0, 3, 0); +} else { + x_215 = x_203; +} +lean::cnstr_set(x_215, 0, x_211); +lean::cnstr_set(x_215, 1, x_199); +lean::cnstr_set(x_215, 2, x_194); +x_216 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_201, x_215); +x_217 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_216); +x_218 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_217); +x_219 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; +lean::inc(x_219); +x_221 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_218, x_219); +return x_221; } else { -obj* x_198; obj* x_199; obj* x_200; obj* x_201; -x_198 = lean::string_iterator_next(x_0); -x_199 = lean::box(0); -x_200 = lean::box_uint32(x_157); -x_201 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_201, 0, x_200); -lean::cnstr_set(x_201, 1, x_198); -lean::cnstr_set(x_201, 2, x_199); -x_147 = x_201; -goto lbl_148; -} -} -} -} -lbl_148: -{ -obj* x_202; obj* x_204; -x_202 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_202); -x_204 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_202, x_147); -if (lean::obj_tag(x_204) == 0) -{ -obj* x_205; obj* x_207; obj* x_209; obj* x_211; uint32 x_212; obj* x_214; obj* x_215; obj* x_216; obj* x_218; obj* x_219; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_229; -x_205 = lean::cnstr_get(x_204, 0); -lean::inc(x_205); -x_207 = lean::cnstr_get(x_204, 1); -lean::inc(x_207); -x_209 = lean::cnstr_get(x_204, 2); -lean::inc(x_209); -if (lean::is_shared(x_204)) { - lean::dec(x_204); - x_211 = lean::box(0); +obj* x_222; uint8 x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; obj* x_230; obj* x_232; +x_222 = lean::cnstr_get(x_196, 0); +lean::inc(x_222); +x_224 = lean::cnstr_get_scalar(x_196, sizeof(void*)*1); +if (lean::is_shared(x_196)) { + lean::dec(x_196); + x_225 = lean::box(0); } else { - lean::cnstr_release(x_204, 0); - lean::cnstr_release(x_204, 1); - lean::cnstr_release(x_204, 2); - x_211 = x_204; + lean::cnstr_release(x_196, 0); + x_225 = x_196; } -x_212 = lean::unbox_uint32(x_205); -lean::dec(x_205); -x_214 = lean::uint32_to_nat(x_212); -x_215 = l_lean_parser_parse__hex__digit___rarg___lambda__5___closed__1; -x_216 = lean::nat_sub(x_214, x_215); -lean::dec(x_214); -x_218 = lean::mk_nat_obj(10u); -x_219 = lean::nat_add(x_218, x_216); -lean::dec(x_216); -lean::dec(x_218); -lean::inc(x_202); -if (lean::is_scalar(x_211)) { - x_223 = lean::alloc_cnstr(0, 3, 0); +if (lean::is_scalar(x_225)) { + x_226 = lean::alloc_cnstr(1, 1, 1); } else { - x_223 = x_211; + x_226 = x_225; } -lean::cnstr_set(x_223, 0, x_219); -lean::cnstr_set(x_223, 1, x_207); -lean::cnstr_set(x_223, 2, x_202); -x_224 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_209, x_223); -x_225 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_224); -x_226 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_225); -x_227 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; -lean::inc(x_227); -x_229 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_226, x_227); -return x_229; -} -else -{ -obj* x_230; uint8 x_232; obj* x_233; obj* x_234; obj* x_235; obj* x_236; obj* x_237; obj* x_238; obj* x_240; -x_230 = lean::cnstr_get(x_204, 0); +lean::cnstr_set(x_226, 0, x_222); +lean::cnstr_set_scalar(x_226, sizeof(void*)*1, x_224); +x_227 = x_226; +x_228 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_227); +x_229 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_228); +x_230 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; lean::inc(x_230); -x_232 = lean::cnstr_get_scalar(x_204, sizeof(void*)*1); -if (lean::is_shared(x_204)) { - lean::dec(x_204); - x_233 = lean::box(0); -} else { - lean::cnstr_release(x_204, 0); - x_233 = x_204; -} -if (lean::is_scalar(x_233)) { - x_234 = lean::alloc_cnstr(1, 1, 1); -} else { - x_234 = x_233; -} -lean::cnstr_set(x_234, 0, x_230); -lean::cnstr_set_scalar(x_234, sizeof(void*)*1, x_232); -x_235 = x_234; -x_236 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_39, x_235); -x_237 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_236); -x_238 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; -lean::inc(x_238); -x_240 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_237, x_238); -return x_240; +x_232 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_229, x_230); +return x_232; } } } else { -obj* x_243; obj* x_244; obj* x_246; -lean::dec(x_39); +obj* x_235; obj* x_236; obj* x_238; lean::dec(x_0); -x_243 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_38); -x_244 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; -lean::inc(x_244); -x_246 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_243, x_244); -return x_246; +lean::dec(x_39); +x_235 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_2, x_38); +x_236 = l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_x_27___spec__5___closed__1; +lean::inc(x_236); +x_238 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_235, x_236); +return x_238; } } } @@ -24287,22 +24179,19 @@ return x_4; obj* _init_l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_3; obj* x_5; obj* x_8; +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::box(0); x_1 = lean::mk_string("NOT_AN_IDENT"); lean::inc(x_1); x_3 = l_lean_parser_substring_of__string(x_1); -lean::inc(x_0); -x_5 = lean_name_mk_string(x_0, x_1); -lean::inc(x_0); -lean::inc(x_0); -x_8 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_8, 0, x_0); -lean::cnstr_set(x_8, 1, x_3); -lean::cnstr_set(x_8, 2, x_5); -lean::cnstr_set(x_8, 3, x_0); -lean::cnstr_set(x_8, 4, x_0); -return x_8; +x_4 = lean_name_mk_string(x_0, x_1); +x_5 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_5, 0, x_0); +lean::cnstr_set(x_5, 1, x_3); +lean::cnstr_set(x_5, 2, x_4); +lean::cnstr_set(x_5, 3, x_0); +lean::cnstr_set(x_5, 4, x_0); +return x_5; } } obj* _init_l_lean_parser_ident_parser_view___rarg___lambda__1___closed__2() { @@ -25075,26 +24964,25 @@ _start: { if (lean::obj_tag(x_0) == 0) { -obj* x_4; obj* x_5; obj* x_6; obj* x_10; +obj* x_4; obj* x_5; obj* x_6; obj* x_9; x_4 = lean::box(0); x_5 = l_lean_parser_combinators_any__of___rarg___closed__1; x_6 = l_mjoin___rarg___closed__1; -lean::inc(x_4); lean::inc(x_6); lean::inc(x_5); -x_10 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_1, x_2, x_3); -return x_10; +x_9 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_5, x_6, x_4, x_4, x_1, x_2, x_3); +return x_9; } else { -obj* x_11; obj* x_13; obj* x_16; -x_11 = lean::cnstr_get(x_0, 0); -lean::inc(x_11); -x_13 = lean::cnstr_get(x_0, 1); -lean::inc(x_13); +obj* x_10; obj* x_12; obj* x_15; +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_16 = l_list_foldl___main___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__3(x_11, x_13, x_1, x_2, x_3); -return x_16; +x_15 = l_list_foldl___main___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__3(x_10, x_12, x_1, x_2, x_3); +return x_15; } } } @@ -25361,210 +25249,208 @@ _start: { if (lean::obj_tag(x_1) == 0) { -obj* x_7; obj* x_8; obj* x_9; obj* x_13; +obj* x_7; obj* x_8; obj* x_9; obj* x_12; lean::dec(x_1); lean::dec(x_0); x_7 = lean::box(0); x_8 = l_string_join___closed__1; x_9 = l_mjoin___rarg___closed__1; -lean::inc(x_7); lean::inc(x_9); lean::inc(x_8); -x_13 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_8, x_9, x_7, x_7, x_2, x_3, x_4); -return x_13; +x_12 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_8, x_9, x_7, x_7, x_2, x_3, x_4); +return x_12; } else { -obj* x_14; -x_14 = lean::cnstr_get(x_1, 0); -lean::inc(x_14); +obj* x_13; +x_13 = lean::cnstr_get(x_1, 0); +lean::inc(x_13); lean::dec(x_1); -switch (lean::obj_tag(x_14)) { +switch (lean::obj_tag(x_13)) { case 0: { -obj* x_17; obj* x_20; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_34; obj* x_35; -x_17 = lean::cnstr_get(x_14, 0); -lean::inc(x_17); -lean::dec(x_14); -x_20 = lean::cnstr_get(x_17, 1); -lean::inc(x_20); -lean::dec(x_17); -x_23 = lean::box(0); -x_24 = lean_name_mk_string(x_23, x_20); -x_25 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_24); -x_26 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_25, x_2, x_3, x_4); -x_27 = lean::cnstr_get(x_26, 0); -lean::inc(x_27); -x_29 = lean::cnstr_get(x_26, 1); -lean::inc(x_29); -if (lean::is_shared(x_26)) { - lean::dec(x_26); - x_31 = lean::box(0); +obj* x_16; obj* x_19; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_33; obj* x_34; +x_16 = lean::cnstr_get(x_13, 0); +lean::inc(x_16); +lean::dec(x_13); +x_19 = lean::cnstr_get(x_16, 1); +lean::inc(x_19); +lean::dec(x_16); +x_22 = lean::box(0); +x_23 = lean_name_mk_string(x_22, x_19); +x_24 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_23); +x_25 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_24, x_2, x_3, x_4); +x_26 = lean::cnstr_get(x_25, 0); +lean::inc(x_26); +x_28 = lean::cnstr_get(x_25, 1); +lean::inc(x_28); +if (lean::is_shared(x_25)) { + lean::dec(x_25); + x_30 = lean::box(0); } else { - lean::cnstr_release(x_26, 0); - lean::cnstr_release(x_26, 1); - x_31 = x_26; + lean::cnstr_release(x_25, 0); + lean::cnstr_release(x_25, 1); + x_30 = x_25; } -x_32 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_32); -x_34 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_32, x_27); -if (lean::is_scalar(x_31)) { - x_35 = lean::alloc_cnstr(0, 2, 0); +x_31 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_31); +x_33 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_31, x_26); +if (lean::is_scalar(x_30)) { + x_34 = lean::alloc_cnstr(0, 2, 0); } else { - x_35 = x_31; + x_34 = x_30; } -lean::cnstr_set(x_35, 0, x_34); -lean::cnstr_set(x_35, 1, x_29); -return x_35; +lean::cnstr_set(x_34, 0, x_33); +lean::cnstr_set(x_34, 1, x_28); +return x_34; } case 1: { -obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_45; obj* x_46; obj* x_48; obj* x_49; -lean::dec(x_14); -x_37 = l_lean_parser_indexed___rarg___lambda__1___closed__1; -lean::inc(x_37); -x_39 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_37); -x_40 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_39, x_2, x_3, x_4); -x_41 = lean::cnstr_get(x_40, 0); -lean::inc(x_41); -x_43 = lean::cnstr_get(x_40, 1); -lean::inc(x_43); -if (lean::is_shared(x_40)) { - lean::dec(x_40); - x_45 = lean::box(0); +obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_42; obj* x_44; obj* x_45; obj* x_47; obj* x_48; +lean::dec(x_13); +x_36 = l_lean_parser_indexed___rarg___lambda__1___closed__1; +lean::inc(x_36); +x_38 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_36); +x_39 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_38, x_2, x_3, x_4); +x_40 = lean::cnstr_get(x_39, 0); +lean::inc(x_40); +x_42 = lean::cnstr_get(x_39, 1); +lean::inc(x_42); +if (lean::is_shared(x_39)) { + lean::dec(x_39); + x_44 = lean::box(0); } else { - lean::cnstr_release(x_40, 0); - lean::cnstr_release(x_40, 1); - x_45 = x_40; + lean::cnstr_release(x_39, 0); + lean::cnstr_release(x_39, 1); + x_44 = x_39; } -x_46 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_46); -x_48 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_46, x_41); -if (lean::is_scalar(x_45)) { - x_49 = lean::alloc_cnstr(0, 2, 0); +x_45 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_45); +x_47 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_45, x_40); +if (lean::is_scalar(x_44)) { + x_48 = lean::alloc_cnstr(0, 2, 0); } else { - x_49 = x_45; + x_48 = x_44; } -lean::cnstr_set(x_49, 0, x_48); -lean::cnstr_set(x_49, 1, x_43); -return x_49; +lean::cnstr_set(x_48, 0, x_47); +lean::cnstr_set(x_48, 1, x_42); +return x_48; } case 2: { -obj* x_50; obj* x_53; obj* x_56; obj* x_57; obj* x_58; obj* x_60; obj* x_62; obj* x_63; obj* x_65; obj* x_66; -x_50 = lean::cnstr_get(x_14, 0); -lean::inc(x_50); -lean::dec(x_14); -x_53 = lean::cnstr_get(x_50, 0); -lean::inc(x_53); -lean::dec(x_50); -x_56 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_53); -x_57 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_56, x_2, x_3, x_4); -x_58 = lean::cnstr_get(x_57, 0); -lean::inc(x_58); -x_60 = lean::cnstr_get(x_57, 1); -lean::inc(x_60); -if (lean::is_shared(x_57)) { - lean::dec(x_57); - x_62 = lean::box(0); +obj* x_49; obj* x_52; obj* x_55; obj* x_56; obj* x_57; obj* x_59; obj* x_61; obj* x_62; obj* x_64; obj* x_65; +x_49 = lean::cnstr_get(x_13, 0); +lean::inc(x_49); +lean::dec(x_13); +x_52 = lean::cnstr_get(x_49, 0); +lean::inc(x_52); +lean::dec(x_49); +x_55 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_52); +x_56 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_55, x_2, x_3, x_4); +x_57 = lean::cnstr_get(x_56, 0); +lean::inc(x_57); +x_59 = lean::cnstr_get(x_56, 1); +lean::inc(x_59); +if (lean::is_shared(x_56)) { + lean::dec(x_56); + x_61 = lean::box(0); } else { - lean::cnstr_release(x_57, 0); - lean::cnstr_release(x_57, 1); - x_62 = x_57; + lean::cnstr_release(x_56, 0); + lean::cnstr_release(x_56, 1); + x_61 = x_56; } -x_63 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_63); -x_65 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_63, x_58); -if (lean::is_scalar(x_62)) { - x_66 = lean::alloc_cnstr(0, 2, 0); +x_62 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_62); +x_64 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_62, x_57); +if (lean::is_scalar(x_61)) { + x_65 = lean::alloc_cnstr(0, 2, 0); } else { - x_66 = x_62; + x_65 = x_61; } -lean::cnstr_set(x_66, 0, x_65); -lean::cnstr_set(x_66, 1, x_60); -return x_66; +lean::cnstr_set(x_65, 0, x_64); +lean::cnstr_set(x_65, 1, x_59); +return x_65; } default: { -obj* x_67; obj* x_68; obj* x_69; obj* x_74; obj* x_75; obj* x_77; obj* x_79; -x_67 = lean::box(0); -x_68 = l_string_join___closed__1; -x_69 = l_mjoin___rarg___closed__1; +obj* x_66; obj* x_67; obj* x_68; obj* x_72; obj* x_73; obj* x_75; obj* x_77; +x_66 = lean::box(0); +x_67 = l_string_join___closed__1; +x_68 = l_mjoin___rarg___closed__1; lean::inc(x_2); -lean::inc(x_67); -lean::inc(x_69); lean::inc(x_68); -x_74 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_68, x_69, x_67, x_67, x_2, x_3, x_4); -x_75 = lean::cnstr_get(x_74, 0); +lean::inc(x_67); +x_72 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_67, x_68, x_66, x_66, x_2, x_3, x_4); +x_73 = lean::cnstr_get(x_72, 0); +lean::inc(x_73); +x_75 = lean::cnstr_get(x_72, 1); lean::inc(x_75); -x_77 = lean::cnstr_get(x_74, 1); -lean::inc(x_77); -if (lean::is_shared(x_74)) { - lean::dec(x_74); - x_79 = lean::box(0); +if (lean::is_shared(x_72)) { + lean::dec(x_72); + x_77 = lean::box(0); } else { - lean::cnstr_release(x_74, 0); - lean::cnstr_release(x_74, 1); - x_79 = x_74; + lean::cnstr_release(x_72, 0); + lean::cnstr_release(x_72, 1); + x_77 = x_72; } -if (lean::obj_tag(x_75) == 0) +if (lean::obj_tag(x_73) == 0) { -obj* x_80; obj* x_82; obj* x_84; obj* x_87; obj* x_88; obj* x_89; obj* x_91; obj* x_94; obj* x_95; -x_80 = lean::cnstr_get(x_75, 0); +obj* x_78; obj* x_80; obj* x_82; obj* x_85; obj* x_86; obj* x_87; obj* x_89; obj* x_92; obj* x_93; +x_78 = lean::cnstr_get(x_73, 0); +lean::inc(x_78); +x_80 = lean::cnstr_get(x_73, 1); lean::inc(x_80); -x_82 = lean::cnstr_get(x_75, 1); +x_82 = lean::cnstr_get(x_73, 2); lean::inc(x_82); -x_84 = lean::cnstr_get(x_75, 2); -lean::inc(x_84); -lean::dec(x_75); -x_87 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_80); -x_88 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_87, x_2, x_82, x_77); -x_89 = lean::cnstr_get(x_88, 0); +lean::dec(x_73); +x_85 = l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(x_0, x_78); +x_86 = l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(x_85, x_2, x_80, x_75); +x_87 = lean::cnstr_get(x_86, 0); +lean::inc(x_87); +x_89 = lean::cnstr_get(x_86, 1); lean::inc(x_89); -x_91 = lean::cnstr_get(x_88, 1); -lean::inc(x_91); -lean::dec(x_88); -x_94 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_84, x_89); -if (lean::is_scalar(x_79)) { - x_95 = lean::alloc_cnstr(0, 2, 0); +lean::dec(x_86); +x_92 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_82, x_87); +if (lean::is_scalar(x_77)) { + x_93 = lean::alloc_cnstr(0, 2, 0); } else { - x_95 = x_79; + x_93 = x_77; } -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set(x_95, 1, x_91); -return x_95; +lean::cnstr_set(x_93, 0, x_92); +lean::cnstr_set(x_93, 1, x_89); +return x_93; } else { -obj* x_98; uint8 x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_104; +obj* x_96; uint8 x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; lean::dec(x_0); lean::dec(x_2); -x_98 = lean::cnstr_get(x_75, 0); -lean::inc(x_98); -x_100 = lean::cnstr_get_scalar(x_75, sizeof(void*)*1); -if (lean::is_shared(x_75)) { - lean::dec(x_75); - x_101 = lean::box(0); +x_96 = lean::cnstr_get(x_73, 0); +lean::inc(x_96); +x_98 = lean::cnstr_get_scalar(x_73, sizeof(void*)*1); +if (lean::is_shared(x_73)) { + lean::dec(x_73); + x_99 = lean::box(0); } else { - lean::cnstr_release(x_75, 0); - x_101 = x_75; + lean::cnstr_release(x_73, 0); + x_99 = x_73; } -if (lean::is_scalar(x_101)) { - x_102 = lean::alloc_cnstr(1, 1, 1); +if (lean::is_scalar(x_99)) { + x_100 = lean::alloc_cnstr(1, 1, 1); } else { - x_102 = x_101; + x_100 = x_99; } -lean::cnstr_set(x_102, 0, x_98); -lean::cnstr_set_scalar(x_102, sizeof(void*)*1, x_100); -x_103 = x_102; -if (lean::is_scalar(x_79)) { - x_104 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_100, 0, x_96); +lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_98); +x_101 = x_100; +if (lean::is_scalar(x_77)) { + x_102 = lean::alloc_cnstr(0, 2, 0); } else { - x_104 = x_79; + x_102 = x_77; } -lean::cnstr_set(x_104, 0, x_103); -lean::cnstr_set(x_104, 1, x_77); -return x_104; +lean::cnstr_set(x_102, 0, x_101); +lean::cnstr_set(x_102, 1, x_75); +return x_102; } } } diff --git a/src/boot/init/lean/parser/trie.cpp b/src/boot/init/lean/parser/trie.cpp index db92c5b978..a88a67be3a 100644 --- a/src/boot/init/lean/parser/trie.cpp +++ b/src/boot/init/lean/parser/trie.cpp @@ -92,13 +92,12 @@ obj* l___private_init_lean_parser_trie_2__find__aux(obj*); obj* _init_l_lean_parser_trie_mk___closed__1() { _start: { -obj* x_0; obj* x_2; +obj* x_0; obj* x_1; x_0 = lean::box(0); -lean::inc(x_0); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_0); -lean::cnstr_set(x_2, 1, x_0); -return x_2; +x_1 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_1, 0, x_0); +lean::cnstr_set(x_1, 1, x_0); +return x_1; } } obj* l_lean_parser_trie_mk(obj* x_0) { diff --git a/src/boot/init/lean/trace.cpp b/src/boot/init/lean/trace.cpp index 2aec7443f8..2ee671c8aa 100644 --- a/src/boot/init/lean/trace.cpp +++ b/src/boot/init/lean/trace.cpp @@ -656,7 +656,7 @@ goto lbl_13; } lbl_13: { -obj* x_41; obj* x_43; obj* x_47; obj* x_48; obj* x_50; obj* x_51; obj* x_53; obj* x_55; obj* x_56; +obj* x_41; obj* x_43; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; lean::dec(x_12); x_41 = lean::cnstr_get(x_9, 0); lean::inc(x_41); @@ -667,30 +667,29 @@ lean::inc(x_0); x_47 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_47, 0, x_0); x_48 = lean::box(0); -lean::inc(x_48); -x_50 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_50, 0, x_41); -lean::cnstr_set(x_50, 1, x_43); -lean::cnstr_set(x_50, 2, x_47); -lean::cnstr_set(x_50, 3, x_48); +x_49 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_49, 0, x_41); +lean::cnstr_set(x_49, 1, x_43); +lean::cnstr_set(x_49, 2, x_47); +lean::cnstr_set(x_49, 3, x_48); if (lean::is_scalar(x_11)) { - x_51 = lean::alloc_cnstr(0, 2, 0); + x_50 = lean::alloc_cnstr(0, 2, 0); } else { - x_51 = x_11; + x_50 = x_11; } -lean::cnstr_set(x_51, 0, x_48); -lean::cnstr_set(x_51, 1, x_50); +lean::cnstr_set(x_50, 0, x_48); +lean::cnstr_set(x_50, 1, x_49); lean::inc(x_1); -x_53 = lean::apply_2(x_1, lean::box(0), x_51); +x_52 = lean::apply_2(x_1, lean::box(0), x_50); lean::inc(x_4); -x_55 = lean::alloc_closure(reinterpret_cast(l_lean_trace_lean_trace_monad__tracer___rarg___lambda__3), 6, 5); -lean::closure_set(x_55, 0, x_2); -lean::closure_set(x_55, 1, x_3); -lean::closure_set(x_55, 2, x_0); -lean::closure_set(x_55, 3, x_1); -lean::closure_set(x_55, 4, x_4); -x_56 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_53, x_55); -return x_56; +x_54 = lean::alloc_closure(reinterpret_cast(l_lean_trace_lean_trace_monad__tracer___rarg___lambda__3), 6, 5); +lean::closure_set(x_54, 0, x_2); +lean::closure_set(x_54, 1, x_3); +lean::closure_set(x_54, 2, x_0); +lean::closure_set(x_54, 3, x_1); +lean::closure_set(x_54, 4, x_4); +x_55 = lean::apply_4(x_4, lean::box(0), lean::box(0), x_52, x_54); +return x_55; } } } @@ -937,37 +936,35 @@ return x_57; } lbl_31: { -obj* x_59; obj* x_61; obj* x_63; obj* x_65; obj* x_67; obj* x_69; obj* x_70; +obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_65; obj* x_67; obj* x_68; lean::dec(x_30); x_59 = lean::cnstr_get(x_1, 1); lean::inc(x_59); x_61 = lean::box(0); -lean::inc(x_61); -x_63 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_63, 0, x_26); -lean::cnstr_set(x_63, 1, x_59); -lean::cnstr_set(x_63, 2, x_2); -lean::cnstr_set(x_63, 3, x_61); -lean::inc(x_61); +x_62 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_62, 0, x_26); +lean::cnstr_set(x_62, 1, x_59); +lean::cnstr_set(x_62, 2, x_2); +lean::cnstr_set(x_62, 3, x_61); if (lean::is_scalar(x_13)) { - x_65 = lean::alloc_cnstr(0, 2, 0); + x_63 = lean::alloc_cnstr(0, 2, 0); } else { - x_65 = x_13; + x_63 = x_13; } -lean::cnstr_set(x_65, 0, x_61); -lean::cnstr_set(x_65, 1, x_63); +lean::cnstr_set(x_63, 0, x_61); +lean::cnstr_set(x_63, 1, x_62); lean::inc(x_4); -x_67 = lean::apply_2(x_4, lean::box(0), x_65); +x_65 = lean::apply_2(x_4, lean::box(0), x_63); lean::inc(x_6); -x_69 = lean::alloc_closure(reinterpret_cast(l_lean_trace_lean_trace_monad__tracer___rarg___lambda__9), 7, 6); -lean::closure_set(x_69, 0, x_0); -lean::closure_set(x_69, 1, x_1); -lean::closure_set(x_69, 2, x_5); -lean::closure_set(x_69, 3, x_61); -lean::closure_set(x_69, 4, x_4); -lean::closure_set(x_69, 5, x_6); -x_70 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_67, x_69); -return x_70; +x_67 = lean::alloc_closure(reinterpret_cast(l_lean_trace_lean_trace_monad__tracer___rarg___lambda__9), 7, 6); +lean::closure_set(x_67, 0, x_0); +lean::closure_set(x_67, 1, x_1); +lean::closure_set(x_67, 2, x_5); +lean::closure_set(x_67, 3, x_61); +lean::closure_set(x_67, 4, x_4); +lean::closure_set(x_67, 5, x_6); +x_68 = lean::apply_4(x_6, lean::box(0), lean::box(0), x_65, x_67); +return x_68; } } } @@ -1107,22 +1104,20 @@ return x_17; obj* l_lean_trace_trace__t_run___rarg(obj* x_0, obj* x_1, obj* x_2) { _start: { -obj* x_3; obj* x_5; obj* x_8; obj* x_9; obj* x_10; obj* x_11; +obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; x_3 = lean::cnstr_get(x_0, 1); lean::inc(x_3); x_5 = lean::box(0); -lean::inc(x_5); -lean::inc(x_5); -x_8 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_8, 0, x_1); -lean::cnstr_set(x_8, 1, x_5); -lean::cnstr_set(x_8, 2, x_5); -lean::cnstr_set(x_8, 3, x_5); -x_9 = lean::apply_1(x_2, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_lean_trace_trace__t_run___rarg___lambda__1), 2, 1); -lean::closure_set(x_10, 0, x_0); -x_11 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_9, x_10); -return x_11; +x_6 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_6, 0, x_1); +lean::cnstr_set(x_6, 1, x_5); +lean::cnstr_set(x_6, 2, x_5); +lean::cnstr_set(x_6, 3, x_5); +x_7 = lean::apply_1(x_2, x_6); +x_8 = lean::alloc_closure(reinterpret_cast(l_lean_trace_trace__t_run___rarg___lambda__1), 2, 1); +lean::closure_set(x_8, 0, x_0); +x_9 = lean::apply_4(x_3, lean::box(0), lean::box(0), x_7, x_8); +return x_9; } } obj* l_lean_trace_trace__t_run(obj* x_0, obj* x_1) {