From 11c4e2dd94d2dcac472b47699ce948a6adfc9640 Mon Sep 17 00:00:00 2001 From: Leonardo de Moura Date: Fri, 15 Feb 2019 14:42:20 -0800 Subject: [PATCH] chore(boot): update --- src/boot/init/data/hashable.cpp | 27 +- src/boot/init/data/uint.cpp | 96 +- src/boot/init/data/usize.cpp | 24 +- src/boot/init/lean/elaborator.cpp | 102 +- src/boot/init/lean/expander.cpp | 22 +- src/boot/init/lean/ir/extract_cpp.cpp | 116 +- src/boot/init/lean/ir/instances.cpp | 28 +- src/boot/init/lean/name.cpp | 8 +- src/boot/init/lean/parser/basic.cpp | 780 +-- src/boot/init/lean/parser/command.cpp | 1072 ++-- src/boot/init/lean/parser/declaration.cpp | 6396 ++++++++++----------- src/boot/init/lean/parser/level.cpp | 794 +-- src/boot/init/lean/parser/module.cpp | 404 +- src/boot/init/lean/parser/notation.cpp | 2176 +++---- src/boot/init/lean/parser/syntax.cpp | 18 +- src/boot/init/lean/parser/term.cpp | 4514 +++++++-------- src/boot/init/lean/parser/token.cpp | 4516 +++++++-------- 17 files changed, 10520 insertions(+), 10573 deletions(-) diff --git a/src/boot/init/data/hashable.cpp b/src/boot/init/data/hashable.cpp index 797b998aa6..0dcf2197c6 100644 --- a/src/boot/init/data/hashable.cpp +++ b/src/boot/init/data/hashable.cpp @@ -14,7 +14,6 @@ typedef lean::uint32 uint32; typedef lean::uint64 uint64; #pragma GCC diagnostic ignored "-Wunused-label" #pragma GCC diagnostic ignored "-Wunused-but-set-variable" #endif -obj* l_mix__hash___closed__1___boxed; usize l_string_hash(obj*); obj* l_string_hashable; obj* l_nat_hashable; @@ -26,34 +25,14 @@ namespace lean { usize usize_of_nat(obj*); } obj* l_string_hash___boxed(obj*); -usize l_mix__hash___closed__1; -usize _init_l_mix__hash___closed__1() { -_start: -{ -obj* x_0; usize x_1; -x_0 = lean::mk_nat_obj(0u); -x_1 = lean::usize_of_nat(x_0); -lean::dec(x_0); -return x_1; -} -} usize l_mix__hash(usize x_0, usize x_1) { _start: { usize x_2; -x_2 = l_mix__hash___closed__1; +x_2 = 0; return x_2; } } -obj* _init_l_mix__hash___closed__1___boxed() { -_start: -{ -usize x_0; obj* x_1; -x_0 = l_mix__hash___closed__1; -x_1 = lean::box_size_t(x_0); -return x_1; -} -} obj* l_mix__hash___boxed(obj* x_0, obj* x_1) { _start: { @@ -70,7 +49,7 @@ _start: { usize x_2; lean::dec(x_0); -x_2 = l_mix__hash___closed__1; +x_2 = 0; return x_2; } } @@ -125,8 +104,6 @@ void initialize_init_data_hashable() { _G_initialized = true; initialize_init_data_usize(); initialize_init_data_string_default(); - l_mix__hash___closed__1 = _init_l_mix__hash___closed__1(); - l_mix__hash___closed__1___boxed = _init_l_mix__hash___closed__1___boxed(); l_string_hashable = _init_l_string_hashable(); l_nat_hashable = _init_l_nat_hashable(); } diff --git a/src/boot/init/data/uint.cpp b/src/boot/init/data/uint.cpp index 6016da5d86..ef0f80b968 100644 --- a/src/boot/init/data/uint.cpp +++ b/src/boot/init/data/uint.cpp @@ -294,11 +294,9 @@ return x_0; uint8 _init_l_uint8_has__zero() { _start: { -obj* x_0; uint8 x_1; -x_0 = lean::mk_nat_obj(0u); -x_1 = lean::uint8_of_nat(x_0); -lean::dec(x_0); -return x_1; +uint8 x_0; +x_0 = 0; +return x_0; } } obj* _init_l_uint8_has__zero___boxed() { @@ -313,11 +311,9 @@ return x_1; uint8 _init_l_uint8_has__one() { _start: { -obj* x_0; uint8 x_1; -x_0 = lean::mk_nat_obj(1u); -x_1 = lean::uint8_of_nat(x_0); -lean::dec(x_0); -return x_1; +uint8 x_0; +x_0 = 1; +return x_0; } } obj* _init_l_uint8_has__one___boxed() { @@ -396,11 +392,9 @@ return x_0; uint8 _init_l_uint8_inhabited() { _start: { -obj* x_0; uint8 x_1; -x_0 = lean::mk_nat_obj(0u); -x_1 = lean::uint8_of_nat(x_0); -lean::dec(x_0); -return x_1; +uint8 x_0; +x_0 = 0; +return x_0; } } obj* _init_l_uint8_inhabited___boxed() { @@ -603,11 +597,9 @@ return x_0; uint16 _init_l_uint16_has__zero() { _start: { -obj* x_0; uint16 x_1; -x_0 = lean::mk_nat_obj(0u); -x_1 = lean::uint16_of_nat(x_0); -lean::dec(x_0); -return x_1; +uint16 x_0; +x_0 = 0; +return x_0; } } obj* _init_l_uint16_has__zero___boxed() { @@ -622,11 +614,9 @@ return x_1; uint16 _init_l_uint16_has__one() { _start: { -obj* x_0; uint16 x_1; -x_0 = lean::mk_nat_obj(1u); -x_1 = lean::uint16_of_nat(x_0); -lean::dec(x_0); -return x_1; +uint16 x_0; +x_0 = 1; +return x_0; } } obj* _init_l_uint16_has__one___boxed() { @@ -705,11 +695,9 @@ return x_0; uint16 _init_l_uint16_inhabited() { _start: { -obj* x_0; uint16 x_1; -x_0 = lean::mk_nat_obj(0u); -x_1 = lean::uint16_of_nat(x_0); -lean::dec(x_0); -return x_1; +uint16 x_0; +x_0 = 0; +return x_0; } } obj* _init_l_uint16_inhabited___boxed() { @@ -912,11 +900,9 @@ return x_0; uint32 _init_l_uint32_has__zero() { _start: { -obj* x_0; uint32 x_1; -x_0 = lean::mk_nat_obj(0u); -x_1 = lean::uint32_of_nat(x_0); -lean::dec(x_0); -return x_1; +uint32 x_0; +x_0 = 0; +return x_0; } } obj* _init_l_uint32_has__zero___boxed() { @@ -931,11 +917,9 @@ return x_1; uint32 _init_l_uint32_has__one() { _start: { -obj* x_0; uint32 x_1; -x_0 = lean::mk_nat_obj(1u); -x_1 = lean::uint32_of_nat(x_0); -lean::dec(x_0); -return x_1; +uint32 x_0; +x_0 = 1; +return x_0; } } obj* _init_l_uint32_has__one___boxed() { @@ -1014,11 +998,9 @@ return x_0; uint32 _init_l_uint32_inhabited() { _start: { -obj* x_0; uint32 x_1; -x_0 = lean::mk_nat_obj(0u); -x_1 = lean::uint32_of_nat(x_0); -lean::dec(x_0); -return x_1; +uint32 x_0; +x_0 = 0; +return x_0; } } obj* _init_l_uint32_inhabited___boxed() { @@ -1221,11 +1203,9 @@ return x_0; uint64 _init_l_uint64_has__zero() { _start: { -obj* x_0; uint64 x_1; -x_0 = lean::mk_nat_obj(0u); -x_1 = lean::uint64_of_nat(x_0); -lean::dec(x_0); -return x_1; +uint64 x_0; +x_0 = 0; +return x_0; } } obj* _init_l_uint64_has__zero___boxed() { @@ -1240,11 +1220,9 @@ return x_1; uint64 _init_l_uint64_has__one() { _start: { -obj* x_0; uint64 x_1; -x_0 = lean::mk_nat_obj(1u); -x_1 = lean::uint64_of_nat(x_0); -lean::dec(x_0); -return x_1; +uint64 x_0; +x_0 = 1; +return x_0; } } obj* _init_l_uint64_has__one___boxed() { @@ -1323,11 +1301,9 @@ return x_0; uint64 _init_l_uint64_inhabited() { _start: { -obj* x_0; uint64 x_1; -x_0 = lean::mk_nat_obj(0u); -x_1 = lean::uint64_of_nat(x_0); -lean::dec(x_0); -return x_1; +uint64 x_0; +x_0 = 0; +return x_0; } } obj* _init_l_uint64_inhabited___boxed() { diff --git a/src/boot/init/data/usize.cpp b/src/boot/init/data/usize.cpp index b2745dd4cd..6a4eab6ccc 100644 --- a/src/boot/init/data/usize.cpp +++ b/src/boot/init/data/usize.cpp @@ -173,11 +173,9 @@ return x_0; usize _init_l_usize_has__zero() { _start: { -obj* x_0; usize x_1; -x_0 = lean::mk_nat_obj(0u); -x_1 = lean::usize_of_nat(x_0); -lean::dec(x_0); -return x_1; +usize x_0; +x_0 = 0; +return x_0; } } obj* _init_l_usize_has__zero___boxed() { @@ -192,11 +190,9 @@ return x_1; usize _init_l_usize_has__one() { _start: { -obj* x_0; usize x_1; -x_0 = lean::mk_nat_obj(1u); -x_1 = lean::usize_of_nat(x_0); -lean::dec(x_0); -return x_1; +usize x_0; +x_0 = 1; +return x_0; } } obj* _init_l_usize_has__one___boxed() { @@ -275,11 +271,9 @@ return x_0; usize _init_l_usize_inhabited() { _start: { -obj* x_0; usize x_1; -x_0 = lean::mk_nat_obj(0u); -x_1 = lean::usize_of_nat(x_0); -lean::dec(x_0); -return x_1; +usize x_0; +x_0 = 0; +return x_0; } } obj* _init_l_usize_inhabited___boxed() { diff --git a/src/boot/init/lean/elaborator.cpp b/src/boot/init/lean/elaborator.cpp index 038b9c0967..f12942dc24 100644 --- a/src/boot/init/lean/elaborator.cpp +++ b/src/boot/init/lean/elaborator.cpp @@ -21,7 +21,6 @@ obj* l_lean_elaborator_decl__modifiers__to__pexpr___closed__1; obj* l_rbnode_insert___at_lean_expander_builtin__transformers___spec__3(obj*, obj*, obj*); obj* l_lean_elaborator_commands_elaborate___main___lambda__4___closed__5; obj* l_lean_elaborator_ordered__rbmap_empty___at_lean_elaborator_old__elab__command___spec__6; -obj* l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_elaborator_locally___rarg___lambda__2(obj*, obj*); obj* l_lean_elaborator_ordered__rbmap_of__list___at_lean_elaborator_old__elab__command___spec__8___closed__1; obj* l_lean_elaborator_ordered__rbmap_insert___at_lean_elaborator_old__elab__command___spec__2(obj*, obj*, obj*); @@ -93,7 +92,6 @@ obj* l_list_filter__map___main___rarg(obj*, obj*); extern obj* l_lean_parser_term_match_has__view; obj* l_lean_elaborator_current__command___rarg___closed__1; obj* l_lean_elaborator_level__get__app__args(obj*, obj*, obj*); -obj* l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_elaborator_commands_elaborate___main___lambda__4___closed__3; extern obj* l_lean_parser_command_open; obj* l_rbmap_insert___main___at_lean_elaborator_ordered__rbmap_of__list___spec__2(obj*, obj*, obj*); @@ -117,6 +115,7 @@ obj* l_lean_elaborator_notation_elaborate__aux___closed__1; obj* l_lean_elaborator_mk__eqns___closed__2; obj* l_lean_elaborator_locally___rarg___lambda__3(obj*, obj*, obj*); obj* l_list_reverse___rarg(obj*); +obj* l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_elaborator_run___lambda__4(obj*, obj*, obj*, obj*, obj*); extern "C" obj* lean_name_mk_string(obj*, obj*); obj* l_lean_elaborator_to__pexpr___main___closed__31; @@ -264,6 +263,7 @@ obj* l_lean_elaborator_to__pexpr___main___closed__4; obj* l_lean_elaborator_commands_elaborate___main___lambda__5(obj*, obj*, obj*); obj* l_lean_parser_syntax_get__pos(obj*); obj* l_list_foldl___main___at_lean_elaborator_elaborators___spec__5(obj*, obj*); +obj* l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_elaborator_mk__notation__kind(obj*); obj* l_lean_elaborator_locally___at_lean_elaborator_declaration_elaborate___spec__14___closed__7; extern "C" obj* level_mk_imax(obj*, obj*); @@ -1640,24 +1640,42 @@ lean::dec(x_0); return x_1; } } -obj* l_lean_elaborator_elaborator__t_monad__except___rarg(obj* x_0) { +obj* l_lean_elaborator_elaborator__t_monad___rarg(obj* x_0) { _start: { -obj* x_2; obj* x_3; obj* x_4; obj* x_5; -lean::inc(x_0); -x_2 = l_except__t_monad___rarg(x_0); -x_3 = l_except__t_monad__except___rarg(x_0); -x_4 = l_state__t_monad__except___rarg(x_2, lean::box(0), x_3); -x_5 = l_reader__t_monad__except___rarg(x_4); -return x_5; +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_except__t_monad___rarg(x_0); +x_2 = l_state__t_monad___rarg(x_1); +x_3 = l_reader__t_monad___rarg(x_2); +return x_3; } } -obj* l_lean_elaborator_elaborator__t_monad__except(obj* x_0) { +obj* l_lean_elaborator_elaborator__t_monad(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_elaborator_elaborator__t_monad__except___rarg), 1, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_elaborator_elaborator__t_monad___rarg), 1, 0); +return x_2; +} +} +obj* l_lean_elaborator_elaborator__t_monad__reader___rarg(obj* x_0) { +_start: +{ +obj* x_1; obj* x_2; obj* x_3; +x_1 = l_except__t_monad___rarg(x_0); +x_2 = l_state__t_monad___rarg(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_reader__t_read___rarg), 2, 1); +lean::closure_set(x_3, 0, x_2); +return x_3; +} +} +obj* l_lean_elaborator_elaborator__t_monad__reader(obj* x_0) { +_start: +{ +obj* x_2; +lean::dec(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_elaborator_elaborator__t_monad__reader___rarg), 1, 0); return x_2; } } @@ -1686,42 +1704,24 @@ x_2 = lean::alloc_closure(reinterpret_cast(l_lean_elaborator_elaborator__ return x_2; } } -obj* l_lean_elaborator_elaborator__t_monad__reader___rarg(obj* x_0) { +obj* l_lean_elaborator_elaborator__t_monad__except___rarg(obj* x_0) { _start: { -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_except__t_monad___rarg(x_0); -x_2 = l_state__t_monad___rarg(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_reader__t_read___rarg), 2, 1); -lean::closure_set(x_3, 0, x_2); -return x_3; +obj* x_2; obj* x_3; obj* x_4; obj* x_5; +lean::inc(x_0); +x_2 = l_except__t_monad___rarg(x_0); +x_3 = l_except__t_monad__except___rarg(x_0); +x_4 = l_state__t_monad__except___rarg(x_2, lean::box(0), x_3); +x_5 = l_reader__t_monad__except___rarg(x_4); +return x_5; } } -obj* l_lean_elaborator_elaborator__t_monad__reader(obj* x_0) { +obj* l_lean_elaborator_elaborator__t_monad__except(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_elaborator_elaborator__t_monad__reader___rarg), 1, 0); -return x_2; -} -} -obj* l_lean_elaborator_elaborator__t_monad___rarg(obj* x_0) { -_start: -{ -obj* x_1; obj* x_2; obj* x_3; -x_1 = l_except__t_monad___rarg(x_0); -x_2 = l_state__t_monad___rarg(x_1); -x_3 = l_reader__t_monad___rarg(x_2); -return x_3; -} -} -obj* l_lean_elaborator_elaborator__t_monad(obj* x_0) { -_start: -{ -obj* x_2; -lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_elaborator_elaborator__t_monad___rarg), 1, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_elaborator_elaborator__t_monad__except___rarg), 1, 0); return x_2; } } @@ -20272,7 +20272,7 @@ 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); x_31 = lean::mk_nat_obj(0u); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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_31); lean::closure_set(x_32, 2, x_30); @@ -20856,7 +20856,7 @@ lean::inc(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_93); -x_97 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__3), 8, 2); +x_97 = 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_97, 0, x_0); lean::closure_set(x_97, 1, x_96); x_98 = l_lean_parser_token__map_insert___rarg(x_89, x_92, x_97); @@ -20945,7 +20945,7 @@ lean::inc(x_143); x_145 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_145, 0, x_143); lean::cnstr_set(x_145, 1, x_142); -x_146 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__3), 8, 2); +x_146 = 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_146, 0, x_0); lean::closure_set(x_146, 1, x_145); x_147 = l_lean_parser_token__map_insert___rarg(x_137, x_141, x_146); @@ -28258,20 +28258,18 @@ return x_1; obj* _init_l_lean_elaborator_run___closed__3() { _start: { -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; uint32 x_6; obj* x_8; obj* x_9; +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; uint32 x_5; obj* x_6; obj* x_7; x_0 = lean::box(0); x_1 = lean::mk_string("_ngen"); x_2 = lean_name_mk_string(x_0, x_1); x_3 = lean::mk_string("fixme"); x_4 = lean_name_mk_string(x_2, x_3); -x_5 = lean::mk_nat_obj(0u); -x_6 = lean::uint32_of_nat(x_5); -lean::dec(x_5); -x_8 = lean::alloc_cnstr(0, 1, 4); -lean::cnstr_set(x_8, 0, x_4); -lean::cnstr_set_scalar(x_8, sizeof(void*)*1, x_6); -x_9 = x_8; -return x_9; +x_5 = 0; +x_6 = lean::alloc_cnstr(0, 1, 4); +lean::cnstr_set(x_6, 0, x_4); +lean::cnstr_set_scalar(x_6, sizeof(void*)*1, x_5); +x_7 = x_6; +return x_7; } } obj* _init_l_lean_elaborator_run___closed__4() { diff --git a/src/boot/init/lean/expander.cpp b/src/boot/init/lean/expander.cpp index 4af274ac15..b315429eec 100644 --- a/src/boot/init/lean/expander.cpp +++ b/src/boot/init/lean/expander.cpp @@ -58,7 +58,6 @@ obj* l_lean_expander_coe__binders__ext___rarg(obj*, obj*); obj* l_id_monad___lambda__1(obj*, obj*, obj*, obj*); extern obj* l_lean_parser_term_if_has__view; extern obj* l_lean_parser_term_bracketed__binders; -obj* l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_string__lit_has__view_x_27___lambda__1(obj*); obj* l_lean_expander_if_transform___closed__2; obj* l_list_map___main___at_lean_expander_coe__binders__ext___spec__2___rarg(obj*, obj*); @@ -69,6 +68,7 @@ obj* l_list_foldr1___main___at_lean_expander_paren_transform___spec__3(obj*, obj obj* l_lean_parser_syntax_flip__scopes___main(obj*, obj*); obj* l_rbnode_ins___main___at_lean_expander_builtin__transformers___spec__4(obj*, obj*, obj*); obj* l_lean_expander_assume_transform___closed__1; +obj* l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_list_foldr___main___at_lean_expander_expand__binders___spec__7(obj*, obj*, obj*); extern "C" obj* lean_name_mk_string(obj*, obj*); obj* l_list_map___main___at_lean_expander_expand__bracketed__binder___main___spec__6(obj*, obj*); @@ -334,7 +334,7 @@ _start: return x_0; } } -obj* _init_l_lean_expander_transform__m_monad__except() { +obj* _init_l_lean_expander_transform__m_monad() { _start: { obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; @@ -357,8 +357,8 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); x_9 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_9, 0, x_7); lean::cnstr_set(x_9, 1, x_8); -x_10 = l_except__t_monad__except___rarg(x_9); -x_11 = l_reader__t_monad__except___rarg(x_10); +x_10 = l_except__t_monad___rarg(x_9); +x_11 = l_reader__t_monad___rarg(x_10); return x_11; } } @@ -391,7 +391,7 @@ lean::closure_set(x_11, 0, x_10); return x_11; } } -obj* _init_l_lean_expander_transform__m_monad() { +obj* _init_l_lean_expander_transform__m_monad__except() { _start: { obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; @@ -414,8 +414,8 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); x_9 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_9, 0, x_7); lean::cnstr_set(x_9, 1, x_8); -x_10 = l_except__t_monad___rarg(x_9); -x_11 = l_reader__t_monad___rarg(x_10); +x_10 = l_except__t_monad__except___rarg(x_9); +x_11 = l_reader__t_monad__except___rarg(x_10); return x_11; } } @@ -9727,7 +9727,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -9761,7 +9761,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -11682,9 +11682,9 @@ void initialize_init_lean_expander() { _G_initialized = true; initialize_init_lean_parser_module(); initialize_init_lean_expr(); - l_lean_expander_transform__m_monad__except = _init_l_lean_expander_transform__m_monad__except(); - l_lean_expander_transform__m_monad__reader = _init_l_lean_expander_transform__m_monad__reader(); l_lean_expander_transform__m_monad = _init_l_lean_expander_transform__m_monad(); + l_lean_expander_transform__m_monad__reader = _init_l_lean_expander_transform__m_monad__reader(); + l_lean_expander_transform__m_monad__except = _init_l_lean_expander_transform__m_monad__except(); l_lean_expander_transform__m = _init_l_lean_expander_transform__m(); l_lean_expander_transformer = _init_l_lean_expander_transformer(); l_lean_expander_no__expansion___closed__1 = _init_l_lean_expander_no__expansion___closed__1(); diff --git a/src/boot/init/lean/ir/extract_cpp.cpp b/src/boot/init/lean/ir/extract_cpp.cpp index 70a34931d0..02baa48d74 100644 --- a/src/boot/init/lean/ir/extract_cpp.cpp +++ b/src/boot/init/lean/ir/extract_cpp.cpp @@ -468,27 +468,7 @@ x_12 = lean::string_append(x_10, x_11); return x_12; } } -obj* _init_l_lean_ir_cpp_extract__m_monad__run() { -_start: -{ -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_0 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__1), 4, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__2), 4, 0); -x_2 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_2, 0, x_0); -lean::cnstr_set(x_2, 1, x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_id_run), 1, 0); -x_4 = lean::alloc_closure(reinterpret_cast(l_state__t_monad__run___rarg), 5, 2); -lean::closure_set(x_4, 0, x_2); -lean::closure_set(x_4, 1, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_except__t_monad__run___rarg), 3, 1); -lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_reader__t_monad__run___rarg), 4, 1); -lean::closure_set(x_6, 0, x_5); -return x_6; -} -} -obj* _init_l_lean_ir_cpp_extract__m_monad__reader() { +obj* _init_l_lean_ir_cpp_extract__m_monad() { _start: { obj* x_0; obj* x_1; 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; @@ -513,8 +493,36 @@ lean::cnstr_set(x_9, 0, x_7); lean::cnstr_set(x_9, 1, x_8); x_10 = l_state__t_monad___rarg(x_9); x_11 = l_except__t_monad___rarg(x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_reader__t_read___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); +x_12 = l_reader__t_monad___rarg(x_11); +return x_12; +} +} +obj* _init_l_lean_ir_cpp_extract__m_monad__except() { +_start: +{ +obj* x_0; obj* x_1; 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; +x_0 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__1), 4, 0); +x_1 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__2), 4, 0); +lean::inc(x_1); +lean::inc(x_0); +x_4 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_4, 0, x_0); +lean::cnstr_set(x_4, 1, x_1); +x_5 = lean::alloc_closure(reinterpret_cast(l_id), 1, 0); +x_6 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__3), 4, 0); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_4); +lean::cnstr_set(x_7, 1, x_5); +lean::cnstr_set(x_7, 2, x_0); +lean::cnstr_set(x_7, 3, x_1); +lean::cnstr_set(x_7, 4, x_6); +x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); +x_9 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_9, 0, x_7); +lean::cnstr_set(x_9, 1, x_8); +x_10 = l_state__t_monad___rarg(x_9); +x_11 = l_except__t_monad__except___rarg(x_10); +x_12 = l_reader__t_monad__except___rarg(x_11); return x_12; } } @@ -557,36 +565,7 @@ x_18 = l_monad__state__trans___rarg(x_14, x_17); return x_18; } } -obj* _init_l_lean_ir_cpp_extract__m_monad__except() { -_start: -{ -obj* x_0; obj* x_1; 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; -x_0 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__1), 4, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__2), 4, 0); -lean::inc(x_1); -lean::inc(x_0); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_0); -lean::cnstr_set(x_4, 1, x_1); -x_5 = lean::alloc_closure(reinterpret_cast(l_id), 1, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__3), 4, 0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_5); -lean::cnstr_set(x_7, 2, x_0); -lean::cnstr_set(x_7, 3, x_1); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_state__t_monad___rarg(x_9); -x_11 = l_except__t_monad__except___rarg(x_10); -x_12 = l_reader__t_monad__except___rarg(x_11); -return x_12; -} -} -obj* _init_l_lean_ir_cpp_extract__m_monad() { +obj* _init_l_lean_ir_cpp_extract__m_monad__reader() { _start: { obj* x_0; obj* x_1; 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; @@ -611,10 +590,31 @@ lean::cnstr_set(x_9, 0, x_7); lean::cnstr_set(x_9, 1, x_8); x_10 = l_state__t_monad___rarg(x_9); x_11 = l_except__t_monad___rarg(x_10); -x_12 = l_reader__t_monad___rarg(x_11); +x_12 = lean::alloc_closure(reinterpret_cast(l_reader__t_read___rarg), 2, 1); +lean::closure_set(x_12, 0, x_11); return x_12; } } +obj* _init_l_lean_ir_cpp_extract__m_monad__run() { +_start: +{ +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; +x_0 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__1), 4, 0); +x_1 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__2), 4, 0); +x_2 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_2, 0, x_0); +lean::cnstr_set(x_2, 1, x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_id_run), 1, 0); +x_4 = lean::alloc_closure(reinterpret_cast(l_state__t_monad__run___rarg), 5, 2); +lean::closure_set(x_4, 0, x_2); +lean::closure_set(x_4, 1, x_3); +x_5 = lean::alloc_closure(reinterpret_cast(l_except__t_monad__run___rarg), 3, 1); +lean::closure_set(x_5, 0, x_4); +x_6 = lean::alloc_closure(reinterpret_cast(l_reader__t_monad__run___rarg), 4, 1); +lean::closure_set(x_6, 0, x_5); +return x_6; +} +} obj* _init_l_lean_ir_cpp_extract__m() { _start: { @@ -21989,11 +21989,11 @@ void initialize_init_lean_ir_extract__cpp() { l_lean_ir_cpp_file__header___closed__2 = _init_l_lean_ir_cpp_file__header___closed__2(); l_lean_ir_cpp_file__header___closed__3 = _init_l_lean_ir_cpp_file__header___closed__3(); l_lean_ir_cpp_file__header___closed__4 = _init_l_lean_ir_cpp_file__header___closed__4(); - l_lean_ir_cpp_extract__m_monad__run = _init_l_lean_ir_cpp_extract__m_monad__run(); - l_lean_ir_cpp_extract__m_monad__reader = _init_l_lean_ir_cpp_extract__m_monad__reader(); - l_lean_ir_cpp_extract__m_monad__state = _init_l_lean_ir_cpp_extract__m_monad__state(); - l_lean_ir_cpp_extract__m_monad__except = _init_l_lean_ir_cpp_extract__m_monad__except(); l_lean_ir_cpp_extract__m_monad = _init_l_lean_ir_cpp_extract__m_monad(); + l_lean_ir_cpp_extract__m_monad__except = _init_l_lean_ir_cpp_extract__m_monad__except(); + l_lean_ir_cpp_extract__m_monad__state = _init_l_lean_ir_cpp_extract__m_monad__state(); + l_lean_ir_cpp_extract__m_monad__reader = _init_l_lean_ir_cpp_extract__m_monad__reader(); + l_lean_ir_cpp_extract__m_monad__run = _init_l_lean_ir_cpp_extract__m_monad__run(); l_lean_ir_cpp_extract__m = _init_l_lean_ir_cpp_extract__m(); l_lean_ir_cpp_emit__blockid___closed__1 = _init_l_lean_ir_cpp_emit__blockid___closed__1(); l_lean_ir_cpp_fid2cpp___closed__1 = _init_l_lean_ir_cpp_fid2cpp___closed__1(); diff --git a/src/boot/init/lean/ir/instances.cpp b/src/boot/init/lean/ir/instances.cpp index 05edaf0a55..712cdefd25 100644 --- a/src/boot/init/lean/ir/instances.cpp +++ b/src/boot/init/lean/ir/instances.cpp @@ -413,15 +413,6 @@ x_0 = lean::box(0); return x_0; } } -obj* _init_l_lean_ir_var_hashable() { -_start: -{ -obj* x_0; -x_0 = l_lean_name_hashable; -lean::inc(x_0); -return x_0; -} -} obj* _init_l_lean_ir_var_decidable__eq() { _start: { @@ -431,7 +422,7 @@ lean::inc(x_0); return x_0; } } -obj* _init_l_lean_ir_blockid_hashable() { +obj* _init_l_lean_ir_var_hashable() { _start: { obj* x_0; @@ -449,7 +440,7 @@ lean::inc(x_0); return x_0; } } -obj* _init_l_lean_ir_fnid_hashable() { +obj* _init_l_lean_ir_blockid_hashable() { _start: { obj* x_0; @@ -467,6 +458,15 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_ir_fnid_hashable() { +_start: +{ +obj* x_0; +x_0 = l_lean_name_hashable; +lean::inc(x_0); +return x_0; +} +} obj* _init_l_lean_ir_var__set() { _start: { @@ -596,12 +596,12 @@ void initialize_init_lean_ir_instances() { l_lean_ir_var__has__lt = _init_l_lean_ir_var__has__lt(); l_lean_ir_blockid__has__lt = _init_l_lean_ir_blockid__has__lt(); l_lean_ir_fnid__has__lt = _init_l_lean_ir_fnid__has__lt(); - l_lean_ir_var_hashable = _init_l_lean_ir_var_hashable(); l_lean_ir_var_decidable__eq = _init_l_lean_ir_var_decidable__eq(); - l_lean_ir_blockid_hashable = _init_l_lean_ir_blockid_hashable(); + l_lean_ir_var_hashable = _init_l_lean_ir_var_hashable(); l_lean_ir_blockid_decidable__eq = _init_l_lean_ir_blockid_decidable__eq(); - l_lean_ir_fnid_hashable = _init_l_lean_ir_fnid_hashable(); + l_lean_ir_blockid_hashable = _init_l_lean_ir_blockid_hashable(); l_lean_ir_fnid_decidable__eq = _init_l_lean_ir_fnid_decidable__eq(); + l_lean_ir_fnid_hashable = _init_l_lean_ir_fnid_hashable(); l_lean_ir_var__set = _init_l_lean_ir_var__set(); l_lean_ir_blockid__set = _init_l_lean_ir_blockid__set(); l_lean_ir_context = _init_l_lean_ir_context(); diff --git a/src/boot/init/lean/name.cpp b/src/boot/init/lean/name.cpp index 72b320e3b6..243fd6aeb2 100644 --- a/src/boot/init/lean/name.cpp +++ b/src/boot/init/lean/name.cpp @@ -57,6 +57,9 @@ obj* l_lean_mk__num__name(obj*, obj*); obj* l_lean_name_quick__lt(obj*, obj*); obj* l_lean_mk__simple__name(obj*); obj* l_lean_name_lean_has__to__format(obj*); +namespace lean { +usize usize_of_nat(obj*); +} obj* l___private_init_lean_name_1__hash__aux___boxed(obj*, obj*); obj* l_lean_name_update__prefix___main(obj*, obj*); obj* l_lean_name_get__prefix(obj*); @@ -72,7 +75,6 @@ namespace lean { uint8 nat_dec_lt(obj*, obj*); } obj* l_lean_name_decidable__rel___boxed(obj*, obj*); -extern usize l_mix__hash___closed__1; obj* _init_l_lean_inhabited() { _start: { @@ -131,7 +133,7 @@ obj* x_4; usize x_7; x_4 = lean::cnstr_get(x_0, 0); lean::inc(x_4); lean::dec(x_0); -x_7 = l_mix__hash___closed__1; +x_7 = 0; x_0 = x_4; x_1 = x_7; goto _start; @@ -142,7 +144,7 @@ obj* x_9; usize x_12; x_9 = lean::cnstr_get(x_0, 0); lean::inc(x_9); lean::dec(x_0); -x_12 = l_mix__hash___closed__1; +x_12 = 0; x_0 = x_9; x_1 = x_12; goto _start; diff --git a/src/boot/init/lean/parser/basic.cpp b/src/boot/init/lean/parser/basic.cpp index 03030f7b10..e91490b840 100644 --- a/src/boot/init/lean/parser/basic.cpp +++ b/src/boot/init/lean/parser/basic.cpp @@ -212,39 +212,21 @@ lean::dec(x_0); return x_1; } } -obj* l_lean_parser_parser__core__t_monad__except___rarg(obj* x_0) { +obj* l_lean_parser_parser__core__t_monad___rarg(obj* x_0) { _start: { obj* x_1; obj* x_2; x_1 = l_state__t_monad___rarg(x_0); -x_2 = l_lean_parser_parsec__t_monad__except___rarg(x_1, lean::box(0)); +x_2 = l_lean_parser_parsec__t_monad___rarg(x_1, lean::box(0)); return x_2; } } -obj* l_lean_parser_parser__core__t_monad__except(obj* x_0) { +obj* l_lean_parser_parser__core__t_monad(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__core__t_monad__except___rarg), 1, 0); -return x_2; -} -} -obj* l_lean_parser_parser__core__t_lean_parser_monad__parsec___rarg(obj* x_0) { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_state__t_monad___rarg(x_0); -x_2 = l_lean_parser_lean_parser_monad__parsec___rarg(x_1); -return x_2; -} -} -obj* l_lean_parser_parser__core__t_lean_parser_monad__parsec(obj* x_0) { -_start: -{ -obj* x_2; -lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__core__t_lean_parser_monad__parsec___rarg), 1, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__core__t_monad___rarg), 1, 0); return x_2; } } @@ -266,21 +248,39 @@ x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__core__t_ return x_2; } } -obj* l_lean_parser_parser__core__t_monad___rarg(obj* x_0) { +obj* l_lean_parser_parser__core__t_lean_parser_monad__parsec___rarg(obj* x_0) { _start: { obj* x_1; obj* x_2; x_1 = l_state__t_monad___rarg(x_0); -x_2 = l_lean_parser_parsec__t_monad___rarg(x_1, lean::box(0)); +x_2 = l_lean_parser_lean_parser_monad__parsec___rarg(x_1); return x_2; } } -obj* l_lean_parser_parser__core__t_monad(obj* x_0) { +obj* l_lean_parser_parser__core__t_lean_parser_monad__parsec(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__core__t_monad___rarg), 1, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__core__t_lean_parser_monad__parsec___rarg), 1, 0); +return x_2; +} +} +obj* l_lean_parser_parser__core__t_monad__except___rarg(obj* x_0) { +_start: +{ +obj* x_1; obj* x_2; +x_1 = l_state__t_monad___rarg(x_0); +x_2 = l_lean_parser_parsec__t_monad__except___rarg(x_1, lean::box(0)); +return x_2; +} +} +obj* l_lean_parser_parser__core__t_monad__except(obj* x_0) { +_start: +{ +obj* x_2; +lean::dec(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__core__t_monad__except___rarg), 1, 0); return x_2; } } @@ -293,22 +293,63 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_parser__t_monad__except___rarg(obj* x_0) { +obj* l_lean_parser_parser__t_monad___rarg(obj* x_0) { _start: { obj* x_1; obj* x_2; -x_1 = l_lean_parser_parser__core__t_monad__except___rarg(x_0); -x_2 = l_reader__t_monad__except___rarg(x_1); +x_1 = l_lean_parser_parser__core__t_monad___rarg(x_0); +x_2 = l_reader__t_monad___rarg(x_1); return x_2; } } -obj* l_lean_parser_parser__t_monad__except(obj* x_0, obj* x_1) { +obj* l_lean_parser_parser__t_monad(obj* x_0, obj* x_1) { _start: { obj* x_4; lean::dec(x_1); lean::dec(x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__t_monad__except___rarg), 1, 0); +x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__t_monad___rarg), 1, 0); +return x_4; +} +} +obj* l_lean_parser_parser__t_alternative___rarg(obj* x_0) { +_start: +{ +obj* x_2; obj* x_3; obj* x_4; +lean::inc(x_0); +x_2 = l_lean_parser_parser__core__t_monad___rarg(x_0); +x_3 = l_lean_parser_parser__core__t_alternative___rarg(x_0); +x_4 = l_reader__t_alternative___rarg(x_2, x_3); +return x_4; +} +} +obj* l_lean_parser_parser__t_alternative(obj* x_0, obj* x_1) { +_start: +{ +obj* x_4; +lean::dec(x_1); +lean::dec(x_0); +x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__t_alternative___rarg), 1, 0); +return x_4; +} +} +obj* l_lean_parser_parser__t_monad__reader___rarg(obj* x_0) { +_start: +{ +obj* x_1; obj* x_2; +x_1 = l_lean_parser_parser__core__t_monad___rarg(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_read___rarg), 2, 1); +lean::closure_set(x_2, 0, x_1); +return x_2; +} +} +obj* l_lean_parser_parser__t_monad__reader(obj* x_0, obj* x_1) { +_start: +{ +obj* x_4; +lean::dec(x_1); +lean::dec(x_0); +x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__t_monad__reader___rarg), 1, 0); return x_4; } } @@ -345,63 +386,22 @@ x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__t_lean_p return x_4; } } -obj* l_lean_parser_parser__t_monad__reader___rarg(obj* x_0) { +obj* l_lean_parser_parser__t_monad__except___rarg(obj* x_0) { _start: { obj* x_1; obj* x_2; -x_1 = l_lean_parser_parser__core__t_monad___rarg(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_read___rarg), 2, 1); -lean::closure_set(x_2, 0, x_1); +x_1 = l_lean_parser_parser__core__t_monad__except___rarg(x_0); +x_2 = l_reader__t_monad__except___rarg(x_1); return x_2; } } -obj* l_lean_parser_parser__t_monad__reader(obj* x_0, obj* x_1) { +obj* l_lean_parser_parser__t_monad__except(obj* x_0, obj* x_1) { _start: { obj* x_4; lean::dec(x_1); lean::dec(x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__t_monad__reader___rarg), 1, 0); -return x_4; -} -} -obj* l_lean_parser_parser__t_alternative___rarg(obj* x_0) { -_start: -{ -obj* x_2; obj* x_3; obj* x_4; -lean::inc(x_0); -x_2 = l_lean_parser_parser__core__t_monad___rarg(x_0); -x_3 = l_lean_parser_parser__core__t_alternative___rarg(x_0); -x_4 = l_reader__t_alternative___rarg(x_2, x_3); -return x_4; -} -} -obj* l_lean_parser_parser__t_alternative(obj* x_0, obj* x_1) { -_start: -{ -obj* x_4; -lean::dec(x_1); -lean::dec(x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__t_alternative___rarg), 1, 0); -return x_4; -} -} -obj* l_lean_parser_parser__t_monad___rarg(obj* x_0) { -_start: -{ -obj* x_1; obj* x_2; -x_1 = l_lean_parser_parser__core__t_monad___rarg(x_0); -x_2 = l_reader__t_monad___rarg(x_1); -return x_2; -} -} -obj* l_lean_parser_parser__t_monad(obj* x_0, obj* x_1) { -_start: -{ -obj* x_4; -lean::dec(x_1); -lean::dec(x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__t_monad___rarg), 1, 0); +x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parser__t_monad__except___rarg), 1, 0); return x_4; } } @@ -414,7 +414,7 @@ lean::inc(x_0); return x_0; } } -obj* _init_l_lean_parser_basic__parser__m_monad__except() { +obj* _init_l_lean_parser_basic__parser__m_monad() { _start: { obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; @@ -437,61 +437,7 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); x_9 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_9, 0, x_7); lean::cnstr_set(x_9, 1, x_8); -x_10 = l_lean_parser_parser__t_monad__except___rarg(x_9); -return x_10; -} -} -obj* _init_l_lean_parser_basic__parser__m_lean_parser_monad__parsec() { -_start: -{ -obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_0 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__1), 4, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__2), 4, 0); -lean::inc(x_1); -lean::inc(x_0); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_0); -lean::cnstr_set(x_4, 1, x_1); -x_5 = lean::alloc_closure(reinterpret_cast(l_id), 1, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__3), 4, 0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_5); -lean::cnstr_set(x_7, 2, x_0); -lean::cnstr_set(x_7, 3, x_1); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_lean_parser_parser__t_lean_parser_monad__parsec___rarg(x_9); -return x_10; -} -} -obj* _init_l_lean_parser_basic__parser__m_monad__reader() { -_start: -{ -obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -x_0 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__1), 4, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__2), 4, 0); -lean::inc(x_1); -lean::inc(x_0); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_0); -lean::cnstr_set(x_4, 1, x_1); -x_5 = lean::alloc_closure(reinterpret_cast(l_id), 1, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__3), 4, 0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_5); -lean::cnstr_set(x_7, 2, x_0); -lean::cnstr_set(x_7, 3, x_1); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_lean_parser_parser__t_monad__reader___rarg(x_9); +x_10 = l_lean_parser_parser__t_monad___rarg(x_9); return x_10; } } @@ -522,7 +468,7 @@ x_10 = l_lean_parser_parser__t_alternative___rarg(x_9); return x_10; } } -obj* _init_l_lean_parser_basic__parser__m_monad() { +obj* _init_l_lean_parser_basic__parser__m_monad__reader() { _start: { obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; @@ -545,7 +491,61 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); x_9 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_9, 0, x_7); lean::cnstr_set(x_9, 1, x_8); -x_10 = l_lean_parser_parser__t_monad___rarg(x_9); +x_10 = l_lean_parser_parser__t_monad__reader___rarg(x_9); +return x_10; +} +} +obj* _init_l_lean_parser_basic__parser__m_lean_parser_monad__parsec() { +_start: +{ +obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; +x_0 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__1), 4, 0); +x_1 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__2), 4, 0); +lean::inc(x_1); +lean::inc(x_0); +x_4 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_4, 0, x_0); +lean::cnstr_set(x_4, 1, x_1); +x_5 = lean::alloc_closure(reinterpret_cast(l_id), 1, 0); +x_6 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__3), 4, 0); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_4); +lean::cnstr_set(x_7, 1, x_5); +lean::cnstr_set(x_7, 2, x_0); +lean::cnstr_set(x_7, 3, x_1); +lean::cnstr_set(x_7, 4, x_6); +x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); +x_9 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_9, 0, x_7); +lean::cnstr_set(x_9, 1, x_8); +x_10 = l_lean_parser_parser__t_lean_parser_monad__parsec___rarg(x_9); +return x_10; +} +} +obj* _init_l_lean_parser_basic__parser__m_monad__except() { +_start: +{ +obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; +x_0 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__1), 4, 0); +x_1 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__2), 4, 0); +lean::inc(x_1); +lean::inc(x_0); +x_4 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_4, 0, x_0); +lean::cnstr_set(x_4, 1, x_1); +x_5 = lean::alloc_closure(reinterpret_cast(l_id), 1, 0); +x_6 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__3), 4, 0); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_4); +lean::cnstr_set(x_7, 1, x_5); +lean::cnstr_set(x_7, 2, x_0); +lean::cnstr_set(x_7, 3, x_1); +lean::cnstr_set(x_7, 4, x_6); +x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); +x_9 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_9, 0, x_7); +lean::cnstr_set(x_9, 1, x_8); +x_10 = l_lean_parser_parser__t_monad__except___rarg(x_9); return x_10; } } @@ -1297,57 +1297,7 @@ return x_14; } } } -obj* _init_l_lean_parser_command__parser__m_lean_parser_monad__rec___closed__1() { -_start: -{ -obj* x_0; obj* x_1; obj* x_4; obj* x_5; 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; -x_0 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__1), 4, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__2), 4, 0); -lean::inc(x_1); -lean::inc(x_0); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_0); -lean::cnstr_set(x_4, 1, x_1); -x_5 = lean::alloc_closure(reinterpret_cast(l_id), 1, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__3), 4, 0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_5); -lean::cnstr_set(x_7, 2, x_0); -lean::cnstr_set(x_7, 3, x_1); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_lean_parser_parser__core__t_monad___rarg(x_9); -lean::inc(x_10); -x_12 = l_reader__t_monad___rarg(x_10); -lean::inc(x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift), 4, 3); -lean::closure_set(x_14, 0, lean::box(0)); -lean::closure_set(x_14, 1, lean::box(0)); -lean::closure_set(x_14, 2, x_12); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___rarg), 3, 1); -lean::closure_set(x_15, 0, x_10); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__rec_trans___rarg), 4, 3); -lean::closure_set(x_16, 0, x_14); -lean::closure_set(x_16, 1, x_15); -lean::closure_set(x_16, 2, x_12); -return x_16; -} -} -obj* l_lean_parser_command__parser__m_lean_parser_monad__rec(obj* x_0) { -_start: -{ -obj* x_2; -lean::dec(x_0); -x_2 = l_lean_parser_command__parser__m_lean_parser_monad__rec___closed__1; -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_lean_parser_command__parser__m_monad__except___closed__1() { +obj* _init_l_lean_parser_command__parser__m_monad___closed__1() { _start: { obj* x_0; obj* x_1; 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; @@ -1370,18 +1320,101 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); x_9 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_9, 0, x_7); lean::cnstr_set(x_9, 1, x_8); -x_10 = l_lean_parser_parser__core__t_monad__except___rarg(x_9); -x_11 = l_reader__t_monad__except___rarg(x_10); -x_12 = l_reader__t_monad__except___rarg(x_11); +x_10 = l_lean_parser_parser__core__t_monad___rarg(x_9); +x_11 = l_reader__t_monad___rarg(x_10); +x_12 = l_reader__t_monad___rarg(x_11); return x_12; } } -obj* l_lean_parser_command__parser__m_monad__except(obj* x_0) { +obj* l_lean_parser_command__parser__m_monad(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = l_lean_parser_command__parser__m_monad__except___closed__1; +x_2 = l_lean_parser_command__parser__m_monad___closed__1; +lean::inc(x_2); +return x_2; +} +} +obj* _init_l_lean_parser_command__parser__m_alternative___closed__1() { +_start: +{ +obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; +x_0 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__1), 4, 0); +x_1 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__2), 4, 0); +lean::inc(x_1); +lean::inc(x_0); +x_4 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_4, 0, x_0); +lean::cnstr_set(x_4, 1, x_1); +x_5 = lean::alloc_closure(reinterpret_cast(l_id), 1, 0); +x_6 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__3), 4, 0); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_4); +lean::cnstr_set(x_7, 1, x_5); +lean::cnstr_set(x_7, 2, x_0); +lean::cnstr_set(x_7, 3, x_1); +lean::cnstr_set(x_7, 4, x_6); +x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); +x_9 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_9, 0, x_7); +lean::cnstr_set(x_9, 1, x_8); +lean::inc(x_9); +x_11 = l_lean_parser_parser__core__t_monad___rarg(x_9); +lean::inc(x_11); +x_13 = l_reader__t_monad___rarg(x_11); +x_14 = l_lean_parser_parser__core__t_alternative___rarg(x_9); +x_15 = l_reader__t_alternative___rarg(x_11, x_14); +x_16 = l_reader__t_alternative___rarg(x_13, x_15); +return x_16; +} +} +obj* l_lean_parser_command__parser__m_alternative(obj* x_0) { +_start: +{ +obj* x_2; +lean::dec(x_0); +x_2 = l_lean_parser_command__parser__m_alternative___closed__1; +lean::inc(x_2); +return x_2; +} +} +obj* _init_l_lean_parser_command__parser__m_monad__reader___closed__1() { +_start: +{ +obj* x_0; obj* x_1; 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; +x_0 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__1), 4, 0); +x_1 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__2), 4, 0); +lean::inc(x_1); +lean::inc(x_0); +x_4 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_4, 0, x_0); +lean::cnstr_set(x_4, 1, x_1); +x_5 = lean::alloc_closure(reinterpret_cast(l_id), 1, 0); +x_6 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__3), 4, 0); +x_7 = lean::alloc_cnstr(0, 5, 0); +lean::cnstr_set(x_7, 0, x_4); +lean::cnstr_set(x_7, 1, x_5); +lean::cnstr_set(x_7, 2, x_0); +lean::cnstr_set(x_7, 3, x_1); +lean::cnstr_set(x_7, 4, x_6); +x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); +x_9 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_9, 0, x_7); +lean::cnstr_set(x_9, 1, x_8); +x_10 = l_lean_parser_parser__core__t_monad___rarg(x_9); +x_11 = l_reader__t_monad___rarg(x_10); +x_12 = lean::alloc_closure(reinterpret_cast(l_reader__t_read___rarg), 2, 1); +lean::closure_set(x_12, 0, x_11); +return x_12; +} +} +obj* l_lean_parser_command__parser__m_monad__reader(obj* x_0) { +_start: +{ +obj* x_2; +lean::dec(x_0); +x_2 = l_lean_parser_command__parser__m_monad__reader___closed__1; lean::inc(x_2); return x_2; } @@ -1441,7 +1474,7 @@ lean::inc(x_2); return x_2; } } -obj* _init_l_lean_parser_command__parser__m_monad__reader___closed__1() { +obj* _init_l_lean_parser_command__parser__m_monad__except___closed__1() { _start: { obj* x_0; obj* x_1; 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; @@ -1464,27 +1497,26 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); x_9 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_9, 0, x_7); lean::cnstr_set(x_9, 1, x_8); -x_10 = l_lean_parser_parser__core__t_monad___rarg(x_9); -x_11 = l_reader__t_monad___rarg(x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_reader__t_read___rarg), 2, 1); -lean::closure_set(x_12, 0, x_11); +x_10 = l_lean_parser_parser__core__t_monad__except___rarg(x_9); +x_11 = l_reader__t_monad__except___rarg(x_10); +x_12 = l_reader__t_monad__except___rarg(x_11); return x_12; } } -obj* l_lean_parser_command__parser__m_monad__reader(obj* x_0) { +obj* l_lean_parser_command__parser__m_monad__except(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = l_lean_parser_command__parser__m_monad__reader___closed__1; +x_2 = l_lean_parser_command__parser__m_monad__except___closed__1; lean::inc(x_2); return x_2; } } -obj* _init_l_lean_parser_command__parser__m_alternative___closed__1() { +obj* _init_l_lean_parser_command__parser__m_lean_parser_monad__rec___closed__1() { _start: { -obj* x_0; obj* x_1; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; +obj* x_0; obj* x_1; obj* x_4; obj* x_5; 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; x_0 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__1), 4, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__2), 4, 0); lean::inc(x_1); @@ -1504,61 +1536,29 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); x_9 = lean::alloc_cnstr(0, 2, 0); lean::cnstr_set(x_9, 0, x_7); lean::cnstr_set(x_9, 1, x_8); -lean::inc(x_9); -x_11 = l_lean_parser_parser__core__t_monad___rarg(x_9); -lean::inc(x_11); -x_13 = l_reader__t_monad___rarg(x_11); -x_14 = l_lean_parser_parser__core__t_alternative___rarg(x_9); -x_15 = l_reader__t_alternative___rarg(x_11, x_14); -x_16 = l_reader__t_alternative___rarg(x_13, x_15); +x_10 = l_lean_parser_parser__core__t_monad___rarg(x_9); +lean::inc(x_10); +x_12 = l_reader__t_monad___rarg(x_10); +lean::inc(x_12); +x_14 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift), 4, 3); +lean::closure_set(x_14, 0, lean::box(0)); +lean::closure_set(x_14, 1, lean::box(0)); +lean::closure_set(x_14, 2, x_12); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___rarg), 3, 1); +lean::closure_set(x_15, 0, x_10); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__rec_trans___rarg), 4, 3); +lean::closure_set(x_16, 0, x_14); +lean::closure_set(x_16, 1, x_15); +lean::closure_set(x_16, 2, x_12); return x_16; } } -obj* l_lean_parser_command__parser__m_alternative(obj* x_0) { +obj* l_lean_parser_command__parser__m_lean_parser_monad__rec(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = l_lean_parser_command__parser__m_alternative___closed__1; -lean::inc(x_2); -return x_2; -} -} -obj* _init_l_lean_parser_command__parser__m_monad___closed__1() { -_start: -{ -obj* x_0; obj* x_1; 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; -x_0 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__1), 4, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__2), 4, 0); -lean::inc(x_1); -lean::inc(x_0); -x_4 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_4, 0, x_0); -lean::cnstr_set(x_4, 1, x_1); -x_5 = lean::alloc_closure(reinterpret_cast(l_id), 1, 0); -x_6 = lean::alloc_closure(reinterpret_cast(l_id_monad___lambda__3), 4, 0); -x_7 = lean::alloc_cnstr(0, 5, 0); -lean::cnstr_set(x_7, 0, x_4); -lean::cnstr_set(x_7, 1, x_5); -lean::cnstr_set(x_7, 2, x_0); -lean::cnstr_set(x_7, 3, x_1); -lean::cnstr_set(x_7, 4, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_id_bind), 2, 0); -x_9 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_9, 0, x_7); -lean::cnstr_set(x_9, 1, x_8); -x_10 = l_lean_parser_parser__core__t_monad___rarg(x_9); -x_11 = l_reader__t_monad___rarg(x_10); -x_12 = l_reader__t_monad___rarg(x_11); -return x_12; -} -} -obj* l_lean_parser_command__parser__m_monad(obj* x_0) { -_start: -{ -obj* x_2; -lean::dec(x_0); -x_2 = l_lean_parser_command__parser__m_monad___closed__1; +x_2 = l_lean_parser_command__parser__m_lean_parser_monad__rec___closed__1; lean::inc(x_2); return x_2; } @@ -1636,6 +1636,72 @@ x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command__parser_ return x_2; } } +obj* _init_l_lean_parser_term__parser__m_monad() { +_start: +{ +obj* x_0; obj* x_2; +x_0 = l_lean_parser_command__parser__m_monad___closed__1; +lean::inc(x_0); +x_2 = l_reader__t_monad___rarg(x_0); +return x_2; +} +} +obj* _init_l_lean_parser_term__parser__m_alternative() { +_start: +{ +obj* x_0; obj* x_1; obj* x_4; +x_0 = l_lean_parser_command__parser__m_monad___closed__1; +x_1 = l_lean_parser_command__parser__m_alternative___closed__1; +lean::inc(x_1); +lean::inc(x_0); +x_4 = l_reader__t_alternative___rarg(x_0, x_1); +return x_4; +} +} +obj* _init_l_lean_parser_term__parser__m_monad__reader() { +_start: +{ +obj* x_0; obj* x_2; +x_0 = l_lean_parser_command__parser__m_monad__reader___closed__1; +lean::inc(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___rarg), 2, 1); +lean::closure_set(x_2, 0, x_0); +return x_2; +} +} +obj* _init_l_lean_parser_term__parser__m_lean_parser_monad__parsec() { +_start: +{ +obj* x_0; obj* x_1; obj* x_4; +x_0 = l_lean_parser_command__parser__m_monad___closed__1; +x_1 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; +lean::inc(x_1); +lean::inc(x_0); +x_4 = l_lean_parser_rec__t_lean_parser_monad__parsec___rarg(x_0, lean::box(0), x_1); +return x_4; +} +} +obj* _init_l_lean_parser_term__parser__m_monad__except() { +_start: +{ +obj* x_0; obj* x_2; +x_0 = l_lean_parser_command__parser__m_monad__except___closed__1; +lean::inc(x_0); +x_2 = l_reader__t_monad__except___rarg(x_0); +return x_2; +} +} +obj* _init_l_lean_parser_term__parser__m_lean_parser_monad__rec() { +_start: +{ +obj* x_0; obj* x_2; +x_0 = l_lean_parser_command__parser__m_monad___closed__1; +lean::inc(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___rarg), 3, 1); +lean::closure_set(x_2, 0, x_0); +return x_2; +} +} obj* _init_l_lean_parser_term__parser__m_lean_parser_monad__basic__parser() { _start: { @@ -1655,72 +1721,6 @@ lean::closure_set(x_5, 1, x_4); return x_5; } } -obj* _init_l_lean_parser_term__parser__m_lean_parser_monad__rec() { -_start: -{ -obj* x_0; obj* x_2; -x_0 = l_lean_parser_command__parser__m_monad___closed__1; -lean::inc(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___rarg), 3, 1); -lean::closure_set(x_2, 0, x_0); -return x_2; -} -} -obj* _init_l_lean_parser_term__parser__m_monad__except() { -_start: -{ -obj* x_0; obj* x_2; -x_0 = l_lean_parser_command__parser__m_monad__except___closed__1; -lean::inc(x_0); -x_2 = l_reader__t_monad__except___rarg(x_0); -return x_2; -} -} -obj* _init_l_lean_parser_term__parser__m_lean_parser_monad__parsec() { -_start: -{ -obj* x_0; obj* x_1; obj* x_4; -x_0 = l_lean_parser_command__parser__m_monad___closed__1; -x_1 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -lean::inc(x_1); -lean::inc(x_0); -x_4 = l_lean_parser_rec__t_lean_parser_monad__parsec___rarg(x_0, lean::box(0), x_1); -return x_4; -} -} -obj* _init_l_lean_parser_term__parser__m_monad__reader() { -_start: -{ -obj* x_0; obj* x_2; -x_0 = l_lean_parser_command__parser__m_monad__reader___closed__1; -lean::inc(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___rarg), 2, 1); -lean::closure_set(x_2, 0, x_0); -return x_2; -} -} -obj* _init_l_lean_parser_term__parser__m_alternative() { -_start: -{ -obj* x_0; obj* x_1; obj* x_4; -x_0 = l_lean_parser_command__parser__m_monad___closed__1; -x_1 = l_lean_parser_command__parser__m_alternative___closed__1; -lean::inc(x_1); -lean::inc(x_0); -x_4 = l_reader__t_alternative___rarg(x_0, x_1); -return x_4; -} -} -obj* _init_l_lean_parser_term__parser__m_monad() { -_start: -{ -obj* x_0; obj* x_2; -x_0 = l_lean_parser_command__parser__m_monad___closed__1; -lean::inc(x_0); -x_2 = l_reader__t_monad___rarg(x_0); -return x_2; -} -} obj* _init_l_lean_parser_term__parser__m() { _start: { @@ -1739,51 +1739,36 @@ lean::inc(x_0); return x_0; } } -obj* _init_l_lean_parser_trailing__term__parser__m_lean_parser_monad__basic__parser() { -_start: -{ -obj* x_0; obj* x_2; obj* x_3; obj* x_5; -x_0 = l_lean_parser_term__parser__m_monad; -lean::inc(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift), 4, 3); -lean::closure_set(x_2, 0, lean::box(0)); -lean::closure_set(x_2, 1, lean::box(0)); -lean::closure_set(x_2, 2, x_0); -x_3 = l_lean_parser_term__parser__m_lean_parser_monad__basic__parser; -lean::inc(x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_has__monad__lift__t__trans___rarg), 4, 2); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_3); -return x_5; -} -} -obj* _init_l_lean_parser_trailing__term__parser__m_lean_parser_monad__rec() { -_start: -{ -obj* x_0; obj* x_2; obj* x_3; obj* x_6; -x_0 = l_lean_parser_term__parser__m_monad; -lean::inc(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift), 4, 3); -lean::closure_set(x_2, 0, lean::box(0)); -lean::closure_set(x_2, 1, lean::box(0)); -lean::closure_set(x_2, 2, x_0); -x_3 = l_lean_parser_term__parser__m_lean_parser_monad__rec; -lean::inc(x_0); -lean::inc(x_3); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__rec_trans___rarg), 4, 3); -lean::closure_set(x_6, 0, x_2); -lean::closure_set(x_6, 1, x_3); -lean::closure_set(x_6, 2, x_0); -return x_6; -} -} -obj* _init_l_lean_parser_trailing__term__parser__m_monad__except() { +obj* _init_l_lean_parser_trailing__term__parser__m_monad() { _start: { obj* x_0; obj* x_2; -x_0 = l_lean_parser_term__parser__m_monad__except; +x_0 = l_lean_parser_term__parser__m_monad; lean::inc(x_0); -x_2 = l_reader__t_monad__except___rarg(x_0); +x_2 = l_reader__t_monad___rarg(x_0); +return x_2; +} +} +obj* _init_l_lean_parser_trailing__term__parser__m_alternative() { +_start: +{ +obj* x_0; obj* x_1; obj* x_4; +x_0 = l_lean_parser_term__parser__m_monad; +x_1 = l_lean_parser_term__parser__m_alternative; +lean::inc(x_1); +lean::inc(x_0); +x_4 = l_reader__t_alternative___rarg(x_0, x_1); +return x_4; +} +} +obj* _init_l_lean_parser_trailing__term__parser__m_monad__reader() { +_start: +{ +obj* x_0; obj* x_2; +x_0 = l_lean_parser_term__parser__m_monad; +lean::inc(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_read___rarg), 2, 1); +lean::closure_set(x_2, 0, x_0); return x_2; } } @@ -1811,37 +1796,52 @@ x_8 = l_lean_parser_monad__parsec__trans___rarg(x_2, x_5, x_6); return x_8; } } -obj* _init_l_lean_parser_trailing__term__parser__m_monad__reader() { +obj* _init_l_lean_parser_trailing__term__parser__m_monad__except() { _start: { obj* x_0; obj* x_2; -x_0 = l_lean_parser_term__parser__m_monad; +x_0 = l_lean_parser_term__parser__m_monad__except; lean::inc(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_read___rarg), 2, 1); -lean::closure_set(x_2, 0, x_0); +x_2 = l_reader__t_monad__except___rarg(x_0); return x_2; } } -obj* _init_l_lean_parser_trailing__term__parser__m_alternative() { +obj* _init_l_lean_parser_trailing__term__parser__m_lean_parser_monad__rec() { _start: { -obj* x_0; obj* x_1; obj* x_4; +obj* x_0; obj* x_2; obj* x_3; obj* x_6; x_0 = l_lean_parser_term__parser__m_monad; -x_1 = l_lean_parser_term__parser__m_alternative; -lean::inc(x_1); lean::inc(x_0); -x_4 = l_reader__t_alternative___rarg(x_0, x_1); -return x_4; +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift), 4, 3); +lean::closure_set(x_2, 0, lean::box(0)); +lean::closure_set(x_2, 1, lean::box(0)); +lean::closure_set(x_2, 2, x_0); +x_3 = l_lean_parser_term__parser__m_lean_parser_monad__rec; +lean::inc(x_0); +lean::inc(x_3); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__rec_trans___rarg), 4, 3); +lean::closure_set(x_6, 0, x_2); +lean::closure_set(x_6, 1, x_3); +lean::closure_set(x_6, 2, x_0); +return x_6; } } -obj* _init_l_lean_parser_trailing__term__parser__m_monad() { +obj* _init_l_lean_parser_trailing__term__parser__m_lean_parser_monad__basic__parser() { _start: { -obj* x_0; obj* x_2; +obj* x_0; obj* x_2; obj* x_3; obj* x_5; x_0 = l_lean_parser_term__parser__m_monad; lean::inc(x_0); -x_2 = l_reader__t_monad___rarg(x_0); -return x_2; +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift), 4, 3); +lean::closure_set(x_2, 0, lean::box(0)); +lean::closure_set(x_2, 1, lean::box(0)); +lean::closure_set(x_2, 2, x_0); +x_3 = l_lean_parser_term__parser__m_lean_parser_monad__basic__parser; +lean::inc(x_3); +x_5 = lean::alloc_closure(reinterpret_cast(l_has__monad__lift__t__trans___rarg), 4, 2); +lean::closure_set(x_5, 0, x_2); +lean::closure_set(x_5, 1, x_3); +return x_5; } } obj* _init_l_lean_parser_trailing__term__parser__m() { @@ -2702,11 +2702,11 @@ void initialize_init_lean_parser_basic() { l_lean_parser_max__prec = _init_l_lean_parser_max__prec(); l_lean_parser_parser__core__t = _init_l_lean_parser_parser__core__t(); l_lean_parser_parser__t = _init_l_lean_parser_parser__t(); - l_lean_parser_basic__parser__m_monad__except = _init_l_lean_parser_basic__parser__m_monad__except(); - l_lean_parser_basic__parser__m_lean_parser_monad__parsec = _init_l_lean_parser_basic__parser__m_lean_parser_monad__parsec(); - l_lean_parser_basic__parser__m_monad__reader = _init_l_lean_parser_basic__parser__m_monad__reader(); - l_lean_parser_basic__parser__m_alternative = _init_l_lean_parser_basic__parser__m_alternative(); l_lean_parser_basic__parser__m_monad = _init_l_lean_parser_basic__parser__m_monad(); + l_lean_parser_basic__parser__m_alternative = _init_l_lean_parser_basic__parser__m_alternative(); + l_lean_parser_basic__parser__m_monad__reader = _init_l_lean_parser_basic__parser__m_monad__reader(); + l_lean_parser_basic__parser__m_lean_parser_monad__parsec = _init_l_lean_parser_basic__parser__m_lean_parser_monad__parsec(); + l_lean_parser_basic__parser__m_monad__except = _init_l_lean_parser_basic__parser__m_monad__except(); l_lean_parser_basic__parser__m = _init_l_lean_parser_basic__parser__m(); l_lean_parser_basic__parser = _init_l_lean_parser_basic__parser(); l_lean_parser_monad__basic__parser = _init_l_lean_parser_monad__basic__parser(); @@ -2715,30 +2715,30 @@ void initialize_init_lean_parser_basic() { l_list_mfoldl___main___at_lean_parser_mk__token__trie___spec__1___closed__2 = _init_l_list_mfoldl___main___at_lean_parser_mk__token__trie___spec__1___closed__2(); l_list_mfoldl___main___at_lean_parser_mk__token__trie___spec__1___closed__3 = _init_l_list_mfoldl___main___at_lean_parser_mk__token__trie___spec__1___closed__3(); l_lean_parser_mk__token__trie___closed__1 = _init_l_lean_parser_mk__token__trie___closed__1(); - l_lean_parser_command__parser__m_lean_parser_monad__rec___closed__1 = _init_l_lean_parser_command__parser__m_lean_parser_monad__rec___closed__1(); - l_lean_parser_command__parser__m_monad__except___closed__1 = _init_l_lean_parser_command__parser__m_monad__except___closed__1(); - l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1 = _init_l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1(); - l_lean_parser_command__parser__m_monad__reader___closed__1 = _init_l_lean_parser_command__parser__m_monad__reader___closed__1(); - l_lean_parser_command__parser__m_alternative___closed__1 = _init_l_lean_parser_command__parser__m_alternative___closed__1(); l_lean_parser_command__parser__m_monad___closed__1 = _init_l_lean_parser_command__parser__m_monad___closed__1(); + l_lean_parser_command__parser__m_alternative___closed__1 = _init_l_lean_parser_command__parser__m_alternative___closed__1(); + l_lean_parser_command__parser__m_monad__reader___closed__1 = _init_l_lean_parser_command__parser__m_monad__reader___closed__1(); + l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1 = _init_l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1(); + l_lean_parser_command__parser__m_monad__except___closed__1 = _init_l_lean_parser_command__parser__m_monad__except___closed__1(); + l_lean_parser_command__parser__m_lean_parser_monad__rec___closed__1 = _init_l_lean_parser_command__parser__m_lean_parser_monad__rec___closed__1(); l_lean_parser_command__parser__m = _init_l_lean_parser_command__parser__m(); l_lean_parser_command__parser__m_monad__reader__adapter___closed__1 = _init_l_lean_parser_command__parser__m_monad__reader__adapter___closed__1(); - l_lean_parser_term__parser__m_lean_parser_monad__basic__parser = _init_l_lean_parser_term__parser__m_lean_parser_monad__basic__parser(); - l_lean_parser_term__parser__m_lean_parser_monad__rec = _init_l_lean_parser_term__parser__m_lean_parser_monad__rec(); - l_lean_parser_term__parser__m_monad__except = _init_l_lean_parser_term__parser__m_monad__except(); - l_lean_parser_term__parser__m_lean_parser_monad__parsec = _init_l_lean_parser_term__parser__m_lean_parser_monad__parsec(); - l_lean_parser_term__parser__m_monad__reader = _init_l_lean_parser_term__parser__m_monad__reader(); - l_lean_parser_term__parser__m_alternative = _init_l_lean_parser_term__parser__m_alternative(); l_lean_parser_term__parser__m_monad = _init_l_lean_parser_term__parser__m_monad(); + l_lean_parser_term__parser__m_alternative = _init_l_lean_parser_term__parser__m_alternative(); + l_lean_parser_term__parser__m_monad__reader = _init_l_lean_parser_term__parser__m_monad__reader(); + l_lean_parser_term__parser__m_lean_parser_monad__parsec = _init_l_lean_parser_term__parser__m_lean_parser_monad__parsec(); + l_lean_parser_term__parser__m_monad__except = _init_l_lean_parser_term__parser__m_monad__except(); + l_lean_parser_term__parser__m_lean_parser_monad__rec = _init_l_lean_parser_term__parser__m_lean_parser_monad__rec(); + l_lean_parser_term__parser__m_lean_parser_monad__basic__parser = _init_l_lean_parser_term__parser__m_lean_parser_monad__basic__parser(); l_lean_parser_term__parser__m = _init_l_lean_parser_term__parser__m(); l_lean_parser_term__parser = _init_l_lean_parser_term__parser(); - l_lean_parser_trailing__term__parser__m_lean_parser_monad__basic__parser = _init_l_lean_parser_trailing__term__parser__m_lean_parser_monad__basic__parser(); - l_lean_parser_trailing__term__parser__m_lean_parser_monad__rec = _init_l_lean_parser_trailing__term__parser__m_lean_parser_monad__rec(); - l_lean_parser_trailing__term__parser__m_monad__except = _init_l_lean_parser_trailing__term__parser__m_monad__except(); - l_lean_parser_trailing__term__parser__m_lean_parser_monad__parsec = _init_l_lean_parser_trailing__term__parser__m_lean_parser_monad__parsec(); - l_lean_parser_trailing__term__parser__m_monad__reader = _init_l_lean_parser_trailing__term__parser__m_monad__reader(); - l_lean_parser_trailing__term__parser__m_alternative = _init_l_lean_parser_trailing__term__parser__m_alternative(); l_lean_parser_trailing__term__parser__m_monad = _init_l_lean_parser_trailing__term__parser__m_monad(); + l_lean_parser_trailing__term__parser__m_alternative = _init_l_lean_parser_trailing__term__parser__m_alternative(); + l_lean_parser_trailing__term__parser__m_monad__reader = _init_l_lean_parser_trailing__term__parser__m_monad__reader(); + l_lean_parser_trailing__term__parser__m_lean_parser_monad__parsec = _init_l_lean_parser_trailing__term__parser__m_lean_parser_monad__parsec(); + l_lean_parser_trailing__term__parser__m_monad__except = _init_l_lean_parser_trailing__term__parser__m_monad__except(); + l_lean_parser_trailing__term__parser__m_lean_parser_monad__rec = _init_l_lean_parser_trailing__term__parser__m_lean_parser_monad__rec(); + l_lean_parser_trailing__term__parser__m_lean_parser_monad__basic__parser = _init_l_lean_parser_trailing__term__parser__m_lean_parser_monad__basic__parser(); l_lean_parser_trailing__term__parser__m = _init_l_lean_parser_trailing__term__parser__m(); l_lean_parser_trailing__term__parser = _init_l_lean_parser_trailing__term__parser(); l_lean_parser_token__map = _init_l_lean_parser_token__map(); diff --git a/src/boot/init/lean/parser/command.cpp b/src/boot/init/lean/parser/command.cpp index 5d50526376..87e3cb6403 100644 --- a/src/boot/init/lean/parser/command.cpp +++ b/src/boot/init/lean/parser/command.cpp @@ -25,7 +25,6 @@ obj* l_lean_parser_command_check_parser(obj*, obj*, obj*, obj*); extern obj* l_lean_parser_command_reserve__mixfix_parser_lean_parser_has__tokens; obj* l_list_map___main___at_lean_parser_command_omit_has__view_x_27___spec__2(obj*); obj* l_lean_parser_parsec__t_bind__mk__res___rarg(obj*, obj*); -obj* l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_init__quot_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_variables; obj* l_lean_parser_command_open__spec_renaming_item_has__view_x_27___lambda__1(obj*); @@ -83,7 +82,6 @@ obj* l_lean_parser_command_namespace_parser_lean_parser_has__tokens; obj* l_lean_parser_parsec__t_try__mk__res___rarg(obj*); extern obj* l_lean_parser_command__parser__m_monad__except___closed__1; extern "C" obj* lean_name_mk_string(obj*, obj*); -obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_variable_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_command_open__spec_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_rec__t_run__parsec___at_lean_parser_command__parser_run___spec__6(obj*, obj*, obj*, obj*); @@ -99,7 +97,6 @@ obj* l_lean_parser_command_open_has__view; obj* l_lean_parser_command_init__quot_parser_lean_parser_has__tokens; obj* l_lean_parser_command_open__spec_renaming_item_has__view_x_27; obj* l_lean_parser_command_open__spec_only; -obj* l_lean_parser_rec__t_recurse___at_lean_parser_command_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_check_parser_lean_parser_has__view; obj* l_lean_parser_command_export_has__view_x_27; obj* l_lean_parser_command_open__spec_as_has__view_x_27___lambda__1___closed__1; @@ -110,12 +107,11 @@ obj* l___private_init_lean_parser_rec_1__run__aux___at_lean_parser_command__pars obj* l_lean_parser_command_open__spec_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_variable_has__view; obj* l_lean_parser_command_universes_has__view_x_27___lambda__1(obj*); -obj* l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_universe_has__view_x_27; obj* l_lean_parser_command_end_parser___closed__1; extern obj* l_lean_parser_command__parser__m_monad___closed__1; obj* l_lean_parser_command_open__spec_hiding_has__view_x_27___lambda__1(obj*); -obj* l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*); +obj* l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3(obj*, obj*, obj*, obj*, obj*); obj* l_list_map___main___at_lean_parser_command_omit_has__view_x_27___spec__1(obj*); obj* l_lean_parser_command_parser_lean_parser_has__view; obj* l_lean_parser_command_option__value_has__view_x_27___lambda__1___closed__2; @@ -141,6 +137,7 @@ obj* l_lean_parser_command_include; obj* l_lean_parser_command_parser___rarg___closed__1; obj* l_lean_parser_command_section_has__view_x_27; extern obj* l_lean_parser_term_binder__content_has__view_x_27___lambda__2___closed__2; +obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_command__parser__m_alternative___closed__1; obj* l_lean_parser_command_open__spec_only_has__view; obj* l_lean_parser_command_section_parser___closed__1; @@ -148,26 +145,27 @@ obj* l_lean_parser_command_open__spec_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_variables_has__view; obj* l_lean_parser_combinators_label_view___rarg(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_include_parser(obj*, obj*, obj*, obj*); +extern obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1; obj* l_lean_parser_try__view___at_lean_parser_number_parser___spec__1(obj*); obj* l_lean_parser_command_option__value_has__view_x_27; +obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_command_decl__sig_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_set__option_parser_lean_parser_has__view; -extern obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1; obj* l_lean_parser_command_mixfix_parser(obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_parsec_result_mk__eps___rarg___closed__1; extern obj* l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -obj* l_lean_parser_string__lit_parser___at_lean_parser_command_set__option_parser_lean_parser_has__view___spec__2(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_universes_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_include_parser_lean_parser_has__tokens; obj* l_lean_parser_command_end_has__view_x_27___lambda__2(obj*); obj* l_list_map___main___at_lean_parser_command_open__spec_hiding_has__view_x_27___spec__2(obj*); +obj* l_lean_parser_rec__t_recurse___at_lean_parser_command_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_section_has__view; obj* l_list_join___main___rarg(obj*); obj* l_lean_parser_command_namespace_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_end_has__view_x_27; extern obj* l_lean_parser_number_has__view; +obj* l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_open_has__view_x_27; obj* l_lean_parser_command_universes_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_section_has__view_x_27___lambda__1___closed__1; @@ -176,7 +174,6 @@ obj* l_list_map___main___at_lean_parser_command_universes_has__view_x_27___spec_ obj* l_lean_parser_command_open__spec_renaming_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_open__spec_renaming_item_has__view; obj* l_lean_parser_tokens___rarg(obj*); -obj* l_lean_parser_number_parser___at_lean_parser_command_set__option_parser_lean_parser_has__view___spec__3(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_parser_lean_parser_has__tokens; obj* l_option_get__or__else___main___rarg(obj*, obj*); obj* l_lean_parser_command_option__value_has__view; @@ -235,6 +232,7 @@ obj* l_lean_parser_command_open__spec_parser(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_reserve__mixfix_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_export_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_syntax_mk__node(obj*, obj*); +obj* l_lean_parser_number_parser___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__3(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_open__spec_only_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_end; obj* l_lean_parser_command_variable_parser___closed__1; @@ -253,13 +251,14 @@ obj* l_lean_parser_command_open_has__view_x_27___lambda__2___closed__1; extern obj* l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; obj* l_lean_parser_command_omit_has__view_x_27___lambda__2(obj*); extern obj* l_lean_parser_term_bracketed__binders_parser_lean_parser_has__tokens; +obj* l_lean_parser_symbol__or__ident___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_attribute_parser_lean_parser_has__view; obj* l_lean_parser_term_parser(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_variable_has__view_x_27___lambda__2(obj*); extern obj* l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; obj* l_lean_parser_monad__parsec_error___at_lean_parser_command__parser_run___spec__3(obj*); +obj* l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_namespace_has__view; -obj* l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__6; obj* l_list_map___main___at_lean_parser_command_open__spec_only_has__view_x_27___spec__1(obj*); obj* l_lean_parser_substring_to__string(obj*); @@ -267,15 +266,16 @@ obj* l_lean_parser_try__view___at_lean_parser_string__lit_parser___spec__1(obj*) obj* l_lean_parser_command_namespace_has__view_x_27___lambda__1(obj*); extern "C" uint8 lean_name_dec_eq(obj*, obj*); obj* l_lean_parser_command_bool__option__value_has__view_x_27___lambda__2(obj*); +obj* l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__8___rarg(obj*, obj*, obj*, obj*, obj*); namespace lean { uint8 string_dec_eq(obj*, obj*); } obj* l_lean_parser_command_namespace_has__view_x_27___lambda__2(obj*); -obj* l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_section; extern obj* l_lean_parser_command_attr__instance_has__view; obj* l_lean_parser_command_open__spec_parser_lean_parser_has__tokens; obj* l_lean_parser_command_export_parser___closed__1; +obj* l_lean_parser_string__lit_parser___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__2(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_export_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_variable_parser(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_universe; @@ -291,19 +291,20 @@ obj* l_lean_parser_command_open__spec_hiding_has__view_x_27; obj* l_lean_parser_command_attribute_parser_lean_parser_has__tokens; obj* l_lean_parser_command_open__spec_parser___closed__1; obj* l_lean_parser_command_open__spec_renaming_has__view_x_27___lambda__1___closed__2; +obj* l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_builtin__command__parsers; obj* l_string_trim(obj*); extern obj* l_lean_parser_command_declaration_parser_lean_parser_has__tokens; obj* l_lean_parser_command_attr__instance_parser(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_variable_has__view_x_27___lambda__1___closed__1; +obj* l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_set__option_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term__parser_run(obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_command_mixfix_parser_lean_parser_has__tokens; obj* l_lean_parser_command_open__spec_renaming_has__view_x_27___lambda__1___closed__3; -obj* l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__2(obj*, obj*, obj*, obj*, obj*); -obj* l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__6___rarg(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_builtin__command__parsers_lean_parser_has__tokens; +obj* l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_variables_has__view_x_27; obj* l_lean_parser_command_end_has__view; obj* l_lean_parser_command_universes_has__view_x_27; @@ -330,7 +331,6 @@ obj* l_lean_parser_command_include_has__view; obj* l_lean_parser_command_namespace; obj* l_lean_parser_command_open__spec_only_has__view_x_27___lambda__1___closed__1; obj* l_list_map___main___at_lean_parser_command_open__spec_only_has__view_x_27___spec__2(obj*); -obj* l_lean_parser_symbol__or__ident___at_lean_parser_command_set__option_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_attribute_parser(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_omit_parser_lean_parser_has__tokens; extern obj* l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; @@ -368,7 +368,7 @@ obj* l___private_init_lean_parser_rec_1__run__aux___main___rarg(obj*, obj*, obj* obj* l_list_map___main___at_lean_parser_command_include_has__view_x_27___spec__2(obj*); obj* l_lean_parser_command_set__option_has__view; extern obj* l_lean_parser_raw_view___rarg___lambda__3___closed__1; -obj* l_lean_parser_rec__t_recurse___at_lean_parser_command_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_rec__t_recurse___at_lean_parser_command_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { obj* x_4; obj* x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; @@ -398,24 +398,15 @@ lean::cnstr_set(x_13, 1, x_7); return x_13; } } -obj* _init_l_lean_parser_command_parser_lean_parser_has__tokens() { -_start: -{ -obj* x_0; obj* x_1; -x_0 = lean::box(0); -x_1 = l_lean_parser_tokens___rarg(x_0); -return x_1; -} -} 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; 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__tokens___spec__1), 4, 1); +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__view___spec__6___rarg), 5, 1); +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); @@ -429,6 +420,15 @@ x_12 = l_lean_parser_combinators_label_view___rarg(x_7, x_8, x_3, x_9, x_6); return x_12; } } +obj* _init_l_lean_parser_command_parser_lean_parser_has__tokens() { +_start: +{ +obj* x_0; obj* x_1; +x_0 = lean::box(0); +x_1 = l_lean_parser_tokens___rarg(x_0); +return x_1; +} +} obj* _init_l_lean_parser_command_parser___rarg___closed__1() { _start: { @@ -444,7 +444,7 @@ _start: { obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; x_3 = lean::box(0); -x_4 = l_lean_parser_rec__t_recurse___at_lean_parser_command_parser_lean_parser_has__tokens___spec__1(x_3, x_0, x_1, x_2); +x_4 = l_lean_parser_rec__t_recurse___at_lean_parser_command_parser_lean_parser_has__view___spec__1(x_3, x_0, x_1, x_2); x_5 = lean::cnstr_get(x_4, 0); lean::inc(x_5); x_7 = lean::cnstr_get(x_4, 1); @@ -5689,6 +5689,214 @@ lean::inc(x_0); 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; +x_0 = lean::mk_string("as"); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +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); +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); +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); +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_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::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); +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); +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); +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_90 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_90, 0, x_89); +lean::cnstr_set(x_90, 1, x_7); +x_91 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_91, 0, x_75); +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); +lean::inc(x_100); +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_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; +} +} obj* _init_l_lean_parser_command_open__spec_parser_lean_parser_has__tokens() { _start: { @@ -5764,214 +5972,6 @@ x_67 = l_lean_parser_tokens___rarg(x_66); return x_67; } } -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; -x_0 = lean::mk_string("as"); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -lean::closure_set(x_6, 0, x_1); -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__view___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__view___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); -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__view___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); -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__view___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); -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__view___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_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__view___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::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__view___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); -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__view___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); -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__view___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__view___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__view___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); -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__view___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__view___spec__1), 5, 1); -lean::closure_set(x_89, 0, 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); -x_91 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_91, 0, x_75); -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); -lean::inc(x_100); -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_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; -} -} obj* _init_l_lean_parser_command_open__spec_parser___closed__1() { _start: { @@ -5983,12 +5983,12 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); 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__view___spec__1), 4, 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); @@ -6003,7 +6003,7 @@ 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__view___spec__1), 5, 1); +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); @@ -6011,7 +6011,7 @@ 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_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +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); @@ -6023,7 +6023,7 @@ 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); 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__view___spec__2), 5, 1); +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); @@ -6031,7 +6031,7 @@ 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_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +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); @@ -6051,7 +6051,7 @@ 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__view___spec__1), 5, 1); +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); @@ -6059,7 +6059,7 @@ 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::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__view___spec__1), 7, 3); +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); @@ -6079,7 +6079,7 @@ 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_61 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +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); @@ -6095,7 +6095,7 @@ 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__view___spec__3), 5, 1); +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); @@ -6109,19 +6109,19 @@ 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__view___spec__1), 5, 1); +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__view___spec__1), 7, 3); +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); 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__view___spec__3), 5, 1); +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); @@ -6137,7 +6137,7 @@ 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__view___spec__1), 5, 1); +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_90 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_90, 0, x_89); @@ -6168,7 +6168,7 @@ _start: obj* x_4; obj* x_6; x_4 = l_lean_parser_command_open__spec_parser___closed__1; lean::inc(x_4); -x_6 = l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3(x_4, x_0, x_1, x_2, x_3); +x_6 = l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3(x_4, x_0, x_1, x_2, x_3); return x_6; } } @@ -6580,7 +6580,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -6979,7 +6979,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -7554,12 +7554,12 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1), 4, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1), 5, 1); +x_6 = 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_7 = 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_7, 0, x_6); x_8 = lean::box(0); x_9 = lean::alloc_cnstr(1, 2, 0); @@ -7946,12 +7946,12 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_5 = 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_5, 0, x_1); 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_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1), 4, 0); +x_7 = 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_8 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_8, 0, x_7); lean::cnstr_set(x_8, 1, x_6); @@ -8400,7 +8400,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -8844,7 +8844,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -9339,12 +9339,12 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1), 4, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3), 5, 1); +x_6 = 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_7 = 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_7, 0, x_6); x_8 = lean::box(0); x_9 = lean::alloc_cnstr(1, 2, 0); @@ -9834,12 +9834,12 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1), 4, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3), 5, 1); +x_6 = 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_7 = 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_7, 0, x_6); x_8 = lean::box(0); x_9 = lean::alloc_cnstr(1, 2, 0); @@ -10411,12 +10411,12 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1), 4, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1), 5, 1); +x_6 = 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_7 = 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_7, 0, x_6); x_8 = lean::box(0); x_9 = lean::alloc_cnstr(1, 2, 0); @@ -11377,7 +11377,7 @@ 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_doc__comment_parser_lean_parser_has__view___spec__4___rarg(x_7, x_8, x_6, x_6, x_1, x_2, x_3, x_4); +x_12 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_7, x_8, x_6, x_6, x_1, x_2, x_3, x_4); return x_12; } else @@ -11404,13 +11404,13 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1), 4, 0); +x_7 = 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); -x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3), 5, 1); +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); @@ -11430,7 +11430,7 @@ 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__view___spec__1), 7, 3); +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); @@ -11716,6 +11716,23 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_command_check_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; +x_0 = lean::mk_string("#check"); +x_1 = lean::mk_nat_obj(0u); +x_2 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); +x_3 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_3); +x_5 = l_lean_parser_tokens___rarg(x_3); +x_6 = lean::box(0); +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); +return x_9; +} +} obj* _init_l_lean_parser_command_check_parser_lean_parser_has__view() { _start: { @@ -11727,7 +11744,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -11758,23 +11775,6 @@ x_24 = l_lean_parser_combinators_node_view___rarg(x_12, x_13, x_14, x_15, x_16, return x_24; } } -obj* _init_l_lean_parser_command_check_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; -x_0 = lean::mk_string("#check"); -x_1 = lean::mk_nat_obj(0u); -x_2 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); -x_3 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_3); -x_5 = l_lean_parser_tokens___rarg(x_3); -x_6 = lean::box(0); -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); -return x_9; -} -} obj* _init_l_lean_parser_command_check_parser___closed__1() { _start: { @@ -11786,7 +11786,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -13277,113 +13277,6 @@ lean::inc(x_0); return x_0; } } -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; -x_0 = lean::mk_string("local "); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1), 5, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::mk_string("attribute "); -x_9 = l_string_trim(x_8); -lean::inc(x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_11, 0, x_9); -lean::inc(x_4); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -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_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::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__view___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); -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__view___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__view___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__view___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__view___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__view___spec__2), 5, 1); -lean::closure_set(x_41, 0, 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_14); -x_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_39); -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, 1, x_43); -x_45 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_45, 0, x_24); -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); -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; -} -} obj* _init_l_lean_parser_command_attribute_parser_lean_parser_has__tokens() { _start: { @@ -13424,10 +13317,10 @@ x_32 = l_lean_parser_tokens___rarg(x_31); return x_32; } } -obj* _init_l_lean_parser_command_attribute_parser___closed__1() { +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_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; x_0 = lean::mk_string("local "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -13435,11 +13328,11 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1), 5, 1); +x_7 = 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_7, 0, x_6); x_8 = lean::mk_string("attribute "); x_9 = l_string_trim(x_8); @@ -13447,7 +13340,7 @@ lean::inc(x_9); x_11 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_11, 0, x_9); lean::inc(x_4); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_13 = 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_13, 0, x_9); lean::closure_set(x_13, 1, x_4); lean::closure_set(x_13, 2, x_11); @@ -13467,7 +13360,7 @@ 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_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +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); @@ -13477,14 +13370,14 @@ 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); 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__view___spec__1), 7, 3); +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__view___spec__1___boxed), 7, 3); +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); @@ -13493,12 +13386,119 @@ 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__view___spec__1), 7, 3); +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__view___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__view___spec__2), 5, 1); +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_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_41); +lean::cnstr_set(x_42, 1, x_14); +x_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_39); +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, 1, x_43); +x_45 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_45, 0, x_24); +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); +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; +} +} +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; +x_0 = lean::mk_string("local "); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +x_7 = 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_7, 0, x_6); +x_8 = lean::mk_string("attribute "); +x_9 = l_string_trim(x_8); +lean::inc(x_9); +x_11 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_11, 0, x_9); +lean::inc(x_4); +x_13 = 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_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_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::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); +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_42 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_42, 0, x_41); @@ -13586,6 +13586,19 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_command_init__quot_parser_lean_parser_has__tokens() { +_start: +{ +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; +x_0 = lean::mk_string("init_quot"); +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_list_cons_tokens___rarg(x_2, x_3); +x_5 = l_lean_parser_tokens___rarg(x_4); +return x_5; +} +} obj* _init_l_lean_parser_command_init__quot_parser_lean_parser_has__view() { _start: { @@ -13596,7 +13609,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -13620,19 +13633,6 @@ x_20 = l_lean_parser_combinators_node_view___rarg(x_8, x_9, x_10, x_11, x_12, x_ return x_20; } } -obj* _init_l_lean_parser_command_init__quot_parser_lean_parser_has__tokens() { -_start: -{ -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_0 = lean::mk_string("init_quot"); -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_list_cons_tokens___rarg(x_2, x_3); -x_5 = l_lean_parser_tokens___rarg(x_4); -return x_5; -} -} obj* _init_l_lean_parser_command_init__quot_parser___closed__1() { _start: { @@ -13643,7 +13643,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -14890,7 +14890,7 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_symbol__or__ident___at_lean_parser_command_set__option_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +obj* l_lean_parser_symbol__or__ident___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { obj* x_6; obj* x_11; obj* x_12; obj* x_14; obj* x_16; @@ -15169,7 +15169,7 @@ return x_117; } } } -obj* l_lean_parser_string__lit_parser___at_lean_parser_command_set__option_parser_lean_parser_has__view___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_string__lit_parser___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { obj* x_5; obj* x_10; obj* x_11; obj* x_13; obj* x_15; @@ -15324,7 +15324,7 @@ return x_80; } } } -obj* l_lean_parser_number_parser___at_lean_parser_command_set__option_parser_lean_parser_has__view___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_number_parser___at_lean_parser_command_set__option_parser_lean_parser_has__tokens___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { obj* x_5; obj* x_10; obj* x_11; obj* x_13; obj* x_15; @@ -15377,7 +15377,7 @@ x_28 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_28, 0, x_2); x_29 = lean::box(0); x_30 = l_string_join___closed__1; -x_31 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1; +x_31 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1; lean::inc(x_31); lean::inc(x_30); x_34 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_30, x_31, x_28, x_29, x_5, x_18, x_13); @@ -15424,7 +15424,7 @@ x_56 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_20, x_55); 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_56); -x_60 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1; +x_60 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1; lean::inc(x_60); x_62 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_59, x_60); x_63 = l_lean_parser_parsec__t_try__mk__res___rarg(x_62); @@ -15464,7 +15464,7 @@ x_72 = x_71; 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_72); -x_76 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1; +x_76 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1; lean::inc(x_76); x_78 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_75, x_76); x_79 = l_lean_parser_parsec__t_try__mk__res___rarg(x_78); @@ -15479,96 +15479,6 @@ return x_80; } } } -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; -x_0 = lean::mk_string("set_option"); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -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__view___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_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::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__view___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__view___spec__3), 4, 0); -lean::inc(x_9); -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__view___spec__2), 4, 0); -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__view___spec__2), 6, 2); -lean::closure_set(x_27, 0, x_26); -lean::closure_set(x_27, 1, x_4); -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 = 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__view___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); -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* _init_l_lean_parser_command_set__option_parser_lean_parser_has__tokens() { _start: { @@ -15600,10 +15510,10 @@ x_23 = l_lean_parser_tokens___rarg(x_22); return x_23; } } -obj* _init_l_lean_parser_command_set__option_parser___closed__1() { +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_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; x_0 = lean::mk_string("set_option"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -15611,12 +15521,12 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); 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__view___spec__1), 5, 1); +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); @@ -15628,7 +15538,7 @@ 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::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__view___spec__2), 6, 2); +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); @@ -15640,19 +15550,19 @@ 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__view___spec__3), 4, 0); +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_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__view___spec__2), 4, 0); +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); 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__view___spec__2), 6, 2); +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); @@ -15667,7 +15577,97 @@ 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__view___spec__1), 4, 0); +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); +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* _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; +x_0 = lean::mk_string("set_option"); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +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_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::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_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); +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); +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 = 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); @@ -16214,8 +16214,8 @@ void initialize_init_lean_parser_command() { if (_G_initialized) return; _G_initialized = true; initialize_init_lean_parser_declaration(); - l_lean_parser_command_parser_lean_parser_has__tokens = _init_l_lean_parser_command_parser_lean_parser_has__tokens(); l_lean_parser_command_parser_lean_parser_has__view = _init_l_lean_parser_command_parser_lean_parser_has__view(); + l_lean_parser_command_parser_lean_parser_has__tokens = _init_l_lean_parser_command_parser_lean_parser_has__tokens(); l_lean_parser_command_parser___rarg___closed__1 = _init_l_lean_parser_command_parser___rarg___closed__1(); l_lean_parser_command_open__spec_as = _init_l_lean_parser_command_open__spec_as(); l_lean_parser_command_open__spec_as_has__view_x_27 = _init_l_lean_parser_command_open__spec_as_has__view_x_27(); @@ -16248,8 +16248,8 @@ void initialize_init_lean_parser_command() { l_lean_parser_command_open__spec_has__view_x_27___lambda__1___closed__4 = _init_l_lean_parser_command_open__spec_has__view_x_27___lambda__1___closed__4(); l_lean_parser_command_open__spec_has__view_x_27___lambda__1___closed__5 = _init_l_lean_parser_command_open__spec_has__view_x_27___lambda__1___closed__5(); l_lean_parser_command_open__spec_has__view = _init_l_lean_parser_command_open__spec_has__view(); - l_lean_parser_command_open__spec_parser_lean_parser_has__tokens = _init_l_lean_parser_command_open__spec_parser_lean_parser_has__tokens(); l_lean_parser_command_open__spec_parser_lean_parser_has__view = _init_l_lean_parser_command_open__spec_parser_lean_parser_has__view(); + l_lean_parser_command_open__spec_parser_lean_parser_has__tokens = _init_l_lean_parser_command_open__spec_parser_lean_parser_has__tokens(); l_lean_parser_command_open__spec_parser___closed__1 = _init_l_lean_parser_command_open__spec_parser___closed__1(); l_lean_parser_command_open = _init_l_lean_parser_command_open(); l_lean_parser_command_open_has__view_x_27 = _init_l_lean_parser_command_open_has__view_x_27(); @@ -16325,21 +16325,21 @@ void initialize_init_lean_parser_command() { l_lean_parser_command_check_has__view_x_27 = _init_l_lean_parser_command_check_has__view_x_27(); l_lean_parser_command_check_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_check_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_check_has__view = _init_l_lean_parser_command_check_has__view(); - l_lean_parser_command_check_parser_lean_parser_has__view = _init_l_lean_parser_command_check_parser_lean_parser_has__view(); l_lean_parser_command_check_parser_lean_parser_has__tokens = _init_l_lean_parser_command_check_parser_lean_parser_has__tokens(); + l_lean_parser_command_check_parser_lean_parser_has__view = _init_l_lean_parser_command_check_parser_lean_parser_has__view(); l_lean_parser_command_check_parser___closed__1 = _init_l_lean_parser_command_check_parser___closed__1(); l_lean_parser_command_attribute = _init_l_lean_parser_command_attribute(); l_lean_parser_command_attribute_has__view_x_27 = _init_l_lean_parser_command_attribute_has__view_x_27(); l_lean_parser_command_attribute_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_attribute_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_attribute_has__view = _init_l_lean_parser_command_attribute_has__view(); - l_lean_parser_command_attribute_parser_lean_parser_has__view = _init_l_lean_parser_command_attribute_parser_lean_parser_has__view(); l_lean_parser_command_attribute_parser_lean_parser_has__tokens = _init_l_lean_parser_command_attribute_parser_lean_parser_has__tokens(); + l_lean_parser_command_attribute_parser_lean_parser_has__view = _init_l_lean_parser_command_attribute_parser_lean_parser_has__view(); l_lean_parser_command_attribute_parser___closed__1 = _init_l_lean_parser_command_attribute_parser___closed__1(); l_lean_parser_command_init__quot = _init_l_lean_parser_command_init__quot(); l_lean_parser_command_init__quot_has__view_x_27 = _init_l_lean_parser_command_init__quot_has__view_x_27(); l_lean_parser_command_init__quot_has__view = _init_l_lean_parser_command_init__quot_has__view(); - l_lean_parser_command_init__quot_parser_lean_parser_has__view = _init_l_lean_parser_command_init__quot_parser_lean_parser_has__view(); l_lean_parser_command_init__quot_parser_lean_parser_has__tokens = _init_l_lean_parser_command_init__quot_parser_lean_parser_has__tokens(); + l_lean_parser_command_init__quot_parser_lean_parser_has__view = _init_l_lean_parser_command_init__quot_parser_lean_parser_has__view(); l_lean_parser_command_init__quot_parser___closed__1 = _init_l_lean_parser_command_init__quot_parser___closed__1(); l_lean_parser_command_bool__option__value = _init_l_lean_parser_command_bool__option__value(); l_lean_parser_command_bool__option__value_has__view_x_27 = _init_l_lean_parser_command_bool__option__value_has__view_x_27(); @@ -16356,8 +16356,8 @@ void initialize_init_lean_parser_command() { l_lean_parser_command_set__option_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_set__option_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_set__option_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_set__option_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_set__option_has__view = _init_l_lean_parser_command_set__option_has__view(); - l_lean_parser_command_set__option_parser_lean_parser_has__view = _init_l_lean_parser_command_set__option_parser_lean_parser_has__view(); l_lean_parser_command_set__option_parser_lean_parser_has__tokens = _init_l_lean_parser_command_set__option_parser_lean_parser_has__tokens(); + l_lean_parser_command_set__option_parser_lean_parser_has__view = _init_l_lean_parser_command_set__option_parser_lean_parser_has__view(); l_lean_parser_command_set__option_parser___closed__1 = _init_l_lean_parser_command_set__option_parser___closed__1(); l_lean_parser_command_builtin__command__parsers_lean_parser_has__tokens = _init_l_lean_parser_command_builtin__command__parsers_lean_parser_has__tokens(); l_lean_parser_command_builtin__command__parsers = _init_l_lean_parser_command_builtin__command__parsers(); diff --git a/src/boot/init/lean/parser/declaration.cpp b/src/boot/init/lean/parser/declaration.cpp index 1a3a75ed0f..6b1f22d3b5 100644 --- a/src/boot/init/lean/parser/declaration.cpp +++ b/src/boot/init/lean/parser/declaration.cpp @@ -17,17 +17,15 @@ typedef lean::uint32 uint32; typedef lean::uint64 uint64; obj* l_lean_parser_command_infer__modifier_parser_lean_parser_has__view; obj* l_lean_parser_command_declaration_inner_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_strict__implicit__binder_has__view_x_27___lambda__2(obj*); +obj* l_lean_parser_monad__parsec_str__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_strict__infer__modifier_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_visibility_has__view; obj* l_lean_parser_command_infer__modifier_has__view_x_27___lambda__1___closed__2; -obj* l_reader__t_bind___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__9___rarg(obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__3(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_structure__kw_has__view_x_27; obj* l_lean_parser_parsec__t_bind__mk__res___rarg(obj*, obj*); -obj* l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3(obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_monad__parsec_many_x_27___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__7(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_decl__val_parser(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__3; -obj* l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__4(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_list_map___main___rarg(obj*, obj*); obj* l_lean_parser_command_ident__univ__params_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_infer__modifier_has__view_x_27___lambda__2(obj*); @@ -46,11 +44,13 @@ extern obj* l_lean_parser_number_has__view_x_27___lambda__2___closed__1; obj* l_lean_parser_term_bracketed__binders_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_def__like_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_structure__field__block_parser_lean_parser_has__tokens; +obj* l_reader__t_bind___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__11___rarg(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_equation_has__view_x_27___lambda__1(obj*); obj* l_list_map___main___at_lean_parser_command_equation_has__view_x_27___spec__2(obj*); obj* l_lean_parser_command_constant_has__view; obj* l___private_init_lean_parser_token_4__ident_x_27(obj*, obj*, obj*); obj* l_lean_parser_command_inductive_has__view_x_27___lambda__1___closed__3; +extern obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; obj* l_lean_parser_command_opt__decl__sig_has__view_x_27___lambda__1(obj*); extern obj* l_lean_parser_combinators_many___rarg___closed__1; obj* l_lean_parser_command_inductive_has__view; @@ -103,10 +103,13 @@ obj* l_lean_parser_command_struct__explicit__binder; obj* l_lean_parser_command_structure__ctor; obj* l_lean_parser_command_inductive_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_opt__decl__sig_parser___closed__1; +obj* l_lean_parser_raw__ident_parser___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_decl__modifiers_has__view_x_27___lambda__1___closed__2; +obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_old__univ__params_parser_lean_parser_has__view; obj* l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_structure__ctor_has__view_x_27___lambda__1(obj*); +obj* l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__3(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_parsec__t_try__mk__res___rarg(obj*); obj* l_lean_parser_command_struct__explicit__binder__content_has__view_x_27; @@ -114,21 +117,20 @@ obj* l_lean_parser_command_struct__explicit__binder__content_has__view_x_27___la obj* l_list_reverse___rarg(obj*); obj* l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__5; extern obj* l_lean_parser_command__parser__m_monad__except___closed__1; -obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_infer__modifier_parser___closed__1; obj* l_lean_parser_command_structure__field__block_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_constant__keyword; extern "C" obj* lean_name_mk_string(obj*, obj*); -obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_infer__modifier_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_structure_parser_lean_parser_has__tokens; obj* l_lean_parser_command_def__like_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_struct__binder__content_parser(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_simple__decl__val; obj* l_lean_parser_command_structure_has__view_x_27___lambda__1(obj*); -obj* l_lean_parser_monad__parsec_many_x_27___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__2(obj*, obj*, obj*, obj*); +obj* l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__4(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_structure__kw_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_parsec__t_labels__mk__res___rarg(obj*, obj*); +obj* l_lean_parser_monad__parsec_many_x_27___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__2(obj*, obj*, obj*, obj*); obj* l_lean_parser_term_binder__default_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_relaxed__infer__modifier_has__view_x_27___lambda__2(obj*); extern obj* l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; @@ -141,7 +143,6 @@ obj* l_lean_parser_command_declaration_inner_has__view_x_27___lambda__1___closed obj* l_list_map___main___at_lean_parser_command_old__univ__params_has__view_x_27___spec__2(obj*); obj* l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__1; -obj* l_lean_parser_monad__parsec_str__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_old__univ__params_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_simple__decl__val_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_decl__val_has__view_x_27___lambda__1(obj*); @@ -149,7 +150,7 @@ extern obj* l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; obj* l_lean_parser_command_instance_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_example; obj* l_lean_parser_command_inst__implicit__binder_has__view_x_27___lambda__1___closed__1; -obj* l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*); +obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__2(obj*, obj*, uint8, uint8, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_struct__implicit__binder_has__view; obj* l_lean_parser_command_instance; namespace lean { @@ -157,7 +158,7 @@ obj* string_iterator_next(obj*); } extern obj* l_lean_parser_command__parser__m_monad___closed__1; obj* l_lean_parser_command_struct__explicit__binder__content; -obj* l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*); +obj* l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__tokens; obj* l_lean_parser_command_decl__modifiers_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_command_equation_parser_lean_parser_has__view; @@ -176,9 +177,9 @@ obj* l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1(obj*); namespace lean { obj* string_length(obj*); } +obj* l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_struct__implicit__binder_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_old__univ__params_parser(obj*, obj*, obj*, obj*); -obj* l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_decl__attributes_parser_lean_parser_has__view; uint8 l_string_is__empty(obj*); extern obj* l_lean_parser_command_notation__like_parser_lean_parser_has__tokens; @@ -190,6 +191,7 @@ namespace lean { uint32 string_iterator_curr(obj*); } obj* l_lean_parser_command_strict__implicit__binder_has__view_x_27; +obj* l_lean_parser_monad__parsec_many_x_27___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__9(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_structure__kw_has__view_x_27___lambda__1___closed__4; obj* l_lean_parser_command_declaration_inner; namespace lean { @@ -198,15 +200,17 @@ obj* string_append(obj*, obj*); obj* l_lean_parser_command_extends_has__view; extern obj* l_lean_parser_term_binder__content_has__view_x_27___lambda__2___closed__2; obj* l_lean_parser_command_visibility_has__view_x_27___lambda__1(obj*); +obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_command__parser__m_alternative___closed__1; obj* l_function_comp___rarg(obj*, obj*, obj*); obj* l_lean_parser_command_attr__instance_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser___spec__3(obj*, obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_combinators_3__sep__by_view__aux___main___at_lean_parser_command_decl__attributes_has__view_x_27___spec__1(obj*); obj* l_lean_parser_command_constant_has__view_x_27___lambda__1(obj*); +obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_decl__sig_has__view_x_27___lambda__1___closed__2; -obj* l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__6(obj*); +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__1___rarg(obj*, obj*, obj*, obj*); extern obj* l___private_init_lean_parser_token_1__finish__comment__block__aux___main___closed__1; obj* l_lean_parser_command_doc__comment; extern obj* l_lean_parser_parsec_result_mk__eps___rarg___closed__1; @@ -220,15 +224,15 @@ obj* l_lean_parser_command_attr__instance_parser_lean_parser_has__view; obj* l_lean_parser_command_instance_has__view_x_27___lambda__1(obj*); obj* l___private_init_lean_parser_parsec_1__str__aux___main(obj*, obj*, obj*); obj* l_list_join___main___rarg(obj*); +obj* l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__7(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_declaration_has__view_x_27___lambda__2(obj*); -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__1___rarg(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_doc__comment_parser_lean_parser_has__tokens; extern obj* l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__2___closed__1; obj* l_lean_parser_command_struct__binder__content_parser___closed__1; obj* l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1(obj*); +obj* l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__3(obj*, obj*, obj*, obj*); +obj* l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__8(obj*); extern obj* l_lean_parser_number_has__view_x_27___lambda__2___closed__2; obj* l_lean_parser_command_declaration_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__2; @@ -244,6 +248,7 @@ obj* l_lean_parser_command_attr__instance_has__view_x_27; extern obj* l_lean_parser_term_binder__content_has__view_x_27___lambda__1___closed__2; obj* l_list_map___main___at_lean_parser_command_univ__params_has__view_x_27___spec__1(obj*); obj* l_lean_parser_tokens___rarg(obj*); +obj* l_lean_parser_monad__parsec_many_x_27___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__6(obj*, obj*, obj*, obj*); obj* l_option_get__or__else___main___rarg(obj*, obj*); obj* l_lean_parser_command_ident__univ__params_has__view_x_27___lambda__1___closed__4; obj* l_lean_parser_command_inst__implicit__binder_has__view_x_27___lambda__1(obj*); @@ -294,6 +299,7 @@ obj* l_lean_parser_command_constant_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_intro__rule_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_decl__val_parser___closed__1; obj* l_lean_parser_command_intro__rule_has__view_x_27; +obj* l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__1(obj*, obj*, uint8, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_combinators_node_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_def__like_kind_has__view_x_27___lambda__1___closed__5; @@ -303,7 +309,6 @@ obj* l_lean_parser_command_extends_has__view_x_27; obj* l_lean_parser_command_equation_parser_lean_parser_has__tokens; obj* l_lean_parser_command_struct__explicit__binder_has__view; obj* l_lean_parser_command_struct__explicit__binder__content_has__view_x_27___lambda__1___closed__2; -obj* l_reader__t_bind___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__9(obj*, obj*); extern obj* l_lean_parser_finish__comment__block___closed__2; obj* l_lean_parser_command_constant__keyword_has__view; obj* l_lean_parser_command_ident__univ__params_has__view; @@ -324,10 +329,7 @@ obj* l_lean_parser_command_opt__decl__sig; obj* l_list_map___main___at_lean_parser_command_equation_has__view_x_27___spec__1(obj*); obj* l_lean_parser_command_old__univ__params_parser_lean_parser_has__tokens; obj* l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__2; -obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_doc__comment_has__view_x_27; -obj* l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_raw__ident_parser___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_constant__keyword_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_struct__implicit__binder_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_instance_has__view_x_27___lambda__2(obj*); @@ -335,6 +337,7 @@ obj* l_lean_parser_command_structure_has__view_x_27___lambda__1___closed__4; obj* l_lean_parser_token(obj*, obj*, obj*); obj* l_lean_parser_command_opt__decl__sig_has__view_x_27; obj* l_lean_parser_command_def__like_has__view; +obj* l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__10(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_strict__infer__modifier_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_inst__implicit__binder; obj* l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__3; @@ -347,18 +350,16 @@ extern obj* l_lean_parser_term_bracketed__binders_parser_lean_parser_has__tokens extern obj* l_lean_parser_term_type__spec_parser_lean_parser_has__tokens; obj* l_lean_parser_command_visibility_has__view_x_27; obj* l_lean_parser_command_univ__params_has__view_x_27___lambda__1___closed__1; -obj* l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__8(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_parser(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_example_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_decl__attributes_parser___closed__1; extern obj* l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; obj* l_lean_parser_command_univ__params_has__view; +obj* l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_structure__ctor_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_term_opt__type_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_ident__univ__params; -obj* l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___spec__1(obj*, obj*, uint8, obj*, obj*, obj*, obj*); -obj* l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_structure_parser___closed__1; obj* l_lean_parser_command_structure__field__block_has__view_x_27___lambda__2(obj*); obj* l_list_map___main___at_lean_parser_command_univ__params_has__view_x_27___spec__2(obj*); @@ -374,15 +375,14 @@ extern obj* l___private_init_lean_parser_token_1__finish__comment__block__aux___ extern obj* l_lean_parser_term_binder__default_parser_lean_parser_has__tokens; obj* l_lean_parser_command_structure__field__block_parser(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_decl__modifiers_parser___closed__1; -obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4(obj*); obj* l_lean_parser_command_extends_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__view; +obj* l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__8___rarg(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_decl__sig_has__view_x_27___lambda__1___closed__3; namespace lean { uint8 string_dec_eq(obj*, obj*); } -obj* l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_constant_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_attr__instance_has__view; obj* l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__1; @@ -391,11 +391,12 @@ obj* l_lean_parser_command_structure_has__view_x_27___lambda__2___closed__1; obj* l_list_map___main___at_lean_parser_command_struct__binder__content_has__view_x_27___spec__1(obj*); obj* l_lean_parser_command_equation_has__view_x_27; obj* l_lean_parser_command_decl__val; -obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___spec__2(obj*, obj*, uint8, uint8, obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_combinators_choice__aux___main___rarg___closed__1; obj* l_lean_parser_command_constant__keyword_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_decl__sig_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens; +obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*); +obj* l_reader__t_bind___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__11(obj*, obj*); obj* l_lean_parser_command_attr__instance; obj* l_lean_parser_command_extends_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_simple__decl__val_has__view_x_27___lambda__1(obj*); @@ -419,6 +420,7 @@ obj* l_lean_parser_command_decl__sig_parser_lean_parser_has__view; obj* l_lean_parser_command_old__univ__params_has__view_x_27; obj* l_lean_parser_command_inductive_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_visibility_has__view_x_27___lambda__1___closed__2; +obj* l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2(obj*, obj*, obj*, obj*, obj*); obj* l_string_trim(obj*); obj* l_lean_parser_command_struct__explicit__binder_has__view_x_27; obj* l_option_get___main___at_lean_parser_run___spec__2(obj*); @@ -428,36 +430,33 @@ obj* l_lean_parser_command_declaration_parser_lean_parser_has__tokens; obj* l_lean_parser_command_def__like_kind_has__view_x_27; obj* l_lean_parser_command_constant; obj* l_list_map___main___at_lean_parser_command_attr__instance_has__view_x_27___spec__1(obj*); -extern obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; extern obj* l_lean_parser_ident__univ__spec_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_attr__instance_parser(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_decl__attributes_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_decl__modifiers_has__view_x_27___lambda__1___closed__4; obj* l_lean_parser_command_doc__comment_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_equation_has__view_x_27___lambda__2(obj*); -obj* l_lean_parser_monad__parsec_many_x_27___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_decl__attributes; obj* l_lean_parser_command_ident__univ__params_parser(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_intro__rule_parser___closed__1; extern obj* l_lean_parser_term_opt__type_parser_lean_parser_has__tokens; obj* l_lean_parser_command_inductive_has__view_x_27___lambda__1___closed__4; +obj* l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term__parser_run(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_struct__binder__content_parser_lean_parser_has__view; obj* l_lean_parser_command_opt__decl__sig_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_attr__instance_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_example_has__view_x_27___lambda__1(obj*); -obj* l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__2(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_declaration_has__view; -obj* l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__6___rarg(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_structure__ctor_has__view_x_27; obj* l_lean_parser_command_struct__binder__content; +obj* l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_univ__params; obj* l_lean_parser_command_declaration_inner_has__view_x_27; obj* l_lean_parser_command_struct__binder__content_has__view_x_27; extern "C" obj* lean_name_mk_numeral(obj*, obj*); obj* l_lean_parser_command_structure_parser_lean_parser_has__view; -obj* l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__3(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_univ__params_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_doc__comment_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_decl__sig_has__view_x_27___lambda__1___closed__1; @@ -509,6 +508,7 @@ obj* l_lean_parser_command_simple__decl__val_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_old__univ__params_has__view; obj* l_lean_parser_command_inductive_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_attr__instance_has__view_x_27___lambda__1___closed__1; +obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4(obj*); obj* l_option_map___rarg(obj*, obj*); obj* l_lean_parser_command_struct__implicit__binder; obj* l_lean_parser_command_example_has__view_x_27; @@ -1141,7 +1141,7 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_symbol__core___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, obj* x_4, obj* x_5, obj* x_6) { +obj* l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { _start: { obj* x_9; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_21; @@ -1421,7 +1421,7 @@ return x_136; } } } -obj* l_lean_parser_monad__parsec_str__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_monad__parsec_str__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { uint8 x_9; @@ -1499,7 +1499,7 @@ return x_40; } } } -obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { obj* x_4; obj* x_5; obj* x_9; obj* x_10; obj* x_12; obj* x_14; @@ -1508,7 +1508,7 @@ x_5 = l___private_init_lean_parser_token_1__finish__comment__block__aux___main__ lean::inc(x_2); lean::inc(x_5); lean::inc(x_4); -x_9 = l_lean_parser_monad__parsec_str__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__2(x_4, x_5, x_0, x_1, x_2, x_3); +x_9 = l_lean_parser_monad__parsec_str__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__2(x_4, x_5, x_0, x_1, x_2, x_3); x_10 = lean::cnstr_get(x_9, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_9, 1); @@ -1642,7 +1642,7 @@ return x_46; } } } -obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { _start: { obj* x_10; obj* x_11; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; @@ -1665,16 +1665,16 @@ lean::cnstr_set(x_15, 1, x_7); return x_15; } } -obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4(obj* x_0) { +obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4___rarg), 8, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg), 8, 0); return x_2; } } -obj* l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { uint8 x_4; @@ -1688,7 +1688,7 @@ 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__view___spec__4___rarg(x_6, x_7, x_5, x_5, x_0, x_1, x_2, x_3); +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); @@ -1731,7 +1731,7 @@ x_29 = lean::box(0); x_30 = 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__view___spec__4___rarg(x_28, x_30, x_29, x_29, x_0, x_1, x_2, x_3); +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); lean::inc(x_34); x_36 = lean::cnstr_get(x_33, 1); @@ -1776,25 +1776,7 @@ return x_49; } } } -obj* l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__6___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_6; -lean::dec(x_1); -x_6 = lean::apply_3(x_0, x_2, x_3, x_4); -return x_6; -} -} -obj* l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__6(obj* x_0) { -_start: -{ -obj* x_2; -lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__6___rarg), 5, 0); -return x_2; -} -} -obj* l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__8(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +obj* l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__7(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { obj* x_5; obj* x_6; obj* x_8; uint8 x_9; @@ -1811,7 +1793,7 @@ lean::dec(x_0); lean::inc(x_3); lean::inc(x_2); lean::inc(x_1); -x_21 = l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__3(x_1, x_2, x_3, x_4); +x_21 = l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__3(x_1, x_2, x_3, x_4); x_22 = lean::cnstr_get(x_21, 0); lean::inc(x_22); x_24 = lean::cnstr_get(x_21, 1); @@ -1850,7 +1832,7 @@ lean::inc(x_2); lean::inc(x_1); lean::inc(x_40); lean::inc(x_39); -x_45 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4___rarg(x_39, x_40, x_37, x_38, x_1, x_2, x_29, x_24); +x_45 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_39, x_40, x_37, x_38, x_1, x_2, x_29, x_24); x_46 = lean::cnstr_get(x_45, 0); lean::inc(x_46); x_48 = lean::cnstr_get(x_45, 1); @@ -1870,7 +1852,7 @@ lean::inc(x_57); lean::dec(x_54); lean::inc(x_2); lean::inc(x_1); -x_62 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_55, x_48); +x_62 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_55, x_48); x_63 = lean::cnstr_get(x_62, 0); lean::inc(x_63); x_65 = lean::cnstr_get(x_62, 1); @@ -1935,7 +1917,7 @@ lean::inc(x_85); lean::dec(x_82); lean::inc(x_2); lean::inc(x_1); -x_90 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_83, x_24); +x_90 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_83, x_24); x_91 = lean::cnstr_get(x_90, 0); lean::inc(x_91); x_93 = lean::cnstr_get(x_90, 1); @@ -2008,7 +1990,7 @@ lean::inc(x_115); lean::dec(x_112); lean::inc(x_2); lean::inc(x_1); -x_120 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_113, x_24); +x_120 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_113, x_24); x_121 = lean::cnstr_get(x_120, 0); lean::inc(x_121); x_123 = lean::cnstr_get(x_120, 1); @@ -2064,7 +2046,7 @@ if (lean::is_shared(x_15)) { x_137 = x_15; } lean::inc(x_133); -x_139 = l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__8(x_12, x_1, x_2, x_133, x_16); +x_139 = l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__7(x_12, x_1, x_2, x_133, x_16); x_140 = lean::cnstr_get(x_139, 0); lean::inc(x_140); x_142 = lean::cnstr_get(x_139, 1); @@ -2187,7 +2169,7 @@ lean::dec(x_0); lean::inc(x_3); lean::inc(x_2); lean::inc(x_1); -x_183 = l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__3(x_1, x_2, x_3, x_4); +x_183 = l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__3(x_1, x_2, x_3, x_4); x_184 = lean::cnstr_get(x_183, 0); lean::inc(x_184); x_186 = lean::cnstr_get(x_183, 1); @@ -2226,7 +2208,7 @@ lean::inc(x_2); lean::inc(x_1); lean::inc(x_202); lean::inc(x_201); -x_207 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4___rarg(x_201, x_202, x_199, x_200, x_1, x_2, x_191, x_186); +x_207 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_201, x_202, x_199, x_200, x_1, x_2, x_191, x_186); x_208 = lean::cnstr_get(x_207, 0); lean::inc(x_208); x_210 = lean::cnstr_get(x_207, 1); @@ -2244,7 +2226,7 @@ lean::inc(x_217); x_219 = lean::cnstr_get(x_216, 2); lean::inc(x_219); lean::dec(x_216); -x_222 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_217, x_210); +x_222 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_217, x_210); x_223 = lean::cnstr_get(x_222, 0); lean::inc(x_223); x_225 = lean::cnstr_get(x_222, 1); @@ -2309,7 +2291,7 @@ lean::inc(x_245); x_247 = lean::cnstr_get(x_244, 2); lean::inc(x_247); lean::dec(x_244); -x_250 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_245, x_186); +x_250 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_245, x_186); x_251 = lean::cnstr_get(x_250, 0); lean::inc(x_251); x_253 = lean::cnstr_get(x_250, 1); @@ -2382,7 +2364,7 @@ lean::inc(x_275); x_277 = lean::cnstr_get(x_274, 2); lean::inc(x_277); lean::dec(x_274); -x_280 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_275, x_186); +x_280 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_275, x_186); x_281 = lean::cnstr_get(x_280, 0); lean::inc(x_281); x_283 = lean::cnstr_get(x_280, 1); @@ -2486,13 +2468,13 @@ return x_312; } } } -obj* l_lean_parser_monad__parsec_many_x_27___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__7(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_monad__parsec_many_x_27___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__6(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_11; obj* x_12; obj* x_14; x_4 = lean::string_iterator_remaining(x_2); lean::inc(x_2); -x_6 = l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__8(x_4, x_0, x_1, x_2, x_3); +x_6 = l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__7(x_4, x_0, x_1, x_2, x_3); x_7 = lean::cnstr_get(x_6, 0); lean::inc(x_7); x_9 = lean::cnstr_get(x_6, 1); @@ -2572,7 +2554,803 @@ return x_33; } } } -obj* l_reader__t_bind___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__9___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__8___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +_start: +{ +obj* x_6; +lean::dec(x_1); +x_6 = lean::apply_3(x_0, x_2, x_3, x_4); +return x_6; +} +} +obj* l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__8(obj* x_0) { +_start: +{ +obj* x_2; +lean::dec(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, 0); +return x_2; +} +} +obj* l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__10(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +_start: +{ +obj* x_5; obj* x_6; obj* x_8; uint8 x_9; +x_8 = lean::mk_nat_obj(0u); +x_9 = lean::nat_dec_eq(x_0, x_8); +lean::dec(x_8); +if (x_9 == 0) +{ +obj* x_11; obj* x_12; obj* x_15; obj* x_16; obj* x_21; obj* x_22; obj* x_24; +x_11 = lean::mk_nat_obj(1u); +x_12 = lean::nat_sub(x_0, x_11); +lean::dec(x_11); +lean::dec(x_0); +lean::inc(x_3); +lean::inc(x_2); +lean::inc(x_1); +x_21 = l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__3(x_1, x_2, x_3, x_4); +x_22 = lean::cnstr_get(x_21, 0); +lean::inc(x_22); +x_24 = lean::cnstr_get(x_21, 1); +lean::inc(x_24); +lean::dec(x_21); +if (lean::obj_tag(x_22) == 0) +{ +obj* x_27; obj* x_29; obj* x_31; obj* x_33; uint8 x_34; +x_27 = lean::cnstr_get(x_22, 0); +lean::inc(x_27); +x_29 = lean::cnstr_get(x_22, 1); +lean::inc(x_29); +x_31 = lean::cnstr_get(x_22, 2); +lean::inc(x_31); +if (lean::is_shared(x_22)) { + lean::dec(x_22); + x_33 = lean::box(0); +} else { + lean::cnstr_release(x_22, 0); + lean::cnstr_release(x_22, 1); + lean::cnstr_release(x_22, 2); + x_33 = x_22; +} +x_34 = lean::unbox(x_27); +lean::dec(x_27); +if (x_34 == 0) +{ +obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_45; obj* x_46; obj* x_48; obj* x_51; obj* x_52; obj* x_54; +lean::dec(x_33); +x_37 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_37, 0, x_3); +x_38 = lean::box(0); +x_39 = l___private_init_lean_parser_token_2__whitespace__aux___main___closed__1; +x_40 = l_mjoin___rarg___closed__1; +lean::inc(x_2); +lean::inc(x_1); +lean::inc(x_40); +lean::inc(x_39); +x_45 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_39, x_40, x_37, x_38, x_1, x_2, x_29, x_24); +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_31, 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_51); +if (lean::obj_tag(x_54) == 0) +{ +obj* x_55; obj* x_57; obj* x_62; obj* x_63; obj* x_65; obj* x_68; +x_55 = lean::cnstr_get(x_54, 1); +lean::inc(x_55); +x_57 = lean::cnstr_get(x_54, 2); +lean::inc(x_57); +lean::dec(x_54); +lean::inc(x_2); +lean::inc(x_1); +x_62 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_55, x_48); +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__t_bind__mk__res___rarg(x_57, x_63); +x_15 = x_68; +x_16 = x_65; +goto lbl_17; +} +else +{ +obj* x_69; uint8 x_71; obj* x_72; obj* x_73; obj* x_74; +x_69 = lean::cnstr_get(x_54, 0); +lean::inc(x_69); +x_71 = lean::cnstr_get_scalar(x_54, sizeof(void*)*1); +if (lean::is_shared(x_54)) { + lean::dec(x_54); + x_72 = lean::box(0); +} else { + lean::cnstr_release(x_54, 0); + x_72 = x_54; +} +if (lean::is_scalar(x_72)) { + x_73 = lean::alloc_cnstr(1, 1, 1); +} else { + x_73 = x_72; +} +lean::cnstr_set(x_73, 0, x_69); +lean::cnstr_set_scalar(x_73, sizeof(void*)*1, x_71); +x_74 = x_73; +x_15 = x_74; +x_16 = x_48; +goto lbl_17; +} +} +else +{ +obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_82; +lean::dec(x_3); +x_76 = lean::box(0); +x_77 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_77); +if (lean::is_scalar(x_33)) { + x_79 = lean::alloc_cnstr(0, 3, 0); +} else { + x_79 = x_33; +} +lean::cnstr_set(x_79, 0, x_76); +lean::cnstr_set(x_79, 1, x_29); +lean::cnstr_set(x_79, 2, x_77); +x_80 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_31, x_79); +lean::inc(x_77); +x_82 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_77, x_80); +if (lean::obj_tag(x_82) == 0) +{ +obj* x_83; obj* x_85; obj* x_90; obj* x_91; obj* x_93; obj* x_96; +x_83 = lean::cnstr_get(x_82, 1); +lean::inc(x_83); +x_85 = lean::cnstr_get(x_82, 2); +lean::inc(x_85); +lean::dec(x_82); +lean::inc(x_2); +lean::inc(x_1); +x_90 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_83, x_24); +x_91 = lean::cnstr_get(x_90, 0); +lean::inc(x_91); +x_93 = lean::cnstr_get(x_90, 1); +lean::inc(x_93); +lean::dec(x_90); +x_96 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_85, x_91); +x_15 = x_96; +x_16 = x_93; +goto lbl_17; +} +else +{ +obj* x_97; uint8 x_99; obj* x_100; obj* x_101; obj* x_102; +x_97 = lean::cnstr_get(x_82, 0); +lean::inc(x_97); +x_99 = lean::cnstr_get_scalar(x_82, sizeof(void*)*1); +if (lean::is_shared(x_82)) { + lean::dec(x_82); + x_100 = lean::box(0); +} else { + lean::cnstr_release(x_82, 0); + x_100 = x_82; +} +if (lean::is_scalar(x_100)) { + x_101 = lean::alloc_cnstr(1, 1, 1); +} else { + x_101 = x_100; +} +lean::cnstr_set(x_101, 0, x_97); +lean::cnstr_set_scalar(x_101, sizeof(void*)*1, x_99); +x_102 = x_101; +x_15 = x_102; +x_16 = x_24; +goto lbl_17; +} +} +} +else +{ +obj* x_104; uint8 x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_112; +lean::dec(x_3); +x_104 = lean::cnstr_get(x_22, 0); +lean::inc(x_104); +x_106 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); +if (lean::is_shared(x_22)) { + lean::dec(x_22); + x_107 = lean::box(0); +} else { + lean::cnstr_release(x_22, 0); + x_107 = x_22; +} +if (lean::is_scalar(x_107)) { + x_108 = lean::alloc_cnstr(1, 1, 1); +} else { + x_108 = x_107; +} +lean::cnstr_set(x_108, 0, x_104); +lean::cnstr_set_scalar(x_108, sizeof(void*)*1, x_106); +x_109 = x_108; +x_110 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_110); +x_112 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_110, x_109); +if (lean::obj_tag(x_112) == 0) +{ +obj* x_113; obj* x_115; obj* x_120; obj* x_121; obj* x_123; obj* x_126; +x_113 = lean::cnstr_get(x_112, 1); +lean::inc(x_113); +x_115 = lean::cnstr_get(x_112, 2); +lean::inc(x_115); +lean::dec(x_112); +lean::inc(x_2); +lean::inc(x_1); +x_120 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_113, x_24); +x_121 = lean::cnstr_get(x_120, 0); +lean::inc(x_121); +x_123 = lean::cnstr_get(x_120, 1); +lean::inc(x_123); +lean::dec(x_120); +x_126 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_115, x_121); +x_15 = x_126; +x_16 = x_123; +goto lbl_17; +} +else +{ +obj* x_127; uint8 x_129; obj* x_130; obj* x_131; obj* x_132; +x_127 = lean::cnstr_get(x_112, 0); +lean::inc(x_127); +x_129 = lean::cnstr_get_scalar(x_112, sizeof(void*)*1); +if (lean::is_shared(x_112)) { + lean::dec(x_112); + x_130 = lean::box(0); +} else { + lean::cnstr_release(x_112, 0); + x_130 = x_112; +} +if (lean::is_scalar(x_130)) { + x_131 = lean::alloc_cnstr(1, 1, 1); +} else { + x_131 = x_130; +} +lean::cnstr_set(x_131, 0, x_127); +lean::cnstr_set_scalar(x_131, sizeof(void*)*1, x_129); +x_132 = x_131; +x_15 = x_132; +x_16 = x_24; +goto lbl_17; +} +} +lbl_17: +{ +if (lean::obj_tag(x_15) == 0) +{ +obj* x_133; obj* x_135; obj* x_137; obj* x_139; obj* x_140; obj* x_142; obj* x_144; +x_133 = lean::cnstr_get(x_15, 1); +lean::inc(x_133); +x_135 = lean::cnstr_get(x_15, 2); +lean::inc(x_135); +if (lean::is_shared(x_15)) { + lean::dec(x_15); + x_137 = lean::box(0); +} else { + lean::cnstr_release(x_15, 0); + lean::cnstr_release(x_15, 1); + lean::cnstr_release(x_15, 2); + x_137 = x_15; +} +lean::inc(x_133); +x_139 = l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__10(x_12, x_1, x_2, x_133, x_16); +x_140 = lean::cnstr_get(x_139, 0); +lean::inc(x_140); +x_142 = lean::cnstr_get(x_139, 1); +lean::inc(x_142); +if (lean::is_shared(x_139)) { + lean::dec(x_139); + x_144 = lean::box(0); +} else { + lean::cnstr_release(x_139, 0); + lean::cnstr_release(x_139, 1); + x_144 = x_139; +} +if (lean::obj_tag(x_140) == 0) +{ +obj* x_147; obj* x_148; +lean::dec(x_137); +lean::dec(x_133); +x_147 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_135, x_140); +if (lean::is_scalar(x_144)) { + x_148 = lean::alloc_cnstr(0, 2, 0); +} else { + x_148 = x_144; +} +lean::cnstr_set(x_148, 0, x_147); +lean::cnstr_set(x_148, 1, x_142); +return x_148; +} +else +{ +obj* x_149; uint8 x_151; +x_149 = lean::cnstr_get(x_140, 0); +lean::inc(x_149); +x_151 = lean::cnstr_get_scalar(x_140, sizeof(void*)*1); +if (x_151 == 0) +{ +obj* x_153; obj* x_156; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; +lean::dec(x_140); +x_153 = lean::cnstr_get(x_149, 2); +lean::inc(x_153); +lean::dec(x_149); +x_156 = l_mjoin___rarg___closed__1; +lean::inc(x_156); +x_158 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_158, 0, x_153); +lean::closure_set(x_158, 1, x_156); +x_159 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_159, 0, x_158); +x_160 = lean::box(0); +if (lean::is_scalar(x_137)) { + x_161 = lean::alloc_cnstr(0, 3, 0); +} else { + x_161 = x_137; +} +lean::cnstr_set(x_161, 0, x_160); +lean::cnstr_set(x_161, 1, x_133); +lean::cnstr_set(x_161, 2, x_159); +x_162 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_135, x_161); +if (lean::is_scalar(x_144)) { + x_163 = lean::alloc_cnstr(0, 2, 0); +} else { + x_163 = x_144; +} +lean::cnstr_set(x_163, 0, x_162); +lean::cnstr_set(x_163, 1, x_142); +return x_163; +} +else +{ +obj* x_167; obj* x_168; +lean::dec(x_137); +lean::dec(x_133); +lean::dec(x_149); +x_167 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_135, x_140); +if (lean::is_scalar(x_144)) { + x_168 = lean::alloc_cnstr(0, 2, 0); +} else { + x_168 = x_144; +} +lean::cnstr_set(x_168, 0, x_167); +lean::cnstr_set(x_168, 1, x_142); +return x_168; +} +} +} +else +{ +obj* x_172; uint8 x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; +lean::dec(x_12); +lean::dec(x_1); +lean::dec(x_2); +x_172 = lean::cnstr_get(x_15, 0); +lean::inc(x_172); +x_174 = lean::cnstr_get_scalar(x_15, sizeof(void*)*1); +if (lean::is_shared(x_15)) { + lean::dec(x_15); + x_175 = lean::box(0); +} else { + lean::cnstr_release(x_15, 0); + x_175 = x_15; +} +if (lean::is_scalar(x_175)) { + x_176 = lean::alloc_cnstr(1, 1, 1); +} else { + x_176 = x_175; +} +lean::cnstr_set(x_176, 0, x_172); +lean::cnstr_set_scalar(x_176, sizeof(void*)*1, x_174); +x_177 = x_176; +x_178 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_178, 0, x_177); +lean::cnstr_set(x_178, 1, x_16); +return x_178; +} +} +} +else +{ +obj* x_183; obj* x_184; obj* x_186; +lean::dec(x_0); +lean::inc(x_3); +lean::inc(x_2); +lean::inc(x_1); +x_183 = l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__3(x_1, x_2, x_3, x_4); +x_184 = lean::cnstr_get(x_183, 0); +lean::inc(x_184); +x_186 = lean::cnstr_get(x_183, 1); +lean::inc(x_186); +lean::dec(x_183); +if (lean::obj_tag(x_184) == 0) +{ +obj* x_189; obj* x_191; obj* x_193; obj* x_195; uint8 x_196; +x_189 = lean::cnstr_get(x_184, 0); +lean::inc(x_189); +x_191 = lean::cnstr_get(x_184, 1); +lean::inc(x_191); +x_193 = lean::cnstr_get(x_184, 2); +lean::inc(x_193); +if (lean::is_shared(x_184)) { + lean::dec(x_184); + x_195 = lean::box(0); +} else { + lean::cnstr_release(x_184, 0); + lean::cnstr_release(x_184, 1); + lean::cnstr_release(x_184, 2); + x_195 = x_184; +} +x_196 = lean::unbox(x_189); +lean::dec(x_189); +if (x_196 == 0) +{ +obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_207; obj* x_208; obj* x_210; obj* x_213; obj* x_214; obj* x_216; +lean::dec(x_195); +x_199 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_199, 0, x_3); +x_200 = lean::box(0); +x_201 = l___private_init_lean_parser_token_2__whitespace__aux___main___closed__1; +x_202 = l_mjoin___rarg___closed__1; +lean::inc(x_2); +lean::inc(x_1); +lean::inc(x_202); +lean::inc(x_201); +x_207 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_201, x_202, x_199, x_200, x_1, x_2, x_191, x_186); +x_208 = lean::cnstr_get(x_207, 0); +lean::inc(x_208); +x_210 = lean::cnstr_get(x_207, 1); +lean::inc(x_210); +lean::dec(x_207); +x_213 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_193, x_208); +x_214 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_214); +x_216 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_214, x_213); +if (lean::obj_tag(x_216) == 0) +{ +obj* x_217; obj* x_219; obj* x_222; obj* x_223; obj* x_225; obj* x_228; +x_217 = lean::cnstr_get(x_216, 1); +lean::inc(x_217); +x_219 = lean::cnstr_get(x_216, 2); +lean::inc(x_219); +lean::dec(x_216); +x_222 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_217, x_210); +x_223 = lean::cnstr_get(x_222, 0); +lean::inc(x_223); +x_225 = lean::cnstr_get(x_222, 1); +lean::inc(x_225); +lean::dec(x_222); +x_228 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_219, x_223); +x_5 = x_228; +x_6 = x_225; +goto lbl_7; +} +else +{ +obj* x_231; uint8 x_233; obj* x_234; obj* x_235; obj* x_236; +lean::dec(x_1); +lean::dec(x_2); +x_231 = lean::cnstr_get(x_216, 0); +lean::inc(x_231); +x_233 = lean::cnstr_get_scalar(x_216, sizeof(void*)*1); +if (lean::is_shared(x_216)) { + lean::dec(x_216); + x_234 = lean::box(0); +} else { + lean::cnstr_release(x_216, 0); + x_234 = x_216; +} +if (lean::is_scalar(x_234)) { + x_235 = lean::alloc_cnstr(1, 1, 1); +} else { + x_235 = x_234; +} +lean::cnstr_set(x_235, 0, x_231); +lean::cnstr_set_scalar(x_235, sizeof(void*)*1, x_233); +x_236 = x_235; +x_5 = x_236; +x_6 = x_210; +goto lbl_7; +} +} +else +{ +obj* x_238; obj* x_239; obj* x_241; obj* x_242; obj* x_244; +lean::dec(x_3); +x_238 = lean::box(0); +x_239 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_239); +if (lean::is_scalar(x_195)) { + x_241 = lean::alloc_cnstr(0, 3, 0); +} else { + x_241 = x_195; +} +lean::cnstr_set(x_241, 0, x_238); +lean::cnstr_set(x_241, 1, x_191); +lean::cnstr_set(x_241, 2, x_239); +x_242 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_193, x_241); +lean::inc(x_239); +x_244 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_239, x_242); +if (lean::obj_tag(x_244) == 0) +{ +obj* x_245; obj* x_247; obj* x_250; obj* x_251; obj* x_253; obj* x_256; +x_245 = lean::cnstr_get(x_244, 1); +lean::inc(x_245); +x_247 = lean::cnstr_get(x_244, 2); +lean::inc(x_247); +lean::dec(x_244); +x_250 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_245, x_186); +x_251 = lean::cnstr_get(x_250, 0); +lean::inc(x_251); +x_253 = lean::cnstr_get(x_250, 1); +lean::inc(x_253); +lean::dec(x_250); +x_256 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_247, x_251); +x_5 = x_256; +x_6 = x_253; +goto lbl_7; +} +else +{ +obj* x_259; uint8 x_261; obj* x_262; obj* x_263; obj* x_264; +lean::dec(x_1); +lean::dec(x_2); +x_259 = lean::cnstr_get(x_244, 0); +lean::inc(x_259); +x_261 = lean::cnstr_get_scalar(x_244, sizeof(void*)*1); +if (lean::is_shared(x_244)) { + lean::dec(x_244); + x_262 = lean::box(0); +} else { + lean::cnstr_release(x_244, 0); + x_262 = x_244; +} +if (lean::is_scalar(x_262)) { + x_263 = lean::alloc_cnstr(1, 1, 1); +} else { + x_263 = x_262; +} +lean::cnstr_set(x_263, 0, x_259); +lean::cnstr_set_scalar(x_263, sizeof(void*)*1, x_261); +x_264 = x_263; +x_5 = x_264; +x_6 = x_186; +goto lbl_7; +} +} +} +else +{ +obj* x_266; uint8 x_268; obj* x_269; obj* x_270; obj* x_271; obj* x_272; obj* x_274; +lean::dec(x_3); +x_266 = lean::cnstr_get(x_184, 0); +lean::inc(x_266); +x_268 = lean::cnstr_get_scalar(x_184, sizeof(void*)*1); +if (lean::is_shared(x_184)) { + lean::dec(x_184); + x_269 = lean::box(0); +} else { + lean::cnstr_release(x_184, 0); + x_269 = x_184; +} +if (lean::is_scalar(x_269)) { + x_270 = lean::alloc_cnstr(1, 1, 1); +} else { + x_270 = x_269; +} +lean::cnstr_set(x_270, 0, x_266); +lean::cnstr_set_scalar(x_270, sizeof(void*)*1, x_268); +x_271 = x_270; +x_272 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_272); +x_274 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_272, x_271); +if (lean::obj_tag(x_274) == 0) +{ +obj* x_275; obj* x_277; obj* x_280; obj* x_281; obj* x_283; obj* x_286; +x_275 = lean::cnstr_get(x_274, 1); +lean::inc(x_275); +x_277 = lean::cnstr_get(x_274, 2); +lean::inc(x_277); +lean::dec(x_274); +x_280 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_275, x_186); +x_281 = lean::cnstr_get(x_280, 0); +lean::inc(x_281); +x_283 = lean::cnstr_get(x_280, 1); +lean::inc(x_283); +lean::dec(x_280); +x_286 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_277, x_281); +x_5 = x_286; +x_6 = x_283; +goto lbl_7; +} +else +{ +obj* x_289; uint8 x_291; obj* x_292; obj* x_293; obj* x_294; +lean::dec(x_1); +lean::dec(x_2); +x_289 = lean::cnstr_get(x_274, 0); +lean::inc(x_289); +x_291 = lean::cnstr_get_scalar(x_274, sizeof(void*)*1); +if (lean::is_shared(x_274)) { + lean::dec(x_274); + x_292 = lean::box(0); +} else { + lean::cnstr_release(x_274, 0); + x_292 = x_274; +} +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_5 = x_294; +x_6 = x_186; +goto lbl_7; +} +} +} +lbl_7: +{ +if (lean::obj_tag(x_5) == 0) +{ +obj* x_295; obj* x_297; obj* x_299; obj* x_300; obj* x_301; obj* x_303; obj* x_304; obj* x_305; +x_295 = lean::cnstr_get(x_5, 1); +lean::inc(x_295); +x_297 = lean::cnstr_get(x_5, 2); +lean::inc(x_297); +if (lean::is_shared(x_5)) { + lean::dec(x_5); + x_299 = lean::box(0); +} else { + lean::cnstr_release(x_5, 0); + lean::cnstr_release(x_5, 1); + lean::cnstr_release(x_5, 2); + x_299 = x_5; +} +x_300 = lean::box(0); +x_301 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_301); +if (lean::is_scalar(x_299)) { + x_303 = lean::alloc_cnstr(0, 3, 0); +} else { + x_303 = x_299; +} +lean::cnstr_set(x_303, 0, x_300); +lean::cnstr_set(x_303, 1, x_295); +lean::cnstr_set(x_303, 2, x_301); +x_304 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_297, 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_6); +return x_305; +} +else +{ +obj* x_306; uint8 x_308; obj* x_309; obj* x_310; obj* x_311; obj* x_312; +x_306 = lean::cnstr_get(x_5, 0); +lean::inc(x_306); +x_308 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); +if (lean::is_shared(x_5)) { + lean::dec(x_5); + x_309 = lean::box(0); +} else { + lean::cnstr_release(x_5, 0); + x_309 = x_5; +} +if (lean::is_scalar(x_309)) { + x_310 = lean::alloc_cnstr(1, 1, 1); +} else { + x_310 = x_309; +} +lean::cnstr_set(x_310, 0, x_306); +lean::cnstr_set_scalar(x_310, sizeof(void*)*1, x_308); +x_311 = x_310; +x_312 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_312, 0, x_311); +lean::cnstr_set(x_312, 1, x_6); +return x_312; +} +} +} +} +obj* l_lean_parser_monad__parsec_many_x_27___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__9(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_11; obj* x_12; obj* x_14; +x_4 = lean::string_iterator_remaining(x_2); +lean::inc(x_2); +x_6 = l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__10(x_4, x_0, x_1, x_2, x_3); +x_7 = lean::cnstr_get(x_6, 0); +lean::inc(x_7); +x_9 = lean::cnstr_get(x_6, 1); +lean::inc(x_9); +if (lean::is_shared(x_6)) { + lean::dec(x_6); + x_11 = lean::box(0); +} else { + lean::cnstr_release(x_6, 0); + lean::cnstr_release(x_6, 1); + x_11 = x_6; +} +x_12 = l_lean_parser_finish__comment__block___closed__2; +lean::inc(x_12); +x_14 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_12, x_7); +if (lean::obj_tag(x_14) == 0) +{ +obj* x_16; +lean::dec(x_2); +if (lean::is_scalar(x_11)) { + x_16 = lean::alloc_cnstr(0, 2, 0); +} else { + x_16 = x_11; +} +lean::cnstr_set(x_16, 0, x_14); +lean::cnstr_set(x_16, 1, x_9); +return x_16; +} +else +{ +obj* x_17; uint8 x_19; +x_17 = lean::cnstr_get(x_14, 0); +lean::inc(x_17); +x_19 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); +if (x_19 == 0) +{ +obj* x_21; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; +lean::dec(x_14); +x_21 = lean::cnstr_get(x_17, 2); +lean::inc(x_21); +lean::dec(x_17); +x_24 = l_mjoin___rarg___closed__1; +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_26, 0, x_21); +lean::closure_set(x_26, 1, x_24); +x_27 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_27, 0, x_26); +x_28 = lean::box(0); +x_29 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_2); +lean::cnstr_set(x_29, 2, x_27); +if (lean::is_scalar(x_11)) { + x_30 = lean::alloc_cnstr(0, 2, 0); +} else { + x_30 = x_11; +} +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_9); +return x_30; +} +else +{ +obj* x_33; +lean::dec(x_17); +lean::dec(x_2); +if (lean::is_scalar(x_11)) { + x_33 = lean::alloc_cnstr(0, 2, 0); +} else { + x_33 = x_11; +} +lean::cnstr_set(x_33, 0, x_14); +lean::cnstr_set(x_33, 1, x_9); +return x_33; +} +} +} +} +obj* l_reader__t_bind___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__11___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_8; obj* x_9; obj* x_11; obj* x_13; @@ -2652,16 +3430,956 @@ return x_38; } } } -obj* l_reader__t_bind___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__9(obj* x_0, obj* x_1) { +obj* l_reader__t_bind___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__11(obj* x_0, obj* x_1) { _start: { obj* x_4; lean::dec(x_1); lean::dec(x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__9___rarg), 6, 0); +x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__11___rarg), 6, 0); 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; +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 = 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; +} +} +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) { +_start: +{ +obj* x_4; obj* x_5; obj* x_9; obj* x_10; obj* x_12; obj* x_14; +x_4 = l___private_init_lean_parser_token_1__finish__comment__block__aux___main___closed__1; +x_5 = l___private_init_lean_parser_token_1__finish__comment__block__aux___main___closed__2; +lean::inc(x_2); +lean::inc(x_5); +lean::inc(x_4); +x_9 = l_lean_parser_monad__parsec_str__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__2(x_4, x_5, x_0, x_1, x_2, x_3); +x_10 = lean::cnstr_get(x_9, 0); +lean::inc(x_10); +x_12 = lean::cnstr_get(x_9, 1); +lean::inc(x_12); +if (lean::is_shared(x_9)) { + lean::dec(x_9); + x_14 = lean::box(0); +} else { + lean::cnstr_release(x_9, 0); + lean::cnstr_release(x_9, 1); + x_14 = x_9; +} +if (lean::obj_tag(x_10) == 0) +{ +obj* x_15; obj* x_17; obj* x_19; uint8 x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; +x_15 = lean::cnstr_get(x_10, 1); +lean::inc(x_15); +x_17 = lean::cnstr_get(x_10, 2); +lean::inc(x_17); +if (lean::is_shared(x_10)) { + lean::dec(x_10); + x_19 = lean::box(0); +} else { + lean::cnstr_release(x_10, 0); + lean::cnstr_release(x_10, 1); + lean::cnstr_release(x_10, 2); + x_19 = x_10; +} +x_20 = 0; +x_21 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +x_22 = lean::box(x_20); +lean::inc(x_21); +if (lean::is_scalar(x_19)) { + x_24 = lean::alloc_cnstr(0, 3, 0); +} else { + x_24 = x_19; +} +lean::cnstr_set(x_24, 0, x_22); +lean::cnstr_set(x_24, 1, x_15); +lean::cnstr_set(x_24, 2, x_21); +x_25 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_24); +if (lean::obj_tag(x_25) == 0) +{ +if (lean::obj_tag(x_25) == 0) +{ +obj* x_26; obj* x_28; obj* x_30; obj* x_31; +x_26 = lean::cnstr_get(x_25, 0); +lean::inc(x_26); +if (lean::is_shared(x_25)) { + lean::dec(x_25); + x_28 = lean::box(0); +} else { + lean::cnstr_release(x_25, 0); + lean::cnstr_release(x_25, 1); + lean::cnstr_release(x_25, 2); + x_28 = x_25; +} +lean::inc(x_21); +if (lean::is_scalar(x_28)) { + x_30 = lean::alloc_cnstr(0, 3, 0); +} else { + x_30 = x_28; +} +lean::cnstr_set(x_30, 0, x_26); +lean::cnstr_set(x_30, 1, x_2); +lean::cnstr_set(x_30, 2, x_21); +if (lean::is_scalar(x_14)) { + x_31 = lean::alloc_cnstr(0, 2, 0); +} else { + x_31 = x_14; +} +lean::cnstr_set(x_31, 0, x_30); +lean::cnstr_set(x_31, 1, x_12); +return x_31; +} +else +{ +obj* x_33; +lean::dec(x_2); +if (lean::is_scalar(x_14)) { + x_33 = lean::alloc_cnstr(0, 2, 0); +} else { + x_33 = x_14; +} +lean::cnstr_set(x_33, 0, x_25); +lean::cnstr_set(x_33, 1, x_12); +return x_33; +} +} +else +{ +uint8 x_35; obj* x_36; obj* x_38; obj* x_39; +lean::dec(x_25); +x_35 = 1; +x_36 = lean::box(x_35); +lean::inc(x_21); +x_38 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_38, 0, x_36); +lean::cnstr_set(x_38, 1, x_2); +lean::cnstr_set(x_38, 2, x_21); +if (lean::is_scalar(x_14)) { + x_39 = lean::alloc_cnstr(0, 2, 0); +} else { + x_39 = x_14; +} +lean::cnstr_set(x_39, 0, x_38); +lean::cnstr_set(x_39, 1, x_12); +return x_39; +} +} +else +{ +uint8 x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; +lean::dec(x_10); +x_41 = 1; +x_42 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +x_43 = lean::box(x_41); +lean::inc(x_42); +x_45 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_45, 0, x_43); +lean::cnstr_set(x_45, 1, x_2); +lean::cnstr_set(x_45, 2, x_42); +if (lean::is_scalar(x_14)) { + x_46 = lean::alloc_cnstr(0, 2, 0); +} else { + x_46 = x_14; +} +lean::cnstr_set(x_46, 0, x_45); +lean::cnstr_set(x_46, 1, x_12); +return x_46; +} +} +} +obj* l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +_start: +{ +obj* x_5; obj* x_6; obj* x_8; uint8 x_9; +x_8 = lean::mk_nat_obj(0u); +x_9 = lean::nat_dec_eq(x_0, x_8); +lean::dec(x_8); +if (x_9 == 0) +{ +obj* x_11; obj* x_12; obj* x_15; obj* x_16; obj* x_21; obj* x_22; obj* x_24; +x_11 = lean::mk_nat_obj(1u); +x_12 = lean::nat_sub(x_0, x_11); +lean::dec(x_11); +lean::dec(x_0); +lean::inc(x_3); +lean::inc(x_2); +lean::inc(x_1); +x_21 = l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1(x_1, x_2, x_3, x_4); +x_22 = lean::cnstr_get(x_21, 0); +lean::inc(x_22); +x_24 = lean::cnstr_get(x_21, 1); +lean::inc(x_24); +lean::dec(x_21); +if (lean::obj_tag(x_22) == 0) +{ +obj* x_27; obj* x_29; obj* x_31; obj* x_33; uint8 x_34; +x_27 = lean::cnstr_get(x_22, 0); +lean::inc(x_27); +x_29 = lean::cnstr_get(x_22, 1); +lean::inc(x_29); +x_31 = lean::cnstr_get(x_22, 2); +lean::inc(x_31); +if (lean::is_shared(x_22)) { + lean::dec(x_22); + x_33 = lean::box(0); +} else { + lean::cnstr_release(x_22, 0); + lean::cnstr_release(x_22, 1); + lean::cnstr_release(x_22, 2); + x_33 = x_22; +} +x_34 = lean::unbox(x_27); +lean::dec(x_27); +if (x_34 == 0) +{ +obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_45; obj* x_46; obj* x_48; obj* x_51; obj* x_52; obj* x_54; +lean::dec(x_33); +x_37 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_37, 0, x_3); +x_38 = lean::box(0); +x_39 = l___private_init_lean_parser_token_2__whitespace__aux___main___closed__1; +x_40 = l_mjoin___rarg___closed__1; +lean::inc(x_2); +lean::inc(x_1); +lean::inc(x_40); +lean::inc(x_39); +x_45 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_39, x_40, x_37, x_38, x_1, x_2, x_29, x_24); +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_31, 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_51); +if (lean::obj_tag(x_54) == 0) +{ +obj* x_55; obj* x_57; obj* x_62; obj* x_63; obj* x_65; obj* x_68; +x_55 = lean::cnstr_get(x_54, 1); +lean::inc(x_55); +x_57 = lean::cnstr_get(x_54, 2); +lean::inc(x_57); +lean::dec(x_54); +lean::inc(x_2); +lean::inc(x_1); +x_62 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_55, x_48); +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__t_bind__mk__res___rarg(x_57, x_63); +x_15 = x_68; +x_16 = x_65; +goto lbl_17; +} +else +{ +obj* x_69; uint8 x_71; obj* x_72; obj* x_73; obj* x_74; +x_69 = lean::cnstr_get(x_54, 0); +lean::inc(x_69); +x_71 = lean::cnstr_get_scalar(x_54, sizeof(void*)*1); +if (lean::is_shared(x_54)) { + lean::dec(x_54); + x_72 = lean::box(0); +} else { + lean::cnstr_release(x_54, 0); + x_72 = x_54; +} +if (lean::is_scalar(x_72)) { + x_73 = lean::alloc_cnstr(1, 1, 1); +} else { + x_73 = x_72; +} +lean::cnstr_set(x_73, 0, x_69); +lean::cnstr_set_scalar(x_73, sizeof(void*)*1, x_71); +x_74 = x_73; +x_15 = x_74; +x_16 = x_48; +goto lbl_17; +} +} +else +{ +obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_82; +lean::dec(x_3); +x_76 = lean::box(0); +x_77 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_77); +if (lean::is_scalar(x_33)) { + x_79 = lean::alloc_cnstr(0, 3, 0); +} else { + x_79 = x_33; +} +lean::cnstr_set(x_79, 0, x_76); +lean::cnstr_set(x_79, 1, x_29); +lean::cnstr_set(x_79, 2, x_77); +x_80 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_31, x_79); +lean::inc(x_77); +x_82 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_77, x_80); +if (lean::obj_tag(x_82) == 0) +{ +obj* x_83; obj* x_85; obj* x_90; obj* x_91; obj* x_93; obj* x_96; +x_83 = lean::cnstr_get(x_82, 1); +lean::inc(x_83); +x_85 = lean::cnstr_get(x_82, 2); +lean::inc(x_85); +lean::dec(x_82); +lean::inc(x_2); +lean::inc(x_1); +x_90 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_83, x_24); +x_91 = lean::cnstr_get(x_90, 0); +lean::inc(x_91); +x_93 = lean::cnstr_get(x_90, 1); +lean::inc(x_93); +lean::dec(x_90); +x_96 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_85, x_91); +x_15 = x_96; +x_16 = x_93; +goto lbl_17; +} +else +{ +obj* x_97; uint8 x_99; obj* x_100; obj* x_101; obj* x_102; +x_97 = lean::cnstr_get(x_82, 0); +lean::inc(x_97); +x_99 = lean::cnstr_get_scalar(x_82, sizeof(void*)*1); +if (lean::is_shared(x_82)) { + lean::dec(x_82); + x_100 = lean::box(0); +} else { + lean::cnstr_release(x_82, 0); + x_100 = x_82; +} +if (lean::is_scalar(x_100)) { + x_101 = lean::alloc_cnstr(1, 1, 1); +} else { + x_101 = x_100; +} +lean::cnstr_set(x_101, 0, x_97); +lean::cnstr_set_scalar(x_101, sizeof(void*)*1, x_99); +x_102 = x_101; +x_15 = x_102; +x_16 = x_24; +goto lbl_17; +} +} +} +else +{ +obj* x_104; uint8 x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_112; +lean::dec(x_3); +x_104 = lean::cnstr_get(x_22, 0); +lean::inc(x_104); +x_106 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); +if (lean::is_shared(x_22)) { + lean::dec(x_22); + x_107 = lean::box(0); +} else { + lean::cnstr_release(x_22, 0); + x_107 = x_22; +} +if (lean::is_scalar(x_107)) { + x_108 = lean::alloc_cnstr(1, 1, 1); +} else { + x_108 = x_107; +} +lean::cnstr_set(x_108, 0, x_104); +lean::cnstr_set_scalar(x_108, sizeof(void*)*1, x_106); +x_109 = x_108; +x_110 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_110); +x_112 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_110, x_109); +if (lean::obj_tag(x_112) == 0) +{ +obj* x_113; obj* x_115; obj* x_120; obj* x_121; obj* x_123; obj* x_126; +x_113 = lean::cnstr_get(x_112, 1); +lean::inc(x_113); +x_115 = lean::cnstr_get(x_112, 2); +lean::inc(x_115); +lean::dec(x_112); +lean::inc(x_2); +lean::inc(x_1); +x_120 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_113, x_24); +x_121 = lean::cnstr_get(x_120, 0); +lean::inc(x_121); +x_123 = lean::cnstr_get(x_120, 1); +lean::inc(x_123); +lean::dec(x_120); +x_126 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_115, x_121); +x_15 = x_126; +x_16 = x_123; +goto lbl_17; +} +else +{ +obj* x_127; uint8 x_129; obj* x_130; obj* x_131; obj* x_132; +x_127 = lean::cnstr_get(x_112, 0); +lean::inc(x_127); +x_129 = lean::cnstr_get_scalar(x_112, sizeof(void*)*1); +if (lean::is_shared(x_112)) { + lean::dec(x_112); + x_130 = lean::box(0); +} else { + lean::cnstr_release(x_112, 0); + x_130 = x_112; +} +if (lean::is_scalar(x_130)) { + x_131 = lean::alloc_cnstr(1, 1, 1); +} else { + x_131 = x_130; +} +lean::cnstr_set(x_131, 0, x_127); +lean::cnstr_set_scalar(x_131, sizeof(void*)*1, x_129); +x_132 = x_131; +x_15 = x_132; +x_16 = x_24; +goto lbl_17; +} +} +lbl_17: +{ +if (lean::obj_tag(x_15) == 0) +{ +obj* x_133; obj* x_135; obj* x_137; obj* x_139; obj* x_140; obj* x_142; obj* x_144; +x_133 = lean::cnstr_get(x_15, 1); +lean::inc(x_133); +x_135 = lean::cnstr_get(x_15, 2); +lean::inc(x_135); +if (lean::is_shared(x_15)) { + lean::dec(x_15); + x_137 = lean::box(0); +} else { + lean::cnstr_release(x_15, 0); + lean::cnstr_release(x_15, 1); + lean::cnstr_release(x_15, 2); + x_137 = x_15; +} +lean::inc(x_133); +x_139 = l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__3(x_12, x_1, x_2, x_133, x_16); +x_140 = lean::cnstr_get(x_139, 0); +lean::inc(x_140); +x_142 = lean::cnstr_get(x_139, 1); +lean::inc(x_142); +if (lean::is_shared(x_139)) { + lean::dec(x_139); + x_144 = lean::box(0); +} else { + lean::cnstr_release(x_139, 0); + lean::cnstr_release(x_139, 1); + x_144 = x_139; +} +if (lean::obj_tag(x_140) == 0) +{ +obj* x_147; obj* x_148; +lean::dec(x_137); +lean::dec(x_133); +x_147 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_135, x_140); +if (lean::is_scalar(x_144)) { + x_148 = lean::alloc_cnstr(0, 2, 0); +} else { + x_148 = x_144; +} +lean::cnstr_set(x_148, 0, x_147); +lean::cnstr_set(x_148, 1, x_142); +return x_148; +} +else +{ +obj* x_149; uint8 x_151; +x_149 = lean::cnstr_get(x_140, 0); +lean::inc(x_149); +x_151 = lean::cnstr_get_scalar(x_140, sizeof(void*)*1); +if (x_151 == 0) +{ +obj* x_153; obj* x_156; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; +lean::dec(x_140); +x_153 = lean::cnstr_get(x_149, 2); +lean::inc(x_153); +lean::dec(x_149); +x_156 = l_mjoin___rarg___closed__1; +lean::inc(x_156); +x_158 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_158, 0, x_153); +lean::closure_set(x_158, 1, x_156); +x_159 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_159, 0, x_158); +x_160 = lean::box(0); +if (lean::is_scalar(x_137)) { + x_161 = lean::alloc_cnstr(0, 3, 0); +} else { + x_161 = x_137; +} +lean::cnstr_set(x_161, 0, x_160); +lean::cnstr_set(x_161, 1, x_133); +lean::cnstr_set(x_161, 2, x_159); +x_162 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_135, x_161); +if (lean::is_scalar(x_144)) { + x_163 = lean::alloc_cnstr(0, 2, 0); +} else { + x_163 = x_144; +} +lean::cnstr_set(x_163, 0, x_162); +lean::cnstr_set(x_163, 1, x_142); +return x_163; +} +else +{ +obj* x_167; obj* x_168; +lean::dec(x_137); +lean::dec(x_133); +lean::dec(x_149); +x_167 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_135, x_140); +if (lean::is_scalar(x_144)) { + x_168 = lean::alloc_cnstr(0, 2, 0); +} else { + x_168 = x_144; +} +lean::cnstr_set(x_168, 0, x_167); +lean::cnstr_set(x_168, 1, x_142); +return x_168; +} +} +} +else +{ +obj* x_172; uint8 x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; +lean::dec(x_12); +lean::dec(x_1); +lean::dec(x_2); +x_172 = lean::cnstr_get(x_15, 0); +lean::inc(x_172); +x_174 = lean::cnstr_get_scalar(x_15, sizeof(void*)*1); +if (lean::is_shared(x_15)) { + lean::dec(x_15); + x_175 = lean::box(0); +} else { + lean::cnstr_release(x_15, 0); + x_175 = x_15; +} +if (lean::is_scalar(x_175)) { + x_176 = lean::alloc_cnstr(1, 1, 1); +} else { + x_176 = x_175; +} +lean::cnstr_set(x_176, 0, x_172); +lean::cnstr_set_scalar(x_176, sizeof(void*)*1, x_174); +x_177 = x_176; +x_178 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_178, 0, x_177); +lean::cnstr_set(x_178, 1, x_16); +return x_178; +} +} +} +else +{ +obj* x_183; obj* x_184; obj* x_186; +lean::dec(x_0); +lean::inc(x_3); +lean::inc(x_2); +lean::inc(x_1); +x_183 = l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1(x_1, x_2, x_3, x_4); +x_184 = lean::cnstr_get(x_183, 0); +lean::inc(x_184); +x_186 = lean::cnstr_get(x_183, 1); +lean::inc(x_186); +lean::dec(x_183); +if (lean::obj_tag(x_184) == 0) +{ +obj* x_189; obj* x_191; obj* x_193; obj* x_195; uint8 x_196; +x_189 = lean::cnstr_get(x_184, 0); +lean::inc(x_189); +x_191 = lean::cnstr_get(x_184, 1); +lean::inc(x_191); +x_193 = lean::cnstr_get(x_184, 2); +lean::inc(x_193); +if (lean::is_shared(x_184)) { + lean::dec(x_184); + x_195 = lean::box(0); +} else { + lean::cnstr_release(x_184, 0); + lean::cnstr_release(x_184, 1); + lean::cnstr_release(x_184, 2); + x_195 = x_184; +} +x_196 = lean::unbox(x_189); +lean::dec(x_189); +if (x_196 == 0) +{ +obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_207; obj* x_208; obj* x_210; obj* x_213; obj* x_214; obj* x_216; +lean::dec(x_195); +x_199 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_199, 0, x_3); +x_200 = lean::box(0); +x_201 = l___private_init_lean_parser_token_2__whitespace__aux___main___closed__1; +x_202 = l_mjoin___rarg___closed__1; +lean::inc(x_2); +lean::inc(x_1); +lean::inc(x_202); +lean::inc(x_201); +x_207 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_201, x_202, x_199, x_200, x_1, x_2, x_191, x_186); +x_208 = lean::cnstr_get(x_207, 0); +lean::inc(x_208); +x_210 = lean::cnstr_get(x_207, 1); +lean::inc(x_210); +lean::dec(x_207); +x_213 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_193, x_208); +x_214 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_214); +x_216 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_214, x_213); +if (lean::obj_tag(x_216) == 0) +{ +obj* x_217; obj* x_219; obj* x_222; obj* x_223; obj* x_225; obj* x_228; +x_217 = lean::cnstr_get(x_216, 1); +lean::inc(x_217); +x_219 = lean::cnstr_get(x_216, 2); +lean::inc(x_219); +lean::dec(x_216); +x_222 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_217, x_210); +x_223 = lean::cnstr_get(x_222, 0); +lean::inc(x_223); +x_225 = lean::cnstr_get(x_222, 1); +lean::inc(x_225); +lean::dec(x_222); +x_228 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_219, x_223); +x_5 = x_228; +x_6 = x_225; +goto lbl_7; +} +else +{ +obj* x_231; uint8 x_233; obj* x_234; obj* x_235; obj* x_236; +lean::dec(x_1); +lean::dec(x_2); +x_231 = lean::cnstr_get(x_216, 0); +lean::inc(x_231); +x_233 = lean::cnstr_get_scalar(x_216, sizeof(void*)*1); +if (lean::is_shared(x_216)) { + lean::dec(x_216); + x_234 = lean::box(0); +} else { + lean::cnstr_release(x_216, 0); + x_234 = x_216; +} +if (lean::is_scalar(x_234)) { + x_235 = lean::alloc_cnstr(1, 1, 1); +} else { + x_235 = x_234; +} +lean::cnstr_set(x_235, 0, x_231); +lean::cnstr_set_scalar(x_235, sizeof(void*)*1, x_233); +x_236 = x_235; +x_5 = x_236; +x_6 = x_210; +goto lbl_7; +} +} +else +{ +obj* x_238; obj* x_239; obj* x_241; obj* x_242; obj* x_244; +lean::dec(x_3); +x_238 = lean::box(0); +x_239 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_239); +if (lean::is_scalar(x_195)) { + x_241 = lean::alloc_cnstr(0, 3, 0); +} else { + x_241 = x_195; +} +lean::cnstr_set(x_241, 0, x_238); +lean::cnstr_set(x_241, 1, x_191); +lean::cnstr_set(x_241, 2, x_239); +x_242 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_193, x_241); +lean::inc(x_239); +x_244 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_239, x_242); +if (lean::obj_tag(x_244) == 0) +{ +obj* x_245; obj* x_247; obj* x_250; obj* x_251; obj* x_253; obj* x_256; +x_245 = lean::cnstr_get(x_244, 1); +lean::inc(x_245); +x_247 = lean::cnstr_get(x_244, 2); +lean::inc(x_247); +lean::dec(x_244); +x_250 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_245, x_186); +x_251 = lean::cnstr_get(x_250, 0); +lean::inc(x_251); +x_253 = lean::cnstr_get(x_250, 1); +lean::inc(x_253); +lean::dec(x_250); +x_256 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_247, x_251); +x_5 = x_256; +x_6 = x_253; +goto lbl_7; +} +else +{ +obj* x_259; uint8 x_261; obj* x_262; obj* x_263; obj* x_264; +lean::dec(x_1); +lean::dec(x_2); +x_259 = lean::cnstr_get(x_244, 0); +lean::inc(x_259); +x_261 = lean::cnstr_get_scalar(x_244, sizeof(void*)*1); +if (lean::is_shared(x_244)) { + lean::dec(x_244); + x_262 = lean::box(0); +} else { + lean::cnstr_release(x_244, 0); + x_262 = x_244; +} +if (lean::is_scalar(x_262)) { + x_263 = lean::alloc_cnstr(1, 1, 1); +} else { + x_263 = x_262; +} +lean::cnstr_set(x_263, 0, x_259); +lean::cnstr_set_scalar(x_263, sizeof(void*)*1, x_261); +x_264 = x_263; +x_5 = x_264; +x_6 = x_186; +goto lbl_7; +} +} +} +else +{ +obj* x_266; uint8 x_268; obj* x_269; obj* x_270; obj* x_271; obj* x_272; obj* x_274; +lean::dec(x_3); +x_266 = lean::cnstr_get(x_184, 0); +lean::inc(x_266); +x_268 = lean::cnstr_get_scalar(x_184, sizeof(void*)*1); +if (lean::is_shared(x_184)) { + lean::dec(x_184); + x_269 = lean::box(0); +} else { + lean::cnstr_release(x_184, 0); + x_269 = x_184; +} +if (lean::is_scalar(x_269)) { + x_270 = lean::alloc_cnstr(1, 1, 1); +} else { + x_270 = x_269; +} +lean::cnstr_set(x_270, 0, x_266); +lean::cnstr_set_scalar(x_270, sizeof(void*)*1, x_268); +x_271 = x_270; +x_272 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_272); +x_274 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_272, x_271); +if (lean::obj_tag(x_274) == 0) +{ +obj* x_275; obj* x_277; obj* x_280; obj* x_281; obj* x_283; obj* x_286; +x_275 = lean::cnstr_get(x_274, 1); +lean::inc(x_275); +x_277 = lean::cnstr_get(x_274, 2); +lean::inc(x_277); +lean::dec(x_274); +x_280 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_275, x_186); +x_281 = lean::cnstr_get(x_280, 0); +lean::inc(x_281); +x_283 = lean::cnstr_get(x_280, 1); +lean::inc(x_283); +lean::dec(x_280); +x_286 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_277, x_281); +x_5 = x_286; +x_6 = x_283; +goto lbl_7; +} +else +{ +obj* x_289; uint8 x_291; obj* x_292; obj* x_293; obj* x_294; +lean::dec(x_1); +lean::dec(x_2); +x_289 = lean::cnstr_get(x_274, 0); +lean::inc(x_289); +x_291 = lean::cnstr_get_scalar(x_274, sizeof(void*)*1); +if (lean::is_shared(x_274)) { + lean::dec(x_274); + x_292 = lean::box(0); +} else { + lean::cnstr_release(x_274, 0); + x_292 = x_274; +} +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_5 = x_294; +x_6 = x_186; +goto lbl_7; +} +} +} +lbl_7: +{ +if (lean::obj_tag(x_5) == 0) +{ +obj* x_295; obj* x_297; obj* x_299; obj* x_300; obj* x_301; obj* x_303; obj* x_304; obj* x_305; +x_295 = lean::cnstr_get(x_5, 1); +lean::inc(x_295); +x_297 = lean::cnstr_get(x_5, 2); +lean::inc(x_297); +if (lean::is_shared(x_5)) { + lean::dec(x_5); + x_299 = lean::box(0); +} else { + lean::cnstr_release(x_5, 0); + lean::cnstr_release(x_5, 1); + lean::cnstr_release(x_5, 2); + x_299 = x_5; +} +x_300 = lean::box(0); +x_301 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_301); +if (lean::is_scalar(x_299)) { + x_303 = lean::alloc_cnstr(0, 3, 0); +} else { + x_303 = x_299; +} +lean::cnstr_set(x_303, 0, x_300); +lean::cnstr_set(x_303, 1, x_295); +lean::cnstr_set(x_303, 2, x_301); +x_304 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_297, 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_6); +return x_305; +} +else +{ +obj* x_306; uint8 x_308; obj* x_309; obj* x_310; obj* x_311; obj* x_312; +x_306 = lean::cnstr_get(x_5, 0); +lean::inc(x_306); +x_308 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); +if (lean::is_shared(x_5)) { + lean::dec(x_5); + x_309 = lean::box(0); +} else { + lean::cnstr_release(x_5, 0); + x_309 = x_5; +} +if (lean::is_scalar(x_309)) { + x_310 = lean::alloc_cnstr(1, 1, 1); +} else { + x_310 = x_309; +} +lean::cnstr_set(x_310, 0, x_306); +lean::cnstr_set_scalar(x_310, sizeof(void*)*1, x_308); +x_311 = x_310; +x_312 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_312, 0, x_311); +lean::cnstr_set(x_312, 1, x_6); +return x_312; +} +} +} +} +obj* l_lean_parser_monad__parsec_many_x_27___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_11; obj* x_12; obj* x_14; +x_4 = lean::string_iterator_remaining(x_2); +lean::inc(x_2); +x_6 = l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__3(x_4, x_0, x_1, x_2, x_3); +x_7 = lean::cnstr_get(x_6, 0); +lean::inc(x_7); +x_9 = lean::cnstr_get(x_6, 1); +lean::inc(x_9); +if (lean::is_shared(x_6)) { + lean::dec(x_6); + x_11 = lean::box(0); +} else { + lean::cnstr_release(x_6, 0); + lean::cnstr_release(x_6, 1); + x_11 = x_6; +} +x_12 = l_lean_parser_finish__comment__block___closed__2; +lean::inc(x_12); +x_14 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_12, x_7); +if (lean::obj_tag(x_14) == 0) +{ +obj* x_16; +lean::dec(x_2); +if (lean::is_scalar(x_11)) { + x_16 = lean::alloc_cnstr(0, 2, 0); +} else { + x_16 = x_11; +} +lean::cnstr_set(x_16, 0, x_14); +lean::cnstr_set(x_16, 1, x_9); +return x_16; +} +else +{ +obj* x_17; uint8 x_19; +x_17 = lean::cnstr_get(x_14, 0); +lean::inc(x_17); +x_19 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); +if (x_19 == 0) +{ +obj* x_21; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; +lean::dec(x_14); +x_21 = lean::cnstr_get(x_17, 2); +lean::inc(x_21); +lean::dec(x_17); +x_24 = l_mjoin___rarg___closed__1; +lean::inc(x_24); +x_26 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); +lean::closure_set(x_26, 0, x_21); +lean::closure_set(x_26, 1, x_24); +x_27 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_27, 0, x_26); +x_28 = lean::box(0); +x_29 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_2); +lean::cnstr_set(x_29, 2, x_27); +if (lean::is_scalar(x_11)) { + x_30 = lean::alloc_cnstr(0, 2, 0); +} else { + x_30 = x_11; +} +lean::cnstr_set(x_30, 0, x_29); +lean::cnstr_set(x_30, 1, x_9); +return x_30; +} +else +{ +obj* x_33; +lean::dec(x_17); +lean::dec(x_2); +if (lean::is_scalar(x_11)) { + x_33 = lean::alloc_cnstr(0, 2, 0); +} else { + x_33 = x_11; +} +lean::cnstr_set(x_33, 0, x_14); +lean::cnstr_set(x_33, 1, x_9); +return x_33; +} +} +} +} obj* _init_l_lean_parser_command_doc__comment_parser_lean_parser_has__view() { _start: { @@ -2673,17 +4391,17 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_with__trailing___rarg___lambda__1), 2, 0); -x_8 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__1___rarg), 4, 1); +x_8 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__1___rarg), 4, 1); lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__6___rarg), 5, 1); +x_9 = 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_9, 0, x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_doc__comment_parser_lean_parser_has__view___lambda__1), 5, 0); -x_11 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__9___rarg), 6, 2); +x_11 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__11___rarg), 6, 2); lean::closure_set(x_11, 0, x_9); lean::closure_set(x_11, 1, x_10); x_12 = lean::mk_string("-/"); @@ -2691,7 +4409,7 @@ x_13 = l_string_trim(x_12); lean::inc(x_13); x_15 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_15, 0, x_13); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_16 = 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_16, 0, x_13); lean::closure_set(x_16, 1, x_4); lean::closure_set(x_16, 2, x_15); @@ -2725,7 +4443,7 @@ obj* l_lean_parser_command_doc__comment_parser_lean_parser_has__view___lambda__1 _start: { obj* x_5; obj* x_6; obj* x_8; obj* x_10; -x_5 = l_lean_parser_monad__parsec_many_x_27___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__7(x_1, x_2, x_3, x_4); +x_5 = l_lean_parser_monad__parsec_many_x_27___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__2(x_1, x_2, x_3, x_4); x_6 = lean::cnstr_get(x_5, 0); lean::inc(x_6); x_8 = lean::cnstr_get(x_5, 1); @@ -2809,1724 +4527,6 @@ return x_30; } } } -obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_9; obj* x_10; obj* x_12; obj* x_14; -x_4 = l___private_init_lean_parser_token_1__finish__comment__block__aux___main___closed__1; -x_5 = l___private_init_lean_parser_token_1__finish__comment__block__aux___main___closed__2; -lean::inc(x_2); -lean::inc(x_5); -lean::inc(x_4); -x_9 = l_lean_parser_monad__parsec_str__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__2(x_4, x_5, x_0, x_1, x_2, x_3); -x_10 = lean::cnstr_get(x_9, 0); -lean::inc(x_10); -x_12 = lean::cnstr_get(x_9, 1); -lean::inc(x_12); -if (lean::is_shared(x_9)) { - lean::dec(x_9); - x_14 = lean::box(0); -} else { - lean::cnstr_release(x_9, 0); - lean::cnstr_release(x_9, 1); - x_14 = x_9; -} -if (lean::obj_tag(x_10) == 0) -{ -obj* x_15; obj* x_17; obj* x_19; uint8 x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; -x_15 = lean::cnstr_get(x_10, 1); -lean::inc(x_15); -x_17 = lean::cnstr_get(x_10, 2); -lean::inc(x_17); -if (lean::is_shared(x_10)) { - lean::dec(x_10); - x_19 = lean::box(0); -} else { - lean::cnstr_release(x_10, 0); - lean::cnstr_release(x_10, 1); - lean::cnstr_release(x_10, 2); - x_19 = x_10; -} -x_20 = 0; -x_21 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -x_22 = lean::box(x_20); -lean::inc(x_21); -if (lean::is_scalar(x_19)) { - x_24 = lean::alloc_cnstr(0, 3, 0); -} else { - x_24 = x_19; -} -lean::cnstr_set(x_24, 0, x_22); -lean::cnstr_set(x_24, 1, x_15); -lean::cnstr_set(x_24, 2, x_21); -x_25 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_24); -if (lean::obj_tag(x_25) == 0) -{ -if (lean::obj_tag(x_25) == 0) -{ -obj* x_26; obj* x_28; obj* x_30; obj* x_31; -x_26 = lean::cnstr_get(x_25, 0); -lean::inc(x_26); -if (lean::is_shared(x_25)) { - lean::dec(x_25); - x_28 = lean::box(0); -} else { - lean::cnstr_release(x_25, 0); - lean::cnstr_release(x_25, 1); - lean::cnstr_release(x_25, 2); - x_28 = x_25; -} -lean::inc(x_21); -if (lean::is_scalar(x_28)) { - x_30 = lean::alloc_cnstr(0, 3, 0); -} else { - x_30 = x_28; -} -lean::cnstr_set(x_30, 0, x_26); -lean::cnstr_set(x_30, 1, x_2); -lean::cnstr_set(x_30, 2, x_21); -if (lean::is_scalar(x_14)) { - x_31 = lean::alloc_cnstr(0, 2, 0); -} else { - x_31 = x_14; -} -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_12); -return x_31; -} -else -{ -obj* x_33; -lean::dec(x_2); -if (lean::is_scalar(x_14)) { - x_33 = lean::alloc_cnstr(0, 2, 0); -} else { - x_33 = x_14; -} -lean::cnstr_set(x_33, 0, x_25); -lean::cnstr_set(x_33, 1, x_12); -return x_33; -} -} -else -{ -uint8 x_35; obj* x_36; obj* x_38; obj* x_39; -lean::dec(x_25); -x_35 = 1; -x_36 = lean::box(x_35); -lean::inc(x_21); -x_38 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_38, 0, x_36); -lean::cnstr_set(x_38, 1, x_2); -lean::cnstr_set(x_38, 2, x_21); -if (lean::is_scalar(x_14)) { - x_39 = lean::alloc_cnstr(0, 2, 0); -} else { - x_39 = x_14; -} -lean::cnstr_set(x_39, 0, x_38); -lean::cnstr_set(x_39, 1, x_12); -return x_39; -} -} -else -{ -uint8 x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; -lean::dec(x_10); -x_41 = 1; -x_42 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -x_43 = lean::box(x_41); -lean::inc(x_42); -x_45 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_45, 0, x_43); -lean::cnstr_set(x_45, 1, x_2); -lean::cnstr_set(x_45, 2, x_42); -if (lean::is_scalar(x_14)) { - x_46 = lean::alloc_cnstr(0, 2, 0); -} else { - x_46 = x_14; -} -lean::cnstr_set(x_46, 0, x_45); -lean::cnstr_set(x_46, 1, x_12); -return x_46; -} -} -} -obj* l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_8; uint8 x_9; -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::nat_dec_eq(x_0, x_8); -lean::dec(x_8); -if (x_9 == 0) -{ -obj* x_11; obj* x_12; obj* x_15; obj* x_16; obj* x_21; obj* x_22; obj* x_24; -x_11 = lean::mk_nat_obj(1u); -x_12 = lean::nat_sub(x_0, x_11); -lean::dec(x_11); -lean::dec(x_0); -lean::inc(x_3); -lean::inc(x_2); -lean::inc(x_1); -x_21 = l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1(x_1, x_2, x_3, x_4); -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_27; obj* x_29; obj* x_31; obj* x_33; uint8 x_34; -x_27 = lean::cnstr_get(x_22, 0); -lean::inc(x_27); -x_29 = lean::cnstr_get(x_22, 1); -lean::inc(x_29); -x_31 = lean::cnstr_get(x_22, 2); -lean::inc(x_31); -if (lean::is_shared(x_22)) { - lean::dec(x_22); - x_33 = lean::box(0); -} else { - lean::cnstr_release(x_22, 0); - lean::cnstr_release(x_22, 1); - lean::cnstr_release(x_22, 2); - x_33 = x_22; -} -x_34 = lean::unbox(x_27); -lean::dec(x_27); -if (x_34 == 0) -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_45; obj* x_46; obj* x_48; obj* x_51; obj* x_52; obj* x_54; -lean::dec(x_33); -x_37 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_37, 0, x_3); -x_38 = lean::box(0); -x_39 = l___private_init_lean_parser_token_2__whitespace__aux___main___closed__1; -x_40 = l_mjoin___rarg___closed__1; -lean::inc(x_2); -lean::inc(x_1); -lean::inc(x_40); -lean::inc(x_39); -x_45 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4___rarg(x_39, x_40, x_37, x_38, x_1, x_2, x_29, x_24); -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_31, 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_51); -if (lean::obj_tag(x_54) == 0) -{ -obj* x_55; obj* x_57; obj* x_62; obj* x_63; obj* x_65; obj* x_68; -x_55 = lean::cnstr_get(x_54, 1); -lean::inc(x_55); -x_57 = lean::cnstr_get(x_54, 2); -lean::inc(x_57); -lean::dec(x_54); -lean::inc(x_2); -lean::inc(x_1); -x_62 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_55, x_48); -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__t_bind__mk__res___rarg(x_57, x_63); -x_15 = x_68; -x_16 = x_65; -goto lbl_17; -} -else -{ -obj* x_69; uint8 x_71; obj* x_72; obj* x_73; obj* x_74; -x_69 = lean::cnstr_get(x_54, 0); -lean::inc(x_69); -x_71 = lean::cnstr_get_scalar(x_54, sizeof(void*)*1); -if (lean::is_shared(x_54)) { - lean::dec(x_54); - x_72 = lean::box(0); -} else { - lean::cnstr_release(x_54, 0); - x_72 = x_54; -} -if (lean::is_scalar(x_72)) { - x_73 = lean::alloc_cnstr(1, 1, 1); -} else { - x_73 = x_72; -} -lean::cnstr_set(x_73, 0, x_69); -lean::cnstr_set_scalar(x_73, sizeof(void*)*1, x_71); -x_74 = x_73; -x_15 = x_74; -x_16 = x_48; -goto lbl_17; -} -} -else -{ -obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_82; -lean::dec(x_3); -x_76 = lean::box(0); -x_77 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_77); -if (lean::is_scalar(x_33)) { - x_79 = lean::alloc_cnstr(0, 3, 0); -} else { - x_79 = x_33; -} -lean::cnstr_set(x_79, 0, x_76); -lean::cnstr_set(x_79, 1, x_29); -lean::cnstr_set(x_79, 2, x_77); -x_80 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_31, x_79); -lean::inc(x_77); -x_82 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_77, x_80); -if (lean::obj_tag(x_82) == 0) -{ -obj* x_83; obj* x_85; obj* x_90; obj* x_91; obj* x_93; obj* x_96; -x_83 = lean::cnstr_get(x_82, 1); -lean::inc(x_83); -x_85 = lean::cnstr_get(x_82, 2); -lean::inc(x_85); -lean::dec(x_82); -lean::inc(x_2); -lean::inc(x_1); -x_90 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_83, x_24); -x_91 = lean::cnstr_get(x_90, 0); -lean::inc(x_91); -x_93 = lean::cnstr_get(x_90, 1); -lean::inc(x_93); -lean::dec(x_90); -x_96 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_85, x_91); -x_15 = x_96; -x_16 = x_93; -goto lbl_17; -} -else -{ -obj* x_97; uint8 x_99; obj* x_100; obj* x_101; obj* x_102; -x_97 = lean::cnstr_get(x_82, 0); -lean::inc(x_97); -x_99 = lean::cnstr_get_scalar(x_82, sizeof(void*)*1); -if (lean::is_shared(x_82)) { - lean::dec(x_82); - x_100 = lean::box(0); -} else { - lean::cnstr_release(x_82, 0); - x_100 = x_82; -} -if (lean::is_scalar(x_100)) { - x_101 = lean::alloc_cnstr(1, 1, 1); -} else { - x_101 = x_100; -} -lean::cnstr_set(x_101, 0, x_97); -lean::cnstr_set_scalar(x_101, sizeof(void*)*1, x_99); -x_102 = x_101; -x_15 = x_102; -x_16 = x_24; -goto lbl_17; -} -} -} -else -{ -obj* x_104; uint8 x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_112; -lean::dec(x_3); -x_104 = lean::cnstr_get(x_22, 0); -lean::inc(x_104); -x_106 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); -if (lean::is_shared(x_22)) { - lean::dec(x_22); - x_107 = lean::box(0); -} else { - lean::cnstr_release(x_22, 0); - x_107 = x_22; -} -if (lean::is_scalar(x_107)) { - x_108 = lean::alloc_cnstr(1, 1, 1); -} else { - x_108 = x_107; -} -lean::cnstr_set(x_108, 0, x_104); -lean::cnstr_set_scalar(x_108, sizeof(void*)*1, x_106); -x_109 = x_108; -x_110 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_110); -x_112 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_110, x_109); -if (lean::obj_tag(x_112) == 0) -{ -obj* x_113; obj* x_115; obj* x_120; obj* x_121; obj* x_123; obj* x_126; -x_113 = lean::cnstr_get(x_112, 1); -lean::inc(x_113); -x_115 = lean::cnstr_get(x_112, 2); -lean::inc(x_115); -lean::dec(x_112); -lean::inc(x_2); -lean::inc(x_1); -x_120 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_113, x_24); -x_121 = lean::cnstr_get(x_120, 0); -lean::inc(x_121); -x_123 = lean::cnstr_get(x_120, 1); -lean::inc(x_123); -lean::dec(x_120); -x_126 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_115, x_121); -x_15 = x_126; -x_16 = x_123; -goto lbl_17; -} -else -{ -obj* x_127; uint8 x_129; obj* x_130; obj* x_131; obj* x_132; -x_127 = lean::cnstr_get(x_112, 0); -lean::inc(x_127); -x_129 = lean::cnstr_get_scalar(x_112, sizeof(void*)*1); -if (lean::is_shared(x_112)) { - lean::dec(x_112); - x_130 = lean::box(0); -} else { - lean::cnstr_release(x_112, 0); - x_130 = x_112; -} -if (lean::is_scalar(x_130)) { - x_131 = lean::alloc_cnstr(1, 1, 1); -} else { - x_131 = x_130; -} -lean::cnstr_set(x_131, 0, x_127); -lean::cnstr_set_scalar(x_131, sizeof(void*)*1, x_129); -x_132 = x_131; -x_15 = x_132; -x_16 = x_24; -goto lbl_17; -} -} -lbl_17: -{ -if (lean::obj_tag(x_15) == 0) -{ -obj* x_133; obj* x_135; obj* x_137; obj* x_139; obj* x_140; obj* x_142; obj* x_144; -x_133 = lean::cnstr_get(x_15, 1); -lean::inc(x_133); -x_135 = lean::cnstr_get(x_15, 2); -lean::inc(x_135); -if (lean::is_shared(x_15)) { - lean::dec(x_15); - x_137 = lean::box(0); -} else { - lean::cnstr_release(x_15, 0); - lean::cnstr_release(x_15, 1); - lean::cnstr_release(x_15, 2); - x_137 = x_15; -} -lean::inc(x_133); -x_139 = l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__3(x_12, x_1, x_2, x_133, x_16); -x_140 = lean::cnstr_get(x_139, 0); -lean::inc(x_140); -x_142 = lean::cnstr_get(x_139, 1); -lean::inc(x_142); -if (lean::is_shared(x_139)) { - lean::dec(x_139); - x_144 = lean::box(0); -} else { - lean::cnstr_release(x_139, 0); - lean::cnstr_release(x_139, 1); - x_144 = x_139; -} -if (lean::obj_tag(x_140) == 0) -{ -obj* x_147; obj* x_148; -lean::dec(x_137); -lean::dec(x_133); -x_147 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_135, x_140); -if (lean::is_scalar(x_144)) { - x_148 = lean::alloc_cnstr(0, 2, 0); -} else { - x_148 = x_144; -} -lean::cnstr_set(x_148, 0, x_147); -lean::cnstr_set(x_148, 1, x_142); -return x_148; -} -else -{ -obj* x_149; uint8 x_151; -x_149 = lean::cnstr_get(x_140, 0); -lean::inc(x_149); -x_151 = lean::cnstr_get_scalar(x_140, sizeof(void*)*1); -if (x_151 == 0) -{ -obj* x_153; obj* x_156; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; -lean::dec(x_140); -x_153 = lean::cnstr_get(x_149, 2); -lean::inc(x_153); -lean::dec(x_149); -x_156 = l_mjoin___rarg___closed__1; -lean::inc(x_156); -x_158 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_158, 0, x_153); -lean::closure_set(x_158, 1, x_156); -x_159 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_159, 0, x_158); -x_160 = lean::box(0); -if (lean::is_scalar(x_137)) { - x_161 = lean::alloc_cnstr(0, 3, 0); -} else { - x_161 = x_137; -} -lean::cnstr_set(x_161, 0, x_160); -lean::cnstr_set(x_161, 1, x_133); -lean::cnstr_set(x_161, 2, x_159); -x_162 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_135, x_161); -if (lean::is_scalar(x_144)) { - x_163 = lean::alloc_cnstr(0, 2, 0); -} else { - x_163 = x_144; -} -lean::cnstr_set(x_163, 0, x_162); -lean::cnstr_set(x_163, 1, x_142); -return x_163; -} -else -{ -obj* x_167; obj* x_168; -lean::dec(x_137); -lean::dec(x_133); -lean::dec(x_149); -x_167 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_135, x_140); -if (lean::is_scalar(x_144)) { - x_168 = lean::alloc_cnstr(0, 2, 0); -} else { - x_168 = x_144; -} -lean::cnstr_set(x_168, 0, x_167); -lean::cnstr_set(x_168, 1, x_142); -return x_168; -} -} -} -else -{ -obj* x_172; uint8 x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; -lean::dec(x_12); -lean::dec(x_1); -lean::dec(x_2); -x_172 = lean::cnstr_get(x_15, 0); -lean::inc(x_172); -x_174 = lean::cnstr_get_scalar(x_15, sizeof(void*)*1); -if (lean::is_shared(x_15)) { - lean::dec(x_15); - x_175 = lean::box(0); -} else { - lean::cnstr_release(x_15, 0); - x_175 = x_15; -} -if (lean::is_scalar(x_175)) { - x_176 = lean::alloc_cnstr(1, 1, 1); -} else { - x_176 = x_175; -} -lean::cnstr_set(x_176, 0, x_172); -lean::cnstr_set_scalar(x_176, sizeof(void*)*1, x_174); -x_177 = x_176; -x_178 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_178, 0, x_177); -lean::cnstr_set(x_178, 1, x_16); -return x_178; -} -} -} -else -{ -obj* x_183; obj* x_184; obj* x_186; -lean::dec(x_0); -lean::inc(x_3); -lean::inc(x_2); -lean::inc(x_1); -x_183 = l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1(x_1, x_2, x_3, x_4); -x_184 = lean::cnstr_get(x_183, 0); -lean::inc(x_184); -x_186 = lean::cnstr_get(x_183, 1); -lean::inc(x_186); -lean::dec(x_183); -if (lean::obj_tag(x_184) == 0) -{ -obj* x_189; obj* x_191; obj* x_193; obj* x_195; uint8 x_196; -x_189 = lean::cnstr_get(x_184, 0); -lean::inc(x_189); -x_191 = lean::cnstr_get(x_184, 1); -lean::inc(x_191); -x_193 = lean::cnstr_get(x_184, 2); -lean::inc(x_193); -if (lean::is_shared(x_184)) { - lean::dec(x_184); - x_195 = lean::box(0); -} else { - lean::cnstr_release(x_184, 0); - lean::cnstr_release(x_184, 1); - lean::cnstr_release(x_184, 2); - x_195 = x_184; -} -x_196 = lean::unbox(x_189); -lean::dec(x_189); -if (x_196 == 0) -{ -obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_207; obj* x_208; obj* x_210; obj* x_213; obj* x_214; obj* x_216; -lean::dec(x_195); -x_199 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_199, 0, x_3); -x_200 = lean::box(0); -x_201 = l___private_init_lean_parser_token_2__whitespace__aux___main___closed__1; -x_202 = l_mjoin___rarg___closed__1; -lean::inc(x_2); -lean::inc(x_1); -lean::inc(x_202); -lean::inc(x_201); -x_207 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4___rarg(x_201, x_202, x_199, x_200, x_1, x_2, x_191, x_186); -x_208 = lean::cnstr_get(x_207, 0); -lean::inc(x_208); -x_210 = lean::cnstr_get(x_207, 1); -lean::inc(x_210); -lean::dec(x_207); -x_213 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_193, x_208); -x_214 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_214); -x_216 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_214, x_213); -if (lean::obj_tag(x_216) == 0) -{ -obj* x_217; obj* x_219; obj* x_222; obj* x_223; obj* x_225; obj* x_228; -x_217 = lean::cnstr_get(x_216, 1); -lean::inc(x_217); -x_219 = lean::cnstr_get(x_216, 2); -lean::inc(x_219); -lean::dec(x_216); -x_222 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_217, x_210); -x_223 = lean::cnstr_get(x_222, 0); -lean::inc(x_223); -x_225 = lean::cnstr_get(x_222, 1); -lean::inc(x_225); -lean::dec(x_222); -x_228 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_219, x_223); -x_5 = x_228; -x_6 = x_225; -goto lbl_7; -} -else -{ -obj* x_231; uint8 x_233; obj* x_234; obj* x_235; obj* x_236; -lean::dec(x_1); -lean::dec(x_2); -x_231 = lean::cnstr_get(x_216, 0); -lean::inc(x_231); -x_233 = lean::cnstr_get_scalar(x_216, sizeof(void*)*1); -if (lean::is_shared(x_216)) { - lean::dec(x_216); - x_234 = lean::box(0); -} else { - lean::cnstr_release(x_216, 0); - x_234 = x_216; -} -if (lean::is_scalar(x_234)) { - x_235 = lean::alloc_cnstr(1, 1, 1); -} else { - x_235 = x_234; -} -lean::cnstr_set(x_235, 0, x_231); -lean::cnstr_set_scalar(x_235, sizeof(void*)*1, x_233); -x_236 = x_235; -x_5 = x_236; -x_6 = x_210; -goto lbl_7; -} -} -else -{ -obj* x_238; obj* x_239; obj* x_241; obj* x_242; obj* x_244; -lean::dec(x_3); -x_238 = lean::box(0); -x_239 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_239); -if (lean::is_scalar(x_195)) { - x_241 = lean::alloc_cnstr(0, 3, 0); -} else { - x_241 = x_195; -} -lean::cnstr_set(x_241, 0, x_238); -lean::cnstr_set(x_241, 1, x_191); -lean::cnstr_set(x_241, 2, x_239); -x_242 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_193, x_241); -lean::inc(x_239); -x_244 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_239, x_242); -if (lean::obj_tag(x_244) == 0) -{ -obj* x_245; obj* x_247; obj* x_250; obj* x_251; obj* x_253; obj* x_256; -x_245 = lean::cnstr_get(x_244, 1); -lean::inc(x_245); -x_247 = lean::cnstr_get(x_244, 2); -lean::inc(x_247); -lean::dec(x_244); -x_250 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_245, x_186); -x_251 = lean::cnstr_get(x_250, 0); -lean::inc(x_251); -x_253 = lean::cnstr_get(x_250, 1); -lean::inc(x_253); -lean::dec(x_250); -x_256 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_247, x_251); -x_5 = x_256; -x_6 = x_253; -goto lbl_7; -} -else -{ -obj* x_259; uint8 x_261; obj* x_262; obj* x_263; obj* x_264; -lean::dec(x_1); -lean::dec(x_2); -x_259 = lean::cnstr_get(x_244, 0); -lean::inc(x_259); -x_261 = lean::cnstr_get_scalar(x_244, sizeof(void*)*1); -if (lean::is_shared(x_244)) { - lean::dec(x_244); - x_262 = lean::box(0); -} else { - lean::cnstr_release(x_244, 0); - x_262 = x_244; -} -if (lean::is_scalar(x_262)) { - x_263 = lean::alloc_cnstr(1, 1, 1); -} else { - x_263 = x_262; -} -lean::cnstr_set(x_263, 0, x_259); -lean::cnstr_set_scalar(x_263, sizeof(void*)*1, x_261); -x_264 = x_263; -x_5 = x_264; -x_6 = x_186; -goto lbl_7; -} -} -} -else -{ -obj* x_266; uint8 x_268; obj* x_269; obj* x_270; obj* x_271; obj* x_272; obj* x_274; -lean::dec(x_3); -x_266 = lean::cnstr_get(x_184, 0); -lean::inc(x_266); -x_268 = lean::cnstr_get_scalar(x_184, sizeof(void*)*1); -if (lean::is_shared(x_184)) { - lean::dec(x_184); - x_269 = lean::box(0); -} else { - lean::cnstr_release(x_184, 0); - x_269 = x_184; -} -if (lean::is_scalar(x_269)) { - x_270 = lean::alloc_cnstr(1, 1, 1); -} else { - x_270 = x_269; -} -lean::cnstr_set(x_270, 0, x_266); -lean::cnstr_set_scalar(x_270, sizeof(void*)*1, x_268); -x_271 = x_270; -x_272 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_272); -x_274 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_272, x_271); -if (lean::obj_tag(x_274) == 0) -{ -obj* x_275; obj* x_277; obj* x_280; obj* x_281; obj* x_283; obj* x_286; -x_275 = lean::cnstr_get(x_274, 1); -lean::inc(x_275); -x_277 = lean::cnstr_get(x_274, 2); -lean::inc(x_277); -lean::dec(x_274); -x_280 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_275, x_186); -x_281 = lean::cnstr_get(x_280, 0); -lean::inc(x_281); -x_283 = lean::cnstr_get(x_280, 1); -lean::inc(x_283); -lean::dec(x_280); -x_286 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_277, x_281); -x_5 = x_286; -x_6 = x_283; -goto lbl_7; -} -else -{ -obj* x_289; uint8 x_291; obj* x_292; obj* x_293; obj* x_294; -lean::dec(x_1); -lean::dec(x_2); -x_289 = lean::cnstr_get(x_274, 0); -lean::inc(x_289); -x_291 = lean::cnstr_get_scalar(x_274, sizeof(void*)*1); -if (lean::is_shared(x_274)) { - lean::dec(x_274); - x_292 = lean::box(0); -} else { - lean::cnstr_release(x_274, 0); - x_292 = x_274; -} -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_5 = x_294; -x_6 = x_186; -goto lbl_7; -} -} -} -lbl_7: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_295; obj* x_297; obj* x_299; obj* x_300; obj* x_301; obj* x_303; obj* x_304; obj* x_305; -x_295 = lean::cnstr_get(x_5, 1); -lean::inc(x_295); -x_297 = lean::cnstr_get(x_5, 2); -lean::inc(x_297); -if (lean::is_shared(x_5)) { - lean::dec(x_5); - x_299 = lean::box(0); -} else { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - x_299 = x_5; -} -x_300 = lean::box(0); -x_301 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_301); -if (lean::is_scalar(x_299)) { - x_303 = lean::alloc_cnstr(0, 3, 0); -} else { - x_303 = x_299; -} -lean::cnstr_set(x_303, 0, x_300); -lean::cnstr_set(x_303, 1, x_295); -lean::cnstr_set(x_303, 2, x_301); -x_304 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_297, 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_6); -return x_305; -} -else -{ -obj* x_306; uint8 x_308; obj* x_309; obj* x_310; obj* x_311; obj* x_312; -x_306 = lean::cnstr_get(x_5, 0); -lean::inc(x_306); -x_308 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -if (lean::is_shared(x_5)) { - lean::dec(x_5); - x_309 = lean::box(0); -} else { - lean::cnstr_release(x_5, 0); - x_309 = x_5; -} -if (lean::is_scalar(x_309)) { - x_310 = lean::alloc_cnstr(1, 1, 1); -} else { - x_310 = x_309; -} -lean::cnstr_set(x_310, 0, x_306); -lean::cnstr_set_scalar(x_310, sizeof(void*)*1, x_308); -x_311 = x_310; -x_312 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_312, 0, x_311); -lean::cnstr_set(x_312, 1, x_6); -return x_312; -} -} -} -} -obj* l_lean_parser_monad__parsec_many_x_27___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_11; obj* x_12; obj* x_14; -x_4 = lean::string_iterator_remaining(x_2); -lean::inc(x_2); -x_6 = l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__3(x_4, x_0, x_1, x_2, x_3); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -if (lean::is_shared(x_6)) { - lean::dec(x_6); - x_11 = lean::box(0); -} else { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - x_11 = x_6; -} -x_12 = l_lean_parser_finish__comment__block___closed__2; -lean::inc(x_12); -x_14 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_12, x_7); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_16; -lean::dec(x_2); -if (lean::is_scalar(x_11)) { - x_16 = lean::alloc_cnstr(0, 2, 0); -} else { - x_16 = x_11; -} -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_9); -return x_16; -} -else -{ -obj* x_17; uint8 x_19; -x_17 = lean::cnstr_get(x_14, 0); -lean::inc(x_17); -x_19 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); -if (x_19 == 0) -{ -obj* x_21; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -lean::dec(x_14); -x_21 = lean::cnstr_get(x_17, 2); -lean::inc(x_21); -lean::dec(x_17); -x_24 = l_mjoin___rarg___closed__1; -lean::inc(x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_26, 0, x_21); -lean::closure_set(x_26, 1, x_24); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -x_28 = lean::box(0); -x_29 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_2); -lean::cnstr_set(x_29, 2, x_27); -if (lean::is_scalar(x_11)) { - x_30 = lean::alloc_cnstr(0, 2, 0); -} else { - x_30 = x_11; -} -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_9); -return x_30; -} -else -{ -obj* x_33; -lean::dec(x_17); -lean::dec(x_2); -if (lean::is_scalar(x_11)) { - x_33 = lean::alloc_cnstr(0, 2, 0); -} else { - x_33 = x_11; -} -lean::cnstr_set(x_33, 0, x_14); -lean::cnstr_set(x_33, 1, x_9); -return x_33; -} -} -} -} -obj* l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_8; uint8 x_9; -x_8 = lean::mk_nat_obj(0u); -x_9 = lean::nat_dec_eq(x_0, x_8); -lean::dec(x_8); -if (x_9 == 0) -{ -obj* x_11; obj* x_12; obj* x_15; obj* x_16; obj* x_21; obj* x_22; obj* x_24; -x_11 = lean::mk_nat_obj(1u); -x_12 = lean::nat_sub(x_0, x_11); -lean::dec(x_11); -lean::dec(x_0); -lean::inc(x_3); -lean::inc(x_2); -lean::inc(x_1); -x_21 = l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1(x_1, x_2, x_3, x_4); -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -lean::dec(x_21); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_27; obj* x_29; obj* x_31; obj* x_33; uint8 x_34; -x_27 = lean::cnstr_get(x_22, 0); -lean::inc(x_27); -x_29 = lean::cnstr_get(x_22, 1); -lean::inc(x_29); -x_31 = lean::cnstr_get(x_22, 2); -lean::inc(x_31); -if (lean::is_shared(x_22)) { - lean::dec(x_22); - x_33 = lean::box(0); -} else { - lean::cnstr_release(x_22, 0); - lean::cnstr_release(x_22, 1); - lean::cnstr_release(x_22, 2); - x_33 = x_22; -} -x_34 = lean::unbox(x_27); -lean::dec(x_27); -if (x_34 == 0) -{ -obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_45; obj* x_46; obj* x_48; obj* x_51; obj* x_52; obj* x_54; -lean::dec(x_33); -x_37 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_37, 0, x_3); -x_38 = lean::box(0); -x_39 = l___private_init_lean_parser_token_2__whitespace__aux___main___closed__1; -x_40 = l_mjoin___rarg___closed__1; -lean::inc(x_2); -lean::inc(x_1); -lean::inc(x_40); -lean::inc(x_39); -x_45 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4___rarg(x_39, x_40, x_37, x_38, x_1, x_2, x_29, x_24); -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_31, 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_51); -if (lean::obj_tag(x_54) == 0) -{ -obj* x_55; obj* x_57; obj* x_62; obj* x_63; obj* x_65; obj* x_68; -x_55 = lean::cnstr_get(x_54, 1); -lean::inc(x_55); -x_57 = lean::cnstr_get(x_54, 2); -lean::inc(x_57); -lean::dec(x_54); -lean::inc(x_2); -lean::inc(x_1); -x_62 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_55, x_48); -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__t_bind__mk__res___rarg(x_57, x_63); -x_15 = x_68; -x_16 = x_65; -goto lbl_17; -} -else -{ -obj* x_69; uint8 x_71; obj* x_72; obj* x_73; obj* x_74; -x_69 = lean::cnstr_get(x_54, 0); -lean::inc(x_69); -x_71 = lean::cnstr_get_scalar(x_54, sizeof(void*)*1); -if (lean::is_shared(x_54)) { - lean::dec(x_54); - x_72 = lean::box(0); -} else { - lean::cnstr_release(x_54, 0); - x_72 = x_54; -} -if (lean::is_scalar(x_72)) { - x_73 = lean::alloc_cnstr(1, 1, 1); -} else { - x_73 = x_72; -} -lean::cnstr_set(x_73, 0, x_69); -lean::cnstr_set_scalar(x_73, sizeof(void*)*1, x_71); -x_74 = x_73; -x_15 = x_74; -x_16 = x_48; -goto lbl_17; -} -} -else -{ -obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_82; -lean::dec(x_3); -x_76 = lean::box(0); -x_77 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_77); -if (lean::is_scalar(x_33)) { - x_79 = lean::alloc_cnstr(0, 3, 0); -} else { - x_79 = x_33; -} -lean::cnstr_set(x_79, 0, x_76); -lean::cnstr_set(x_79, 1, x_29); -lean::cnstr_set(x_79, 2, x_77); -x_80 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_31, x_79); -lean::inc(x_77); -x_82 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_77, x_80); -if (lean::obj_tag(x_82) == 0) -{ -obj* x_83; obj* x_85; obj* x_90; obj* x_91; obj* x_93; obj* x_96; -x_83 = lean::cnstr_get(x_82, 1); -lean::inc(x_83); -x_85 = lean::cnstr_get(x_82, 2); -lean::inc(x_85); -lean::dec(x_82); -lean::inc(x_2); -lean::inc(x_1); -x_90 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_83, x_24); -x_91 = lean::cnstr_get(x_90, 0); -lean::inc(x_91); -x_93 = lean::cnstr_get(x_90, 1); -lean::inc(x_93); -lean::dec(x_90); -x_96 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_85, x_91); -x_15 = x_96; -x_16 = x_93; -goto lbl_17; -} -else -{ -obj* x_97; uint8 x_99; obj* x_100; obj* x_101; obj* x_102; -x_97 = lean::cnstr_get(x_82, 0); -lean::inc(x_97); -x_99 = lean::cnstr_get_scalar(x_82, sizeof(void*)*1); -if (lean::is_shared(x_82)) { - lean::dec(x_82); - x_100 = lean::box(0); -} else { - lean::cnstr_release(x_82, 0); - x_100 = x_82; -} -if (lean::is_scalar(x_100)) { - x_101 = lean::alloc_cnstr(1, 1, 1); -} else { - x_101 = x_100; -} -lean::cnstr_set(x_101, 0, x_97); -lean::cnstr_set_scalar(x_101, sizeof(void*)*1, x_99); -x_102 = x_101; -x_15 = x_102; -x_16 = x_24; -goto lbl_17; -} -} -} -else -{ -obj* x_104; uint8 x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_112; -lean::dec(x_3); -x_104 = lean::cnstr_get(x_22, 0); -lean::inc(x_104); -x_106 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); -if (lean::is_shared(x_22)) { - lean::dec(x_22); - x_107 = lean::box(0); -} else { - lean::cnstr_release(x_22, 0); - x_107 = x_22; -} -if (lean::is_scalar(x_107)) { - x_108 = lean::alloc_cnstr(1, 1, 1); -} else { - x_108 = x_107; -} -lean::cnstr_set(x_108, 0, x_104); -lean::cnstr_set_scalar(x_108, sizeof(void*)*1, x_106); -x_109 = x_108; -x_110 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_110); -x_112 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_110, x_109); -if (lean::obj_tag(x_112) == 0) -{ -obj* x_113; obj* x_115; obj* x_120; obj* x_121; obj* x_123; obj* x_126; -x_113 = lean::cnstr_get(x_112, 1); -lean::inc(x_113); -x_115 = lean::cnstr_get(x_112, 2); -lean::inc(x_115); -lean::dec(x_112); -lean::inc(x_2); -lean::inc(x_1); -x_120 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_113, x_24); -x_121 = lean::cnstr_get(x_120, 0); -lean::inc(x_121); -x_123 = lean::cnstr_get(x_120, 1); -lean::inc(x_123); -lean::dec(x_120); -x_126 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_115, x_121); -x_15 = x_126; -x_16 = x_123; -goto lbl_17; -} -else -{ -obj* x_127; uint8 x_129; obj* x_130; obj* x_131; obj* x_132; -x_127 = lean::cnstr_get(x_112, 0); -lean::inc(x_127); -x_129 = lean::cnstr_get_scalar(x_112, sizeof(void*)*1); -if (lean::is_shared(x_112)) { - lean::dec(x_112); - x_130 = lean::box(0); -} else { - lean::cnstr_release(x_112, 0); - x_130 = x_112; -} -if (lean::is_scalar(x_130)) { - x_131 = lean::alloc_cnstr(1, 1, 1); -} else { - x_131 = x_130; -} -lean::cnstr_set(x_131, 0, x_127); -lean::cnstr_set_scalar(x_131, sizeof(void*)*1, x_129); -x_132 = x_131; -x_15 = x_132; -x_16 = x_24; -goto lbl_17; -} -} -lbl_17: -{ -if (lean::obj_tag(x_15) == 0) -{ -obj* x_133; obj* x_135; obj* x_137; obj* x_139; obj* x_140; obj* x_142; obj* x_144; -x_133 = lean::cnstr_get(x_15, 1); -lean::inc(x_133); -x_135 = lean::cnstr_get(x_15, 2); -lean::inc(x_135); -if (lean::is_shared(x_15)) { - lean::dec(x_15); - x_137 = lean::box(0); -} else { - lean::cnstr_release(x_15, 0); - lean::cnstr_release(x_15, 1); - lean::cnstr_release(x_15, 2); - x_137 = x_15; -} -lean::inc(x_133); -x_139 = l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_12, x_1, x_2, x_133, x_16); -x_140 = lean::cnstr_get(x_139, 0); -lean::inc(x_140); -x_142 = lean::cnstr_get(x_139, 1); -lean::inc(x_142); -if (lean::is_shared(x_139)) { - lean::dec(x_139); - x_144 = lean::box(0); -} else { - lean::cnstr_release(x_139, 0); - lean::cnstr_release(x_139, 1); - x_144 = x_139; -} -if (lean::obj_tag(x_140) == 0) -{ -obj* x_147; obj* x_148; -lean::dec(x_137); -lean::dec(x_133); -x_147 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_135, x_140); -if (lean::is_scalar(x_144)) { - x_148 = lean::alloc_cnstr(0, 2, 0); -} else { - x_148 = x_144; -} -lean::cnstr_set(x_148, 0, x_147); -lean::cnstr_set(x_148, 1, x_142); -return x_148; -} -else -{ -obj* x_149; uint8 x_151; -x_149 = lean::cnstr_get(x_140, 0); -lean::inc(x_149); -x_151 = lean::cnstr_get_scalar(x_140, sizeof(void*)*1); -if (x_151 == 0) -{ -obj* x_153; obj* x_156; obj* x_158; obj* x_159; obj* x_160; obj* x_161; obj* x_162; obj* x_163; -lean::dec(x_140); -x_153 = lean::cnstr_get(x_149, 2); -lean::inc(x_153); -lean::dec(x_149); -x_156 = l_mjoin___rarg___closed__1; -lean::inc(x_156); -x_158 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_158, 0, x_153); -lean::closure_set(x_158, 1, x_156); -x_159 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_159, 0, x_158); -x_160 = lean::box(0); -if (lean::is_scalar(x_137)) { - x_161 = lean::alloc_cnstr(0, 3, 0); -} else { - x_161 = x_137; -} -lean::cnstr_set(x_161, 0, x_160); -lean::cnstr_set(x_161, 1, x_133); -lean::cnstr_set(x_161, 2, x_159); -x_162 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_135, x_161); -if (lean::is_scalar(x_144)) { - x_163 = lean::alloc_cnstr(0, 2, 0); -} else { - x_163 = x_144; -} -lean::cnstr_set(x_163, 0, x_162); -lean::cnstr_set(x_163, 1, x_142); -return x_163; -} -else -{ -obj* x_167; obj* x_168; -lean::dec(x_137); -lean::dec(x_133); -lean::dec(x_149); -x_167 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_135, x_140); -if (lean::is_scalar(x_144)) { - x_168 = lean::alloc_cnstr(0, 2, 0); -} else { - x_168 = x_144; -} -lean::cnstr_set(x_168, 0, x_167); -lean::cnstr_set(x_168, 1, x_142); -return x_168; -} -} -} -else -{ -obj* x_172; uint8 x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; -lean::dec(x_12); -lean::dec(x_1); -lean::dec(x_2); -x_172 = lean::cnstr_get(x_15, 0); -lean::inc(x_172); -x_174 = lean::cnstr_get_scalar(x_15, sizeof(void*)*1); -if (lean::is_shared(x_15)) { - lean::dec(x_15); - x_175 = lean::box(0); -} else { - lean::cnstr_release(x_15, 0); - x_175 = x_15; -} -if (lean::is_scalar(x_175)) { - x_176 = lean::alloc_cnstr(1, 1, 1); -} else { - x_176 = x_175; -} -lean::cnstr_set(x_176, 0, x_172); -lean::cnstr_set_scalar(x_176, sizeof(void*)*1, x_174); -x_177 = x_176; -x_178 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_178, 0, x_177); -lean::cnstr_set(x_178, 1, x_16); -return x_178; -} -} -} -else -{ -obj* x_183; obj* x_184; obj* x_186; -lean::dec(x_0); -lean::inc(x_3); -lean::inc(x_2); -lean::inc(x_1); -x_183 = l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__1(x_1, x_2, x_3, x_4); -x_184 = lean::cnstr_get(x_183, 0); -lean::inc(x_184); -x_186 = lean::cnstr_get(x_183, 1); -lean::inc(x_186); -lean::dec(x_183); -if (lean::obj_tag(x_184) == 0) -{ -obj* x_189; obj* x_191; obj* x_193; obj* x_195; uint8 x_196; -x_189 = lean::cnstr_get(x_184, 0); -lean::inc(x_189); -x_191 = lean::cnstr_get(x_184, 1); -lean::inc(x_191); -x_193 = lean::cnstr_get(x_184, 2); -lean::inc(x_193); -if (lean::is_shared(x_184)) { - lean::dec(x_184); - x_195 = lean::box(0); -} else { - lean::cnstr_release(x_184, 0); - lean::cnstr_release(x_184, 1); - lean::cnstr_release(x_184, 2); - x_195 = x_184; -} -x_196 = lean::unbox(x_189); -lean::dec(x_189); -if (x_196 == 0) -{ -obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_207; obj* x_208; obj* x_210; obj* x_213; obj* x_214; obj* x_216; -lean::dec(x_195); -x_199 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_199, 0, x_3); -x_200 = lean::box(0); -x_201 = l___private_init_lean_parser_token_2__whitespace__aux___main___closed__1; -x_202 = l_mjoin___rarg___closed__1; -lean::inc(x_2); -lean::inc(x_1); -lean::inc(x_202); -lean::inc(x_201); -x_207 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4___rarg(x_201, x_202, x_199, x_200, x_1, x_2, x_191, x_186); -x_208 = lean::cnstr_get(x_207, 0); -lean::inc(x_208); -x_210 = lean::cnstr_get(x_207, 1); -lean::inc(x_210); -lean::dec(x_207); -x_213 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_193, x_208); -x_214 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_214); -x_216 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_214, x_213); -if (lean::obj_tag(x_216) == 0) -{ -obj* x_217; obj* x_219; obj* x_222; obj* x_223; obj* x_225; obj* x_228; -x_217 = lean::cnstr_get(x_216, 1); -lean::inc(x_217); -x_219 = lean::cnstr_get(x_216, 2); -lean::inc(x_219); -lean::dec(x_216); -x_222 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_217, x_210); -x_223 = lean::cnstr_get(x_222, 0); -lean::inc(x_223); -x_225 = lean::cnstr_get(x_222, 1); -lean::inc(x_225); -lean::dec(x_222); -x_228 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_219, x_223); -x_5 = x_228; -x_6 = x_225; -goto lbl_7; -} -else -{ -obj* x_231; uint8 x_233; obj* x_234; obj* x_235; obj* x_236; -lean::dec(x_1); -lean::dec(x_2); -x_231 = lean::cnstr_get(x_216, 0); -lean::inc(x_231); -x_233 = lean::cnstr_get_scalar(x_216, sizeof(void*)*1); -if (lean::is_shared(x_216)) { - lean::dec(x_216); - x_234 = lean::box(0); -} else { - lean::cnstr_release(x_216, 0); - x_234 = x_216; -} -if (lean::is_scalar(x_234)) { - x_235 = lean::alloc_cnstr(1, 1, 1); -} else { - x_235 = x_234; -} -lean::cnstr_set(x_235, 0, x_231); -lean::cnstr_set_scalar(x_235, sizeof(void*)*1, x_233); -x_236 = x_235; -x_5 = x_236; -x_6 = x_210; -goto lbl_7; -} -} -else -{ -obj* x_238; obj* x_239; obj* x_241; obj* x_242; obj* x_244; -lean::dec(x_3); -x_238 = lean::box(0); -x_239 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_239); -if (lean::is_scalar(x_195)) { - x_241 = lean::alloc_cnstr(0, 3, 0); -} else { - x_241 = x_195; -} -lean::cnstr_set(x_241, 0, x_238); -lean::cnstr_set(x_241, 1, x_191); -lean::cnstr_set(x_241, 2, x_239); -x_242 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_193, x_241); -lean::inc(x_239); -x_244 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_239, x_242); -if (lean::obj_tag(x_244) == 0) -{ -obj* x_245; obj* x_247; obj* x_250; obj* x_251; obj* x_253; obj* x_256; -x_245 = lean::cnstr_get(x_244, 1); -lean::inc(x_245); -x_247 = lean::cnstr_get(x_244, 2); -lean::inc(x_247); -lean::dec(x_244); -x_250 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_245, x_186); -x_251 = lean::cnstr_get(x_250, 0); -lean::inc(x_251); -x_253 = lean::cnstr_get(x_250, 1); -lean::inc(x_253); -lean::dec(x_250); -x_256 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_247, x_251); -x_5 = x_256; -x_6 = x_253; -goto lbl_7; -} -else -{ -obj* x_259; uint8 x_261; obj* x_262; obj* x_263; obj* x_264; -lean::dec(x_1); -lean::dec(x_2); -x_259 = lean::cnstr_get(x_244, 0); -lean::inc(x_259); -x_261 = lean::cnstr_get_scalar(x_244, sizeof(void*)*1); -if (lean::is_shared(x_244)) { - lean::dec(x_244); - x_262 = lean::box(0); -} else { - lean::cnstr_release(x_244, 0); - x_262 = x_244; -} -if (lean::is_scalar(x_262)) { - x_263 = lean::alloc_cnstr(1, 1, 1); -} else { - x_263 = x_262; -} -lean::cnstr_set(x_263, 0, x_259); -lean::cnstr_set_scalar(x_263, sizeof(void*)*1, x_261); -x_264 = x_263; -x_5 = x_264; -x_6 = x_186; -goto lbl_7; -} -} -} -else -{ -obj* x_266; uint8 x_268; obj* x_269; obj* x_270; obj* x_271; obj* x_272; obj* x_274; -lean::dec(x_3); -x_266 = lean::cnstr_get(x_184, 0); -lean::inc(x_266); -x_268 = lean::cnstr_get_scalar(x_184, sizeof(void*)*1); -if (lean::is_shared(x_184)) { - lean::dec(x_184); - x_269 = lean::box(0); -} else { - lean::cnstr_release(x_184, 0); - x_269 = x_184; -} -if (lean::is_scalar(x_269)) { - x_270 = lean::alloc_cnstr(1, 1, 1); -} else { - x_270 = x_269; -} -lean::cnstr_set(x_270, 0, x_266); -lean::cnstr_set_scalar(x_270, sizeof(void*)*1, x_268); -x_271 = x_270; -x_272 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_272); -x_274 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_272, x_271); -if (lean::obj_tag(x_274) == 0) -{ -obj* x_275; obj* x_277; obj* x_280; obj* x_281; obj* x_283; obj* x_286; -x_275 = lean::cnstr_get(x_274, 1); -lean::inc(x_275); -x_277 = lean::cnstr_get(x_274, 2); -lean::inc(x_277); -lean::dec(x_274); -x_280 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_275, x_186); -x_281 = lean::cnstr_get(x_280, 0); -lean::inc(x_281); -x_283 = lean::cnstr_get(x_280, 1); -lean::inc(x_283); -lean::dec(x_280); -x_286 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_277, x_281); -x_5 = x_286; -x_6 = x_283; -goto lbl_7; -} -else -{ -obj* x_289; uint8 x_291; obj* x_292; obj* x_293; obj* x_294; -lean::dec(x_1); -lean::dec(x_2); -x_289 = lean::cnstr_get(x_274, 0); -lean::inc(x_289); -x_291 = lean::cnstr_get_scalar(x_274, sizeof(void*)*1); -if (lean::is_shared(x_274)) { - lean::dec(x_274); - x_292 = lean::box(0); -} else { - lean::cnstr_release(x_274, 0); - x_292 = x_274; -} -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_5 = x_294; -x_6 = x_186; -goto lbl_7; -} -} -} -lbl_7: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_295; obj* x_297; obj* x_299; obj* x_300; obj* x_301; obj* x_303; obj* x_304; obj* x_305; -x_295 = lean::cnstr_get(x_5, 1); -lean::inc(x_295); -x_297 = lean::cnstr_get(x_5, 2); -lean::inc(x_297); -if (lean::is_shared(x_5)) { - lean::dec(x_5); - x_299 = lean::box(0); -} else { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - x_299 = x_5; -} -x_300 = lean::box(0); -x_301 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_301); -if (lean::is_scalar(x_299)) { - x_303 = lean::alloc_cnstr(0, 3, 0); -} else { - x_303 = x_299; -} -lean::cnstr_set(x_303, 0, x_300); -lean::cnstr_set(x_303, 1, x_295); -lean::cnstr_set(x_303, 2, x_301); -x_304 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_297, 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_6); -return x_305; -} -else -{ -obj* x_306; uint8 x_308; obj* x_309; obj* x_310; obj* x_311; obj* x_312; -x_306 = lean::cnstr_get(x_5, 0); -lean::inc(x_306); -x_308 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -if (lean::is_shared(x_5)) { - lean::dec(x_5); - x_309 = lean::box(0); -} else { - lean::cnstr_release(x_5, 0); - x_309 = x_5; -} -if (lean::is_scalar(x_309)) { - x_310 = lean::alloc_cnstr(1, 1, 1); -} else { - x_310 = x_309; -} -lean::cnstr_set(x_310, 0, x_306); -lean::cnstr_set_scalar(x_310, sizeof(void*)*1, x_308); -x_311 = x_310; -x_312 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_312, 0, x_311); -lean::cnstr_set(x_312, 1, x_6); -return x_312; -} -} -} -} -obj* l_lean_parser_monad__parsec_many_x_27___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_6; obj* x_7; obj* x_9; obj* x_11; obj* x_12; obj* x_14; -x_4 = lean::string_iterator_remaining(x_2); -lean::inc(x_2); -x_6 = l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_4, x_0, x_1, x_2, x_3); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -if (lean::is_shared(x_6)) { - lean::dec(x_6); - x_11 = lean::box(0); -} else { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - x_11 = x_6; -} -x_12 = l_lean_parser_finish__comment__block___closed__2; -lean::inc(x_12); -x_14 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_12, x_7); -if (lean::obj_tag(x_14) == 0) -{ -obj* x_16; -lean::dec(x_2); -if (lean::is_scalar(x_11)) { - x_16 = lean::alloc_cnstr(0, 2, 0); -} else { - x_16 = x_11; -} -lean::cnstr_set(x_16, 0, x_14); -lean::cnstr_set(x_16, 1, x_9); -return x_16; -} -else -{ -obj* x_17; uint8 x_19; -x_17 = lean::cnstr_get(x_14, 0); -lean::inc(x_17); -x_19 = lean::cnstr_get_scalar(x_14, sizeof(void*)*1); -if (x_19 == 0) -{ -obj* x_21; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; -lean::dec(x_14); -x_21 = lean::cnstr_get(x_17, 2); -lean::inc(x_21); -lean::dec(x_17); -x_24 = l_mjoin___rarg___closed__1; -lean::inc(x_24); -x_26 = lean::alloc_closure(reinterpret_cast(l_function_comp___rarg), 3, 2); -lean::closure_set(x_26, 0, x_21); -lean::closure_set(x_26, 1, x_24); -x_27 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_27, 0, x_26); -x_28 = lean::box(0); -x_29 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_2); -lean::cnstr_set(x_29, 2, x_27); -if (lean::is_scalar(x_11)) { - x_30 = lean::alloc_cnstr(0, 2, 0); -} else { - x_30 = x_11; -} -lean::cnstr_set(x_30, 0, x_29); -lean::cnstr_set(x_30, 1, x_9); -return x_30; -} -else -{ -obj* x_33; -lean::dec(x_17); -lean::dec(x_2); -if (lean::is_scalar(x_11)) { - x_33 = lean::alloc_cnstr(0, 2, 0); -} else { - x_33 = x_11; -} -lean::cnstr_set(x_33, 0, x_14); -lean::cnstr_set(x_33, 1, x_9); -return x_33; -} -} -} -} -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; -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 = 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; -} -} obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_command_doc__comment_parser___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { @@ -4536,7 +4536,7 @@ x_5 = l___private_init_lean_parser_token_1__finish__comment__block__aux___main__ lean::inc(x_2); lean::inc(x_5); lean::inc(x_4); -x_9 = l_lean_parser_monad__parsec_str__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__2(x_4, x_5, x_0, x_1, x_2, x_3); +x_9 = l_lean_parser_monad__parsec_str__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__2(x_4, x_5, x_0, x_1, x_2, x_3); x_10 = lean::cnstr_get(x_9, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_9, 1); @@ -4726,7 +4726,7 @@ lean::inc(x_2); lean::inc(x_1); lean::inc(x_40); lean::inc(x_39); -x_45 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4___rarg(x_39, x_40, x_37, x_38, x_1, x_2, x_29, x_24); +x_45 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_39, x_40, x_37, x_38, x_1, x_2, x_29, x_24); x_46 = lean::cnstr_get(x_45, 0); lean::inc(x_46); x_48 = lean::cnstr_get(x_45, 1); @@ -4746,7 +4746,7 @@ lean::inc(x_57); lean::dec(x_54); lean::inc(x_2); lean::inc(x_1); -x_62 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_55, x_48); +x_62 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_55, x_48); x_63 = lean::cnstr_get(x_62, 0); lean::inc(x_63); x_65 = lean::cnstr_get(x_62, 1); @@ -4811,7 +4811,7 @@ lean::inc(x_85); lean::dec(x_82); lean::inc(x_2); lean::inc(x_1); -x_90 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_83, x_24); +x_90 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_83, x_24); x_91 = lean::cnstr_get(x_90, 0); lean::inc(x_91); x_93 = lean::cnstr_get(x_90, 1); @@ -4884,7 +4884,7 @@ lean::inc(x_115); lean::dec(x_112); lean::inc(x_2); lean::inc(x_1); -x_120 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_113, x_24); +x_120 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_113, x_24); x_121 = lean::cnstr_get(x_120, 0); lean::inc(x_121); x_123 = lean::cnstr_get(x_120, 1); @@ -5102,7 +5102,7 @@ lean::inc(x_2); lean::inc(x_1); lean::inc(x_202); lean::inc(x_201); -x_207 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4___rarg(x_201, x_202, x_199, x_200, x_1, x_2, x_191, x_186); +x_207 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_201, x_202, x_199, x_200, x_1, x_2, x_191, x_186); x_208 = lean::cnstr_get(x_207, 0); lean::inc(x_208); x_210 = lean::cnstr_get(x_207, 1); @@ -5120,7 +5120,7 @@ lean::inc(x_217); x_219 = lean::cnstr_get(x_216, 2); lean::inc(x_219); lean::dec(x_216); -x_222 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_217, x_210); +x_222 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_217, x_210); x_223 = lean::cnstr_get(x_222, 0); lean::inc(x_223); x_225 = lean::cnstr_get(x_222, 1); @@ -5185,7 +5185,7 @@ lean::inc(x_245); x_247 = lean::cnstr_get(x_244, 2); lean::inc(x_247); lean::dec(x_244); -x_250 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_245, x_186); +x_250 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_245, x_186); x_251 = lean::cnstr_get(x_250, 0); lean::inc(x_251); x_253 = lean::cnstr_get(x_250, 1); @@ -5258,7 +5258,7 @@ lean::inc(x_275); x_277 = lean::cnstr_get(x_274, 2); lean::inc(x_277); lean::dec(x_274); -x_280 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__5(x_1, x_2, x_275, x_186); +x_280 = l_lean_parser_monad__parsec_any___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__5(x_1, x_2, x_275, x_186); x_281 = lean::cnstr_get(x_280, 0); lean::inc(x_281); x_283 = lean::cnstr_get(x_280, 1); @@ -5846,17 +5846,17 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_with__trailing___rarg___lambda__1), 2, 0); -x_8 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__1___rarg), 4, 1); +x_8 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__1___rarg), 4, 1); lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__6___rarg), 5, 1); +x_9 = 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_9, 0, x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_doc__comment_parser___lambda__1), 5, 0); -x_11 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__9___rarg), 6, 2); +x_11 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__11___rarg), 6, 2); lean::closure_set(x_11, 0, x_9); lean::closure_set(x_11, 1, x_10); x_12 = lean::mk_string("-/"); @@ -5864,7 +5864,7 @@ x_13 = l_string_trim(x_12); lean::inc(x_13); x_15 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_15, 0, x_13); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_16 = 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_16, 0, x_13); lean::closure_set(x_16, 1, x_4); lean::closure_set(x_16, 2, x_15); @@ -6647,7 +6647,7 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_raw__ident_parser___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_raw__ident_parser___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { obj* x_5; obj* x_9; obj* x_10; obj* x_12; obj* x_14; @@ -6728,7 +6728,7 @@ return x_37; } } } -obj* l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { +obj* l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { _start: { obj* x_7; uint8 x_8; @@ -6856,7 +6856,7 @@ lean::cnstr_set(x_62, 0, x_55); lean::cnstr_set(x_62, 1, x_1); lean::inc(x_57); lean::inc(x_62); -x_65 = l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__4(x_0, x_62, x_11, x_3, x_4, x_57, x_15); +x_65 = l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__4(x_0, x_62, x_11, x_3, x_4, x_57, x_15); x_66 = lean::cnstr_get(x_65, 0); lean::inc(x_66); x_68 = lean::cnstr_get(x_65, 1); @@ -6991,12 +6991,12 @@ 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__view___spec__4___rarg(x_116, x_117, x_115, x_115, x_3, x_4, x_5, x_6); +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; } } } -obj* l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +obj* l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { obj* x_5; 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; @@ -7006,7 +7006,7 @@ x_7 = lean::mk_nat_obj(1u); x_8 = lean::nat_add(x_5, x_7); lean::dec(x_7); lean::dec(x_5); -x_11 = l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__4(x_0, x_6, x_8, x_1, x_2, x_3, x_4); +x_11 = l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__4(x_0, x_6, x_8, 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); @@ -7032,12 +7032,12 @@ lean::cnstr_set(x_20, 1, x_14); return x_20; } } -obj* l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +obj* l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { obj* x_6; obj* x_7; obj* x_9; obj* x_11; lean::inc(x_3); -x_6 = l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3(x_0, x_1, x_2, x_3, x_4); +x_6 = l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__3(x_0, x_1, x_2, x_3, x_4); x_7 = lean::cnstr_get(x_6, 0); lean::inc(x_7); x_9 = lean::cnstr_get(x_6, 1); @@ -7115,6 +7115,22 @@ 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; +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; +} +} obj* _init_l_lean_parser_command_attr__instance_parser_lean_parser_has__view() { _start: { @@ -7125,13 +7141,13 @@ x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, lean::closure_set(x_2, 0, x_0); x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); lean::closure_set(x_3, 0, x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__2), 5, 1); +x_4 = 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_4, 0, 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_closure(reinterpret_cast(l_lean_parser_raw__ident_parser___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__1), 4, 0); +x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_raw__ident_parser___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__1), 4, 0); x_8 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_8, 0, x_7); lean::cnstr_set(x_8, 1, x_6); @@ -7151,22 +7167,6 @@ x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x return x_21; } } -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; -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; -} -} obj* _init_l_lean_parser_command_attr__instance_parser___closed__1() { _start: { @@ -7177,13 +7177,13 @@ x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, lean::closure_set(x_2, 0, x_0); x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); lean::closure_set(x_3, 0, x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__2), 5, 1); +x_4 = 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_4, 0, 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_closure(reinterpret_cast(l_lean_parser_raw__ident_parser___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__1), 4, 0); +x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_raw__ident_parser___at_lean_parser_command_attr__instance_parser_lean_parser_has__tokens___spec__1), 4, 0); x_8 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_8, 0, x_7); lean::cnstr_set(x_8, 1, x_6); @@ -8068,7 +8068,7 @@ lean::inc(x_0); return x_0; } } -obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___spec__2(obj* x_0, obj* x_1, uint8 x_2, uint8 x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8, obj* x_9) { +obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, uint8 x_2, uint8 x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8, obj* x_9) { _start: { obj* x_10; uint8 x_11; @@ -8698,7 +8698,7 @@ lean::cnstr_set(x_274, 1, x_4); x_275 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_275, 0, x_271); lean::cnstr_set(x_275, 1, x_274); -x_276 = l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___spec__2(x_0, x_1, x_2, x_2, x_275, x_14, x_6, x_7, x_248, x_185); +x_276 = 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_275, x_14, x_6, x_7, x_248, x_185); x_277 = lean::cnstr_get(x_276, 0); lean::inc(x_277); x_279 = lean::cnstr_get(x_276, 1); @@ -8891,12 +8891,12 @@ x_349 = l_mjoin___rarg___closed__1; lean::inc(x_347); lean::inc(x_349); lean::inc(x_348); -x_353 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__4___rarg(x_348, x_349, x_347, x_347, x_6, x_7, x_8, x_9); +x_353 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_348, x_349, x_347, x_347, x_6, x_7, x_8, x_9); return x_353; } } } -obj* l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, uint8 x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { +obj* l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, uint8 x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { _start: { obj* x_7; obj* x_8; obj* x_9; obj* x_10; uint8 x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; @@ -8907,7 +8907,7 @@ x_10 = lean::nat_add(x_7, x_9); lean::dec(x_9); lean::dec(x_7); x_13 = 0; -x_14 = l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___spec__2(x_0, x_1, x_2, x_13, x_8, x_10, x_3, x_4, x_5, x_6); +x_14 = 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_13, x_8, x_10, x_3, x_4, x_5, x_6); x_15 = lean::cnstr_get(x_14, 0); lean::inc(x_15); x_17 = lean::cnstr_get(x_14, 1); @@ -8933,6 +8933,49 @@ lean::cnstr_set(x_23, 1, x_17); return x_23; } } +obj* _init_l_lean_parser_command_decl__attributes_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_15; obj* x_16; +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::mk_string(","); +lean::inc(x_1); +x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_1); +x_7 = l_lean_parser_command_attr__instance_parser_lean_parser_has__tokens; +lean::inc(x_7); +x_9 = l_lean_parser_combinators_sep__by1_tokens___rarg(x_7, x_6); +x_10 = lean::mk_string("]"); +x_11 = l_lean_parser_symbol_tokens___rarg(x_10, x_1); +x_12 = lean::box(0); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_11, x_12); +x_14 = l_lean_parser_list_cons_tokens___rarg(x_9, x_13); +x_15 = l_lean_parser_list_cons_tokens___rarg(x_3, x_14); +x_16 = l_lean_parser_tokens___rarg(x_15); +return x_16; +} +} +obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_command_decl__attributes_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) { +_start: +{ +uint8 x_10; uint8 x_11; obj* x_12; +x_10 = lean::unbox(x_2); +x_11 = lean::unbox(x_3); +x_12 = 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_10, x_11, x_4, x_5, x_6, x_7, x_8, x_9); +return x_12; +} +} +obj* l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { +_start: +{ +uint8 x_7; obj* x_8; +x_7 = lean::unbox(x_2); +x_8 = l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens___spec__1(x_0, x_1, x_7, x_3, x_4, x_5, x_6); +return x_8; +} +} obj* _init_l_lean_parser_command_decl__attributes_parser_lean_parser_has__view() { _start: { @@ -8944,7 +8987,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -8954,14 +8997,14 @@ lean::inc(x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_10, 0, x_8); lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_12 = 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_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_attr__instance_parser), 4, 0); x_14 = 1; x_15 = lean::box(x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___spec__1___boxed), 7, 3); +x_16 = 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_16, 0, x_13); lean::closure_set(x_16, 1, x_12); lean::closure_set(x_16, 2, x_15); @@ -8970,7 +9013,7 @@ 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__view___spec__1), 7, 3); +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); @@ -9000,49 +9043,6 @@ x_38 = l_lean_parser_combinators_node_view___rarg(x_26, x_27, x_28, x_29, x_30, return x_38; } } -obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___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) { -_start: -{ -uint8 x_10; uint8 x_11; obj* x_12; -x_10 = lean::unbox(x_2); -x_11 = lean::unbox(x_3); -x_12 = l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___spec__2(x_0, x_1, x_10, x_11, x_4, x_5, x_6, x_7, x_8, x_9); -return x_12; -} -} -obj* l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { -_start: -{ -uint8 x_7; obj* x_8; -x_7 = lean::unbox(x_2); -x_8 = l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___spec__1(x_0, x_1, x_7, x_3, x_4, x_5, x_6); -return x_8; -} -} -obj* _init_l_lean_parser_command_decl__attributes_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_15; obj* x_16; -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::mk_string(","); -lean::inc(x_1); -x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_1); -x_7 = l_lean_parser_command_attr__instance_parser_lean_parser_has__tokens; -lean::inc(x_7); -x_9 = l_lean_parser_combinators_sep__by1_tokens___rarg(x_7, x_6); -x_10 = lean::mk_string("]"); -x_11 = l_lean_parser_symbol_tokens___rarg(x_10, x_1); -x_12 = lean::box(0); -x_13 = l_lean_parser_list_cons_tokens___rarg(x_11, x_12); -x_14 = l_lean_parser_list_cons_tokens___rarg(x_9, x_13); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_3, x_14); -x_16 = l_lean_parser_tokens___rarg(x_15); -return x_16; -} -} obj* _init_l_lean_parser_command_decl__attributes_parser___closed__1() { _start: { @@ -9054,7 +9054,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -9064,14 +9064,14 @@ lean::inc(x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_10, 0, x_8); lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_12 = 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_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_attr__instance_parser), 4, 0); x_14 = 1; x_15 = lean::box(x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by1___at_lean_parser_command_decl__attributes_parser_lean_parser_has__view___spec__1___boxed), 7, 3); +x_16 = 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_16, 0, x_13); lean::closure_set(x_16, 1, x_12); lean::closure_set(x_16, 2, x_15); @@ -9080,7 +9080,7 @@ 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__view___spec__1), 7, 3); +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); @@ -11184,7 +11184,7 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +obj* l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_13; obj* x_14; obj* x_16; @@ -11478,7 +11478,7 @@ goto lbl_7; } } } -obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { if (lean::obj_tag(x_0) == 0) @@ -11492,7 +11492,7 @@ 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_doc__comment_parser_lean_parser_has__view___spec__4___rarg(x_9, x_10, x_8, x_8, x_2, x_3, x_4, x_5); +x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_command_doc__comment_parser_lean_parser_has__tokens___spec__4___rarg(x_9, x_10, x_8, x_8, x_2, x_3, x_4, x_5); return x_14; } else @@ -11596,7 +11596,7 @@ if (x_56 == 0) { obj* x_58; obj* x_59; obj* x_61; obj* x_64; obj* x_65; lean::dec(x_47); -x_58 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__2(x_17, x_30, x_2, x_3, x_4, x_26); +x_58 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2(x_17, x_30, x_2, x_3, x_4, x_26); x_59 = lean::cnstr_get(x_58, 0); lean::inc(x_59); x_61 = lean::cnstr_get(x_58, 1); @@ -11651,7 +11651,7 @@ if (x_77 == 0) { obj* x_80; obj* x_81; obj* x_83; obj* x_86; obj* x_87; lean::dec(x_78); -x_80 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__2(x_17, x_30, x_2, x_3, x_4, x_26); +x_80 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens___spec__2(x_17, x_30, x_2, x_3, x_4, x_26); x_81 = lean::cnstr_get(x_80, 0); lean::inc(x_81); x_83 = lean::cnstr_get(x_80, 1); @@ -11696,114 +11696,6 @@ return x_95; } } } -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; -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__view___spec__1), 5, 1); -lean::closure_set(x_1, 0, x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__attributes_parser), 4, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1), 5, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_string("private"); -x_5 = l_string_trim(x_4); -lean::inc(x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_7, 0, x_5); -x_8 = lean::mk_nat_obj(0u); -lean::inc(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -lean::closure_set(x_10, 0, x_5); -lean::closure_set(x_10, 1, x_8); -lean::closure_set(x_10, 2, x_7); -x_11 = lean::mk_string("protected"); -x_12 = l_string_trim(x_11); -lean::inc(x_12); -x_14 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_14, 0, x_12); -lean::inc(x_8); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -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_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::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__view___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__view___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); -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__view___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__view___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__view___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__view___spec__1), 5, 1); -lean::closure_set(x_41, 0, 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); -x_43 = lean::alloc_cnstr(1, 2, 0); -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_28); -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); -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; -} -} obj* _init_l_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens() { _start: { @@ -11846,15 +11738,15 @@ x_34 = l_lean_parser_tokens___rarg(x_33); return x_34; } } -obj* _init_l_lean_parser_command_decl__modifiers_parser___closed__1() { +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_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; 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__view___spec__1), 5, 1); +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); x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__attributes_parser), 4, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1), 5, 1); +x_3 = 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_3, 0, x_2); x_4 = lean::mk_string("private"); x_5 = l_string_trim(x_4); @@ -11863,7 +11755,7 @@ x_7 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_7, 0, x_5); x_8 = lean::mk_nat_obj(0u); lean::inc(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_10 = 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_10, 0, x_5); lean::closure_set(x_10, 1, x_8); lean::closure_set(x_10, 2, x_7); @@ -11873,7 +11765,7 @@ lean::inc(x_12); x_14 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_14, 0, x_12); lean::inc(x_8); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_16 = 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_16, 0, x_12); lean::closure_set(x_16, 1, x_8); lean::closure_set(x_16, 2, x_14); @@ -11886,7 +11778,7 @@ 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::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__view___spec__2), 6, 2); +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); @@ -11898,7 +11790,7 @@ 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__view___spec__1), 5, 1); +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); @@ -11906,22 +11798,130 @@ 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_8); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +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__view___spec__1), 5, 1); +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__view___spec__1), 7, 3); +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__view___spec__1), 5, 1); +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_42 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_42, 0, x_41); +lean::cnstr_set(x_42, 1, x_17); +x_43 = lean::alloc_cnstr(1, 2, 0); +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_28); +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); +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; +} +} +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; +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); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_decl__attributes_parser), 4, 0); +x_3 = 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_3, 0, x_2); +x_4 = lean::mk_string("private"); +x_5 = l_string_trim(x_4); +lean::inc(x_5); +x_7 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_7, 0, x_5); +x_8 = lean::mk_nat_obj(0u); +lean::inc(x_8); +x_10 = 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_10, 0, x_5); +lean::closure_set(x_10, 1, x_8); +lean::closure_set(x_10, 2, x_7); +x_11 = lean::mk_string("protected"); +x_12 = l_string_trim(x_11); +lean::inc(x_12); +x_14 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_14, 0, x_12); +lean::inc(x_8); +x_16 = 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_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_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::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); +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_42 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_42, 0, x_41); @@ -12156,6 +12156,23 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_command_decl__sig_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_9; +x_0 = l_lean_parser_term_bracketed__binders_parser_lean_parser_has__tokens; +lean::inc(x_0); +x_2 = l_lean_parser_tokens___rarg(x_0); +x_3 = l_lean_parser_term_type__spec_parser_lean_parser_has__tokens; +lean::inc(x_3); +x_5 = l_lean_parser_tokens___rarg(x_3); +x_6 = lean::box(0); +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); +return x_9; +} +} obj* _init_l_lean_parser_command_decl__sig_parser_lean_parser_has__view() { _start: { @@ -12189,23 +12206,6 @@ x_19 = l_lean_parser_combinators_node_view___rarg(x_7, x_8, x_9, x_10, x_11, x_6 return x_19; } } -obj* _init_l_lean_parser_command_decl__sig_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_9; -x_0 = l_lean_parser_term_bracketed__binders_parser_lean_parser_has__tokens; -lean::inc(x_0); -x_2 = l_lean_parser_tokens___rarg(x_0); -x_3 = l_lean_parser_term_type__spec_parser_lean_parser_has__tokens; -lean::inc(x_3); -x_5 = l_lean_parser_tokens___rarg(x_3); -x_6 = lean::box(0); -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); -return x_9; -} -} obj* _init_l_lean_parser_command_decl__sig_parser___closed__1() { _start: { @@ -12751,6 +12751,23 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_command_opt__decl__sig_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_9; +x_0 = l_lean_parser_term_bracketed__binders_parser_lean_parser_has__tokens; +lean::inc(x_0); +x_2 = l_lean_parser_tokens___rarg(x_0); +x_3 = l_lean_parser_term_opt__type_parser_lean_parser_has__tokens; +lean::inc(x_3); +x_5 = l_lean_parser_tokens___rarg(x_3); +x_6 = lean::box(0); +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); +return x_9; +} +} obj* _init_l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__view() { _start: { @@ -12784,23 +12801,6 @@ x_19 = l_lean_parser_combinators_node_view___rarg(x_7, x_8, x_9, x_10, x_11, x_6 return x_19; } } -obj* _init_l_lean_parser_command_opt__decl__sig_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_9; -x_0 = l_lean_parser_term_bracketed__binders_parser_lean_parser_has__tokens; -lean::inc(x_0); -x_2 = l_lean_parser_tokens___rarg(x_0); -x_3 = l_lean_parser_term_opt__type_parser_lean_parser_has__tokens; -lean::inc(x_3); -x_5 = l_lean_parser_tokens___rarg(x_3); -x_6 = lean::box(0); -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); -return x_9; -} -} obj* _init_l_lean_parser_command_opt__decl__sig_parser___closed__1() { _start: { @@ -13955,6 +13955,30 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_command_equation_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_13; obj* x_14; obj* x_15; obj* x_16; +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 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_4); +x_6 = l_lean_parser_tokens___rarg(x_4); +lean::inc(x_6); +x_8 = l_lean_parser_tokens___rarg(x_6); +x_9 = lean::mk_string(":="); +x_10 = l_lean_parser_symbol_tokens___rarg(x_9, x_1); +x_11 = lean::box(0); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_6, x_11); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_10, x_12); +x_14 = l_lean_parser_list_cons_tokens___rarg(x_8, x_13); +x_15 = l_lean_parser_list_cons_tokens___rarg(x_3, x_14); +x_16 = l_lean_parser_tokens___rarg(x_15); +return x_16; +} +} obj* _init_l_lean_parser_command_equation_parser_lean_parser_has__view() { _start: { @@ -13966,7 +13990,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -13976,7 +14000,7 @@ x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, lean::closure_set(x_9, 0, x_7); x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3), 5, 1); +x_11 = 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_11, 0, x_10); x_12 = lean::mk_string(":="); x_13 = l_string_trim(x_12); @@ -13984,7 +14008,7 @@ lean::inc(x_13); x_15 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_15, 0, x_13); lean::inc(x_4); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_17 = 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_17, 0, x_13); lean::closure_set(x_17, 1, x_4); lean::closure_set(x_17, 2, x_15); @@ -14021,30 +14045,6 @@ x_37 = l_lean_parser_combinators_node_view___rarg(x_25, x_26, x_27, x_28, x_29, return x_37; } } -obj* _init_l_lean_parser_command_equation_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_13; obj* x_14; obj* x_15; obj* x_16; -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 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_4); -x_6 = l_lean_parser_tokens___rarg(x_4); -lean::inc(x_6); -x_8 = l_lean_parser_tokens___rarg(x_6); -x_9 = lean::mk_string(":="); -x_10 = l_lean_parser_symbol_tokens___rarg(x_9, x_1); -x_11 = lean::box(0); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_6, x_11); -x_13 = l_lean_parser_list_cons_tokens___rarg(x_10, x_12); -x_14 = l_lean_parser_list_cons_tokens___rarg(x_8, x_13); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_3, x_14); -x_16 = l_lean_parser_tokens___rarg(x_15); -return x_16; -} -} obj* _init_l_lean_parser_command_equation_parser___closed__1() { _start: { @@ -14056,7 +14056,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -14066,7 +14066,7 @@ x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, lean::closure_set(x_9, 0, x_7); x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); lean::closure_set(x_10, 0, x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3), 5, 1); +x_11 = 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_11, 0, x_10); x_12 = lean::mk_string(":="); x_13 = l_string_trim(x_12); @@ -14074,7 +14074,7 @@ lean::inc(x_13); x_15 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_15, 0, x_13); lean::inc(x_4); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_17 = 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_17, 0, x_13); lean::closure_set(x_17, 1, x_4); lean::closure_set(x_17, 2, x_15); @@ -14927,84 +14927,6 @@ lean::inc(x_0); return x_0; } } -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; -x_0 = lean::mk_string(":="); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -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::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_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::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__view___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__view___spec__3), 5, 1); -lean::closure_set(x_24, 0, x_23); -lean::inc(x_10); -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); -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__view___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::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; -} -} obj* _init_l_lean_parser_command_decl__val_parser_lean_parser_has__tokens() { _start: { @@ -15036,10 +14958,10 @@ x_23 = l_lean_parser_tokens___rarg(x_22); return x_23; } } -obj* _init_l_lean_parser_command_decl__val_parser___closed__1() { +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_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; x_0 = lean::mk_string(":="); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -15047,7 +14969,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -15075,12 +14997,12 @@ 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_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +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__view___spec__3), 5, 1); +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_26 = lean::alloc_cnstr(1, 2, 0); @@ -15092,7 +15014,85 @@ lean::cnstr_set(x_27, 1, x_26); 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__view___spec__2), 6, 2); +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::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; +} +} +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; +x_0 = lean::mk_string(":="); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +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::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_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::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_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); +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); @@ -16343,6 +16343,42 @@ lean::inc(x_0); 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; +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::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); +x_12 = l_lean_parser_tokens___rarg(x_11); +x_13 = 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; +} +} obj* _init_l_lean_parser_command_infer__modifier_parser_lean_parser_has__view() { _start: { @@ -16354,7 +16390,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -16364,7 +16400,7 @@ lean::inc(x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_10, 0, x_8); lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_12 = 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_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); @@ -16384,7 +16420,7 @@ 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_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +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); @@ -16394,7 +16430,7 @@ 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_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +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); @@ -16414,7 +16450,7 @@ 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__view___spec__2), 6, 2); +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); @@ -16496,42 +16532,6 @@ lean::cnstr_set(x_14, 1, x_10); return x_14; } } -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; -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::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); -x_12 = l_lean_parser_tokens___rarg(x_11); -x_13 = 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; -} -} obj* _init_l_lean_parser_command_infer__modifier_parser___closed__1() { _start: { @@ -16543,7 +16543,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -16553,7 +16553,7 @@ lean::inc(x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_10, 0, x_8); lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_12 = 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_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); @@ -16573,7 +16573,7 @@ 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_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +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); @@ -16583,7 +16583,7 @@ 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_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +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); @@ -16603,7 +16603,7 @@ 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__view___spec__2), 6, 2); +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); @@ -17467,7 +17467,7 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { obj* x_5; obj* x_10; obj* x_11; obj* x_13; obj* x_15; @@ -17537,7 +17537,7 @@ lean::cnstr_set(x_33, 2, x_31); x_34 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_20, x_33); lean::inc(x_31); x_36 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_31, x_34); -x_37 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; +x_37 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; lean::inc(x_37); x_39 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_36, x_37); x_40 = l_lean_parser_parsec__t_try__mk__res___rarg(x_39); @@ -17573,7 +17573,7 @@ x_49 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_49, 0, x_2); x_50 = lean::box(0); x_51 = l_string_join___closed__1; -x_52 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; +x_52 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; lean::inc(x_52); lean::inc(x_51); x_55 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_51, x_52, x_49, x_50, x_5, x_18, x_13); @@ -17625,7 +17625,7 @@ x_76 = x_75; 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_76); -x_80 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; +x_80 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; lean::inc(x_80); x_82 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_79, x_80); x_83 = l_lean_parser_parsec__t_try__mk__res___rarg(x_82); @@ -17640,54 +17640,6 @@ return x_84; } } } -obj* _init_l_lean_parser_command_intro__rule_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_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_27; -x_0 = lean::mk_string("|"); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -lean::closure_set(x_5, 0, x_1); -lean::closure_set(x_5, 1, x_4); -lean::closure_set(x_5, 2, x_3); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser), 4, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1), 5, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::box(0); -x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_opt__decl__sig_parser), 4, 0); -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_7); -lean::cnstr_set(x_11, 1, x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1), 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_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_5); -lean::cnstr_set(x_14, 1, x_13); -x_15 = l_lean_parser_command__parser__m_monad___closed__1; -x_16 = l_lean_parser_command__parser__m_monad__except___closed__1; -x_17 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; -x_18 = l_lean_parser_command__parser__m_alternative___closed__1; -x_19 = l_lean_parser_command_intro__rule; -x_20 = l_lean_parser_command_intro__rule_has__view; -lean::inc(x_20); -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; -} -} obj* _init_l_lean_parser_command_intro__rule_parser_lean_parser_has__tokens() { _start: { @@ -17710,6 +17662,54 @@ x_14 = l_lean_parser_tokens___rarg(x_13); return x_14; } } +obj* _init_l_lean_parser_command_intro__rule_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_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_27; +x_0 = lean::mk_string("|"); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +x_5 = 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_5, 0, x_1); +lean::closure_set(x_5, 1, x_4); +lean::closure_set(x_5, 2, x_3); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser), 4, 0); +x_7 = 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_7, 0, x_6); +x_8 = lean::box(0); +x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_opt__decl__sig_parser), 4, 0); +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_7); +lean::cnstr_set(x_11, 1, x_10); +x_12 = 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_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_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_5); +lean::cnstr_set(x_14, 1, x_13); +x_15 = l_lean_parser_command__parser__m_monad___closed__1; +x_16 = l_lean_parser_command__parser__m_monad__except___closed__1; +x_17 = l_lean_parser_command__parser__m_lean_parser_monad__parsec___closed__1; +x_18 = l_lean_parser_command__parser__m_alternative___closed__1; +x_19 = l_lean_parser_command_intro__rule; +x_20 = l_lean_parser_command_intro__rule_has__view; +lean::inc(x_20); +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; +} +} obj* _init_l_lean_parser_command_intro__rule_parser___closed__1() { _start: { @@ -17720,12 +17720,12 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser), 4, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1), 5, 1); +x_7 = 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_7, 0, x_6); x_8 = lean::box(0); x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_opt__decl__sig_parser), 4, 0); @@ -17735,7 +17735,7 @@ lean::cnstr_set(x_10, 1, x_8); x_11 = lean::alloc_cnstr(1, 2, 0); 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_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1), 4, 0); +x_12 = 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_13 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_13, 0, x_12); lean::cnstr_set(x_13, 1, x_11); @@ -18846,20 +18846,44 @@ lean::inc(x_0); 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; +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; +} +} obj* _init_l_lean_parser_command_struct__binder__content_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_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_25; -x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1), 4, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3), 5, 1); +x_0 = 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_1 = 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_1, 0, x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser), 4, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1), 5, 1); +x_3 = 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_3, 0, x_2); x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binder__default_parser), 5, 0); x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1), 5, 1); +x_6 = 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_6, 0, x_5); x_7 = lean::box(0); x_8 = lean::alloc_cnstr(1, 2, 0); @@ -18891,44 +18915,20 @@ x_25 = l_lean_parser_combinators_node_view___rarg(x_13, x_14, x_15, x_16, x_17, return x_25; } } -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; -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; -} -} obj* _init_l_lean_parser_command_struct__binder__content_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_12; -x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1), 4, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3), 5, 1); +x_0 = 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_1 = 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_1, 0, x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_infer__modifier_parser), 4, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1), 5, 1); +x_3 = 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_3, 0, x_2); x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binder__default_parser), 5, 0); x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_decl__modifiers_parser_lean_parser_has__view___spec__1), 5, 1); +x_6 = 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_6, 0, x_5); x_7 = lean::box(0); x_8 = lean::alloc_cnstr(1, 2, 0); @@ -22431,214 +22431,6 @@ lean::inc(x_0); return x_0; } } -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; -x_0 = lean::mk_string("("); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__like_parser), 5, 0); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); -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_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::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__view___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); -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__view___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); -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__view___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); -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__view___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); -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; -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); -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__view___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); -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__view___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); -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); -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__view___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); -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__view___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_88 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_88, 0, x_86); -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, 1, x_88); -x_90 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_90, 0, x_80); -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__view___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; -} -} obj* _init_l_lean_parser_command_structure__field__block_parser_lean_parser_has__tokens() { _start: { @@ -22714,10 +22506,10 @@ x_67 = l_lean_parser_tokens___rarg(x_66); return x_67; } } -obj* _init_l_lean_parser_command_structure__field__block_parser___closed__1() { +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_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; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -22725,7 +22517,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -22743,7 +22535,7 @@ 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::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__view___spec__2), 6, 2); +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); @@ -22761,7 +22553,7 @@ 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); 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__view___spec__1), 7, 3); +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); @@ -22786,7 +22578,7 @@ 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::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__view___spec__1), 7, 3); +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); @@ -22796,7 +22588,7 @@ 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); 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__view___spec__1), 7, 3); +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); @@ -22822,7 +22614,7 @@ 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__view___spec__1), 7, 3); +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); @@ -22832,7 +22624,7 @@ 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); 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__view___spec__1), 7, 3); +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); @@ -22858,7 +22650,7 @@ 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); 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__view___spec__1), 7, 3); +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); @@ -22868,7 +22660,7 @@ 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); 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__view___spec__1), 7, 3); +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); @@ -22900,7 +22692,215 @@ 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__view___spec__2), 6, 2); +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; +} +} +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; +x_0 = lean::mk_string("("); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__like_parser), 5, 0); +x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term__parser_run), 5, 1); +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_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::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); +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); +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); +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); +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; +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); +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); +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); +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); +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); +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_88 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_88, 0, x_86); +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, 1, x_88); +x_90 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_90, 0, x_80); +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); @@ -23670,6 +23670,26 @@ lean::inc(x_0); 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; +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; +} +} obj* _init_l_lean_parser_command_old__univ__params_parser_lean_parser_has__view() { _start: { @@ -23681,19 +23701,19 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1), 4, 0); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3), 5, 1); +x_7 = 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_8 = 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_8, 0, x_7); x_9 = lean::mk_string("}"); x_10 = l_string_trim(x_9); lean::inc(x_10); x_12 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_12, 0, x_10); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_13 = 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_13, 0, x_10); lean::closure_set(x_13, 1, x_4); lean::closure_set(x_13, 2, x_12); @@ -23723,26 +23743,6 @@ x_30 = l_lean_parser_combinators_node_view___rarg(x_18, x_19, x_20, x_21, x_22, return x_30; } } -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; -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; -} -} obj* _init_l_lean_parser_command_old__univ__params_parser___closed__1() { _start: { @@ -23754,19 +23754,19 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1), 4, 0); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3), 5, 1); +x_7 = 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_8 = 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_8, 0, x_7); x_9 = lean::mk_string("}"); x_10 = l_string_trim(x_9); lean::inc(x_10); x_12 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_12, 0, x_10); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_13 = 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_13, 0, x_10); lean::closure_set(x_13, 1, x_4); lean::closure_set(x_13, 2, x_12); @@ -25450,74 +25450,6 @@ lean::inc(x_0); return x_0; } } -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; -x_0 = lean::mk_string(".{"); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1), 4, 0); -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__view___spec__3), 5, 1); -lean::closure_set(x_9, 0, x_7); -x_10 = lean::mk_string("}"); -x_11 = l_string_trim(x_10); -lean::inc(x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_13, 0, x_11); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -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_17 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_17, 0, x_14); -lean::cnstr_set(x_17, 1, x_15); -x_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_9); -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__view___spec__1), 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_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::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; -} -} obj* _init_l_lean_parser_command_ident__univ__params_parser_lean_parser_has__tokens() { _start: { @@ -25544,10 +25476,10 @@ x_18 = l_lean_parser_tokens___rarg(x_17); return x_18; } } -obj* _init_l_lean_parser_command_ident__univ__params_parser___closed__1() { +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_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; x_0 = lean::mk_string(".{"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -25555,20 +25487,20 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_intro__rule_parser_lean_parser_has__view___spec__1), 4, 0); +x_7 = 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); -x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_attr__instance_parser_lean_parser_has__view___spec__3), 5, 1); +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::mk_string("}"); x_11 = l_string_trim(x_10); lean::inc(x_11); x_13 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_13, 0, x_11); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_14 = 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_14, 0, x_11); lean::closure_set(x_14, 1, x_4); lean::closure_set(x_14, 2, x_13); @@ -25588,7 +25520,75 @@ 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__view___spec__1), 5, 1); +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::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::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; +} +} +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; +x_0 = lean::mk_string(".{"); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +x_7 = 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); +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::mk_string("}"); +x_11 = l_string_trim(x_10); +lean::inc(x_11); +x_13 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_13, 0, x_11); +x_14 = 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_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_17 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_17, 0, x_14); +lean::cnstr_set(x_17, 1, x_15); +x_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_9); +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_24 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_24, 0, x_23); @@ -29118,185 +29118,6 @@ lean::inc(x_0); return x_0; } } -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; -x_0 = lean::mk_string("structure"); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -x_7 = lean::mk_string("class"); -x_8 = l_string_trim(x_7); -lean::inc(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_10, 0, x_8); -lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -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_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::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__view___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__view___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); -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__view___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); -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); -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__view___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__view___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__view___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); -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__view___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__view___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__view___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__view___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__view___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__view___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_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); -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); -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::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; -} -} obj* _init_l_lean_parser_command_structure_parser_lean_parser_has__tokens() { _start: { @@ -29368,10 +29189,10 @@ x_63 = l_lean_parser_tokens___rarg(x_62); return x_63; } } -obj* _init_l_lean_parser_command_structure_parser___closed__1() { +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_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; x_0 = lean::mk_string("structure"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -29379,7 +29200,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -29389,7 +29210,7 @@ lean::inc(x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_10, 0, x_8); lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_12 = 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_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); @@ -29402,7 +29223,7 @@ 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::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__view___spec__2), 6, 2); +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); @@ -29415,7 +29236,7 @@ x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_nod 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__view___spec__1), 5, 1); +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); @@ -29423,7 +29244,7 @@ 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); 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__view___spec__1), 7, 3); +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); @@ -29438,13 +29259,13 @@ 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::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__view___spec__1), 7, 3); +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__view___spec__1___boxed), 7, 3); +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); @@ -29460,7 +29281,7 @@ 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__view___spec__1), 5, 1); +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); @@ -29468,19 +29289,19 @@ 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); 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__view___spec__1), 7, 3); +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__view___spec__1), 5, 1); +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__view___spec__1), 7, 3); +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); @@ -29491,7 +29312,7 @@ 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__view___spec__1), 4, 0); +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); @@ -29500,10 +29321,189 @@ 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__view___spec__1), 5, 1); +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__view___spec__2), 5, 1); +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_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); +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); +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::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; +} +} +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; +x_0 = lean::mk_string("structure"); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +x_7 = lean::mk_string("class"); +x_8 = l_string_trim(x_7); +lean::inc(x_8); +x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_10, 0, x_8); +lean::inc(x_4); +x_12 = 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_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_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::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); +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); +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); +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); +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); @@ -35298,348 +35298,6 @@ lean::inc(x_0); return x_0; } } -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; -x_0 = lean::mk_string("def"); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -x_7 = lean::mk_string("abbreviation"); -x_8 = l_string_trim(x_7); -lean::inc(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_10, 0, x_8); -lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); -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::mk_string("theorem"); -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_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 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::box(0); -lean::inc(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); -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__view___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__view___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); -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_4); -x_54 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___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__view___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_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::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__view___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); -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__view___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); -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__view___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_89 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_89, 0, x_87); -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__view___spec__2), 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::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__view___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__view___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); -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__view___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_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__view___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__view___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); -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::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_132, 0, x_40); -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, 1, x_132); -x_134 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_134, 0, x_122); -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_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); -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__view___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); -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; -} -} -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) { -_start: -{ -obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; -x_5 = l_lean_parser_no__kind; -lean::inc(x_5); -x_7 = l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4(x_5, x_0, x_1, x_2, x_3, x_4); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_10 = lean::cnstr_get(x_7, 1); -lean::inc(x_10); -if (lean::is_shared(x_7)) { - lean::dec(x_7); - x_12 = lean::box(0); -} else { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - x_12 = x_7; -} -x_13 = l_lean_parser_parsec__t_try__mk__res___rarg(x_8); -if (lean::is_scalar(x_12)) { - x_14 = lean::alloc_cnstr(0, 2, 0); -} else { - x_14 = x_12; -} -lean::cnstr_set(x_14, 0, x_13); -lean::cnstr_set(x_14, 1, x_10); -return x_14; -} -} obj* _init_l_lean_parser_command_declaration_parser_lean_parser_has__tokens() { _start: { @@ -35767,10 +35425,10 @@ x_119 = l_lean_parser_tokens___rarg(x_118); return x_119; } } -obj* _init_l_lean_parser_command_declaration_parser___closed__1() { +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_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; x_0 = lean::mk_string("def"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -35778,7 +35436,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -35788,7 +35446,7 @@ lean::inc(x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_10, 0, x_8); lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_12 = 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_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); @@ -35798,7 +35456,7 @@ 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_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +x_18 = 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_18, 0, x_14); lean::closure_set(x_18, 1, x_4); lean::closure_set(x_18, 2, x_16); @@ -35814,7 +35472,7 @@ 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__view___spec__2), 6, 2); +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); @@ -35827,7 +35485,7 @@ x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_nod 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__view___spec__1), 5, 1); +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); @@ -35863,12 +35521,12 @@ 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_4); -x_54 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +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__view___spec__1), 5, 1); +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); @@ -35893,7 +35551,7 @@ 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::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__view___spec__1), 7, 3); +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); @@ -35911,7 +35569,7 @@ 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_81 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_doc__comment_parser_lean_parser_has__view___spec__1), 7, 3); +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); @@ -35921,7 +35579,7 @@ 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); 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__view___spec__1), 7, 3); +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); @@ -35933,7 +35591,7 @@ 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__view___spec__2), 6, 2); +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_90); lean::closure_set(x_92, 1, x_4); lean::inc(x_19); @@ -35967,11 +35625,11 @@ 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::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__view___spec__1), 7, 3); +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__view___spec__1), 5, 1); +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); @@ -35979,7 +35637,7 @@ 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); 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__view___spec__1), 7, 3); +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); @@ -35995,10 +35653,10 @@ 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__view___spec__1), 5, 1); +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__view___spec__2), 5, 1); +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); @@ -36044,7 +35702,349 @@ 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__view___spec__2), 6, 2); +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); +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; +} +} +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) { +_start: +{ +obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; +x_5 = l_lean_parser_no__kind; +lean::inc(x_5); +x_7 = l_lean_parser_combinators_node___at_lean_parser_command_doc__comment_parser___spec__4(x_5, x_0, x_1, x_2, x_3, x_4); +x_8 = lean::cnstr_get(x_7, 0); +lean::inc(x_8); +x_10 = lean::cnstr_get(x_7, 1); +lean::inc(x_10); +if (lean::is_shared(x_7)) { + lean::dec(x_7); + x_12 = lean::box(0); +} else { + lean::cnstr_release(x_7, 0); + lean::cnstr_release(x_7, 1); + x_12 = x_7; +} +x_13 = l_lean_parser_parsec__t_try__mk__res___rarg(x_8); +if (lean::is_scalar(x_12)) { + x_14 = lean::alloc_cnstr(0, 2, 0); +} else { + x_14 = x_12; +} +lean::cnstr_set(x_14, 0, x_13); +lean::cnstr_set(x_14, 1, x_10); +return x_14; +} +} +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; +x_0 = lean::mk_string("def"); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +x_7 = lean::mk_string("abbreviation"); +x_8 = l_string_trim(x_7); +lean::inc(x_8); +x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_10, 0, x_8); +lean::inc(x_4); +x_12 = 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_12, 0, x_8); +lean::closure_set(x_12, 1, x_4); +lean::closure_set(x_12, 2, x_10); +x_13 = lean::mk_string("theorem"); +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_18 = 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_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_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); +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); +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_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_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::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); +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); +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_89 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_89, 0, x_87); +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); +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::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); +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_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); +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::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_132, 0, x_40); +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, 1, x_132); +x_134 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_134, 0, x_122); +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_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); +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); @@ -36088,8 +36088,8 @@ void initialize_init_lean_parser_declaration() { l_lean_parser_command_doc__comment_has__view_x_27 = _init_l_lean_parser_command_doc__comment_has__view_x_27(); l_lean_parser_command_doc__comment_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_doc__comment_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_doc__comment_has__view = _init_l_lean_parser_command_doc__comment_has__view(); - l_lean_parser_command_doc__comment_parser_lean_parser_has__view = _init_l_lean_parser_command_doc__comment_parser_lean_parser_has__view(); l_lean_parser_command_doc__comment_parser_lean_parser_has__tokens = _init_l_lean_parser_command_doc__comment_parser_lean_parser_has__tokens(); + l_lean_parser_command_doc__comment_parser_lean_parser_has__view = _init_l_lean_parser_command_doc__comment_parser_lean_parser_has__view(); l_lean_parser_command_doc__comment_parser___closed__1 = _init_l_lean_parser_command_doc__comment_parser___closed__1(); l_lean_parser_command_attr__instance = _init_l_lean_parser_command_attr__instance(); l_lean_parser_command_attr__instance_has__view_x_27 = _init_l_lean_parser_command_attr__instance_has__view_x_27(); @@ -36097,16 +36097,16 @@ void initialize_init_lean_parser_declaration() { l_lean_parser_command_attr__instance_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_attr__instance_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_attr__instance_has__view_x_27___lambda__1___closed__3 = _init_l_lean_parser_command_attr__instance_has__view_x_27___lambda__1___closed__3(); l_lean_parser_command_attr__instance_has__view = _init_l_lean_parser_command_attr__instance_has__view(); - l_lean_parser_command_attr__instance_parser_lean_parser_has__view = _init_l_lean_parser_command_attr__instance_parser_lean_parser_has__view(); l_lean_parser_command_attr__instance_parser_lean_parser_has__tokens = _init_l_lean_parser_command_attr__instance_parser_lean_parser_has__tokens(); + l_lean_parser_command_attr__instance_parser_lean_parser_has__view = _init_l_lean_parser_command_attr__instance_parser_lean_parser_has__view(); l_lean_parser_command_attr__instance_parser___closed__1 = _init_l_lean_parser_command_attr__instance_parser___closed__1(); l_lean_parser_command_decl__attributes = _init_l_lean_parser_command_decl__attributes(); l_lean_parser_command_decl__attributes_has__view_x_27 = _init_l_lean_parser_command_decl__attributes_has__view_x_27(); l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_decl__attributes_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_decl__attributes_has__view = _init_l_lean_parser_command_decl__attributes_has__view(); - l_lean_parser_command_decl__attributes_parser_lean_parser_has__view = _init_l_lean_parser_command_decl__attributes_parser_lean_parser_has__view(); l_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens = _init_l_lean_parser_command_decl__attributes_parser_lean_parser_has__tokens(); + l_lean_parser_command_decl__attributes_parser_lean_parser_has__view = _init_l_lean_parser_command_decl__attributes_parser_lean_parser_has__view(); l_lean_parser_command_decl__attributes_parser___closed__1 = _init_l_lean_parser_command_decl__attributes_parser___closed__1(); l_lean_parser_command_visibility = _init_l_lean_parser_command_visibility(); l_lean_parser_command_visibility_has__view_x_27 = _init_l_lean_parser_command_visibility_has__view_x_27(); @@ -36122,8 +36122,8 @@ void initialize_init_lean_parser_declaration() { l_lean_parser_command_decl__modifiers_has__view_x_27___lambda__1___closed__3 = _init_l_lean_parser_command_decl__modifiers_has__view_x_27___lambda__1___closed__3(); l_lean_parser_command_decl__modifiers_has__view_x_27___lambda__1___closed__4 = _init_l_lean_parser_command_decl__modifiers_has__view_x_27___lambda__1___closed__4(); l_lean_parser_command_decl__modifiers_has__view = _init_l_lean_parser_command_decl__modifiers_has__view(); - l_lean_parser_command_decl__modifiers_parser_lean_parser_has__view = _init_l_lean_parser_command_decl__modifiers_parser_lean_parser_has__view(); l_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens = _init_l_lean_parser_command_decl__modifiers_parser_lean_parser_has__tokens(); + l_lean_parser_command_decl__modifiers_parser_lean_parser_has__view = _init_l_lean_parser_command_decl__modifiers_parser_lean_parser_has__view(); l_lean_parser_command_decl__modifiers_parser___closed__1 = _init_l_lean_parser_command_decl__modifiers_parser___closed__1(); l_lean_parser_command_decl__sig = _init_l_lean_parser_command_decl__sig(); l_lean_parser_command_decl__sig_has__view_x_27 = _init_l_lean_parser_command_decl__sig_has__view_x_27(); @@ -36131,22 +36131,22 @@ void initialize_init_lean_parser_declaration() { l_lean_parser_command_decl__sig_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_decl__sig_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_decl__sig_has__view_x_27___lambda__1___closed__3 = _init_l_lean_parser_command_decl__sig_has__view_x_27___lambda__1___closed__3(); l_lean_parser_command_decl__sig_has__view = _init_l_lean_parser_command_decl__sig_has__view(); - l_lean_parser_command_decl__sig_parser_lean_parser_has__view = _init_l_lean_parser_command_decl__sig_parser_lean_parser_has__view(); l_lean_parser_command_decl__sig_parser_lean_parser_has__tokens = _init_l_lean_parser_command_decl__sig_parser_lean_parser_has__tokens(); + l_lean_parser_command_decl__sig_parser_lean_parser_has__view = _init_l_lean_parser_command_decl__sig_parser_lean_parser_has__view(); l_lean_parser_command_decl__sig_parser___closed__1 = _init_l_lean_parser_command_decl__sig_parser___closed__1(); l_lean_parser_command_opt__decl__sig = _init_l_lean_parser_command_opt__decl__sig(); l_lean_parser_command_opt__decl__sig_has__view_x_27 = _init_l_lean_parser_command_opt__decl__sig_has__view_x_27(); l_lean_parser_command_opt__decl__sig_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_opt__decl__sig_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_opt__decl__sig_has__view = _init_l_lean_parser_command_opt__decl__sig_has__view(); - l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__view = _init_l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__view(); l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__tokens = _init_l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__tokens(); + l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__view = _init_l_lean_parser_command_opt__decl__sig_parser_lean_parser_has__view(); l_lean_parser_command_opt__decl__sig_parser___closed__1 = _init_l_lean_parser_command_opt__decl__sig_parser___closed__1(); l_lean_parser_command_equation = _init_l_lean_parser_command_equation(); l_lean_parser_command_equation_has__view_x_27 = _init_l_lean_parser_command_equation_has__view_x_27(); l_lean_parser_command_equation_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_equation_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_equation_has__view = _init_l_lean_parser_command_equation_has__view(); - l_lean_parser_command_equation_parser_lean_parser_has__view = _init_l_lean_parser_command_equation_parser_lean_parser_has__view(); l_lean_parser_command_equation_parser_lean_parser_has__tokens = _init_l_lean_parser_command_equation_parser_lean_parser_has__tokens(); + l_lean_parser_command_equation_parser_lean_parser_has__view = _init_l_lean_parser_command_equation_parser_lean_parser_has__view(); l_lean_parser_command_equation_parser___closed__1 = _init_l_lean_parser_command_equation_parser___closed__1(); l_lean_parser_command_simple__decl__val = _init_l_lean_parser_command_simple__decl__val(); l_lean_parser_command_simple__decl__val_has__view_x_27 = _init_l_lean_parser_command_simple__decl__val_has__view_x_27(); @@ -36161,8 +36161,8 @@ void initialize_init_lean_parser_declaration() { l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__5 = _init_l_lean_parser_command_decl__val_has__view_x_27___lambda__1___closed__5(); l_lean_parser_command_decl__val_has__view_x_27___lambda__2___closed__1 = _init_l_lean_parser_command_decl__val_has__view_x_27___lambda__2___closed__1(); l_lean_parser_command_decl__val_has__view = _init_l_lean_parser_command_decl__val_has__view(); - l_lean_parser_command_decl__val_parser_lean_parser_has__view = _init_l_lean_parser_command_decl__val_parser_lean_parser_has__view(); l_lean_parser_command_decl__val_parser_lean_parser_has__tokens = _init_l_lean_parser_command_decl__val_parser_lean_parser_has__tokens(); + l_lean_parser_command_decl__val_parser_lean_parser_has__view = _init_l_lean_parser_command_decl__val_parser_lean_parser_has__view(); l_lean_parser_command_decl__val_parser___closed__1 = _init_l_lean_parser_command_decl__val_parser___closed__1(); l_lean_parser_command_relaxed__infer__modifier = _init_l_lean_parser_command_relaxed__infer__modifier(); l_lean_parser_command_relaxed__infer__modifier_has__view_x_27 = _init_l_lean_parser_command_relaxed__infer__modifier_has__view_x_27(); @@ -36179,8 +36179,8 @@ void initialize_init_lean_parser_declaration() { l_lean_parser_command_infer__modifier_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_infer__modifier_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_infer__modifier_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_infer__modifier_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_infer__modifier_has__view = _init_l_lean_parser_command_infer__modifier_has__view(); - l_lean_parser_command_infer__modifier_parser_lean_parser_has__view = _init_l_lean_parser_command_infer__modifier_parser_lean_parser_has__view(); l_lean_parser_command_infer__modifier_parser_lean_parser_has__tokens = _init_l_lean_parser_command_infer__modifier_parser_lean_parser_has__tokens(); + l_lean_parser_command_infer__modifier_parser_lean_parser_has__view = _init_l_lean_parser_command_infer__modifier_parser_lean_parser_has__view(); l_lean_parser_command_infer__modifier_parser___closed__1 = _init_l_lean_parser_command_infer__modifier_parser___closed__1(); l_lean_parser_command_intro__rule = _init_l_lean_parser_command_intro__rule(); l_lean_parser_command_intro__rule_has__view_x_27 = _init_l_lean_parser_command_intro__rule_has__view_x_27(); @@ -36188,16 +36188,16 @@ void initialize_init_lean_parser_declaration() { l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__3 = _init_l_lean_parser_command_intro__rule_has__view_x_27___lambda__1___closed__3(); l_lean_parser_command_intro__rule_has__view = _init_l_lean_parser_command_intro__rule_has__view(); - l_lean_parser_command_intro__rule_parser_lean_parser_has__view = _init_l_lean_parser_command_intro__rule_parser_lean_parser_has__view(); l_lean_parser_command_intro__rule_parser_lean_parser_has__tokens = _init_l_lean_parser_command_intro__rule_parser_lean_parser_has__tokens(); + l_lean_parser_command_intro__rule_parser_lean_parser_has__view = _init_l_lean_parser_command_intro__rule_parser_lean_parser_has__view(); l_lean_parser_command_intro__rule_parser___closed__1 = _init_l_lean_parser_command_intro__rule_parser___closed__1(); l_lean_parser_command_struct__binder__content = _init_l_lean_parser_command_struct__binder__content(); l_lean_parser_command_struct__binder__content_has__view_x_27 = _init_l_lean_parser_command_struct__binder__content_has__view_x_27(); l_lean_parser_command_struct__binder__content_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_struct__binder__content_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_struct__binder__content_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_struct__binder__content_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_struct__binder__content_has__view = _init_l_lean_parser_command_struct__binder__content_has__view(); - l_lean_parser_command_struct__binder__content_parser_lean_parser_has__view = _init_l_lean_parser_command_struct__binder__content_parser_lean_parser_has__view(); l_lean_parser_command_struct__binder__content_parser_lean_parser_has__tokens = _init_l_lean_parser_command_struct__binder__content_parser_lean_parser_has__tokens(); + l_lean_parser_command_struct__binder__content_parser_lean_parser_has__view = _init_l_lean_parser_command_struct__binder__content_parser_lean_parser_has__view(); l_lean_parser_command_struct__binder__content_parser___closed__1 = _init_l_lean_parser_command_struct__binder__content_parser___closed__1(); l_lean_parser_command_struct__explicit__binder__content = _init_l_lean_parser_command_struct__explicit__binder__content(); l_lean_parser_command_struct__explicit__binder__content_has__view_x_27 = _init_l_lean_parser_command_struct__explicit__binder__content_has__view_x_27(); @@ -36227,15 +36227,15 @@ void initialize_init_lean_parser_declaration() { l_lean_parser_command_structure__field__block_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_structure__field__block_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_structure__field__block_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_structure__field__block_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_structure__field__block_has__view = _init_l_lean_parser_command_structure__field__block_has__view(); - l_lean_parser_command_structure__field__block_parser_lean_parser_has__view = _init_l_lean_parser_command_structure__field__block_parser_lean_parser_has__view(); l_lean_parser_command_structure__field__block_parser_lean_parser_has__tokens = _init_l_lean_parser_command_structure__field__block_parser_lean_parser_has__tokens(); + l_lean_parser_command_structure__field__block_parser_lean_parser_has__view = _init_l_lean_parser_command_structure__field__block_parser_lean_parser_has__view(); l_lean_parser_command_structure__field__block_parser___closed__1 = _init_l_lean_parser_command_structure__field__block_parser___closed__1(); l_lean_parser_command_old__univ__params = _init_l_lean_parser_command_old__univ__params(); l_lean_parser_command_old__univ__params_has__view_x_27 = _init_l_lean_parser_command_old__univ__params_has__view_x_27(); l_lean_parser_command_old__univ__params_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_old__univ__params_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_old__univ__params_has__view = _init_l_lean_parser_command_old__univ__params_has__view(); - l_lean_parser_command_old__univ__params_parser_lean_parser_has__view = _init_l_lean_parser_command_old__univ__params_parser_lean_parser_has__view(); l_lean_parser_command_old__univ__params_parser_lean_parser_has__tokens = _init_l_lean_parser_command_old__univ__params_parser_lean_parser_has__tokens(); + l_lean_parser_command_old__univ__params_parser_lean_parser_has__view = _init_l_lean_parser_command_old__univ__params_parser_lean_parser_has__view(); l_lean_parser_command_old__univ__params_parser___closed__1 = _init_l_lean_parser_command_old__univ__params_parser___closed__1(); l_lean_parser_command_univ__params = _init_l_lean_parser_command_univ__params(); l_lean_parser_command_univ__params_has__view_x_27 = _init_l_lean_parser_command_univ__params_has__view_x_27(); @@ -36249,8 +36249,8 @@ void initialize_init_lean_parser_declaration() { l_lean_parser_command_ident__univ__params_has__view_x_27___lambda__1___closed__4 = _init_l_lean_parser_command_ident__univ__params_has__view_x_27___lambda__1___closed__4(); l_lean_parser_command_ident__univ__params_has__view_x_27___lambda__1___closed__5 = _init_l_lean_parser_command_ident__univ__params_has__view_x_27___lambda__1___closed__5(); l_lean_parser_command_ident__univ__params_has__view = _init_l_lean_parser_command_ident__univ__params_has__view(); - l_lean_parser_command_ident__univ__params_parser_lean_parser_has__view = _init_l_lean_parser_command_ident__univ__params_parser_lean_parser_has__view(); l_lean_parser_command_ident__univ__params_parser_lean_parser_has__tokens = _init_l_lean_parser_command_ident__univ__params_parser_lean_parser_has__tokens(); + l_lean_parser_command_ident__univ__params_parser_lean_parser_has__view = _init_l_lean_parser_command_ident__univ__params_parser_lean_parser_has__view(); l_lean_parser_command_ident__univ__params_parser___closed__1 = _init_l_lean_parser_command_ident__univ__params_parser___closed__1(); l_lean_parser_command_structure__kw = _init_l_lean_parser_command_structure__kw(); l_lean_parser_command_structure__kw_has__view_x_27 = _init_l_lean_parser_command_structure__kw_has__view_x_27(); @@ -36278,8 +36278,8 @@ void initialize_init_lean_parser_declaration() { l_lean_parser_command_structure_has__view_x_27___lambda__1___closed__6 = _init_l_lean_parser_command_structure_has__view_x_27___lambda__1___closed__6(); l_lean_parser_command_structure_has__view_x_27___lambda__2___closed__1 = _init_l_lean_parser_command_structure_has__view_x_27___lambda__2___closed__1(); l_lean_parser_command_structure_has__view = _init_l_lean_parser_command_structure_has__view(); - l_lean_parser_command_structure_parser_lean_parser_has__view = _init_l_lean_parser_command_structure_parser_lean_parser_has__view(); l_lean_parser_command_structure_parser_lean_parser_has__tokens = _init_l_lean_parser_command_structure_parser_lean_parser_has__tokens(); + l_lean_parser_command_structure_parser_lean_parser_has__view = _init_l_lean_parser_command_structure_parser_lean_parser_has__view(); l_lean_parser_command_structure_parser___closed__1 = _init_l_lean_parser_command_structure_parser___closed__1(); l_lean_parser_command_def__like_kind = _init_l_lean_parser_command_def__like_kind(); l_lean_parser_command_def__like_kind_has__view_x_27 = _init_l_lean_parser_command_def__like_kind_has__view_x_27(); @@ -36335,7 +36335,7 @@ void initialize_init_lean_parser_declaration() { l_lean_parser_command_declaration_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_declaration_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_declaration_has__view_x_27___lambda__1___closed__3 = _init_l_lean_parser_command_declaration_has__view_x_27___lambda__1___closed__3(); l_lean_parser_command_declaration_has__view = _init_l_lean_parser_command_declaration_has__view(); - l_lean_parser_command_declaration_parser_lean_parser_has__view = _init_l_lean_parser_command_declaration_parser_lean_parser_has__view(); l_lean_parser_command_declaration_parser_lean_parser_has__tokens = _init_l_lean_parser_command_declaration_parser_lean_parser_has__tokens(); + l_lean_parser_command_declaration_parser_lean_parser_has__view = _init_l_lean_parser_command_declaration_parser_lean_parser_has__view(); l_lean_parser_command_declaration_parser___closed__1 = _init_l_lean_parser_command_declaration_parser___closed__1(); } diff --git a/src/boot/init/lean/parser/level.cpp b/src/boot/init/lean/parser/level.cpp index 274bbd09c2..2aecb088f4 100644 --- a/src/boot/init/lean/parser/level.cpp +++ b/src/boot/init/lean/parser/level.cpp @@ -22,7 +22,9 @@ obj* l_lean_parser_trie_match__prefix___rarg(obj*, obj*); obj* l_lean_parser_level_parser_lean_parser_has__view(obj*); obj* l_lean_parser_level__parser_run_lean_parser_has__view(obj*); obj* l_lean_parser_level_app_has__view_x_27___lambda__2(obj*); +obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__2(obj*); extern obj* l_lean_parser_number_has__view_x_27___lambda__2___closed__1; +obj* l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2___rarg(obj*, obj*, obj*); obj* l_lean_parser_trailing__level__parser__m_lean_parser_monad__parsec; obj* l_lean_parser_level_add__lit_parser_lean_parser_has__tokens; obj* l_reader__t_lift___rarg(obj*, obj*); @@ -37,11 +39,13 @@ obj* l_lean_parser_level__parser__m_lean_parser_monad__parsec; extern obj* l_mjoin___rarg___closed__1; extern obj* l_lean_parser_basic__parser__m_monad; obj* l_lean_parser_level_app; +obj* l_lean_parser_number_parser___at_lean_parser_level_add__lit_parser_lean_parser_has__tokens___spec__2(obj*, obj*); obj* l_has__monad__lift__t__refl(obj*, obj*); obj* l_list_mfoldl___main___at_lean_parser_level_paren_parser___spec__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_level_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_level_leading_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_list_cons_tokens___rarg(obj*, obj*); +obj* l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2(obj*); obj* l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_trailing__level__parser__m; obj* l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__2; @@ -50,15 +54,18 @@ obj* l_lean_parser_level_add__lit_parser(obj*, obj*, obj*, obj*, obj*); obj* l_list_reverse___rarg(obj*); extern "C" obj* lean_name_mk_string(obj*, obj*); obj* l_reader__t_alternative___rarg(obj*, obj*); +obj* l_lean_parser_rec__t_recurse___at_lean_parser_level_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_combinators_node___at_lean_parser_level_paren_parser___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_level_parser___closed__1; obj* l_lean_parser_level__parser__m_monad__reader; obj* l_lean_parser_parsec__t_labels__mk__res___rarg(obj*, obj*); obj* l_lean_parser_level_add__lit_has__view_x_27___lambda__1___closed__1; extern obj* l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; +obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_level_trailing_parser_lean_parser_has__tokens; obj* l_lean_parser_level_paren_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_curr__lbp___at_lean_parser_level__parser_run___spec__4(obj*, obj*, obj*, obj*); +obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__4(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_string_quote(obj*); obj* l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_level__parser__coe; @@ -70,17 +77,14 @@ obj* l_lean_parser_level__parser_run_lean_parser_has__tokens(obj*); obj* l_reader__t_monad__functor(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_observing___at_lean_parser_peek__token___spec__2(obj*, obj*, obj*); obj* l_lean_parser_level_app_parser_lean_parser_has__view; -obj* l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2___rarg___closed__1; obj* l_lean_parser_level__parser__m_alternative; obj* l_lean_parser_trailing__level__parser__m_lean_parser_monad__rec; obj* l_lean_parser_level_app_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_trailing__level__parser__m_monad; -obj* l_lean_parser_rec__t_recurse___at_lean_parser_level_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_number_parser___at_lean_parser_level_add__lit_parser_lean_parser_has__view___spec__2___rarg(obj*, obj*, obj*); +obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__5(obj*); obj* l_lean_parser_level_app_parser___closed__1; obj* l_lean_parser_level_parser_lean_parser_has__tokens___closed__1; obj* l_lean_parser_combinators_label_view___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_trailing_parser_lean_parser_has__view___spec__2(obj*); obj* l_lean_parser_try__view___at_lean_parser_number_parser___spec__1(obj*); obj* l_lean_parser_level_add__lit; obj* l_lean_parser_level_paren; @@ -97,9 +101,7 @@ extern obj* l_lean_parser_number_has__view; obj* l_lean_parser_level__parser_run(obj*, obj*, obj*, obj*); extern obj* l_lean_parser_number_has__view_x_27___lambda__2___closed__2; obj* l_lean_parser_level__parser__m_monad; -obj* l_lean_parser_symbol__core___at_lean_parser_level_add__lit_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_level_leading_has__view_x_27___lambda__2___closed__2; -obj* l_lean_parser_symbol__or__ident___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_tokens___rarg(obj*); obj* l_option_get__or__else___main___rarg(obj*, obj*); obj* l_lean_parser_level__parser_run_lean_parser_has__view___closed__1; @@ -107,14 +109,13 @@ obj* l_lean_parser_level_trailing_parser___closed__1; obj* l_lean_parser_syntax_as__node___main(obj*); obj* l_lean_parser_level_add__lit_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_level_trailing; -obj* l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__3(obj*); +obj* l_lean_parser_symbol__or__ident___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_symbol_tokens___rarg(obj*, obj*); obj* l_lean_parser_pratt__parser___at_lean_parser_level__parser_run___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_level_leading_parser_lean_parser_has__view; namespace lean { uint8 nat_dec_eq(obj*, obj*); } -obj* l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__3___rarg(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_error___at_lean_parser_level__parser_run___spec__3___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_level_lean_parser_has__tokens; extern obj* l_lean_parser_basic__parser__m_monad__reader; @@ -124,12 +125,13 @@ obj* l_lean_parser_level_trailing_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_combinators_node___at_lean_parser_level_app_parser___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_trailing__level__parser; obj* l_lean_parser_level__parser__m_lean_parser_monad__basic__parser; -obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__5(obj*); obj* l_lean_parser_level_app_parser_lean_parser_has__view___lambda__1(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_combinators_node_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_level_app_parser_lean_parser_has__tokens; obj* l_lean_parser_level_paren_parser___closed__1; obj* l_lean_parser_trailing__level__parser__m_alternative; +obj* l_lean_parser_symbol__core___at_lean_parser_level_add__lit_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__3(obj*); extern obj* l_lean_parser_finish__comment__block___closed__2; extern obj* l_string_join___closed__1; obj* l_lean_parser_level_leading_parser(obj*, obj*, obj*, obj*); @@ -141,8 +143,8 @@ obj* l_lean_parser_level_app_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_syntax_mk__node(obj*, obj*); obj* l_lean_parser_level_add__lit_parser_lean_parser_has__view; obj* l_lean_parser_level_parser_lean_parser_has__tokens(obj*); -obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__5___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_rec__t_run__parsec___at_lean_parser_detail__ident_parser___spec__1___closed__1; +obj* l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_combinators_recurse_view___rarg(obj*, obj*); obj* l_lean_parser_level_paren_parser_lean_parser_has__view; obj* l_lean_parser_token(obj*, obj*, obj*); @@ -151,14 +153,11 @@ obj* l_lean_parser_monad__parsec__trans___rarg(obj*, obj*, obj*); obj* l_lean_parser_level_add__lit_has__view_x_27; obj* l_lean_parser_level_leading_parser_lean_parser_has__tokens; obj* l_lean_parser_level_trailing_has__view_x_27___lambda__1___closed__2; -obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_curr__lbp___rarg___lambda__3___closed__2; obj* l_lean_parser_level__parser__m_lean_parser_monad__rec; obj* l_lean_parser_substring_to__string(obj*); obj* l_lean_parser_level__parser_run_lean_parser_has__view___closed__3; -obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_trailing_parser_lean_parser_has__view___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_level_paren_parser(obj*, obj*, obj*, obj*); -obj* l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2(obj*); extern "C" uint8 lean_name_dec_eq(obj*, obj*); obj* l_lean_parser_rec__t_recurse___rarg(obj*, obj*, obj*); namespace lean { @@ -170,6 +169,7 @@ extern obj* l_lean_parser_combinators_choice__aux___main___rarg___closed__1; obj* l_lean_parser_level_leading_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_monad__parsec_error___at_lean_parser_level__parser_run___spec__3(obj*); obj* l_lean_parser_level__parser_run_lean_parser_has__view___closed__2; +obj* l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2___rarg___closed__1; namespace lean { obj* string_iterator_remaining(obj*); } @@ -184,13 +184,14 @@ obj* l_lean_parser_level_add__lit_parser___closed__1; obj* l_string_trim(obj*); obj* l_list_mfoldl___main___at_lean_parser_level_app_parser___spec__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_option_get___main___at_lean_parser_run___spec__2(obj*); -obj* l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2___rarg(obj*, obj*, obj*); extern obj* l_lean_parser_curr__lbp___rarg___lambda__3___closed__1; +obj* l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__3___rarg(obj*, obj*, obj*); obj* l_reader__t_monad___rarg(obj*); obj* l_lean_parser_level_leading_has__view_x_27___lambda__1___closed__5; extern "C" obj* lean_name_mk_numeral(obj*, obj*); obj* l_has__monad__lift__t__trans___rarg(obj*, obj*, obj*, obj*); obj* l_lean_parser_level_add__lit_has__view; +obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_level_app_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_rec__t_run___at_lean_parser_level__parser_run___spec__6(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_pratt_1__trailing__loop___main___at_lean_parser_level__parser_run___spec__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); @@ -198,17 +199,17 @@ obj* l_lean_parser_trailing__level__parser__m_lean_parser_monad__basic__parser; obj* l_lean_parser_level_paren_has__view_x_27; obj* l_lean_parser_pratt__parser_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_level_add__lit_has__view_x_27___lambda__1(obj*); -obj* l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_level_trailing_parser_lean_parser_has__view; namespace lean { obj* nat_sub(obj*, obj*); } obj* l_lean_parser_level_app_has__view_x_27; +obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__5___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_number_parser___at_lean_parser_level_add__lit_parser_lean_parser_has__tokens___spec__2___rarg(obj*, obj*, obj*); extern obj* l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2; extern obj* l_lean_parser_basic__parser__m_lean_parser_monad__parsec; obj* l_lean_parser_level_add__lit_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_level_lean_parser_has__view; -obj* l_lean_parser_number_parser___at_lean_parser_level_add__lit_parser_lean_parser_has__view___spec__2(obj*, obj*); obj* l_dlist_singleton___rarg(obj*, obj*); extern obj* l_lean_parser_basic__parser__m_monad__except; obj* l_lean_parser_level_trailing_has__view; @@ -217,9 +218,8 @@ obj* l_list_append___rarg(obj*, obj*); obj* l_lean_parser_level_paren_has__view_x_27___lambda__1(obj*); extern obj* l_lean_parser_number_has__view_x_27___lambda__1___closed__6; obj* l_option_map___rarg(obj*, obj*); -obj* l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__3___rarg___closed__1; obj* l_lean_parser_rec__t_run__parsec___at_lean_parser_level__parser_run___spec__5(obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__4(obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__3___rarg___closed__1; obj* l_lean_parser_monad__rec_trans___rarg(obj*, obj*, obj*, obj*); obj* l_lean_parser_level_leading_parser___closed__1; obj* l_lean_parser_substring_of__string(obj*); @@ -230,6 +230,72 @@ obj* l_lean_parser_level_paren_parser_lean_parser_has__tokens; obj* l_lean_parser_level_trailing_has__view_x_27; obj* l___private_init_lean_parser_rec_1__run__aux___main___rarg(obj*, obj*, obj*, obj*); extern obj* l_lean_parser_raw_view___rarg___lambda__3___closed__1; +obj* _init_l_lean_parser_level__parser__m_monad() { +_start: +{ +obj* x_0; obj* x_2; +x_0 = l_lean_parser_basic__parser__m_monad; +lean::inc(x_0); +x_2 = l_reader__t_monad___rarg(x_0); +return x_2; +} +} +obj* _init_l_lean_parser_level__parser__m_alternative() { +_start: +{ +obj* x_0; obj* x_1; obj* x_4; +x_0 = l_lean_parser_basic__parser__m_monad; +x_1 = l_lean_parser_basic__parser__m_alternative; +lean::inc(x_1); +lean::inc(x_0); +x_4 = l_reader__t_alternative___rarg(x_0, x_1); +return x_4; +} +} +obj* _init_l_lean_parser_level__parser__m_monad__reader() { +_start: +{ +obj* x_0; obj* x_2; +x_0 = l_lean_parser_basic__parser__m_monad__reader; +lean::inc(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___rarg), 2, 1); +lean::closure_set(x_2, 0, x_0); +return x_2; +} +} +obj* _init_l_lean_parser_level__parser__m_lean_parser_monad__parsec() { +_start: +{ +obj* x_0; obj* x_1; obj* x_4; +x_0 = l_lean_parser_basic__parser__m_monad; +x_1 = l_lean_parser_basic__parser__m_lean_parser_monad__parsec; +lean::inc(x_1); +lean::inc(x_0); +x_4 = l_lean_parser_rec__t_lean_parser_monad__parsec___rarg(x_0, lean::box(0), x_1); +return x_4; +} +} +obj* _init_l_lean_parser_level__parser__m_monad__except() { +_start: +{ +obj* x_0; obj* x_2; +x_0 = l_lean_parser_basic__parser__m_monad__except; +lean::inc(x_0); +x_2 = l_reader__t_monad__except___rarg(x_0); +return x_2; +} +} +obj* _init_l_lean_parser_level__parser__m_lean_parser_monad__rec() { +_start: +{ +obj* x_0; obj* x_2; +x_0 = l_lean_parser_basic__parser__m_monad; +lean::inc(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___rarg), 3, 1); +lean::closure_set(x_2, 0, x_0); +return x_2; +} +} obj* _init_l_lean_parser_level__parser__m_lean_parser_monad__basic__parser() { _start: { @@ -248,72 +314,6 @@ lean::closure_set(x_4, 1, x_3); return x_4; } } -obj* _init_l_lean_parser_level__parser__m_lean_parser_monad__rec() { -_start: -{ -obj* x_0; obj* x_2; -x_0 = l_lean_parser_basic__parser__m_monad; -lean::inc(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___rarg), 3, 1); -lean::closure_set(x_2, 0, x_0); -return x_2; -} -} -obj* _init_l_lean_parser_level__parser__m_monad__except() { -_start: -{ -obj* x_0; obj* x_2; -x_0 = l_lean_parser_basic__parser__m_monad__except; -lean::inc(x_0); -x_2 = l_reader__t_monad__except___rarg(x_0); -return x_2; -} -} -obj* _init_l_lean_parser_level__parser__m_lean_parser_monad__parsec() { -_start: -{ -obj* x_0; obj* x_1; obj* x_4; -x_0 = l_lean_parser_basic__parser__m_monad; -x_1 = l_lean_parser_basic__parser__m_lean_parser_monad__parsec; -lean::inc(x_1); -lean::inc(x_0); -x_4 = l_lean_parser_rec__t_lean_parser_monad__parsec___rarg(x_0, lean::box(0), x_1); -return x_4; -} -} -obj* _init_l_lean_parser_level__parser__m_monad__reader() { -_start: -{ -obj* x_0; obj* x_2; -x_0 = l_lean_parser_basic__parser__m_monad__reader; -lean::inc(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___rarg), 2, 1); -lean::closure_set(x_2, 0, x_0); -return x_2; -} -} -obj* _init_l_lean_parser_level__parser__m_alternative() { -_start: -{ -obj* x_0; obj* x_1; obj* x_4; -x_0 = l_lean_parser_basic__parser__m_monad; -x_1 = l_lean_parser_basic__parser__m_alternative; -lean::inc(x_1); -lean::inc(x_0); -x_4 = l_reader__t_alternative___rarg(x_0, x_1); -return x_4; -} -} -obj* _init_l_lean_parser_level__parser__m_monad() { -_start: -{ -obj* x_0; obj* x_2; -x_0 = l_lean_parser_basic__parser__m_monad; -lean::inc(x_0); -x_2 = l_reader__t_monad___rarg(x_0); -return x_2; -} -} obj* _init_l_lean_parser_level__parser__m() { _start: { @@ -332,51 +332,36 @@ lean::inc(x_0); return x_0; } } -obj* _init_l_lean_parser_trailing__level__parser__m_lean_parser_monad__basic__parser() { -_start: -{ -obj* x_0; obj* x_2; obj* x_3; obj* x_5; -x_0 = l_lean_parser_level__parser__m_monad; -lean::inc(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift), 4, 3); -lean::closure_set(x_2, 0, lean::box(0)); -lean::closure_set(x_2, 1, lean::box(0)); -lean::closure_set(x_2, 2, x_0); -x_3 = l_lean_parser_level__parser__m_lean_parser_monad__basic__parser; -lean::inc(x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_has__monad__lift__t__trans___rarg), 4, 2); -lean::closure_set(x_5, 0, x_2); -lean::closure_set(x_5, 1, x_3); -return x_5; -} -} -obj* _init_l_lean_parser_trailing__level__parser__m_lean_parser_monad__rec() { -_start: -{ -obj* x_0; obj* x_2; obj* x_3; obj* x_6; -x_0 = l_lean_parser_level__parser__m_monad; -lean::inc(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift), 4, 3); -lean::closure_set(x_2, 0, lean::box(0)); -lean::closure_set(x_2, 1, lean::box(0)); -lean::closure_set(x_2, 2, x_0); -x_3 = l_lean_parser_level__parser__m_lean_parser_monad__rec; -lean::inc(x_0); -lean::inc(x_3); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__rec_trans___rarg), 4, 3); -lean::closure_set(x_6, 0, x_2); -lean::closure_set(x_6, 1, x_3); -lean::closure_set(x_6, 2, x_0); -return x_6; -} -} -obj* _init_l_lean_parser_trailing__level__parser__m_monad__except() { +obj* _init_l_lean_parser_trailing__level__parser__m_monad() { _start: { obj* x_0; obj* x_2; -x_0 = l_lean_parser_level__parser__m_monad__except; +x_0 = l_lean_parser_level__parser__m_monad; lean::inc(x_0); -x_2 = l_reader__t_monad__except___rarg(x_0); +x_2 = l_reader__t_monad___rarg(x_0); +return x_2; +} +} +obj* _init_l_lean_parser_trailing__level__parser__m_alternative() { +_start: +{ +obj* x_0; obj* x_1; obj* x_4; +x_0 = l_lean_parser_level__parser__m_monad; +x_1 = l_lean_parser_level__parser__m_alternative; +lean::inc(x_1); +lean::inc(x_0); +x_4 = l_reader__t_alternative___rarg(x_0, x_1); +return x_4; +} +} +obj* _init_l_lean_parser_trailing__level__parser__m_monad__reader() { +_start: +{ +obj* x_0; obj* x_2; +x_0 = l_lean_parser_level__parser__m_monad; +lean::inc(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_read___rarg), 2, 1); +lean::closure_set(x_2, 0, x_0); return x_2; } } @@ -404,37 +389,52 @@ x_8 = l_lean_parser_monad__parsec__trans___rarg(x_2, x_5, x_6); return x_8; } } -obj* _init_l_lean_parser_trailing__level__parser__m_monad__reader() { +obj* _init_l_lean_parser_trailing__level__parser__m_monad__except() { _start: { obj* x_0; obj* x_2; -x_0 = l_lean_parser_level__parser__m_monad; +x_0 = l_lean_parser_level__parser__m_monad__except; lean::inc(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_read___rarg), 2, 1); -lean::closure_set(x_2, 0, x_0); +x_2 = l_reader__t_monad__except___rarg(x_0); return x_2; } } -obj* _init_l_lean_parser_trailing__level__parser__m_alternative() { +obj* _init_l_lean_parser_trailing__level__parser__m_lean_parser_monad__rec() { _start: { -obj* x_0; obj* x_1; obj* x_4; +obj* x_0; obj* x_2; obj* x_3; obj* x_6; x_0 = l_lean_parser_level__parser__m_monad; -x_1 = l_lean_parser_level__parser__m_alternative; -lean::inc(x_1); lean::inc(x_0); -x_4 = l_reader__t_alternative___rarg(x_0, x_1); -return x_4; +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift), 4, 3); +lean::closure_set(x_2, 0, lean::box(0)); +lean::closure_set(x_2, 1, lean::box(0)); +lean::closure_set(x_2, 2, x_0); +x_3 = l_lean_parser_level__parser__m_lean_parser_monad__rec; +lean::inc(x_0); +lean::inc(x_3); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__rec_trans___rarg), 4, 3); +lean::closure_set(x_6, 0, x_2); +lean::closure_set(x_6, 1, x_3); +lean::closure_set(x_6, 2, x_0); +return x_6; } } -obj* _init_l_lean_parser_trailing__level__parser__m_monad() { +obj* _init_l_lean_parser_trailing__level__parser__m_lean_parser_monad__basic__parser() { _start: { -obj* x_0; obj* x_2; +obj* x_0; obj* x_2; obj* x_3; obj* x_5; x_0 = l_lean_parser_level__parser__m_monad; lean::inc(x_0); -x_2 = l_reader__t_monad___rarg(x_0); -return x_2; +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift), 4, 3); +lean::closure_set(x_2, 0, lean::box(0)); +lean::closure_set(x_2, 1, lean::box(0)); +lean::closure_set(x_2, 2, x_0); +x_3 = l_lean_parser_level__parser__m_lean_parser_monad__basic__parser; +lean::inc(x_3); +x_5 = lean::alloc_closure(reinterpret_cast(l_has__monad__lift__t__trans___rarg), 4, 2); +lean::closure_set(x_5, 0, x_2); +lean::closure_set(x_5, 1, x_3); +return x_5; } } obj* _init_l_lean_parser_trailing__level__parser__m() { @@ -464,7 +464,7 @@ x_7 = lean::apply_4(x_0, x_2, x_3, x_4, x_5); return x_7; } } -obj* l_lean_parser_rec__t_recurse___at_lean_parser_level_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +obj* l_lean_parser_rec__t_recurse___at_lean_parser_level_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; @@ -494,34 +494,6 @@ lean::cnstr_set(x_14, 1, x_8); return x_14; } } -obj* _init_l_lean_parser_level_parser_lean_parser_has__view___closed__1() { -_start: -{ -obj* x_0; -x_0 = lean::mk_string("universe level"); -return x_0; -} -} -obj* l_lean_parser_level_parser_lean_parser_has__view(obj* x_0) { -_start: -{ -obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_12; -lean::inc(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___at_lean_parser_level_parser_lean_parser_has__view___spec__1), 5, 1); -lean::closure_set(x_2, 0, x_0); -x_3 = l_lean_parser_level__parser__m_lean_parser_monad__rec; -lean::inc(x_3); -x_5 = l_lean_parser_combinators_recurse_view___rarg(x_0, x_3); -x_6 = l_lean_parser_level__parser__m_lean_parser_monad__parsec; -x_7 = l_lean_parser_level__parser__m_alternative; -x_8 = l_lean_parser_level_parser_lean_parser_has__view___closed__1; -lean::inc(x_8); -lean::inc(x_7); -lean::inc(x_6); -x_12 = l_lean_parser_combinators_label_view___rarg(x_6, x_7, x_2, x_8, x_5); -return x_12; -} -} obj* _init_l_lean_parser_level_parser_lean_parser_has__tokens___closed__1() { _start: { @@ -541,6 +513,34 @@ lean::inc(x_2); return x_2; } } +obj* _init_l_lean_parser_level_parser_lean_parser_has__view___closed__1() { +_start: +{ +obj* x_0; +x_0 = lean::mk_string("universe level"); +return x_0; +} +} +obj* l_lean_parser_level_parser_lean_parser_has__view(obj* x_0) { +_start: +{ +obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_12; +lean::inc(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___at_lean_parser_level_parser_lean_parser_has__tokens___spec__1), 5, 1); +lean::closure_set(x_2, 0, x_0); +x_3 = l_lean_parser_level__parser__m_lean_parser_monad__rec; +lean::inc(x_3); +x_5 = l_lean_parser_combinators_recurse_view___rarg(x_0, x_3); +x_6 = l_lean_parser_level__parser__m_lean_parser_monad__parsec; +x_7 = l_lean_parser_level__parser__m_alternative; +x_8 = l_lean_parser_level_parser_lean_parser_has__view___closed__1; +lean::inc(x_8); +lean::inc(x_7); +lean::inc(x_6); +x_12 = l_lean_parser_combinators_label_view___rarg(x_6, x_7, x_2, x_8, x_5); +return x_12; +} +} obj* _init_l_lean_parser_level_parser___closed__1() { _start: { @@ -555,7 +555,7 @@ obj* l_lean_parser_level_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4 _start: { obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; -x_5 = l_lean_parser_rec__t_recurse___at_lean_parser_level_parser_lean_parser_has__view___spec__1(x_0, x_1, x_2, x_3, x_4); +x_5 = l_lean_parser_rec__t_recurse___at_lean_parser_level_parser_lean_parser_has__tokens___spec__1(x_0, x_1, x_2, x_3, x_4); x_6 = lean::cnstr_get(x_5, 0); lean::inc(x_6); x_8 = lean::cnstr_get(x_5, 1); @@ -1248,7 +1248,7 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { +obj* l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { _start: { obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_18; @@ -1525,6 +1525,27 @@ return x_133; } } } +obj* _init_l_lean_parser_level_paren_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_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; +x_0 = lean::mk_string("("); +x_1 = l_lean_parser_max__prec; +lean::inc(x_1); +x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); +x_4 = lean::mk_string(")"); +x_5 = lean::mk_nat_obj(0u); +x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_5); +x_7 = lean::box(0); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_6, x_7); +x_9 = l_lean_parser_level_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_9); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_9, x_8); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_3, x_11); +x_13 = l_lean_parser_tokens___rarg(x_12); +return x_13; +} +} obj* _init_l_lean_parser_level_paren_parser_lean_parser_has__view() { _start: { @@ -1536,7 +1557,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__tokens___spec__1), 7, 3); lean::closure_set(x_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -1549,7 +1570,7 @@ x_11 = l_string_trim(x_10); lean::inc(x_11); x_13 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_13, 0, x_11); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__view___spec__1), 7, 3); +x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__tokens___spec__1), 7, 3); lean::closure_set(x_14, 0, x_11); lean::closure_set(x_14, 1, x_7); lean::closure_set(x_14, 2, x_13); @@ -1579,27 +1600,6 @@ x_31 = l_lean_parser_combinators_node_view___rarg(x_19, x_20, x_21, x_22, x_23, return x_31; } } -obj* _init_l_lean_parser_level_paren_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_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; -x_0 = lean::mk_string("("); -x_1 = l_lean_parser_max__prec; -lean::inc(x_1); -x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); -x_4 = lean::mk_string(")"); -x_5 = lean::mk_nat_obj(0u); -x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_5); -x_7 = lean::box(0); -x_8 = l_lean_parser_list_cons_tokens___rarg(x_6, x_7); -x_9 = l_lean_parser_level_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_9); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_9, x_8); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_3, x_11); -x_13 = l_lean_parser_tokens___rarg(x_12); -return x_13; -} -} obj* l_list_mfoldl___main___at_lean_parser_level_paren_parser___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { _start: { @@ -1998,7 +1998,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__view___spec__1), 7, 3); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__tokens___spec__1), 7, 3); lean::closure_set(x_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -2011,7 +2011,7 @@ x_11 = l_string_trim(x_10); lean::inc(x_11); x_13 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_13, 0, x_11); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__view___spec__1), 7, 3); +x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__tokens___spec__1), 7, 3); lean::closure_set(x_14, 0, x_11); lean::closure_set(x_14, 1, x_7); lean::closure_set(x_14, 2, x_13); @@ -2801,7 +2801,7 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_symbol__or__ident___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +obj* l_lean_parser_symbol__or__ident___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { obj* x_8; obj* x_9; obj* x_11; obj* x_13; @@ -3077,7 +3077,7 @@ return x_114; } } } -obj* _init_l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2___rarg___closed__1() { +obj* _init_l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2___rarg___closed__1() { _start: { obj* x_0; obj* x_1; @@ -3087,7 +3087,7 @@ lean::closure_set(x_1, 0, x_0); return x_1; } } -obj* l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2___rarg(obj* x_0, obj* x_1, obj* x_2) { +obj* l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2___rarg(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_5; obj* x_6; obj* x_8; obj* x_10; @@ -3136,7 +3136,7 @@ x_23 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_23, 0, x_1); x_24 = lean::box(0); x_25 = l_string_join___closed__1; -x_26 = l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2___rarg___closed__1; +x_26 = l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2___rarg___closed__1; lean::inc(x_26); lean::inc(x_25); 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_23, x_24, x_0, x_13, x_8); @@ -3183,7 +3183,7 @@ x_51 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_50); 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_51); -x_55 = l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2___rarg___closed__1; +x_55 = l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2___rarg___closed__1; lean::inc(x_55); x_57 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_54, x_55); x_58 = l_lean_parser_parsec__t_try__mk__res___rarg(x_57); @@ -3223,7 +3223,7 @@ x_67 = x_66; 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_67); -x_71 = l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2___rarg___closed__1; +x_71 = l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2___rarg___closed__1; lean::inc(x_71); x_73 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_70, x_71); x_74 = l_lean_parser_parsec__t_try__mk__res___rarg(x_73); @@ -3238,16 +3238,16 @@ return x_75; } } } -obj* l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2(obj* x_0) { +obj* l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2___rarg), 3, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2___rarg), 3, 0); return x_2; } } -obj* _init_l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__3___rarg___closed__1() { +obj* _init_l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__3___rarg___closed__1() { _start: { obj* x_0; obj* x_1; @@ -3257,7 +3257,7 @@ lean::closure_set(x_1, 0, x_0); return x_1; } } -obj* l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__3___rarg(obj* x_0, obj* x_1, obj* x_2) { +obj* l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__3___rarg(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_5; obj* x_6; obj* x_8; obj* x_10; @@ -3323,7 +3323,7 @@ lean::cnstr_set(x_28, 2, x_26); x_29 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_28); lean::inc(x_26); x_31 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_26, x_29); -x_32 = l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__3___rarg___closed__1; +x_32 = l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__3___rarg___closed__1; lean::inc(x_32); x_34 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_31, x_32); x_35 = l_lean_parser_parsec__t_try__mk__res___rarg(x_34); @@ -3359,7 +3359,7 @@ x_44 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_44, 0, x_1); x_45 = lean::box(0); x_46 = l_string_join___closed__1; -x_47 = l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__3___rarg___closed__1; +x_47 = l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__3___rarg___closed__1; lean::inc(x_47); lean::inc(x_46); x_50 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_46, x_47, x_44, x_45, x_0, x_13, x_8); @@ -3411,7 +3411,7 @@ x_71 = x_70; 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_71); -x_75 = l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__3___rarg___closed__1; +x_75 = l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__3___rarg___closed__1; lean::inc(x_75); x_77 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_74, x_75); x_78 = l_lean_parser_parsec__t_try__mk__res___rarg(x_77); @@ -3426,16 +3426,16 @@ return x_79; } } } -obj* l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__3(obj* x_0) { +obj* l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__3(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__3___rarg), 3, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__3___rarg), 3, 0); return x_2; } } -obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__5___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__5___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { _start: { obj* x_10; obj* x_11; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; @@ -3458,16 +3458,16 @@ lean::cnstr_set(x_15, 1, x_7); return x_15; } } -obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__5(obj* x_0) { +obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__5(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_error___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__5___rarg), 8, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_error___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__5___rarg), 8, 0); return x_2; } } -obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { if (lean::obj_tag(x_0) == 0) @@ -3481,7 +3481,7 @@ 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_leading_parser_lean_parser_has__view___spec__5___rarg(x_9, x_10, x_8, x_8, x_2, x_3, x_4, x_5); +x_14 = l_lean_parser_monad__parsec_error___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__5___rarg(x_9, x_10, x_8, x_8, x_2, x_3, x_4, x_5); return x_14; } else @@ -3585,7 +3585,7 @@ if (x_56 == 0) { obj* x_58; obj* x_59; obj* x_61; obj* x_64; obj* x_65; lean::dec(x_47); -x_58 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__4(x_17, x_30, x_2, x_3, x_4, x_26); +x_58 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__4(x_17, x_30, x_2, x_3, x_4, x_26); x_59 = lean::cnstr_get(x_58, 0); lean::inc(x_59); x_61 = lean::cnstr_get(x_58, 1); @@ -3640,7 +3640,7 @@ if (x_77 == 0) { obj* x_80; obj* x_81; obj* x_83; obj* x_86; obj* x_87; lean::dec(x_78); -x_80 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__4(x_17, x_30, x_2, x_3, x_4, x_26); +x_80 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__4(x_17, x_30, x_2, x_3, x_4, x_26); x_81 = lean::cnstr_get(x_80, 0); lean::inc(x_81); x_83 = lean::cnstr_get(x_80, 1); @@ -3685,73 +3685,6 @@ return x_95; } } } -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; -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__view___spec__1), 5, 1); -lean::closure_set(x_1, 0, x_0); -x_2 = lean::mk_string("imax"); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__1), 5, 1); -lean::closure_set(x_3, 0, x_2); -x_4 = lean::mk_string("_"); -x_5 = l_string_trim(x_4); -lean::inc(x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_7, 0, x_5); -x_8 = l_lean_parser_max__prec; -lean::inc(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__view___spec__1), 7, 3); -lean::closure_set(x_10, 0, x_5); -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__view___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__view___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_18 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_18, 0, x_17); -lean::cnstr_set(x_18, 1, x_16); -x_19 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_19, 0, x_10); -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, 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__view___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); -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; -} -} obj* _init_l_lean_parser_level_leading_parser_lean_parser_has__tokens() { _start: { @@ -3780,15 +3713,15 @@ x_20 = l_lean_parser_tokens___rarg(x_19); return x_20; } } -obj* _init_l_lean_parser_level_leading_parser___closed__1() { +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_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; 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__view___spec__1), 5, 1); +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); x_2 = lean::mk_string("imax"); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__1), 5, 1); +x_3 = 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_3, 0, x_2); x_4 = lean::mk_string("_"); x_5 = l_string_trim(x_4); @@ -3797,17 +3730,17 @@ x_7 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_7, 0, x_5); x_8 = l_lean_parser_max__prec; lean::inc(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__view___spec__1), 7, 3); +x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__tokens___spec__1), 7, 3); lean::closure_set(x_10, 0, x_5); 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__view___spec__3), 1, 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__view___spec__2), 1, 0); +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); @@ -3825,7 +3758,74 @@ 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__view___spec__4), 6, 2); +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); +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; +} +} +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; +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); +x_2 = lean::mk_string("imax"); +x_3 = 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_3, 0, x_2); +x_4 = lean::mk_string("_"); +x_5 = l_string_trim(x_4); +lean::inc(x_5); +x_7 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_7, 0, x_5); +x_8 = l_lean_parser_max__prec; +lean::inc(x_8); +x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_paren_parser_lean_parser_has__tokens___spec__1), 7, 3); +lean::closure_set(x_10, 0, x_5); +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_18 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_18, 0, x_17); +lean::cnstr_set(x_18, 1, x_16); +x_19 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_19, 0, x_10); +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, 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); @@ -3995,6 +3995,22 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_level_app_parser_lean_parser_has__tokens() { +_start: +{ +obj* x_0; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; +x_0 = l_lean_parser_level_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_0); +x_2 = l_lean_parser_tokens___rarg(x_0); +x_3 = lean::box(0); +x_4 = l_lean_parser_list_cons_tokens___rarg(x_2, x_3); +x_5 = l_lean_parser_level_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); +return x_8; +} +} obj* _init_l_lean_parser_level_app_parser_lean_parser_has__view() { _start: { @@ -4035,22 +4051,6 @@ x_8 = l_lean_parser_level_parser(x_6, x_1, x_2, x_3, x_4); return x_8; } } -obj* _init_l_lean_parser_level_app_parser_lean_parser_has__tokens() { -_start: -{ -obj* x_0; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; -x_0 = l_lean_parser_level_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_0); -x_2 = l_lean_parser_tokens___rarg(x_0); -x_3 = lean::box(0); -x_4 = l_lean_parser_list_cons_tokens___rarg(x_2, x_3); -x_5 = l_lean_parser_level_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); -return x_8; -} -} obj* l_list_mfoldl___main___at_lean_parser_level_app_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) { _start: { @@ -4947,7 +4947,7 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_symbol__core___at_lean_parser_level_add__lit_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* l_lean_parser_symbol__core___at_lean_parser_level_add__lit_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { _start: { obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_20; @@ -5225,7 +5225,7 @@ return x_135; } } } -obj* l_lean_parser_number_parser___at_lean_parser_level_add__lit_parser_lean_parser_has__view___spec__2___rarg(obj* x_0, obj* x_1, obj* x_2) { +obj* l_lean_parser_number_parser___at_lean_parser_level_add__lit_parser_lean_parser_has__tokens___spec__2___rarg(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_5; obj* x_6; obj* x_8; obj* x_10; @@ -5274,7 +5274,7 @@ x_23 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_23, 0, x_1); x_24 = lean::box(0); x_25 = l_string_join___closed__1; -x_26 = l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2___rarg___closed__1; +x_26 = l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2___rarg___closed__1; lean::inc(x_26); lean::inc(x_25); 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_23, x_24, x_0, x_13, x_8); @@ -5321,7 +5321,7 @@ x_51 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_50); 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_51); -x_55 = l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2___rarg___closed__1; +x_55 = l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2___rarg___closed__1; lean::inc(x_55); x_57 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_54, x_55); x_58 = l_lean_parser_parsec__t_try__mk__res___rarg(x_57); @@ -5361,7 +5361,7 @@ x_67 = x_66; 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_67); -x_71 = l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2___rarg___closed__1; +x_71 = l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2___rarg___closed__1; lean::inc(x_71); x_73 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_70, x_71); x_74 = l_lean_parser_parsec__t_try__mk__res___rarg(x_73); @@ -5376,16 +5376,34 @@ return x_75; } } } -obj* l_lean_parser_number_parser___at_lean_parser_level_add__lit_parser_lean_parser_has__view___spec__2(obj* x_0, obj* x_1) { +obj* l_lean_parser_number_parser___at_lean_parser_level_add__lit_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1) { _start: { obj* x_4; lean::dec(x_1); lean::dec(x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_level_add__lit_parser_lean_parser_has__view___spec__2___rarg), 3, 0); +x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_level_add__lit_parser_lean_parser_has__tokens___spec__2___rarg), 3, 0); 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; +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; +} +} obj* _init_l_lean_parser_level_add__lit_parser_lean_parser_has__view() { _start: { @@ -5396,12 +5414,12 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_add__lit_parser_lean_parser_has__view___spec__1), 8, 3); +x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_add__lit_parser_lean_parser_has__tokens___spec__1), 8, 3); lean::closure_set(x_5, 0, x_1); 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_number_parser___at_lean_parser_level_add__lit_parser_lean_parser_has__view___spec__2), 2, 0); +x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_level_add__lit_parser_lean_parser_has__tokens___spec__2), 2, 0); x_8 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_8, 0, x_7); lean::cnstr_set(x_8, 1, x_6); @@ -5428,24 +5446,6 @@ x_24 = l_lean_parser_combinators_node_view___rarg(x_12, x_13, x_14, x_15, x_16, return x_24; } } -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; -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; -} -} obj* _init_l_lean_parser_level_add__lit_parser___closed__1() { _start: { @@ -5456,12 +5456,12 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_add__lit_parser_lean_parser_has__view___spec__1), 8, 3); +x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_level_add__lit_parser_lean_parser_has__tokens___spec__1), 8, 3); lean::closure_set(x_5, 0, x_1); 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_number_parser___at_lean_parser_level_add__lit_parser_lean_parser_has__view___spec__2), 2, 0); +x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_level_add__lit_parser_lean_parser_has__tokens___spec__2), 2, 0); x_8 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_8, 0, x_7); lean::cnstr_set(x_8, 1, x_6); @@ -5841,7 +5841,7 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_trailing_parser_lean_parser_has__view___spec__2___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8) { +obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__2___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8) { _start: { obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; @@ -5865,16 +5865,16 @@ lean::cnstr_set(x_17, 1, x_8); return x_17; } } -obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_trailing_parser_lean_parser_has__view___spec__2(obj* x_0) { +obj* l_lean_parser_monad__parsec_error___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__2(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_error___at_lean_parser_level_trailing_parser_lean_parser_has__view___spec__2___rarg), 9, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_error___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__2___rarg), 9, 0); return x_2; } } -obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { +obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { _start: { if (lean::obj_tag(x_0) == 0) @@ -5888,7 +5888,7 @@ 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_level_trailing_parser_lean_parser_has__view___spec__2___rarg(x_10, x_11, x_9, x_9, x_2, x_3, x_4, x_5, x_6); +x_15 = l_lean_parser_monad__parsec_error___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__2___rarg(x_10, x_11, x_9, x_9, x_2, x_3, x_4, x_5, x_6); return x_15; } else @@ -5994,7 +5994,7 @@ if (x_59 == 0) { obj* x_61; obj* x_62; obj* x_64; obj* x_67; obj* x_68; lean::dec(x_49); -x_61 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__view___spec__1(x_18, x_32, x_2, x_3, x_4, x_5, x_28); +x_61 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__1(x_18, x_32, x_2, x_3, x_4, x_5, x_28); x_62 = lean::cnstr_get(x_61, 0); lean::inc(x_62); x_64 = lean::cnstr_get(x_61, 1); @@ -6050,7 +6050,7 @@ if (x_81 == 0) { obj* x_84; obj* x_85; obj* x_87; obj* x_90; obj* x_91; lean::dec(x_82); -x_84 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__view___spec__1(x_18, x_32, x_2, x_3, x_4, x_5, x_28); +x_84 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_level_trailing_parser_lean_parser_has__tokens___spec__1(x_18, x_32, x_2, x_3, x_4, x_5, x_28); x_85 = lean::cnstr_get(x_84, 0); lean::inc(x_85); x_87 = lean::cnstr_get(x_84, 1); @@ -6096,6 +6096,24 @@ return x_100; } } } +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; +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; +} +} obj* _init_l_lean_parser_level_trailing_parser_lean_parser_has__view() { _start: { @@ -6111,7 +6129,7 @@ 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__view___spec__1), 7, 2); +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); @@ -6133,24 +6151,6 @@ x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x return x_21; } } -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; -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; -} -} obj* _init_l_lean_parser_level_trailing_parser___closed__1() { _start: { @@ -6166,7 +6166,7 @@ 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__view___spec__1), 7, 2); +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); @@ -6187,6 +6187,19 @@ x_9 = l_lean_parser_combinators_node___at_lean_parser_level_app_parser___spec__1 return x_9; } } +obj* l_lean_parser_level__parser_run_lean_parser_has__tokens(obj* x_0) { +_start: +{ +obj* x_2; obj* x_3; obj* x_6; +lean::dec(x_0); +x_2 = l_lean_parser_level_leading_parser_lean_parser_has__tokens; +x_3 = l_lean_parser_level_trailing_parser_lean_parser_has__tokens; +lean::inc(x_3); +lean::inc(x_2); +x_6 = l_list_append___rarg(x_2, x_3); +return x_6; +} +} obj* _init_l_lean_parser_level__parser_run_lean_parser_has__view___closed__1() { _start: { @@ -6236,19 +6249,6 @@ x_17 = l_lean_parser_pratt__parser_view___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7 return x_17; } } -obj* l_lean_parser_level__parser_run_lean_parser_has__tokens(obj* x_0) { -_start: -{ -obj* x_2; obj* x_3; obj* x_6; -lean::dec(x_0); -x_2 = l_lean_parser_level_leading_parser_lean_parser_has__tokens; -x_3 = l_lean_parser_level_trailing_parser_lean_parser_has__tokens; -lean::inc(x_3); -lean::inc(x_2); -x_6 = l_list_append___rarg(x_2, x_3); -return x_6; -} -} obj* l_lean_parser_monad__parsec_error___at_lean_parser_level__parser_run___spec__3___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { _start: { @@ -7017,26 +7017,26 @@ void initialize_init_lean_parser_level() { if (_G_initialized) return; _G_initialized = true; initialize_init_lean_parser_pratt(); - l_lean_parser_level__parser__m_lean_parser_monad__basic__parser = _init_l_lean_parser_level__parser__m_lean_parser_monad__basic__parser(); - l_lean_parser_level__parser__m_lean_parser_monad__rec = _init_l_lean_parser_level__parser__m_lean_parser_monad__rec(); - l_lean_parser_level__parser__m_monad__except = _init_l_lean_parser_level__parser__m_monad__except(); - l_lean_parser_level__parser__m_lean_parser_monad__parsec = _init_l_lean_parser_level__parser__m_lean_parser_monad__parsec(); - l_lean_parser_level__parser__m_monad__reader = _init_l_lean_parser_level__parser__m_monad__reader(); - l_lean_parser_level__parser__m_alternative = _init_l_lean_parser_level__parser__m_alternative(); l_lean_parser_level__parser__m_monad = _init_l_lean_parser_level__parser__m_monad(); + l_lean_parser_level__parser__m_alternative = _init_l_lean_parser_level__parser__m_alternative(); + l_lean_parser_level__parser__m_monad__reader = _init_l_lean_parser_level__parser__m_monad__reader(); + l_lean_parser_level__parser__m_lean_parser_monad__parsec = _init_l_lean_parser_level__parser__m_lean_parser_monad__parsec(); + l_lean_parser_level__parser__m_monad__except = _init_l_lean_parser_level__parser__m_monad__except(); + l_lean_parser_level__parser__m_lean_parser_monad__rec = _init_l_lean_parser_level__parser__m_lean_parser_monad__rec(); + l_lean_parser_level__parser__m_lean_parser_monad__basic__parser = _init_l_lean_parser_level__parser__m_lean_parser_monad__basic__parser(); l_lean_parser_level__parser__m = _init_l_lean_parser_level__parser__m(); l_lean_parser_level__parser = _init_l_lean_parser_level__parser(); - l_lean_parser_trailing__level__parser__m_lean_parser_monad__basic__parser = _init_l_lean_parser_trailing__level__parser__m_lean_parser_monad__basic__parser(); - l_lean_parser_trailing__level__parser__m_lean_parser_monad__rec = _init_l_lean_parser_trailing__level__parser__m_lean_parser_monad__rec(); - l_lean_parser_trailing__level__parser__m_monad__except = _init_l_lean_parser_trailing__level__parser__m_monad__except(); - l_lean_parser_trailing__level__parser__m_lean_parser_monad__parsec = _init_l_lean_parser_trailing__level__parser__m_lean_parser_monad__parsec(); - l_lean_parser_trailing__level__parser__m_monad__reader = _init_l_lean_parser_trailing__level__parser__m_monad__reader(); - l_lean_parser_trailing__level__parser__m_alternative = _init_l_lean_parser_trailing__level__parser__m_alternative(); l_lean_parser_trailing__level__parser__m_monad = _init_l_lean_parser_trailing__level__parser__m_monad(); + l_lean_parser_trailing__level__parser__m_alternative = _init_l_lean_parser_trailing__level__parser__m_alternative(); + l_lean_parser_trailing__level__parser__m_monad__reader = _init_l_lean_parser_trailing__level__parser__m_monad__reader(); + l_lean_parser_trailing__level__parser__m_lean_parser_monad__parsec = _init_l_lean_parser_trailing__level__parser__m_lean_parser_monad__parsec(); + l_lean_parser_trailing__level__parser__m_monad__except = _init_l_lean_parser_trailing__level__parser__m_monad__except(); + l_lean_parser_trailing__level__parser__m_lean_parser_monad__rec = _init_l_lean_parser_trailing__level__parser__m_lean_parser_monad__rec(); + l_lean_parser_trailing__level__parser__m_lean_parser_monad__basic__parser = _init_l_lean_parser_trailing__level__parser__m_lean_parser_monad__basic__parser(); l_lean_parser_trailing__level__parser__m = _init_l_lean_parser_trailing__level__parser__m(); l_lean_parser_trailing__level__parser = _init_l_lean_parser_trailing__level__parser(); - l_lean_parser_level_parser_lean_parser_has__view___closed__1 = _init_l_lean_parser_level_parser_lean_parser_has__view___closed__1(); l_lean_parser_level_parser_lean_parser_has__tokens___closed__1 = _init_l_lean_parser_level_parser_lean_parser_has__tokens___closed__1(); + l_lean_parser_level_parser_lean_parser_has__view___closed__1 = _init_l_lean_parser_level_parser_lean_parser_has__view___closed__1(); l_lean_parser_level_parser___closed__1 = _init_l_lean_parser_level_parser___closed__1(); l_lean_parser_level_lean_parser_has__tokens = _init_l_lean_parser_level_lean_parser_has__tokens(); l_lean_parser_level_lean_parser_has__view = _init_l_lean_parser_level_lean_parser_has__view(); @@ -7044,8 +7044,8 @@ void initialize_init_lean_parser_level() { l_lean_parser_level_paren_has__view_x_27 = _init_l_lean_parser_level_paren_has__view_x_27(); l_lean_parser_level_paren_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_level_paren_has__view_x_27___lambda__1___closed__1(); l_lean_parser_level_paren_has__view = _init_l_lean_parser_level_paren_has__view(); - l_lean_parser_level_paren_parser_lean_parser_has__view = _init_l_lean_parser_level_paren_parser_lean_parser_has__view(); l_lean_parser_level_paren_parser_lean_parser_has__tokens = _init_l_lean_parser_level_paren_parser_lean_parser_has__tokens(); + l_lean_parser_level_paren_parser_lean_parser_has__view = _init_l_lean_parser_level_paren_parser_lean_parser_has__view(); l_lean_parser_level_paren_parser___closed__1 = _init_l_lean_parser_level_paren_parser___closed__1(); l_lean_parser_level_leading = _init_l_lean_parser_level_leading(); l_lean_parser_level_leading_has__view_x_27 = _init_l_lean_parser_level_leading_has__view_x_27(); @@ -7057,33 +7057,33 @@ void initialize_init_lean_parser_level() { l_lean_parser_level_leading_has__view_x_27___lambda__2___closed__1 = _init_l_lean_parser_level_leading_has__view_x_27___lambda__2___closed__1(); l_lean_parser_level_leading_has__view_x_27___lambda__2___closed__2 = _init_l_lean_parser_level_leading_has__view_x_27___lambda__2___closed__2(); l_lean_parser_level_leading_has__view = _init_l_lean_parser_level_leading_has__view(); - l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2___rarg___closed__1 = _init_l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__2___rarg___closed__1(); - l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__3___rarg___closed__1 = _init_l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__view___spec__3___rarg___closed__1(); - l_lean_parser_level_leading_parser_lean_parser_has__view = _init_l_lean_parser_level_leading_parser_lean_parser_has__view(); + l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2___rarg___closed__1 = _init_l_lean_parser_number_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__2___rarg___closed__1(); + l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__3___rarg___closed__1 = _init_l_lean_parser_ident_parser___at_lean_parser_level_leading_parser_lean_parser_has__tokens___spec__3___rarg___closed__1(); l_lean_parser_level_leading_parser_lean_parser_has__tokens = _init_l_lean_parser_level_leading_parser_lean_parser_has__tokens(); + l_lean_parser_level_leading_parser_lean_parser_has__view = _init_l_lean_parser_level_leading_parser_lean_parser_has__view(); l_lean_parser_level_leading_parser___closed__1 = _init_l_lean_parser_level_leading_parser___closed__1(); l_lean_parser_level_app = _init_l_lean_parser_level_app(); l_lean_parser_level_app_has__view_x_27 = _init_l_lean_parser_level_app_has__view_x_27(); l_lean_parser_level_app_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_level_app_has__view_x_27___lambda__1___closed__1(); l_lean_parser_level_app_has__view = _init_l_lean_parser_level_app_has__view(); - l_lean_parser_level_app_parser_lean_parser_has__view = _init_l_lean_parser_level_app_parser_lean_parser_has__view(); l_lean_parser_level_app_parser_lean_parser_has__tokens = _init_l_lean_parser_level_app_parser_lean_parser_has__tokens(); + l_lean_parser_level_app_parser_lean_parser_has__view = _init_l_lean_parser_level_app_parser_lean_parser_has__view(); l_lean_parser_level_app_parser___closed__1 = _init_l_lean_parser_level_app_parser___closed__1(); l_lean_parser_level_add__lit = _init_l_lean_parser_level_add__lit(); l_lean_parser_level_add__lit_has__view_x_27 = _init_l_lean_parser_level_add__lit_has__view_x_27(); l_lean_parser_level_add__lit_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_level_add__lit_has__view_x_27___lambda__1___closed__1(); l_lean_parser_level_add__lit_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_level_add__lit_has__view_x_27___lambda__1___closed__2(); l_lean_parser_level_add__lit_has__view = _init_l_lean_parser_level_add__lit_has__view(); - l_lean_parser_level_add__lit_parser_lean_parser_has__view = _init_l_lean_parser_level_add__lit_parser_lean_parser_has__view(); l_lean_parser_level_add__lit_parser_lean_parser_has__tokens = _init_l_lean_parser_level_add__lit_parser_lean_parser_has__tokens(); + l_lean_parser_level_add__lit_parser_lean_parser_has__view = _init_l_lean_parser_level_add__lit_parser_lean_parser_has__view(); l_lean_parser_level_add__lit_parser___closed__1 = _init_l_lean_parser_level_add__lit_parser___closed__1(); l_lean_parser_level_trailing = _init_l_lean_parser_level_trailing(); l_lean_parser_level_trailing_has__view_x_27 = _init_l_lean_parser_level_trailing_has__view_x_27(); l_lean_parser_level_trailing_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_level_trailing_has__view_x_27___lambda__1___closed__1(); l_lean_parser_level_trailing_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_level_trailing_has__view_x_27___lambda__1___closed__2(); l_lean_parser_level_trailing_has__view = _init_l_lean_parser_level_trailing_has__view(); - l_lean_parser_level_trailing_parser_lean_parser_has__view = _init_l_lean_parser_level_trailing_parser_lean_parser_has__view(); l_lean_parser_level_trailing_parser_lean_parser_has__tokens = _init_l_lean_parser_level_trailing_parser_lean_parser_has__tokens(); + l_lean_parser_level_trailing_parser_lean_parser_has__view = _init_l_lean_parser_level_trailing_parser_lean_parser_has__view(); l_lean_parser_level_trailing_parser___closed__1 = _init_l_lean_parser_level_trailing_parser___closed__1(); l_lean_parser_level__parser_run_lean_parser_has__view___closed__1 = _init_l_lean_parser_level__parser_run_lean_parser_has__view___closed__1(); l_lean_parser_level__parser_run_lean_parser_has__view___closed__2 = _init_l_lean_parser_level__parser_run_lean_parser_has__view___closed__2(); diff --git a/src/boot/init/lean/parser/module.cpp b/src/boot/init/lean/parser/module.cpp index fa2186fc34..51be2440af 100644 --- a/src/boot/init/lean/parser/module.cpp +++ b/src/boot/init/lean/parser/module.cpp @@ -32,6 +32,7 @@ obj* l_lean_parser_monad__parsec_str__core___at___private_init_lean_parser_token obj* l___private_init_lean_parser_module_1__commands__aux___main___lambda__12(obj*); obj* l_lean_parser_module_commands_parser_has__view___lambda__2(obj*); obj* l_coe__trans___rarg(obj*, obj*, obj*); +extern obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; extern obj* l_lean_parser_combinators_many___rarg___closed__1; obj* l___private_init_lean_parser_module_1__commands__aux___main___lambda__15___boxed(obj*, obj*); obj* l_lean_parser_module_yield__command___lambda__8(obj*, obj*, obj*, obj*); @@ -77,6 +78,7 @@ obj* l_string_quote(obj*); extern obj* l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; obj* l_lean_parser_module_header_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_log__message___at___private_init_lean_parser_module_1__commands__aux___main___spec__4___lambda__2(obj*, obj*); +obj* l_lean_parser_combinators_many___at_lean_parser_module_import__path_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*); namespace lean { obj* string_iterator_next(obj*); } @@ -101,7 +103,6 @@ obj* l_lean_parser_module_yield__command___lambda__2(obj*, obj*, obj*, obj*); obj* l_lean_parser_module_parser(obj*, obj*, obj*); extern obj* l_lean_name_to__string___closed__1; obj* l_lean_parser_module__parser__m_lift__parser__t___rarg___lambda__3(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_combinators_optional___at_lean_parser_module_header_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*); extern obj* l_lean_parser_command_parser___rarg___closed__1; obj* l_lean_parser_monad__parsec_any___at___private_init_lean_parser_module_1__commands__aux___main___spec__3___closed__1; namespace lean { @@ -127,11 +128,9 @@ namespace lean { obj* string_iterator_to_end(obj*); } obj* l_lean_parser_module_prelude_has__view; -obj* l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*); obj* l_lean_parser_tokens___rarg(obj*); extern obj* l_lean_parser_command_parser_lean_parser_has__tokens; obj* l_option_get__or__else___main___rarg(obj*, obj*); -obj* l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_module_header; extern obj* l_lean_parser_no__kind; obj* l_lean_parser_syntax_as__node___main(obj*); @@ -164,8 +163,8 @@ obj* l___private_init_lean_parser_module_1__commands__aux___main___lambda__11___ obj* l_state__t_monad__functor(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_module_yield__command(obj*, obj*, obj*, obj*); obj* l_lean_parser_command__parser_run(obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_combinators_node_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_combinators_many___at_lean_parser_module_import__path_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*); extern obj* l_lean_parser_finish__comment__block___closed__2; extern obj* l_string_join___closed__1; obj* l_lean_parser_monad__parsec_any___at___private_init_lean_parser_module_1__commands__aux___main___spec__3(obj*, obj*, obj*); @@ -174,6 +173,7 @@ obj* l___private_init_lean_parser_module_1__commands__aux___main___lambda__13___ obj* l___private_init_lean_parser_module_1__commands__aux___main___lambda__19(obj*, obj*, obj*, uint8, obj*, obj*); extern obj* l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; obj* l___private_init_lean_parser_module_1__commands__aux___main___lambda__8(obj*, obj*); +obj* l_lean_parser_ident_parser___at_lean_parser_module_import__path_parser_lean_parser_has__view___spec__2(obj*, obj*, obj*); obj* l_lean_parser_module_yield__command___lambda__3(obj*, obj*); obj* l_lean_parser_syntax_mk__node(obj*, obj*); obj* l___private_init_lean_parser_module_1__commands__aux___main___lambda__17___boxed(obj*, obj*, obj*); @@ -181,6 +181,7 @@ obj* l_lean_parser_module_import__path_parser_lean_parser_has__view___lambda__1( obj* l_lean_parser_command__parser__config__coe__parser__config(obj*); obj* l_lean_parser_module_commands_tokens; obj* l_lean_parser_module__parser__m_basic__parser__m___closed__1; +obj* l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*); obj* l_state__t_monad__except___rarg(obj*, obj*, obj*); obj* l_lean_parser_token(obj*, obj*, obj*); obj* l_lean_parser_whitespace(obj*, obj*, obj*); @@ -194,13 +195,14 @@ obj* string_iterator_offset(obj*); obj* l_lean_parser_module_import_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_module_parser___lambda__7(obj*, obj*); obj* l_state__t_monad___rarg(obj*); +obj* l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_module_header_parser_lean_parser_has__tokens; -obj* l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_module__parser__m_lift__parser__t___rarg___lambda__2(obj*, obj*); obj* l___private_init_lean_parser_module_1__commands__aux___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_module_commands_parser_has__view___lambda__1(obj*); obj* l_lean_parser_module_yield__command___lambda__9(obj*, obj*, obj*); extern obj* l_coroutine_monad___closed__1; +obj* l_lean_parser_combinators_optional___at_lean_parser_module_header_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*); obj* l_lean_parser_module_header_has__view; obj* l_lean_parser_module_commands_parser_has__view; obj* l___private_init_lean_parser_module_1__commands__aux(uint8, obj*, obj*, obj*, obj*); @@ -230,7 +232,6 @@ obj* l_lean_parser_monad__parsec_eoi___at___private_init_lean_parser_module_1__c obj* l_lean_parser_module_commands_parser___closed__1; obj* l_option_get___main___at_lean_parser_run___spec__2(obj*); obj* l___private_init_lean_parser_module_1__commands__aux___main___lambda__14(obj*, obj*); -extern obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; extern obj* l_lean_parser_ident__univ__spec_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_module_import_parser_lean_parser_has__tokens; obj* l_lean_parser_parser__core__t_lean_parser_monad__parsec___rarg(obj*); @@ -276,7 +277,6 @@ obj* l_lean_parser_module__parser__m; obj* l_coroutine_yield___rarg(obj*, obj*); obj* l_lean_parser_module_header_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_parser__core__t_monad__except___rarg(obj*); -obj* l_lean_parser_ident_parser___at_lean_parser_module_import__path_parser_lean_parser_has__tokens___spec__2(obj*, obj*, obj*); obj* l_list_map___main___at_lean_parser_module_import__path_has__view_x_27___spec__1(obj*); obj* l_lean_parser_substring_of__string(obj*); obj* l___private_init_lean_parser_module_1__commands__aux___main___lambda__11(obj*, obj*); @@ -302,6 +302,104 @@ lean::dec(x_0); return x_1; } } +obj* _init_l_lean_parser_module__parser__m_monad() { +_start: +{ +obj* x_0; obj* x_2; obj* x_3; +x_0 = l_coroutine_monad___closed__1; +lean::inc(x_0); +x_2 = l_lean_parser_parser__core__t_monad___rarg(x_0); +x_3 = l_state__t_monad___rarg(x_2); +return x_3; +} +} +obj* _init_l_lean_parser_module__parser__m_alternative() { +_start: +{ +obj* x_0; obj* x_2; obj* x_4; obj* x_5; +x_0 = l_coroutine_monad___closed__1; +lean::inc(x_0); +x_2 = l_lean_parser_parser__core__t_monad___rarg(x_0); +lean::inc(x_0); +x_4 = l_lean_parser_parser__core__t_alternative___rarg(x_0); +x_5 = l_state__t_alternative___rarg(x_2, x_4); +return x_5; +} +} +obj* _init_l_lean_parser_module__parser__m_monad__reader() { +_start: +{ +obj* x_0; obj* x_2; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; +x_0 = l_coroutine_monad___closed__1; +lean::inc(x_0); +x_2 = l_lean_parser_parser__core__t_monad___rarg(x_0); +lean::inc(x_0); +x_4 = l_state__t_monad___rarg(x_0); +x_5 = lean::alloc_closure(reinterpret_cast(l_coroutine_monad__reader___rarg), 1, 0); +lean::inc(x_0); +x_7 = lean::alloc_closure(reinterpret_cast(l_state__t_lift___rarg), 4, 3); +lean::closure_set(x_7, 0, x_0); +lean::closure_set(x_7, 1, lean::box(0)); +lean::closure_set(x_7, 2, x_5); +x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parsec__t_has__monad__lift___rarg), 5, 4); +lean::closure_set(x_8, 0, x_4); +lean::closure_set(x_8, 1, lean::box(0)); +lean::closure_set(x_8, 2, lean::box(0)); +lean::closure_set(x_8, 3, x_7); +x_9 = lean::alloc_closure(reinterpret_cast(l_state__t_lift___rarg), 4, 3); +lean::closure_set(x_9, 0, x_2); +lean::closure_set(x_9, 1, lean::box(0)); +lean::closure_set(x_9, 2, x_8); +return x_9; +} +} +obj* _init_l_lean_parser_module__parser__m_monad__state() { +_start: +{ +obj* x_0; obj* x_2; obj* x_3; +x_0 = l_coroutine_monad___closed__1; +lean::inc(x_0); +x_2 = l_lean_parser_parser__core__t_monad___rarg(x_0); +x_3 = l_state__t_monad__state___rarg(x_2); +return x_3; +} +} +obj* _init_l_lean_parser_module__parser__m_lean_parser_monad__parsec() { +_start: +{ +obj* x_0; obj* x_2; obj* x_4; obj* x_6; obj* x_8; obj* x_9; +x_0 = l_coroutine_monad___closed__1; +lean::inc(x_0); +x_2 = l_lean_parser_parser__core__t_monad___rarg(x_0); +lean::inc(x_2); +x_4 = lean::alloc_closure(reinterpret_cast(l_state__t_lift___rarg), 4, 1); +lean::closure_set(x_4, 0, x_2); +lean::inc(x_2); +x_6 = lean::alloc_closure(reinterpret_cast(l_state__t_monad__functor), 6, 5); +lean::closure_set(x_6, 0, lean::box(0)); +lean::closure_set(x_6, 1, lean::box(0)); +lean::closure_set(x_6, 2, lean::box(0)); +lean::closure_set(x_6, 3, x_2); +lean::closure_set(x_6, 4, x_2); +lean::inc(x_0); +x_8 = l_lean_parser_parser__core__t_lean_parser_monad__parsec___rarg(x_0); +x_9 = l_lean_parser_monad__parsec__trans___rarg(x_4, x_6, x_8); +return x_9; +} +} +obj* _init_l_lean_parser_module__parser__m_monad__except() { +_start: +{ +obj* x_0; obj* x_2; obj* x_4; obj* x_5; +x_0 = l_coroutine_monad___closed__1; +lean::inc(x_0); +x_2 = l_lean_parser_parser__core__t_monad___rarg(x_0); +lean::inc(x_0); +x_4 = l_lean_parser_parser__core__t_monad__except___rarg(x_0); +x_5 = l_state__t_monad__except___rarg(x_2, lean::box(0), x_4); +return x_5; +} +} obj* _init_l_lean_parser_module__parser__m_monad__coroutine() { _start: { @@ -332,104 +430,6 @@ lean::closure_set(x_12, 1, x_11); return x_12; } } -obj* _init_l_lean_parser_module__parser__m_monad__except() { -_start: -{ -obj* x_0; obj* x_2; obj* x_4; obj* x_5; -x_0 = l_coroutine_monad___closed__1; -lean::inc(x_0); -x_2 = l_lean_parser_parser__core__t_monad___rarg(x_0); -lean::inc(x_0); -x_4 = l_lean_parser_parser__core__t_monad__except___rarg(x_0); -x_5 = l_state__t_monad__except___rarg(x_2, lean::box(0), x_4); -return x_5; -} -} -obj* _init_l_lean_parser_module__parser__m_lean_parser_monad__parsec() { -_start: -{ -obj* x_0; obj* x_2; obj* x_4; obj* x_6; obj* x_8; obj* x_9; -x_0 = l_coroutine_monad___closed__1; -lean::inc(x_0); -x_2 = l_lean_parser_parser__core__t_monad___rarg(x_0); -lean::inc(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_state__t_lift___rarg), 4, 1); -lean::closure_set(x_4, 0, x_2); -lean::inc(x_2); -x_6 = lean::alloc_closure(reinterpret_cast(l_state__t_monad__functor), 6, 5); -lean::closure_set(x_6, 0, lean::box(0)); -lean::closure_set(x_6, 1, lean::box(0)); -lean::closure_set(x_6, 2, lean::box(0)); -lean::closure_set(x_6, 3, x_2); -lean::closure_set(x_6, 4, x_2); -lean::inc(x_0); -x_8 = l_lean_parser_parser__core__t_lean_parser_monad__parsec___rarg(x_0); -x_9 = l_lean_parser_monad__parsec__trans___rarg(x_4, x_6, x_8); -return x_9; -} -} -obj* _init_l_lean_parser_module__parser__m_monad__state() { -_start: -{ -obj* x_0; obj* x_2; obj* x_3; -x_0 = l_coroutine_monad___closed__1; -lean::inc(x_0); -x_2 = l_lean_parser_parser__core__t_monad___rarg(x_0); -x_3 = l_state__t_monad__state___rarg(x_2); -return x_3; -} -} -obj* _init_l_lean_parser_module__parser__m_monad__reader() { -_start: -{ -obj* x_0; obj* x_2; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; -x_0 = l_coroutine_monad___closed__1; -lean::inc(x_0); -x_2 = l_lean_parser_parser__core__t_monad___rarg(x_0); -lean::inc(x_0); -x_4 = l_state__t_monad___rarg(x_0); -x_5 = lean::alloc_closure(reinterpret_cast(l_coroutine_monad__reader___rarg), 1, 0); -lean::inc(x_0); -x_7 = lean::alloc_closure(reinterpret_cast(l_state__t_lift___rarg), 4, 3); -lean::closure_set(x_7, 0, x_0); -lean::closure_set(x_7, 1, lean::box(0)); -lean::closure_set(x_7, 2, x_5); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_parsec__t_has__monad__lift___rarg), 5, 4); -lean::closure_set(x_8, 0, x_4); -lean::closure_set(x_8, 1, lean::box(0)); -lean::closure_set(x_8, 2, lean::box(0)); -lean::closure_set(x_8, 3, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_state__t_lift___rarg), 4, 3); -lean::closure_set(x_9, 0, x_2); -lean::closure_set(x_9, 1, lean::box(0)); -lean::closure_set(x_9, 2, x_8); -return x_9; -} -} -obj* _init_l_lean_parser_module__parser__m_alternative() { -_start: -{ -obj* x_0; obj* x_2; obj* x_4; obj* x_5; -x_0 = l_coroutine_monad___closed__1; -lean::inc(x_0); -x_2 = l_lean_parser_parser__core__t_monad___rarg(x_0); -lean::inc(x_0); -x_4 = l_lean_parser_parser__core__t_alternative___rarg(x_0); -x_5 = l_state__t_alternative___rarg(x_2, x_4); -return x_5; -} -} -obj* _init_l_lean_parser_module__parser__m_monad() { -_start: -{ -obj* x_0; obj* x_2; obj* x_3; -x_0 = l_coroutine_monad___closed__1; -lean::inc(x_0); -x_2 = l_lean_parser_parser__core__t_monad___rarg(x_0); -x_3 = l_state__t_monad___rarg(x_2); -return x_3; -} -} obj* _init_l_lean_parser_module__parser__m() { _start: { @@ -1222,19 +1222,6 @@ lean::inc(x_0); return x_0; } } -obj* _init_l_lean_parser_module_prelude_parser_lean_parser_has__tokens() { -_start: -{ -obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; -x_0 = lean::mk_string("prelude"); -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_list_cons_tokens___rarg(x_2, x_3); -x_5 = l_lean_parser_tokens___rarg(x_4); -return x_5; -} -} obj* _init_l_lean_parser_module_prelude_parser_lean_parser_has__view() { _start: { @@ -1245,7 +1232,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); +x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); lean::closure_set(x_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -1269,6 +1256,19 @@ x_20 = l_lean_parser_combinators_node_view___rarg(x_8, x_9, x_10, x_11, x_12, x_ return x_20; } } +obj* _init_l_lean_parser_module_prelude_parser_lean_parser_has__tokens() { +_start: +{ +obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; +x_0 = lean::mk_string("prelude"); +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_list_cons_tokens___rarg(x_2, x_3); +x_5 = l_lean_parser_tokens___rarg(x_4); +return x_5; +} +} obj* _init_l_lean_parser_module_prelude_parser___closed__1() { _start: { @@ -1279,7 +1279,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); +x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); lean::closure_set(x_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -1298,7 +1298,7 @@ x_3 = l_lean_parser_module_prelude; x_4 = l_lean_parser_module_prelude_parser___closed__1; lean::inc(x_4); lean::inc(x_3); -x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(x_3, x_4, x_0, x_1, x_2); +x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(x_3, x_4, x_0, x_1, x_2); return x_7; } } @@ -1881,12 +1881,12 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_combinators_many___at_lean_parser_module_import__path_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_combinators_many___at_lean_parser_module_import__path_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { obj* x_5; obj* x_6; obj* x_8; obj* x_10; lean::inc(x_2); -x_5 = l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__view___spec__1(x_0, x_1, x_2, x_3); +x_5 = l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens___spec__1(x_0, x_1, x_2, x_3); x_6 = lean::cnstr_get(x_5, 0); lean::inc(x_6); x_8 = lean::cnstr_get(x_5, 1); @@ -1964,7 +1964,7 @@ return x_30; } } } -obj* l_lean_parser_ident_parser___at_lean_parser_module_import__path_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, obj* x_2) { +obj* l_lean_parser_ident_parser___at_lean_parser_module_import__path_parser_lean_parser_has__view___spec__2(obj* x_0, obj* x_1, obj* x_2) { _start: { obj* x_5; obj* x_6; obj* x_8; obj* x_10; @@ -2030,7 +2030,7 @@ lean::cnstr_set(x_28, 2, x_26); x_29 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_15, x_28); lean::inc(x_26); x_31 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_26, x_29); -x_32 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; +x_32 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; lean::inc(x_32); x_34 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_31, x_32); x_35 = l_lean_parser_parsec__t_try__mk__res___rarg(x_34); @@ -2066,7 +2066,7 @@ x_44 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_44, 0, x_1); x_45 = lean::box(0); x_46 = l_string_join___closed__1; -x_47 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; +x_47 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; lean::inc(x_47); lean::inc(x_46); x_50 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_46, x_47, x_44, x_45, x_0, x_13, x_8); @@ -2118,7 +2118,7 @@ x_71 = x_70; 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_71); -x_75 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; +x_75 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; lean::inc(x_75); x_77 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_74, x_75); x_78 = l_lean_parser_parsec__t_try__mk__res___rarg(x_77); @@ -2133,20 +2133,6 @@ return x_79; } } } -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; -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; -} -} obj* _init_l_lean_parser_module_import__path_parser_lean_parser_has__view() { _start: { @@ -2163,10 +2149,10 @@ lean::closure_set(x_5, 0, x_2); x_6 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg), 5, 2); lean::closure_set(x_6, 0, x_4); lean::closure_set(x_6, 1, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_module_import__path_parser_lean_parser_has__tokens___spec__1), 4, 1); +x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_module_import__path_parser_lean_parser_has__view___spec__1), 4, 1); lean::closure_set(x_7, 0, x_6); x_8 = lean::box(0); -x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_module_import__path_parser_lean_parser_has__tokens___spec__2), 3, 0); +x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_module_import__path_parser_lean_parser_has__view___spec__2), 3, 0); x_10 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_8); @@ -2279,6 +2265,20 @@ return x_32; } } } +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; +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; +} +} obj* _init_l_lean_parser_module_import__path_parser___closed__1() { _start: { @@ -2295,10 +2295,10 @@ lean::closure_set(x_5, 0, x_2); x_6 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg), 5, 2); lean::closure_set(x_6, 0, x_4); lean::closure_set(x_6, 1, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_module_import__path_parser_lean_parser_has__tokens___spec__1), 4, 1); +x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_module_import__path_parser_lean_parser_has__view___spec__1), 4, 1); lean::closure_set(x_7, 0, x_6); x_8 = lean::box(0); -x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_module_import__path_parser_lean_parser_has__tokens___spec__2), 3, 0); +x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_module_import__path_parser_lean_parser_has__view___spec__2), 3, 0); x_10 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_10, 0, x_9); lean::cnstr_set(x_10, 1, x_8); @@ -2316,7 +2316,7 @@ x_3 = l_lean_parser_module_import__path; x_4 = l_lean_parser_module_import__path_parser___closed__1; lean::inc(x_4); lean::inc(x_3); -x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(x_3, x_4, x_0, x_1, x_2); +x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(x_3, x_4, x_0, x_1, x_2); return x_7; } } @@ -2702,23 +2702,6 @@ lean::inc(x_0); return x_0; } } -obj* _init_l_lean_parser_module_import_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; -x_0 = lean::mk_string("import"); -x_1 = lean::mk_nat_obj(0u); -x_2 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); -x_3 = l_lean_parser_module_import__path_parser_lean_parser_has__tokens; -lean::inc(x_3); -x_5 = l_lean_parser_tokens___rarg(x_3); -x_6 = lean::box(0); -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); -return x_9; -} -} obj* _init_l_lean_parser_module_import_parser_lean_parser_has__view() { _start: { @@ -2729,12 +2712,12 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); +x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); lean::closure_set(x_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_module_import__path_parser), 3, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__view___spec__1), 4, 1); +x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens___spec__1), 4, 1); lean::closure_set(x_7, 0, x_6); x_8 = lean::box(0); x_9 = lean::alloc_cnstr(1, 2, 0); @@ -2759,6 +2742,23 @@ x_23 = l_lean_parser_combinators_node_view___rarg(x_11, x_12, x_13, x_14, x_15, return x_23; } } +obj* _init_l_lean_parser_module_import_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; +x_0 = lean::mk_string("import"); +x_1 = lean::mk_nat_obj(0u); +x_2 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); +x_3 = l_lean_parser_module_import__path_parser_lean_parser_has__tokens; +lean::inc(x_3); +x_5 = l_lean_parser_tokens___rarg(x_3); +x_6 = lean::box(0); +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); +return x_9; +} +} obj* _init_l_lean_parser_module_import_parser___closed__1() { _start: { @@ -2769,12 +2769,12 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); +x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); lean::closure_set(x_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_module_import__path_parser), 3, 0); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__view___spec__1), 4, 1); +x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens___spec__1), 4, 1); lean::closure_set(x_7, 0, x_6); x_8 = lean::box(0); x_9 = lean::alloc_cnstr(1, 2, 0); @@ -2794,7 +2794,7 @@ x_3 = l_lean_parser_module_import; x_4 = l_lean_parser_module_import_parser___closed__1; lean::inc(x_4); lean::inc(x_3); -x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(x_3, x_4, x_0, x_1, x_2); +x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(x_3, x_4, x_0, x_1, x_2); return x_7; } } @@ -3497,7 +3497,7 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_combinators_optional___at_lean_parser_module_header_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_combinators_optional___at_lean_parser_module_header_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_12; obj* x_13; obj* x_15; @@ -3791,32 +3791,15 @@ goto lbl_6; } } } -obj* _init_l_lean_parser_module_header_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_9; -x_0 = l_lean_parser_module_prelude_parser_lean_parser_has__tokens; -lean::inc(x_0); -x_2 = l_lean_parser_tokens___rarg(x_0); -x_3 = l_lean_parser_module_import_parser_lean_parser_has__tokens; -lean::inc(x_3); -x_5 = l_lean_parser_tokens___rarg(x_3); -x_6 = lean::box(0); -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); -return x_9; -} -} obj* _init_l_lean_parser_module_header_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_12; obj* x_19; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_module_prelude_parser), 3, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_module_header_parser_lean_parser_has__tokens___spec__1), 4, 1); +x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_module_header_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_lean_parser_module_import_parser), 3, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_module_import__path_parser_lean_parser_has__tokens___spec__1), 4, 1); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_module_import__path_parser_lean_parser_has__view___spec__1), 4, 1); lean::closure_set(x_3, 0, x_2); x_4 = lean::box(0); x_5 = lean::alloc_cnstr(1, 2, 0); @@ -3841,15 +3824,32 @@ x_19 = l_lean_parser_combinators_node_view___rarg(x_7, x_8, x_9, x_10, x_11, x_6 return x_19; } } +obj* _init_l_lean_parser_module_header_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_9; +x_0 = l_lean_parser_module_prelude_parser_lean_parser_has__tokens; +lean::inc(x_0); +x_2 = l_lean_parser_tokens___rarg(x_0); +x_3 = l_lean_parser_module_import_parser_lean_parser_has__tokens; +lean::inc(x_3); +x_5 = l_lean_parser_tokens___rarg(x_3); +x_6 = lean::box(0); +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); +return x_9; +} +} obj* _init_l_lean_parser_module_header_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; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_module_prelude_parser), 3, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_module_header_parser_lean_parser_has__tokens___spec__1), 4, 1); +x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_module_header_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_lean_parser_module_import_parser), 3, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_module_import__path_parser_lean_parser_has__tokens___spec__1), 4, 1); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_module_import__path_parser_lean_parser_has__view___spec__1), 4, 1); lean::closure_set(x_3, 0, x_2); x_4 = lean::box(0); x_5 = lean::alloc_cnstr(1, 2, 0); @@ -3869,7 +3869,7 @@ x_3 = l_lean_parser_module_header; x_4 = l_lean_parser_module_header_parser___closed__1; lean::inc(x_4); lean::inc(x_3); -x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(x_3, x_4, x_0, x_1, x_2); +x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(x_3, x_4, x_0, x_1, x_2); return x_7; } } @@ -7258,7 +7258,7 @@ x_10 = l_lean_parser_module_header; x_11 = l_lean_parser_module_header_parser___closed__1; lean::inc(x_11); lean::inc(x_10); -x_14 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(x_10, x_11, x_7, x_0, x_1); +x_14 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(x_10, x_11, x_7, x_0, x_1); x_15 = lean::cnstr_get(x_14, 0); lean::inc(x_15); x_17 = lean::cnstr_get(x_14, 1); @@ -8067,13 +8067,13 @@ void initialize_init_lean_parser_module() { _G_initialized = true; initialize_init_lean_parser_command(); initialize_init_control_coroutine(); - l_lean_parser_module__parser__m_monad__coroutine = _init_l_lean_parser_module__parser__m_monad__coroutine(); - l_lean_parser_module__parser__m_monad__except = _init_l_lean_parser_module__parser__m_monad__except(); - l_lean_parser_module__parser__m_lean_parser_monad__parsec = _init_l_lean_parser_module__parser__m_lean_parser_monad__parsec(); - l_lean_parser_module__parser__m_monad__state = _init_l_lean_parser_module__parser__m_monad__state(); - l_lean_parser_module__parser__m_monad__reader = _init_l_lean_parser_module__parser__m_monad__reader(); - l_lean_parser_module__parser__m_alternative = _init_l_lean_parser_module__parser__m_alternative(); l_lean_parser_module__parser__m_monad = _init_l_lean_parser_module__parser__m_monad(); + l_lean_parser_module__parser__m_alternative = _init_l_lean_parser_module__parser__m_alternative(); + l_lean_parser_module__parser__m_monad__reader = _init_l_lean_parser_module__parser__m_monad__reader(); + l_lean_parser_module__parser__m_monad__state = _init_l_lean_parser_module__parser__m_monad__state(); + l_lean_parser_module__parser__m_lean_parser_monad__parsec = _init_l_lean_parser_module__parser__m_lean_parser_monad__parsec(); + l_lean_parser_module__parser__m_monad__except = _init_l_lean_parser_module__parser__m_monad__except(); + l_lean_parser_module__parser__m_monad__coroutine = _init_l_lean_parser_module__parser__m_monad__coroutine(); l_lean_parser_module__parser__m = _init_l_lean_parser_module__parser__m(); l_lean_parser_module__parser = _init_l_lean_parser_module__parser(); l_lean_parser_module__parser__m_lift__parser__t___rarg___closed__1 = _init_l_lean_parser_module__parser__m_lift__parser__t___rarg___closed__1(); @@ -8082,8 +8082,8 @@ void initialize_init_lean_parser_module() { l_lean_parser_module_prelude = _init_l_lean_parser_module_prelude(); l_lean_parser_module_prelude_has__view_x_27 = _init_l_lean_parser_module_prelude_has__view_x_27(); l_lean_parser_module_prelude_has__view = _init_l_lean_parser_module_prelude_has__view(); - l_lean_parser_module_prelude_parser_lean_parser_has__tokens = _init_l_lean_parser_module_prelude_parser_lean_parser_has__tokens(); l_lean_parser_module_prelude_parser_lean_parser_has__view = _init_l_lean_parser_module_prelude_parser_lean_parser_has__view(); + l_lean_parser_module_prelude_parser_lean_parser_has__tokens = _init_l_lean_parser_module_prelude_parser_lean_parser_has__tokens(); l_lean_parser_module_prelude_parser___closed__1 = _init_l_lean_parser_module_prelude_parser___closed__1(); l_lean_parser_module_import__path = _init_l_lean_parser_module_import__path(); l_lean_parser_module_import__path_has__view_x_27 = _init_l_lean_parser_module_import__path_has__view_x_27(); @@ -8092,8 +8092,8 @@ void initialize_init_lean_parser_module() { l_lean_parser_module_import__path_has__view_x_27___lambda__1___closed__3 = _init_l_lean_parser_module_import__path_has__view_x_27___lambda__1___closed__3(); l_lean_parser_module_import__path_has__view_x_27___lambda__1___closed__4 = _init_l_lean_parser_module_import__path_has__view_x_27___lambda__1___closed__4(); l_lean_parser_module_import__path_has__view = _init_l_lean_parser_module_import__path_has__view(); - l_lean_parser_module_import__path_parser_lean_parser_has__tokens = _init_l_lean_parser_module_import__path_parser_lean_parser_has__tokens(); l_lean_parser_module_import__path_parser_lean_parser_has__view = _init_l_lean_parser_module_import__path_parser_lean_parser_has__view(); + l_lean_parser_module_import__path_parser_lean_parser_has__tokens = _init_l_lean_parser_module_import__path_parser_lean_parser_has__tokens(); l_lean_parser_module_import__path_parser___closed__1 = _init_l_lean_parser_module_import__path_parser___closed__1(); l_lean_parser_module_import = _init_l_lean_parser_module_import(); l_lean_parser_module_import_has__view_x_27 = _init_l_lean_parser_module_import_has__view_x_27(); @@ -8102,8 +8102,8 @@ void initialize_init_lean_parser_module() { l_lean_parser_module_import_has__view_x_27___lambda__1___closed__3 = _init_l_lean_parser_module_import_has__view_x_27___lambda__1___closed__3(); l_lean_parser_module_import_has__view_x_27___lambda__2___closed__1 = _init_l_lean_parser_module_import_has__view_x_27___lambda__2___closed__1(); l_lean_parser_module_import_has__view = _init_l_lean_parser_module_import_has__view(); - l_lean_parser_module_import_parser_lean_parser_has__tokens = _init_l_lean_parser_module_import_parser_lean_parser_has__tokens(); l_lean_parser_module_import_parser_lean_parser_has__view = _init_l_lean_parser_module_import_parser_lean_parser_has__view(); + l_lean_parser_module_import_parser_lean_parser_has__tokens = _init_l_lean_parser_module_import_parser_lean_parser_has__tokens(); l_lean_parser_module_import_parser___closed__1 = _init_l_lean_parser_module_import_parser___closed__1(); l_lean_parser_module_header = _init_l_lean_parser_module_header(); l_lean_parser_module_header_has__view_x_27 = _init_l_lean_parser_module_header_has__view_x_27(); @@ -8115,8 +8115,8 @@ void initialize_init_lean_parser_module() { l_lean_parser_module_header_has__view_x_27___lambda__1___closed__6 = _init_l_lean_parser_module_header_has__view_x_27___lambda__1___closed__6(); l_lean_parser_module_header_has__view_x_27___lambda__2___closed__1 = _init_l_lean_parser_module_header_has__view_x_27___lambda__2___closed__1(); l_lean_parser_module_header_has__view = _init_l_lean_parser_module_header_has__view(); - l_lean_parser_module_header_parser_lean_parser_has__tokens = _init_l_lean_parser_module_header_parser_lean_parser_has__tokens(); l_lean_parser_module_header_parser_lean_parser_has__view = _init_l_lean_parser_module_header_parser_lean_parser_has__view(); + l_lean_parser_module_header_parser_lean_parser_has__tokens = _init_l_lean_parser_module_header_parser_lean_parser_has__tokens(); l_lean_parser_module_header_parser___closed__1 = _init_l_lean_parser_module_header_parser___closed__1(); l_lean_parser_monad__parsec_eoi___at___private_init_lean_parser_module_1__commands__aux___main___spec__2___closed__1 = _init_l_lean_parser_monad__parsec_eoi___at___private_init_lean_parser_module_1__commands__aux___main___spec__2___closed__1(); l_lean_parser_monad__parsec_any___at___private_init_lean_parser_module_1__commands__aux___main___spec__3___closed__1 = _init_l_lean_parser_monad__parsec_any___at___private_init_lean_parser_module_1__commands__aux___main___spec__3___closed__1(); diff --git a/src/boot/init/lean/parser/notation.cpp b/src/boot/init/lean/parser/notation.cpp index 64e78a492e..fe16d54384 100644 --- a/src/boot/init/lean/parser/notation.cpp +++ b/src/boot/init/lean/parser/notation.cpp @@ -22,7 +22,7 @@ obj* l_lean_parser_command_reserve__mixfix_parser_lean_parser_has__tokens; obj* l_lean_parser_parsec__t_bind__mk__res___rarg(obj*, obj*); obj* l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__4; -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__1(obj*); +obj* l_lean_parser_combinators_any__of___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_transition_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_notation__spec_rule_has__view; obj* l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__3; @@ -35,8 +35,8 @@ obj* l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lamb obj* l_lean_parser_raw_view___rarg(obj*, obj*, obj*, obj*, obj*, uint8); obj* l_lean_parser_command_notation__like_has__view; extern obj* l_lean_parser_number_has__view_x_27___lambda__2___closed__1; -obj* l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__5___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_action__kind_has__view_x_27___lambda__1(obj*); +obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; obj* l_lean_parser_command_notation__spec_binder_has__view_x_27; extern obj* l_lean_parser_combinators_many___rarg___closed__1; obj* l_lean_parser_command_notation__spec_precedence_parser_lean_parser_has__tokens; @@ -46,48 +46,48 @@ obj* l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda namespace lean { obj* nat_add(obj*, obj*); } -obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_notation__spec_symbol__quote_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_notation_has__view_x_27___lambda__2(obj*); +obj* l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_fold__action_has__view_x_27___lambda__2(obj*); +obj* l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__5(obj*, obj*); obj* l_lean_parser_command_notation__spec_transition_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_notation__spec_fold__action__folder_has__view; obj* l_lean_parser_command_notation__spec_action_parser___closed__1; -obj* l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__5(obj*, obj*); extern obj* l_lean_parser_term__parser__m_lean_parser_monad__basic__parser; obj* l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27; obj* l_lean_parser_command_notation__spec_rule_has__view_x_27___lambda__1___closed__1; extern obj* l_mjoin___rarg___closed__1; obj* l_lean_parser_command_notation__spec_mixfix__symbol; +obj* l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_rule_has__view_x_27; obj* l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__5; obj* l_lean_parser_with__trailing___rarg___lambda__1(obj*, obj*); obj* l_lean_parser_command_reserve__mixfix_parser_lean_parser_has__view; -obj* l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_rule_parser_lean_parser_has__view; obj* l_lean_parser_list_cons_tokens___rarg(obj*, obj*); obj* l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_has__view_x_27; obj* l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1___closed__2; -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__2___rarg(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__like_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__5; obj* l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27; obj* l_lean_parser_parsec__t_try__mk__res___rarg(obj*); +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__2___rarg(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_precedence_has__view_x_27___lambda__1___closed__3; +obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4(obj*); obj* l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__tokens; obj* l_list_reverse___rarg(obj*); obj* l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1(obj*); +obj* l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); extern "C" obj* lean_name_mk_string(obj*, obj*); obj* l_lean_parser_command_notation__spec_notation__symbol_has__view; obj* l_lean_parser_command_mixfix_has__view; obj* l_lean_parser_command_notation__spec_precedence_parser___closed__1; -obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4(obj*); obj* l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens; obj* l_lean_parser_command_notation__spec_notation__symbol_parser(obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg(obj*, obj*, obj*, obj*); obj* l_lean_parser_number_view_to__nat___main(obj*); obj* l_lean_parser_command_reserve__notation_parser_lean_parser_has__view; obj* l_lean_parser_parsec__t_labels__mk__res___rarg(obj*, obj*); @@ -104,13 +104,14 @@ obj* l_lean_parser_command_notation__spec_fold__action; namespace lean { obj* string_iterator_next(obj*); } -obj* l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7(obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_with__trailing___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__6(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_precedence__term_view_to__nat___main(obj*); obj* l_lean_parser_command_notation__spec_action__kind; +obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_rule_parser___closed__1; -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__2(obj*); obj* l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__8; obj* l_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view; +obj* l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7(obj*, obj*, obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_command_notation__spec_quoted__symbol_parser___spec__2(obj*, obj*, obj*); obj* l_lean_parser_command_notation; obj* l_lean_parser_command_notation__spec_argument_has__view_x_27___lambda__1___closed__3; @@ -119,7 +120,6 @@ obj* l_lean_parser_command_notation__spec_precedence__term_parser(obj*, obj*, ob obj* l_lean_parser_command_notation__spec_binder_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_notation__spec_symbol__quote_has__view; obj* l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__1; -obj* l_lean_parser_combinators_any__of___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_action_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_notation__spec; obj* l_lean_parser_command_notation__spec_rule_parser_lean_parser_has__tokens; @@ -127,6 +127,7 @@ namespace lean { obj* string_length(obj*); } obj* l_lean_parser_command_notation_parser_lean_parser_has__tokens; +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__2(obj*); uint8 l_string_is__empty(obj*); obj* l_lean_parser_command_notation__like_parser_lean_parser_has__tokens; obj* l_lean_parser_command_notation__spec_action_has__view; @@ -138,30 +139,31 @@ obj* l_lean_parser_command_notation__spec_parser_lean_parser_has__view; obj* l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_mixfix_parser_lean_parser_has__view; obj* l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__2; +obj* l_lean_parser_monad__parsec_str__core___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__4(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_precedence__lit_parser___closed__1; obj* l_lean_parser_command_notation__spec_argument_has__view; obj* l_lean_parser_command_notation__spec_scoped__action; obj* l_lean_parser_command_reserve__notation; obj* l_function_comp___rarg(obj*, obj*, obj*); +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__1(obj*); obj* l_lean_parser_combinators_label_view___rarg(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_fold__action__folder_has__view_x_27; obj* l_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens; +obj* l_list_foldl___main___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1; obj* l_lean_parser_try__view___at_lean_parser_number_parser___spec__1(obj*); obj* l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__6; obj* l_lean_parser_command_notation__spec_transition_has__view_x_27; obj* l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__view; -obj* l_lean_parser_monad__parsec_str__core___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__4(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1; +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__1___rarg(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_mixfix_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_reserve__mixfix_has__view; extern obj* l_lean_parser_parsec_result_mk__eps___rarg___closed__1; extern obj* l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1; -obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__4(obj*); obj* l_lean_parser_command_reserve__mixfix_has__view_x_27___lambda__2(obj*); obj* l___private_init_lean_parser_parsec_1__str__aux___main(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_transition_parser_lean_parser_has__tokens; -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__1___rarg(obj*, obj*, obj*, obj*); extern obj* l_lean_parser_number_has__view; obj* l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__2___closed__1; obj* l_lean_parser_command_mixfix_has__view_x_27___lambda__1(obj*); @@ -173,7 +175,6 @@ obj* l_lean_parser_command_notation__spec_argument_has__view_x_27___lambda__1___ extern obj* l_lean_parser_number_has__view_x_27___lambda__2___closed__2; obj* l_lean_parser_command_notation__spec_precedence_has__view_x_27; obj* l_lean_parser_command_notation__spec_scoped__action_has__view_x_27; -obj* l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__like_parser___closed__1; obj* l_lean_parser_command_notation__spec_symbol__quote_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_notation__spec_transition_has__view; @@ -185,9 +186,11 @@ obj* l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__1 obj* l_lean_parser_command_notation__spec_action__kind_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_notation__spec_argument_has__view_x_27___lambda__1___closed__2; extern obj* l_lean_parser_no__kind; +obj* l_lean_parser_combinators_many1___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_syntax_as__node___main(obj*); obj* l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_command_notation__spec_fold__action_parser(obj*, obj*, obj*, obj*, obj*); +obj* l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_mixfix_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_notation__spec_unquoted__symbol_parser(obj*, obj*, obj*, obj*, obj*); namespace lean { @@ -195,7 +198,6 @@ uint8 string_iterator_has_next(obj*); } obj* l_lean_parser_command_notation__spec_precedence__offset_has__view_x_27; obj* l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_list_foldl___main___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_symbol_tokens___rarg(obj*, obj*); obj* l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__1; @@ -208,6 +210,7 @@ obj* l_lean_parser_raw_view___rarg___lambda__1(obj*); extern obj* l_lean_parser_term__parser__m_lean_parser_monad__parsec; obj* l_lean_parser_command_notation__spec_symbol__quote_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1; +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__3___rarg(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_mk__raw__res(obj*, obj*); obj* l_lean_parser_command_notation__spec_mixfix__symbol_parser_lean_parser_has__tokens; obj* l___private_init_lean_parser_token_3__update__trailing___main(obj*, obj*); @@ -215,10 +218,12 @@ obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_command_notation__ extern obj* l_lean_parser_term__parser__m_monad; obj* l_lean_parser_command_notation__spec_argument_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_combinators_node_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__2(obj*); obj* l_lean_parser_command_notation__spec_action__kind_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__7; obj* l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_notation__spec_argument; +obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1(obj*); obj* l_lean_parser_command_notation__spec_symbol__quote_has__view_x_27; extern obj* l_lean_parser_finish__comment__block___closed__2; obj* l_lean_parser_command_notation__spec_argument_has__view_x_27___lambda__1___closed__5; @@ -234,14 +239,13 @@ extern obj* l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; obj* l_lean_parser_command_notation__spec_precedence__term_parser___closed__1; obj* l_lean_parser_command_mixfix_kind_parser_lean_parser_has__tokens; obj* l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__4___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_precedence; extern obj* l_lean_parser_max__prec; obj* l_lean_parser_command_notation__spec_precedence_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_notation__spec_unquoted__symbol_parser___closed__1; obj* l_lean_parser_command_reserve__mixfix_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_scoped__action_has__view; -obj* l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__5___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_syntax_mk__node(obj*, obj*); obj* l_lean_parser_command_notation__spec_rule_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_notation__spec_transition_parser___closed__1; @@ -250,7 +254,6 @@ obj* l_lean_parser_term_parser_lean_parser_has__view___closed__1; obj* l_lean_parser_command_notation__spec_action; obj* l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_command_notation__spec_fold__action__folder_has__view_x_27___lambda__1(obj*); -obj* l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_notation__spec_mixfix__symbol_parser_lean_parser_has__view; obj* l_lean_parser_command_notation__spec_binders_has__view_x_27___lambda__1(obj*); @@ -261,11 +264,12 @@ obj* l_lean_parser_command_notation__like_has__view_x_27___lambda__1___closed__1 obj* l_lean_parser_token(obj*, obj*, obj*); obj* l_lean_parser_term_parser_lean_parser_has__view(obj*); obj* l_lean_parser_whitespace(obj*, obj*, obj*); +obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_precedence__term_has__view_x_27; obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__view___spec__1___rarg(obj*, obj*); obj* l_lean_parser_command_notation__spec_argument_has__view_x_27; obj* l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -obj* l_lean_parser_combinators_many1___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__3(obj*); obj* l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view___lambda__2(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_parser(obj*, obj*, obj*, obj*, obj*, obj*); @@ -273,10 +277,8 @@ obj* l_lean_parser_command_mixfix_kind_has__view_x_27; extern obj* l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; obj* l_lean_parser_command_notation__spec_fold__action_has__view_x_27; obj* l_lean_parser_command_notation__spec_binder_has__view_x_27___lambda__2(obj*); -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__3(obj*); -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__3___rarg(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1(obj*); -obj* l_lean_parser_with__trailing___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__6(obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_fold__action__folder_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_notation__spec_precedence_parser_lean_parser_has__view; obj* l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__6; @@ -284,8 +286,8 @@ obj* l_lean_parser_command_notation__spec_fold__action_has__view_x_27___lambda__ obj* l_lean_parser_command_notation__spec_fold__action__folder; obj* l_lean_parser_substring_to__string(obj*); obj* l_lean_parser_command_notation__like_parser_lean_parser_has__view; -obj* l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__2(obj*); extern "C" uint8 lean_name_dec_eq(obj*, obj*); +obj* l_lean_parser_rec__t_recurse___at_lean_parser_term_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_mixfix_has__view_x_27; obj* l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___lambda__1___closed__1; obj* l_lean_parser_command_mixfix_kind_parser(obj*, obj*, obj*, obj*, obj*); @@ -304,6 +306,7 @@ obj* l_lean_parser_command_mixfix_kind; obj* l_lean_parser_raw_view___rarg___lambda__3(obj*); obj* l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_notation__spec_rule; +obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_parser___closed__1; obj* l_lean_parser_command_notation__like_has__view_x_27; obj* l_lean_parser_command_notation__spec_mixfix__symbol_parser(obj*, obj*, obj*, obj*, obj*); @@ -332,10 +335,8 @@ obj* l_option_get___main___at_lean_parser_run___spec__2(obj*); obj* l_lean_parser_command_reserve__notation_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_notation_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_command_notation__spec_precedence__offset_has__view_x_27___lambda__1___closed__1; -obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; obj* l_lean_parser_command_notation__spec_precedence__offset_has__view; obj* l_lean_parser_command_reserve__mixfix_has__view_x_27___lambda__1(obj*); -obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens; obj* l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__2; @@ -344,7 +345,6 @@ obj* l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27___lambd obj* l_lean_parser_command_mixfix_parser_lean_parser_has__tokens; obj* l_lean_parser_command_notation__spec_binders_has__view; obj* l_lean_parser_command_notation__spec_transition_parser_lean_parser_has__view; -obj* l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_parser___closed__1; obj* l_lean_parser_command_mixfix_parser___closed__1; obj* l_lean_parser_command_reserve__notation_parser___closed__1; @@ -369,6 +369,7 @@ obj* l_lean_parser_command_mixfix_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_command_notation__spec_action_parser_lean_parser_has__tokens; obj* l_lean_parser_command_reserve__notation_has__view_x_27___lambda__1___closed__2; obj* l___private_init_lean_parser_parsec_3__mk__string__result___rarg(obj*, obj*); +obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4(obj*); obj* l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view; obj* l_lean_parser_command_notation__spec_symbol__quote_parser___closed__1; obj* l_lean_parser_command_reserve__notation_parser(obj*, obj*, obj*, obj*, obj*); @@ -409,7 +410,6 @@ obj* l_lean_parser_command_notation__spec_precedence__lit_has__view; obj* l_lean_parser_command_notation__spec_action__kind_has__view; obj* l_lean_parser_command_notation__spec_symbol__quote; obj* l_option_map___rarg(obj*, obj*); -obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1(obj*); obj* l_lean_parser_command_notation__spec_scoped__action_has__view_x_27___lambda__1___closed__1; extern obj* l_lean_parser_combinators_any__of___rarg___closed__1; obj* l_lean_parser_command_notation__spec_action__kind_has__view_x_27; @@ -433,11 +433,11 @@ namespace lean { uint8 nat_dec_lt(obj*, obj*); } obj* l_lean_parser_command_notation__spec_precedence__offset__op_has__view; -obj* l_lean_parser_rec__t_recurse___at_lean_parser_term_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg(obj*, obj*, obj*, obj*); obj* l_lean_parser_command_notation__spec_precedence_has__view_x_27___lambda__1___closed__2; extern obj* l_lean_parser_term__parser__m_alternative; extern obj* l_lean_parser_raw_view___rarg___lambda__3___closed__1; -obj* l_lean_parser_rec__t_recurse___at_lean_parser_term_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_rec__t_recurse___at_lean_parser_term_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_6; obj* x_7; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; @@ -467,34 +467,6 @@ lean::cnstr_set(x_15, 1, x_9); return x_15; } } -obj* _init_l_lean_parser_term_parser_lean_parser_has__view___closed__1() { -_start: -{ -obj* x_0; -x_0 = lean::mk_string("term"); -return x_0; -} -} -obj* l_lean_parser_term_parser_lean_parser_has__view(obj* x_0) { -_start: -{ -obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_12; -lean::inc(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___at_lean_parser_term_parser_lean_parser_has__view___spec__1), 6, 1); -lean::closure_set(x_2, 0, x_0); -x_3 = l_lean_parser_term__parser__m_lean_parser_monad__rec; -lean::inc(x_3); -x_5 = l_lean_parser_combinators_recurse_view___rarg(x_0, x_3); -x_6 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; -x_7 = l_lean_parser_term__parser__m_alternative; -x_8 = l_lean_parser_term_parser_lean_parser_has__view___closed__1; -lean::inc(x_8); -lean::inc(x_7); -lean::inc(x_6); -x_12 = l_lean_parser_combinators_label_view___rarg(x_6, x_7, x_2, x_8, x_5); -return x_12; -} -} obj* _init_l_lean_parser_term_parser_lean_parser_has__tokens___closed__1() { _start: { @@ -514,6 +486,34 @@ lean::inc(x_2); return x_2; } } +obj* _init_l_lean_parser_term_parser_lean_parser_has__view___closed__1() { +_start: +{ +obj* x_0; +x_0 = lean::mk_string("term"); +return x_0; +} +} +obj* l_lean_parser_term_parser_lean_parser_has__view(obj* x_0) { +_start: +{ +obj* x_2; obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_12; +lean::inc(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___at_lean_parser_term_parser_lean_parser_has__tokens___spec__1), 6, 1); +lean::closure_set(x_2, 0, x_0); +x_3 = l_lean_parser_term__parser__m_lean_parser_monad__rec; +lean::inc(x_3); +x_5 = l_lean_parser_combinators_recurse_view___rarg(x_0, x_3); +x_6 = l_lean_parser_term__parser__m_lean_parser_monad__parsec; +x_7 = l_lean_parser_term__parser__m_alternative; +x_8 = l_lean_parser_term_parser_lean_parser_has__view___closed__1; +lean::inc(x_8); +lean::inc(x_7); +lean::inc(x_6); +x_12 = l_lean_parser_combinators_label_view___rarg(x_6, x_7, x_2, x_8, x_5); +return x_12; +} +} obj* _init_l_lean_parser_term_parser___closed__1() { _start: { @@ -528,7 +528,7 @@ obj* l_lean_parser_term_parser(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, _start: { obj* x_6; obj* x_7; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; -x_6 = l_lean_parser_rec__t_recurse___at_lean_parser_term_parser_lean_parser_has__view___spec__1(x_0, x_1, x_2, x_3, x_4, x_5); +x_6 = l_lean_parser_rec__t_recurse___at_lean_parser_term_parser_lean_parser_has__tokens___spec__1(x_0, x_1, x_2, x_3, x_4, x_5); x_7 = lean::cnstr_get(x_6, 0); lean::inc(x_7); x_9 = lean::cnstr_get(x_6, 1); @@ -900,7 +900,7 @@ lean::inc(x_0); return x_0; } } -obj* _init_l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1() { +obj* _init_l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1() { _start: { obj* x_0; obj* x_1; @@ -910,7 +910,7 @@ lean::closure_set(x_1, 0, x_0); return x_1; } } -obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { obj* x_7; obj* x_8; obj* x_10; obj* x_12; @@ -960,7 +960,7 @@ x_25 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_25, 0, x_2); x_26 = lean::box(0); x_27 = l_string_join___closed__1; -x_28 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1; +x_28 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1; lean::inc(x_28); lean::inc(x_27); 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_25, x_26, x_0, x_15, x_10); @@ -1007,7 +1007,7 @@ x_53 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_52); 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_53); -x_57 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1; +x_57 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1; lean::inc(x_57); x_59 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_56, x_57); x_60 = l_lean_parser_parsec__t_try__mk__res___rarg(x_59); @@ -1047,7 +1047,7 @@ x_69 = x_68; 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_69); -x_73 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1; +x_73 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1; lean::inc(x_73); x_75 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_72, x_73); x_76 = l_lean_parser_parsec__t_try__mk__res___rarg(x_75); @@ -1062,16 +1062,16 @@ return x_77; } } } -obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1(obj* x_0) { +obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg), 4, 0); +x_2 = 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___rarg), 4, 0); return x_2; } } -obj* l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_10; obj* x_11; obj* x_13; obj* x_15; @@ -1348,7 +1348,7 @@ return x_116; } } } -obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__4___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8) { +obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8) { _start: { obj* x_12; obj* x_13; uint8 x_14; obj* x_15; obj* x_16; obj* x_17; @@ -1372,16 +1372,16 @@ lean::cnstr_set(x_17, 1, x_8); return x_17; } } -obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__4(obj* x_0) { +obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__4___rarg), 9, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg), 9, 0); return x_2; } } -obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { +obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { _start: { if (lean::obj_tag(x_0) == 0) @@ -1395,7 +1395,7 @@ 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_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__4___rarg(x_10, x_11, x_9, x_9, x_2, x_3, x_4, x_5, x_6); +x_15 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_10, x_11, x_9, x_9, x_2, x_3, x_4, x_5, x_6); return x_15; } else @@ -1501,7 +1501,7 @@ if (x_59 == 0) { obj* x_61; obj* x_62; obj* x_64; obj* x_67; obj* x_68; lean::dec(x_49); -x_61 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__3(x_18, x_32, x_2, x_3, x_4, x_5, x_28); +x_61 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3(x_18, x_32, x_2, x_3, x_4, x_5, x_28); x_62 = lean::cnstr_get(x_61, 0); lean::inc(x_62); x_64 = lean::cnstr_get(x_61, 1); @@ -1557,7 +1557,7 @@ if (x_81 == 0) { obj* x_84; obj* x_85; obj* x_87; obj* x_90; obj* x_91; lean::dec(x_82); -x_84 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__3(x_18, x_32, x_2, x_3, x_4, x_5, x_28); +x_84 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3(x_18, x_32, x_2, x_3, x_4, x_5, x_28); x_85 = lean::cnstr_get(x_84, 0); lean::inc(x_85); x_87 = lean::cnstr_get(x_84, 1); @@ -1603,24 +1603,40 @@ return x_100; } } } +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; +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; +} +} 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; 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__view___spec__2), 6, 1); +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__view___spec__1), 1, 0); +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__view___spec__3), 7, 2); +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); @@ -1642,22 +1658,6 @@ x_22 = l_lean_parser_combinators_node_view___rarg(x_10, x_11, x_12, x_13, x_14, return x_22; } } -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; -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; -} -} 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) { _start: { @@ -2054,19 +2054,19 @@ _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; 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__view___spec__2), 6, 1); +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__view___spec__1), 1, 0); +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__view___spec__3), 7, 2); +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); @@ -3702,7 +3702,7 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { _start: { obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_20; @@ -3980,125 +3980,6 @@ return x_135; } } } -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; -x_0 = lean::mk_string("("); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -x_7 = lean::mk_string(" + "); -x_8 = l_string_trim(x_7); -lean::inc(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_10, 0, x_8); -lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -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::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_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___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::box(0); -lean::inc(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::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__view___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); -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__view___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_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__view___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); -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__view___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::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; -} -} obj* _init_l_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens() { _start: { @@ -4143,10 +4024,10 @@ x_36 = l_lean_parser_tokens___rarg(x_35); return x_36; } } -obj* _init_l_lean_parser_command_notation__spec_precedence__term_parser___closed__1() { +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_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; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -4154,7 +4035,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -4164,7 +4045,7 @@ lean::inc(x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_10, 0, x_8); lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_12 = 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_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); @@ -4174,7 +4055,7 @@ 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_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -4187,7 +4068,7 @@ 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::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__view___spec__3), 7, 2); +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); @@ -4205,7 +4086,7 @@ 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_35 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -4213,7 +4094,7 @@ lean::inc(x_19); 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__view___spec__1), 1, 0); +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); @@ -4240,7 +4121,126 @@ 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__view___spec__3), 7, 2); +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::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; +} +} +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; +x_0 = lean::mk_string("("); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +x_7 = lean::mk_string(" + "); +x_8 = l_string_trim(x_7); +lean::inc(x_8); +x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_10, 0, x_8); +lean::inc(x_4); +x_12 = 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_12, 0, x_8); +lean::closure_set(x_12, 1, x_4); +lean::closure_set(x_12, 2, x_10); +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_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::box(0); +lean::inc(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::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); +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_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); +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); @@ -4726,6 +4726,22 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_command_notation__spec_precedence_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_8; +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); +x_4 = l_lean_parser_command_notation__spec_precedence__term_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_list_cons_tokens___rarg(x_2, x_6); +x_8 = l_lean_parser_tokens___rarg(x_7); +return x_8; +} +} obj* _init_l_lean_parser_command_notation__spec_precedence_parser_lean_parser_has__view() { _start: { @@ -4736,7 +4752,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -4764,22 +4780,6 @@ x_22 = l_lean_parser_combinators_node_view___rarg(x_10, x_11, x_12, x_13, x_14, return x_22; } } -obj* _init_l_lean_parser_command_notation__spec_precedence_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_8; -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); -x_4 = l_lean_parser_command_notation__spec_precedence__term_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_list_cons_tokens___rarg(x_2, x_6); -x_8 = l_lean_parser_tokens___rarg(x_7); -return x_8; -} -} obj* _init_l_lean_parser_command_notation__spec_precedence_parser___closed__1() { _start: { @@ -4790,7 +4790,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -4817,6 +4817,198 @@ x_9 = l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_pre return x_9; } } +obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, obj* x_2) { +_start: +{ +obj* x_3; uint8 x_4; +x_3 = lean::mk_nat_obj(0u); +x_4 = lean::nat_dec_eq(x_0, x_3); +if (x_4 == 0) +{ +uint8 x_5; +x_5 = lean::string_iterator_has_next(x_2); +if (x_5 == 0) +{ +obj* x_8; +lean::dec(x_3); +lean::dec(x_0); +x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_8; +} +else +{ +obj* x_9; obj* x_10; uint32 x_13; obj* x_14; obj* x_16; obj* x_17; uint8 x_18; +x_9 = lean::mk_nat_obj(1u); +x_10 = lean::nat_sub(x_0, x_9); +lean::dec(x_9); +lean::dec(x_0); +x_13 = lean::string_iterator_curr(x_2); +x_16 = lean::mk_nat_obj(96u); +x_17 = lean::mk_nat_obj(55296u); +x_18 = lean::nat_dec_lt(x_16, x_17); +lean::dec(x_17); +if (x_18 == 0) +{ +obj* x_20; uint8 x_21; +x_20 = lean::mk_nat_obj(57343u); +x_21 = lean::nat_dec_lt(x_20, x_16); +lean::dec(x_20); +if (x_21 == 0) +{ +obj* x_24; uint8 x_25; +lean::dec(x_16); +x_24 = lean::box_uint32(x_13); +x_25 = lean::nat_dec_eq(x_24, x_3); +lean::dec(x_3); +lean::dec(x_24); +if (x_25 == 0) +{ +obj* x_28; +x_28 = lean::box(0); +x_14 = x_28; +goto lbl_15; +} +else +{ +obj* x_30; +lean::dec(x_10); +x_30 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_30; +} +} +else +{ +obj* x_31; uint8 x_32; +x_31 = lean::mk_nat_obj(1114112u); +x_32 = lean::nat_dec_lt(x_16, x_31); +lean::dec(x_31); +if (x_32 == 0) +{ +obj* x_35; uint8 x_36; +lean::dec(x_16); +x_35 = lean::box_uint32(x_13); +x_36 = lean::nat_dec_eq(x_35, x_3); +lean::dec(x_3); +lean::dec(x_35); +if (x_36 == 0) +{ +obj* x_39; +x_39 = lean::box(0); +x_14 = x_39; +goto lbl_15; +} +else +{ +obj* x_41; +lean::dec(x_10); +x_41 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_41; +} +} +else +{ +obj* x_43; uint8 x_44; +lean::dec(x_3); +x_43 = lean::box_uint32(x_13); +x_44 = lean::nat_dec_eq(x_43, x_16); +lean::dec(x_16); +lean::dec(x_43); +if (x_44 == 0) +{ +obj* x_47; +x_47 = lean::box(0); +x_14 = x_47; +goto lbl_15; +} +else +{ +obj* x_49; +lean::dec(x_10); +x_49 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_49; +} +} +} +} +else +{ +obj* x_51; uint8 x_52; +lean::dec(x_3); +x_51 = lean::box_uint32(x_13); +x_52 = lean::nat_dec_eq(x_51, x_16); +lean::dec(x_16); +lean::dec(x_51); +if (x_52 == 0) +{ +obj* x_55; +x_55 = lean::box(0); +x_14 = x_55; +goto lbl_15; +} +else +{ +obj* x_57; +lean::dec(x_10); +x_57 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_57; +} +} +lbl_15: +{ +obj* x_59; obj* x_60; +lean::dec(x_14); +x_59 = lean::string_push(x_1, x_13); +x_60 = lean::string_iterator_next(x_2); +x_0 = x_10; +x_1 = x_59; +x_2 = x_60; +goto _start; +} +} +} +else +{ +obj* x_64; +lean::dec(x_3); +lean::dec(x_0); +x_64 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_64; +} +} +} +obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens___spec__1___rarg(obj* x_0, obj* x_1) { +_start: +{ +obj* x_2; obj* x_3; obj* x_5; obj* x_6; +x_2 = lean::string_iterator_remaining(x_0); +x_3 = l_string_join___closed__1; +lean::inc(x_3); +x_5 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens___spec__2(x_2, x_3, x_0); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_1); +return x_6; +} +} +obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2) { +_start: +{ +obj* x_6; +lean::dec(x_2); +lean::dec(x_1); +lean::dec(x_0); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_take__while___at_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens___spec__1___rarg), 2, 0); +return x_6; +} +} +obj* _init_l_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens() { +_start: +{ +obj* x_0; +x_0 = lean::box(0); +return x_0; +} +} obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__view___spec__2(obj* x_0, obj* x_1, obj* x_2) { _start: { @@ -5017,198 +5209,6 @@ x_8 = l_lean_parser_raw_view___rarg(x_0, x_1, x_2, lean::box(0), x_3, x_4); return x_8; } } -obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; uint8 x_4; -x_3 = lean::mk_nat_obj(0u); -x_4 = lean::nat_dec_eq(x_0, x_3); -if (x_4 == 0) -{ -uint8 x_5; -x_5 = lean::string_iterator_has_next(x_2); -if (x_5 == 0) -{ -obj* x_8; -lean::dec(x_3); -lean::dec(x_0); -x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_8; -} -else -{ -obj* x_9; obj* x_10; uint32 x_13; obj* x_14; obj* x_16; obj* x_17; uint8 x_18; -x_9 = lean::mk_nat_obj(1u); -x_10 = lean::nat_sub(x_0, x_9); -lean::dec(x_9); -lean::dec(x_0); -x_13 = lean::string_iterator_curr(x_2); -x_16 = lean::mk_nat_obj(96u); -x_17 = lean::mk_nat_obj(55296u); -x_18 = lean::nat_dec_lt(x_16, x_17); -lean::dec(x_17); -if (x_18 == 0) -{ -obj* x_20; uint8 x_21; -x_20 = lean::mk_nat_obj(57343u); -x_21 = lean::nat_dec_lt(x_20, x_16); -lean::dec(x_20); -if (x_21 == 0) -{ -obj* x_24; uint8 x_25; -lean::dec(x_16); -x_24 = lean::box_uint32(x_13); -x_25 = lean::nat_dec_eq(x_24, x_3); -lean::dec(x_3); -lean::dec(x_24); -if (x_25 == 0) -{ -obj* x_28; -x_28 = lean::box(0); -x_14 = x_28; -goto lbl_15; -} -else -{ -obj* x_30; -lean::dec(x_10); -x_30 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_30; -} -} -else -{ -obj* x_31; uint8 x_32; -x_31 = lean::mk_nat_obj(1114112u); -x_32 = lean::nat_dec_lt(x_16, x_31); -lean::dec(x_31); -if (x_32 == 0) -{ -obj* x_35; uint8 x_36; -lean::dec(x_16); -x_35 = lean::box_uint32(x_13); -x_36 = lean::nat_dec_eq(x_35, x_3); -lean::dec(x_3); -lean::dec(x_35); -if (x_36 == 0) -{ -obj* x_39; -x_39 = lean::box(0); -x_14 = x_39; -goto lbl_15; -} -else -{ -obj* x_41; -lean::dec(x_10); -x_41 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_41; -} -} -else -{ -obj* x_43; uint8 x_44; -lean::dec(x_3); -x_43 = lean::box_uint32(x_13); -x_44 = lean::nat_dec_eq(x_43, x_16); -lean::dec(x_16); -lean::dec(x_43); -if (x_44 == 0) -{ -obj* x_47; -x_47 = lean::box(0); -x_14 = x_47; -goto lbl_15; -} -else -{ -obj* x_49; -lean::dec(x_10); -x_49 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_49; -} -} -} -} -else -{ -obj* x_51; uint8 x_52; -lean::dec(x_3); -x_51 = lean::box_uint32(x_13); -x_52 = lean::nat_dec_eq(x_51, x_16); -lean::dec(x_16); -lean::dec(x_51); -if (x_52 == 0) -{ -obj* x_55; -x_55 = lean::box(0); -x_14 = x_55; -goto lbl_15; -} -else -{ -obj* x_57; -lean::dec(x_10); -x_57 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_57; -} -} -lbl_15: -{ -obj* x_59; obj* x_60; -lean::dec(x_14); -x_59 = lean::string_push(x_1, x_13); -x_60 = lean::string_iterator_next(x_2); -x_0 = x_10; -x_1 = x_59; -x_2 = x_60; -goto _start; -} -} -} -else -{ -obj* x_64; -lean::dec(x_3); -lean::dec(x_0); -x_64 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_64; -} -} -} -obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens___spec__1___rarg(obj* x_0, obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_5; obj* x_6; -x_2 = lean::string_iterator_remaining(x_0); -x_3 = l_string_join___closed__1; -lean::inc(x_3); -x_5 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens___spec__2(x_2, x_3, x_0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -return x_6; -} -} -obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2) { -_start: -{ -obj* x_6; -lean::dec(x_2); -lean::dec(x_1); -lean::dec(x_0); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_take__while___at_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens___spec__1___rarg), 2, 0); -return x_6; -} -} -obj* _init_l_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens() { -_start: -{ -obj* x_0; -x_0 = lean::box(0); -return x_0; -} -} obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_command_notation__spec_quoted__symbol_parser___spec__2(obj* x_0, obj* x_1, obj* x_2) { _start: { @@ -6519,7 +6519,7 @@ lean::inc(x_0); return x_0; } } -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__1___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__1___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { obj* x_5; @@ -6528,16 +6528,16 @@ x_5 = lean::apply_2(x_0, x_2, x_3); return x_5; } } -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__1(obj* x_0) { +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__1(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__1___rarg), 4, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__1___rarg), 4, 0); return x_2; } } -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__2___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__2___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { obj* x_6; @@ -6546,16 +6546,16 @@ x_6 = lean::apply_3(x_0, x_2, x_3, x_4); return x_6; } } -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__2(obj* x_0) { +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__2(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__2___rarg), 5, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__2___rarg), 5, 0); return x_2; } } -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__3___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__3___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_7; @@ -6564,16 +6564,16 @@ x_7 = lean::apply_4(x_0, x_2, x_3, x_4, x_5); return x_7; } } -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__3(obj* x_0) { +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__3(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__3___rarg), 6, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__3___rarg), 6, 0); return x_2; } } -obj* l_lean_parser_monad__parsec_str__core___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { +obj* l_lean_parser_monad__parsec_str__core___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { _start: { uint8 x_11; @@ -6652,7 +6652,7 @@ return x_42; } } } -obj* l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__5___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { +obj* l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__5___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { _start: { obj* x_10; obj* x_11; obj* x_13; obj* x_15; @@ -6734,17 +6734,17 @@ return x_41; } } } -obj* l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__5(obj* x_0, obj* x_1) { +obj* l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__5(obj* x_0, obj* x_1) { _start: { obj* x_4; lean::dec(x_1); lean::dec(x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__5___rarg), 7, 0); +x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__5___rarg), 7, 0); return x_4; } } -obj* l_lean_parser_with__trailing___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__6(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_with__trailing___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__6(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_9; obj* x_10; obj* x_12; obj* x_14; @@ -6965,7 +6965,7 @@ return x_78; } } } -obj* l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_14; obj* x_15; obj* x_17; @@ -7259,6 +7259,26 @@ 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; +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; +} +} obj* _init_l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view() { _start: { @@ -7268,26 +7288,26 @@ x_1 = l_string_quote(x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_2, 0, x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_with__trailing___rarg___lambda__1), 2, 0); -x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__1___rarg), 4, 1); +x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__1___rarg), 4, 1); lean::closure_set(x_4, 0, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__2___rarg), 5, 1); +x_5 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__2___rarg), 5, 1); lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__3___rarg), 6, 1); +x_6 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__3___rarg), 6, 1); lean::closure_set(x_6, 0, x_5); lean::inc(x_2); x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___lambda__1), 7, 1); lean::closure_set(x_8, 0, x_2); lean::inc(x_6); -x_10 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__5___rarg), 7, 2); +x_10 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__5___rarg), 7, 2); lean::closure_set(x_10, 0, x_6); lean::closure_set(x_10, 1, x_8); x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___lambda__2), 7, 1); lean::closure_set(x_11, 0, x_2); -x_12 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__5___rarg), 7, 2); +x_12 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__5___rarg), 7, 2); lean::closure_set(x_12, 0, x_6); lean::closure_set(x_12, 1, x_11); x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_precedence_parser), 5, 0); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +x_14 = 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_14, 0, x_13); x_15 = lean::box(0); x_16 = lean::alloc_cnstr(1, 2, 0); @@ -7333,7 +7353,7 @@ _start: obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_14; x_7 = l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___lambda__1___closed__1; lean::inc(x_7); -x_9 = l_lean_parser_monad__parsec_str__core___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__4(x_7, x_0, x_2, x_3, x_4, x_5, x_6); +x_9 = l_lean_parser_monad__parsec_str__core___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__4(x_7, x_0, x_2, x_3, x_4, x_5, x_6); x_10 = lean::cnstr_get(x_9, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_9, 1); @@ -7426,7 +7446,7 @@ lean::inc(x_4); lean::inc(x_3); lean::inc(x_2); lean::inc(x_7); -x_12 = l_lean_parser_monad__parsec_str__core___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__4(x_7, x_0, x_2, x_3, x_4, x_5, x_6); +x_12 = l_lean_parser_monad__parsec_str__core___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__4(x_7, x_0, x_2, x_3, x_4, x_5, x_6); x_13 = lean::cnstr_get(x_12, 0); lean::inc(x_13); x_15 = lean::cnstr_get(x_12, 1); @@ -7449,7 +7469,7 @@ lean::inc(x_20); lean::dec(x_13); lean::inc(x_18); x_24 = l_lean_parser_mk__raw__res(x_1, x_18); -x_25 = l_lean_parser_with__trailing___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__6(x_24, x_2, x_3, x_4, x_18, x_15); +x_25 = l_lean_parser_with__trailing___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__6(x_24, x_2, x_3, x_4, x_18, x_15); x_26 = lean::cnstr_get(x_25, 0); lean::inc(x_26); x_28 = lean::cnstr_get(x_25, 1); @@ -7504,26 +7524,6 @@ return x_46; } } } -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; -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; -} -} obj* _init_l_lean_parser_command_notation__spec_symbol__quote_parser___closed__1() { _start: { @@ -7533,26 +7533,26 @@ x_1 = l_string_quote(x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_2, 0, x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_with__trailing___rarg___lambda__1), 2, 0); -x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__1___rarg), 4, 1); +x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__1___rarg), 4, 1); lean::closure_set(x_4, 0, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__2___rarg), 5, 1); +x_5 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__2___rarg), 5, 1); lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__3___rarg), 6, 1); +x_6 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__3___rarg), 6, 1); lean::closure_set(x_6, 0, x_5); lean::inc(x_2); x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___lambda__1), 7, 1); lean::closure_set(x_8, 0, x_2); lean::inc(x_6); -x_10 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__5___rarg), 7, 2); +x_10 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__5___rarg), 7, 2); lean::closure_set(x_10, 0, x_6); lean::closure_set(x_10, 1, x_8); x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___lambda__2), 7, 1); lean::closure_set(x_11, 0, x_2); -x_12 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__5___rarg), 7, 2); +x_12 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__5___rarg), 7, 2); lean::closure_set(x_12, 0, x_6); lean::closure_set(x_12, 1, x_11); x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_precedence_parser), 5, 0); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +x_14 = 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_14, 0, x_13); x_15 = lean::box(0); x_16 = lean::alloc_cnstr(1, 2, 0); @@ -7700,7 +7700,7 @@ x_50 = l_string_join___closed__1; x_51 = l_lean_parser_command_notation__spec_unquoted__symbol_parser___closed__1; lean::inc(x_51); lean::inc(x_50); -x_54 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__4___rarg(x_50, x_51, x_48, x_49, x_0, x_1, x_2, x_15, x_10); +x_54 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_50, x_51, x_48, x_49, x_0, x_1, x_2, x_15, x_10); x_55 = lean::cnstr_get(x_54, 0); lean::inc(x_55); x_57 = lean::cnstr_get(x_54, 1); @@ -8051,6 +8051,21 @@ lean::inc(x_0); 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; +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; +} +} obj* _init_l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__view() { _start: { @@ -8062,7 +8077,7 @@ 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__view___spec__3), 7, 2); +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); @@ -8084,21 +8099,6 @@ x_19 = l_lean_parser_combinators_node_view___rarg(x_7, x_8, x_9, x_10, x_11, x_6 return x_19; } } -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; -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; -} -} obj* _init_l_lean_parser_command_notation__spec_notation__symbol_parser___closed__1() { _start: { @@ -8110,7 +8110,7 @@ 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__view___spec__3), 7, 2); +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); @@ -8560,6 +8560,24 @@ lean::inc(x_0); 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; +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; +} +} obj* _init_l_lean_parser_command_notation__spec_mixfix__symbol_parser_lean_parser_has__view() { _start: { @@ -8575,7 +8593,7 @@ 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__view___spec__3), 7, 2); +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); @@ -8597,24 +8615,6 @@ x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x return x_21; } } -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; -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; -} -} obj* _init_l_lean_parser_command_notation__spec_mixfix__symbol_parser___closed__1() { _start: { @@ -8630,7 +8630,7 @@ 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__view___spec__3), 7, 2); +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); @@ -10626,7 +10626,7 @@ lean::inc(x_0); return x_0; } } -obj* l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__2___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { +obj* l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__2___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { _start: { obj* x_11; obj* x_12; obj* x_14; obj* x_16; @@ -10711,16 +10711,16 @@ return x_41; } } } -obj* l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__2(obj* x_0) { +obj* l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__2(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__2___rarg), 7, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__2___rarg), 7, 0); return x_2; } } -obj* l_list_foldl___main___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { +obj* l_list_foldl___main___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { _start: { if (lean::obj_tag(x_1) == 0) @@ -10738,7 +10738,7 @@ lean::inc(x_9); x_11 = lean::cnstr_get(x_1, 1); lean::inc(x_11); lean::dec(x_1); -x_14 = lean::alloc_closure(reinterpret_cast(l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__2___rarg), 7, 2); +x_14 = lean::alloc_closure(reinterpret_cast(l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__2___rarg), 7, 2); lean::closure_set(x_14, 0, x_0); lean::closure_set(x_14, 1, x_9); x_0 = x_14; @@ -10747,7 +10747,7 @@ goto _start; } } } -obj* l_lean_parser_combinators_any__of___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_combinators_any__of___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { if (lean::obj_tag(x_0) == 0) @@ -10760,7 +10760,7 @@ 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_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__4___rarg(x_8, x_9, x_7, x_7, x_1, x_2, x_3, x_4, x_5); +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_8, x_9, x_7, x_7, x_1, x_2, x_3, x_4, x_5); return x_13; } else @@ -10771,12 +10771,12 @@ lean::inc(x_14); x_16 = lean::cnstr_get(x_0, 1); lean::inc(x_16); lean::dec(x_0); -x_19 = l_list_foldl___main___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__3(x_14, x_16, x_1, x_2, x_3, x_4, x_5); +x_19 = l_list_foldl___main___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__3(x_14, x_16, x_1, x_2, x_3, x_4, x_5); return x_19; } } } -obj* _init_l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1() { +obj* _init_l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1() { _start: { obj* x_0; obj* x_1; @@ -10786,7 +10786,7 @@ lean::closure_set(x_1, 0, x_0); return x_1; } } -obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { obj* x_7; obj* x_8; obj* x_10; obj* x_12; @@ -10853,7 +10853,7 @@ lean::cnstr_set(x_30, 2, x_28); x_31 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_30); lean::inc(x_28); x_33 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_28, x_31); -x_34 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; +x_34 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; lean::inc(x_34); x_36 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_33, x_34); x_37 = l_lean_parser_parsec__t_try__mk__res___rarg(x_36); @@ -10889,7 +10889,7 @@ x_46 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_46, 0, x_2); x_47 = lean::box(0); x_48 = l_string_join___closed__1; -x_49 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; +x_49 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; lean::inc(x_49); lean::inc(x_48); x_52 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_48, x_49, x_46, x_47, x_0, x_15, x_10); @@ -10941,7 +10941,7 @@ x_73 = x_72; x_74 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_74); x_76 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_74, x_73); -x_77 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; +x_77 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; lean::inc(x_77); x_79 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_76, x_77); x_80 = l_lean_parser_parsec__t_try__mk__res___rarg(x_79); @@ -10956,15 +10956,62 @@ return x_81; } } } -obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4(obj* x_0) { +obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg), 4, 0); +x_2 = 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___rarg), 4, 0); 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; +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(","); +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); +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; +} +} obj* _init_l_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view() { _start: { @@ -10976,15 +11023,15 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); x_7 = lean::mk_string("foldl"); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__2), 6, 1); +x_8 = 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_8, 0, x_7); 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__view___spec__2), 6, 1); +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); @@ -10994,7 +11041,7 @@ 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__view___spec__1), 6, 1); +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); @@ -11002,7 +11049,7 @@ 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_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -11014,7 +11061,7 @@ 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__view___spec__1), 8, 3); +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); @@ -11029,7 +11076,7 @@ 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__view___spec__4), 1, 0); +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); x_36 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_36, 0, x_34); @@ -11082,53 +11129,6 @@ x_63 = l_lean_parser_combinators_node_view___rarg(x_51, x_52, x_53, x_54, x_55, return x_63; } } -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; -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(","); -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); -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; -} -} obj* _init_l_lean_parser_command_notation__spec_fold__action_parser___closed__1() { _start: { @@ -11140,15 +11140,15 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); x_7 = lean::mk_string("foldl"); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__2), 6, 1); +x_8 = 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_8, 0, x_7); 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__view___spec__2), 6, 1); +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); @@ -11158,7 +11158,7 @@ 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__view___spec__1), 6, 1); +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); @@ -11166,7 +11166,7 @@ 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_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -11178,7 +11178,7 @@ 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__view___spec__1), 8, 3); +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); @@ -11193,7 +11193,7 @@ 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__view___spec__4), 1, 0); +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); x_36 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_36, 0, x_34); @@ -13478,6 +13478,64 @@ lean::inc(x_0); 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; +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 = l_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens; +lean::inc(x_4); +x_6 = l_lean_parser_tokens___rarg(x_4); +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(", "); +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; +} +} obj* _init_l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view() { _start: { @@ -13489,12 +13547,12 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); x_7 = lean::mk_string("prev"); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__2), 6, 1); +x_8 = 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_8, 0, x_7); x_9 = lean::mk_string("("); x_10 = l_string_trim(x_9); @@ -13502,12 +13560,12 @@ lean::inc(x_10); x_12 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_12, 0, x_10); lean::inc(x_4); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_14 = 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_14, 0, x_10); lean::closure_set(x_14, 1, x_4); lean::closure_set(x_14, 2, x_12); 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__view___spec__2), 6, 1); +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); @@ -13520,7 +13578,7 @@ 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__view___spec__7), 6, 1); +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); @@ -13528,7 +13586,7 @@ 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_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -13541,7 +13599,7 @@ 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_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -13555,7 +13613,7 @@ 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_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4), 1, 0); +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); x_43 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_43, 0, x_42); lean::cnstr_set(x_43, 1, x_41); @@ -13585,7 +13643,7 @@ x_54 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notatio 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__view___spec__3), 7, 2); +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); @@ -13681,64 +13739,6 @@ lean::cnstr_set(x_15, 1, x_11); return x_15; } } -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; -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 = l_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens; -lean::inc(x_4); -x_6 = l_lean_parser_tokens___rarg(x_4); -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(", "); -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; -} -} obj* _init_l_lean_parser_command_notation__spec_action_parser___closed__1() { _start: { @@ -13750,12 +13750,12 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); x_7 = lean::mk_string("prev"); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__ident___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__2), 6, 1); +x_8 = 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_8, 0, x_7); x_9 = lean::mk_string("("); x_10 = l_string_trim(x_9); @@ -13763,12 +13763,12 @@ lean::inc(x_10); x_12 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_12, 0, x_10); lean::inc(x_4); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_14 = 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_14, 0, x_10); lean::closure_set(x_14, 1, x_4); lean::closure_set(x_14, 2, x_12); 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__view___spec__2), 6, 1); +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); @@ -13781,7 +13781,7 @@ 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__view___spec__7), 6, 1); +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); @@ -13789,7 +13789,7 @@ 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_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -13802,7 +13802,7 @@ 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_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -13816,7 +13816,7 @@ 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_42 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4), 1, 0); +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); x_43 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_43, 0, x_42); lean::cnstr_set(x_43, 1, x_41); @@ -13846,7 +13846,7 @@ x_54 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notatio 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__view___spec__3), 7, 2); +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); @@ -16212,90 +16212,6 @@ lean::inc(x_0); return x_0; } } -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; -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__view___spec__2), 6, 1); -lean::closure_set(x_1, 0, x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_precedence_parser), 5, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___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__view___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__view___spec__7), 6, 1); -lean::closure_set(x_19, 0, x_18); -lean::inc(x_4); -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__view___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); -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__view___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::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; -} -} obj* _init_l_lean_parser_command_notation__spec_transition_parser_lean_parser_has__tokens() { _start: { @@ -16328,15 +16244,15 @@ x_24 = l_lean_parser_tokens___rarg(x_23); return x_24; } } -obj* _init_l_lean_parser_command_notation__spec_transition_parser___closed__1() { +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_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; 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__view___spec__2), 6, 1); +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::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_precedence_parser), 5, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +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); @@ -16353,7 +16269,7 @@ x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_nod 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__view___spec__2), 6, 1); +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); @@ -16364,13 +16280,13 @@ x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_nod 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__view___spec__7), 6, 1); +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_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__view___spec__4), 1, 0); +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); @@ -16390,7 +16306,91 @@ 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__view___spec__3), 7, 2); +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::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; +} +} +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; +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); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_precedence_parser), 5, 0); +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_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); +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); @@ -16940,12 +16940,28 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_command_notation__spec_rule_parser_lean_parser_has__tokens() { +_start: +{ +obj* x_0; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; +x_0 = l_lean_parser_command_notation__spec_transition_parser_lean_parser_has__tokens; +lean::inc(x_0); +x_2 = l_lean_parser_tokens___rarg(x_0); +x_3 = lean::box(0); +x_4 = l_lean_parser_list_cons_tokens___rarg(x_2, x_3); +x_5 = l_lean_parser_command_notation__spec_notation__symbol_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); +return x_8; +} +} obj* _init_l_lean_parser_command_notation__spec_rule_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_18; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_transition_parser), 5, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +x_1 = 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_1, 0, x_0); x_2 = lean::box(0); x_3 = lean::alloc_cnstr(1, 2, 0); @@ -16971,28 +16987,12 @@ x_18 = l_lean_parser_combinators_node_view___rarg(x_6, x_7, x_8, x_9, x_10, x_5, return x_18; } } -obj* _init_l_lean_parser_command_notation__spec_rule_parser_lean_parser_has__tokens() { -_start: -{ -obj* x_0; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; -x_0 = l_lean_parser_command_notation__spec_transition_parser_lean_parser_has__tokens; -lean::inc(x_0); -x_2 = l_lean_parser_tokens___rarg(x_0); -x_3 = lean::box(0); -x_4 = l_lean_parser_list_cons_tokens___rarg(x_2, x_3); -x_5 = l_lean_parser_command_notation__spec_notation__symbol_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); -return x_8; -} -} obj* _init_l_lean_parser_command_notation__spec_rule_parser___closed__1() { _start: { obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_transition_parser), 5, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +x_1 = 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_1, 0, x_0); x_2 = lean::box(0); x_3 = lean::alloc_cnstr(1, 2, 0); @@ -17899,7 +17899,7 @@ lean::inc(x_0); return x_0; } } -obj* l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__3(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* l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { _start: { obj* x_8; uint8 x_9; @@ -18028,7 +18028,7 @@ lean::cnstr_set(x_64, 0, x_57); lean::cnstr_set(x_64, 1, x_1); lean::inc(x_59); lean::inc(x_64); -x_67 = l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__3(x_0, x_64, x_12, x_3, x_4, x_5, x_59, x_16); +x_67 = l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__3(x_0, x_64, x_12, x_3, x_4, x_5, x_59, x_16); x_68 = lean::cnstr_get(x_67, 0); lean::inc(x_68); x_70 = lean::cnstr_get(x_67, 1); @@ -18164,12 +18164,12 @@ 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__view___spec__4___rarg(x_119, x_120, x_118, x_118, x_3, x_4, x_5, x_6, x_7); +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; } } } -obj* l_lean_parser_combinators_many1___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_combinators_many1___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { 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; @@ -18179,7 +18179,7 @@ x_8 = lean::mk_nat_obj(1u); x_9 = lean::nat_add(x_6, x_8); lean::dec(x_8); lean::dec(x_6); -x_12 = l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__3(x_0, x_7, x_9, x_1, x_2, x_3, x_4, x_5); +x_12 = l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__3(x_0, x_7, x_9, x_1, x_2, x_3, x_4, x_5); x_13 = lean::cnstr_get(x_12, 0); lean::inc(x_13); x_15 = lean::cnstr_get(x_12, 1); @@ -18205,12 +18205,12 @@ lean::cnstr_set(x_21, 1, x_15); return x_21; } } -obj* l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_7; obj* x_8; obj* x_10; obj* x_12; lean::inc(x_4); -x_7 = l_lean_parser_combinators_many1___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__2(x_0, x_1, x_2, x_3, x_4, x_5); +x_7 = l_lean_parser_combinators_many1___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__2(x_0, x_1, x_2, x_3, x_4, x_5); x_8 = lean::cnstr_get(x_7, 0); lean::inc(x_8); x_10 = lean::cnstr_get(x_7, 1); @@ -18288,15 +18288,31 @@ 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; +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; +} +} obj* _init_l_lean_parser_command_notation__spec_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_12; obj* x_19; -x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4), 1, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +x_0 = 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_1 = 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_1, 0, x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_rule_parser), 5, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__1), 6, 1); +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); x_5 = lean::alloc_cnstr(1, 2, 0); @@ -18321,31 +18337,15 @@ x_19 = l_lean_parser_combinators_node_view___rarg(x_7, x_8, x_9, x_10, x_11, x_6 return x_19; } } -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; -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; -} -} obj* _init_l_lean_parser_command_notation__spec_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; -x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4), 1, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +x_0 = 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_1 = 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_1, 0, x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_command_notation__spec_rule_parser), 5, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__1), 6, 1); +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); x_5 = lean::alloc_cnstr(1, 2, 0); @@ -19410,6 +19410,38 @@ lean::inc(x_0); 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; +x_0 = lean::mk_string("local "); +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 = l_lean_parser_tokens___rarg(x_3); +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_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; +} +} obj* _init_l_lean_parser_command_notation_parser_lean_parser_has__view() { _start: { @@ -19421,11 +19453,11 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +x_7 = 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_7, 0, x_6); x_8 = lean::mk_string("notation"); x_9 = l_string_trim(x_8); @@ -19433,7 +19465,7 @@ lean::inc(x_9); x_11 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_11, 0, x_9); lean::inc(x_4); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_13 = 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_13, 0, x_9); lean::closure_set(x_13, 1, x_4); lean::closure_set(x_13, 2, x_11); @@ -19453,7 +19485,7 @@ 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_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -19488,38 +19520,6 @@ x_43 = l_lean_parser_combinators_node_view___rarg(x_31, x_32, x_33, x_34, x_35, return x_43; } } -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; -x_0 = lean::mk_string("local "); -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 = l_lean_parser_tokens___rarg(x_3); -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_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; -} -} obj* _init_l_lean_parser_command_notation_parser___closed__1() { _start: { @@ -19531,11 +19531,11 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +x_7 = 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_7, 0, x_6); x_8 = lean::mk_string("notation"); x_9 = l_string_trim(x_8); @@ -19543,7 +19543,7 @@ lean::inc(x_9); x_11 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_11, 0, x_9); lean::inc(x_4); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_13 = 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_13, 0, x_9); lean::closure_set(x_13, 1, x_4); lean::closure_set(x_13, 2, x_11); @@ -19563,7 +19563,7 @@ 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_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -20235,6 +20235,30 @@ lean::inc(x_0); 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; +x_0 = lean::mk_string("reserve"); +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::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_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; +} +} obj* _init_l_lean_parser_command_reserve__notation_parser_lean_parser_has__view() { _start: { @@ -20246,7 +20270,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -20255,7 +20279,7 @@ x_8 = l_string_trim(x_7); lean::inc(x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_10, 0, x_8); -x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_11 = 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_11, 0, x_8); lean::closure_set(x_11, 1, x_4); lean::closure_set(x_11, 2, x_10); @@ -20292,30 +20316,6 @@ x_32 = l_lean_parser_combinators_node_view___rarg(x_20, x_21, x_22, x_23, x_24, return x_32; } } -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; -x_0 = lean::mk_string("reserve"); -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::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_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; -} -} obj* _init_l_lean_parser_command_reserve__notation_parser___closed__1() { _start: { @@ -20327,7 +20327,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -20336,7 +20336,7 @@ x_8 = l_string_trim(x_7); lean::inc(x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_10, 0, x_8); -x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_11 = 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_11, 0, x_8); lean::closure_set(x_11, 1, x_4); lean::closure_set(x_11, 2, x_10); @@ -21286,100 +21286,6 @@ lean::inc(x_0); return x_0; } } -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; -x_0 = lean::mk_string("prefix"); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -x_7 = lean::mk_string("infix"); -x_8 = l_string_trim(x_7); -lean::inc(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_10, 0, x_8); -lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -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::mk_string("infixl"); -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_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___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::mk_string("infixr"); -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_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___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::mk_string("postfix"); -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); -lean::inc(x_4); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 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::box(0); -lean::inc(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); -x_34 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_34, 0, x_24); -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, 1, x_34); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_12); -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__view___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); -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; -} -} obj* _init_l_lean_parser_command_mixfix_kind_parser_lean_parser_has__tokens() { _start: { @@ -21412,10 +21318,10 @@ x_24 = l_lean_parser_tokens___rarg(x_23); return x_24; } } -obj* _init_l_lean_parser_command_mixfix_kind_parser___closed__1() { +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_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; x_0 = lean::mk_string("prefix"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -21423,7 +21329,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -21433,7 +21339,7 @@ lean::inc(x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_10, 0, x_8); lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_12 = 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_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); @@ -21443,7 +21349,7 @@ 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_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -21453,7 +21359,7 @@ 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_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -21463,7 +21369,7 @@ 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); lean::inc(x_4); -x_30 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_30 = 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_30, 0, x_26); lean::closure_set(x_30, 1, x_4); lean::closure_set(x_30, 2, x_28); @@ -21484,7 +21390,101 @@ 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__view___spec__3), 7, 2); +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); +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; +} +} +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; +x_0 = lean::mk_string("prefix"); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +x_7 = lean::mk_string("infix"); +x_8 = l_string_trim(x_7); +lean::inc(x_8); +x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_10, 0, x_8); +lean::inc(x_4); +x_12 = 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_12, 0, x_8); +lean::closure_set(x_12, 1, x_4); +lean::closure_set(x_12, 2, x_10); +x_13 = lean::mk_string("infixl"); +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_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::mk_string("infixr"); +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_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::mk_string("postfix"); +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); +lean::inc(x_4); +x_30 = 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_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_33 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_33, 0, x_30); +lean::cnstr_set(x_33, 1, x_31); +x_34 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_34, 0, x_24); +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, 1, x_34); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_12); +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); @@ -22462,6 +22462,37 @@ lean::inc(x_0); 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; +x_0 = lean::mk_string("local "); +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 = 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_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; +} +} obj* _init_l_lean_parser_command_mixfix_parser_lean_parser_has__view() { _start: { @@ -22473,11 +22504,11 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +x_7 = 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_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); @@ -22496,7 +22527,7 @@ 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::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__view___spec__1), 8, 3); +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); @@ -22531,37 +22562,6 @@ x_38 = l_lean_parser_combinators_node_view___rarg(x_26, x_27, x_28, x_29, x_30, return x_38; } } -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; -x_0 = lean::mk_string("local "); -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 = 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_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; -} -} obj* _init_l_lean_parser_command_mixfix_parser___closed__1() { _start: { @@ -22573,11 +22573,11 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +x_7 = 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_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); @@ -22596,7 +22596,7 @@ 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::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__view___spec__1), 8, 3); +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); @@ -22984,6 +22984,24 @@ lean::inc(x_0); 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; +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; +} +} obj* _init_l_lean_parser_command_notation__like_parser_lean_parser_has__view() { _start: { @@ -22999,7 +23017,7 @@ 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__view___spec__3), 7, 2); +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); @@ -23021,24 +23039,6 @@ x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x return x_21; } } -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; -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; -} -} obj* _init_l_lean_parser_command_notation__like_parser___closed__1() { _start: { @@ -23054,7 +23054,7 @@ 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__view___spec__3), 7, 2); +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); @@ -23647,6 +23647,29 @@ lean::inc(x_0); 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; +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_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; +} +} obj* _init_l_lean_parser_command_reserve__mixfix_parser_lean_parser_has__view() { _start: { @@ -23657,7 +23680,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -23695,29 +23718,6 @@ x_27 = l_lean_parser_combinators_node_view___rarg(x_15, x_16, x_17, x_18, x_19, return x_27; } } -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; -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_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; -} -} obj* _init_l_lean_parser_command_reserve__mixfix_parser___closed__1() { _start: { @@ -23728,7 +23728,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -23771,17 +23771,17 @@ void initialize_init_lean_parser_notation() { if (_G_initialized) return; _G_initialized = true; initialize_init_lean_parser_token(); - l_lean_parser_term_parser_lean_parser_has__view___closed__1 = _init_l_lean_parser_term_parser_lean_parser_has__view___closed__1(); l_lean_parser_term_parser_lean_parser_has__tokens___closed__1 = _init_l_lean_parser_term_parser_lean_parser_has__tokens___closed__1(); + l_lean_parser_term_parser_lean_parser_has__view___closed__1 = _init_l_lean_parser_term_parser_lean_parser_has__view___closed__1(); l_lean_parser_term_parser___closed__1 = _init_l_lean_parser_term_parser___closed__1(); l_lean_parser_command_notation__spec_precedence__lit = _init_l_lean_parser_command_notation__spec_precedence__lit(); l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27 = _init_l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27(); l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_notation__spec_precedence__lit_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_notation__spec_precedence__lit_has__view = _init_l_lean_parser_command_notation__spec_precedence__lit_has__view(); - l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1 = _init_l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1(); - l_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view(); + l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1 = _init_l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1(); l_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens(); + l_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_precedence__lit_parser___closed__1 = _init_l_lean_parser_command_notation__spec_precedence__lit_parser___closed__1(); l_lean_parser_command_notation__spec_precedence__offset__op = _init_l_lean_parser_command_notation__spec_precedence__offset__op(); l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27 = _init_l_lean_parser_command_notation__spec_precedence__offset__op_has__view_x_27(); @@ -23800,8 +23800,8 @@ void initialize_init_lean_parser_notation() { l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_notation__spec_precedence__term_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_notation__spec_precedence__term_has__view = _init_l_lean_parser_command_notation__spec_precedence__term_has__view(); - l_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens(); + l_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_precedence__term_parser___closed__1 = _init_l_lean_parser_command_notation__spec_precedence__term_parser___closed__1(); l_lean_parser_command_notation__spec_precedence = _init_l_lean_parser_command_notation__spec_precedence(); l_lean_parser_command_notation__spec_precedence_has__view_x_27 = _init_l_lean_parser_command_notation__spec_precedence_has__view_x_27(); @@ -23809,19 +23809,19 @@ void initialize_init_lean_parser_notation() { l_lean_parser_command_notation__spec_precedence_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_notation__spec_precedence_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_notation__spec_precedence_has__view_x_27___lambda__1___closed__3 = _init_l_lean_parser_command_notation__spec_precedence_has__view_x_27___lambda__1___closed__3(); l_lean_parser_command_notation__spec_precedence_has__view = _init_l_lean_parser_command_notation__spec_precedence_has__view(); - l_lean_parser_command_notation__spec_precedence_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_precedence_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_precedence_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation__spec_precedence_parser_lean_parser_has__tokens(); + l_lean_parser_command_notation__spec_precedence_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_precedence_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_precedence_parser___closed__1 = _init_l_lean_parser_command_notation__spec_precedence_parser___closed__1(); - l_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__tokens(); + l_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_quoted__symbol_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_symbol__quote = _init_l_lean_parser_command_notation__spec_symbol__quote(); l_lean_parser_command_notation__spec_symbol__quote_has__view_x_27 = _init_l_lean_parser_command_notation__spec_symbol__quote_has__view_x_27(); l_lean_parser_command_notation__spec_symbol__quote_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_notation__spec_symbol__quote_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_notation__spec_symbol__quote_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_notation__spec_symbol__quote_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_notation__spec_symbol__quote_has__view = _init_l_lean_parser_command_notation__spec_symbol__quote_has__view(); + l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens(); l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___lambda__1___closed__1 = _init_l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___lambda__1___closed__1(); - l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens(); l_lean_parser_command_notation__spec_symbol__quote_parser___closed__1 = _init_l_lean_parser_command_notation__spec_symbol__quote_parser___closed__1(); l_lean_parser_command_notation__spec_unquoted__symbol_parser___closed__1 = _init_l_lean_parser_command_notation__spec_unquoted__symbol_parser___closed__1(); l_lean_parser_command_notation__spec_unquoted__symbol_tokens = _init_l_lean_parser_command_notation__spec_unquoted__symbol_tokens(); @@ -23831,8 +23831,8 @@ void initialize_init_lean_parser_notation() { l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_notation__spec_notation__symbol_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_notation__spec_notation__symbol_has__view = _init_l_lean_parser_command_notation__spec_notation__symbol_has__view(); - l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__tokens(); + l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_notation__symbol_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_notation__symbol_parser___closed__1 = _init_l_lean_parser_command_notation__spec_notation__symbol_parser___closed__1(); l_lean_parser_command_notation__spec_mixfix__symbol = _init_l_lean_parser_command_notation__spec_mixfix__symbol(); l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27 = _init_l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27(); @@ -23840,8 +23840,8 @@ void initialize_init_lean_parser_notation() { l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__3 = _init_l_lean_parser_command_notation__spec_mixfix__symbol_has__view_x_27___lambda__1___closed__3(); l_lean_parser_command_notation__spec_mixfix__symbol_has__view = _init_l_lean_parser_command_notation__spec_mixfix__symbol_has__view(); - l_lean_parser_command_notation__spec_mixfix__symbol_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_mixfix__symbol_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_mixfix__symbol_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation__spec_mixfix__symbol_parser_lean_parser_has__tokens(); + l_lean_parser_command_notation__spec_mixfix__symbol_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_mixfix__symbol_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_mixfix__symbol_parser___closed__1 = _init_l_lean_parser_command_notation__spec_mixfix__symbol_parser___closed__1(); l_lean_parser_command_notation__spec_fold__action__folder = _init_l_lean_parser_command_notation__spec_fold__action__folder(); l_lean_parser_command_notation__spec_fold__action__folder_has__view_x_27 = _init_l_lean_parser_command_notation__spec_fold__action__folder_has__view_x_27(); @@ -23852,9 +23852,9 @@ void initialize_init_lean_parser_notation() { l_lean_parser_command_notation__spec_fold__action_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_notation__spec_fold__action_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_notation__spec_fold__action_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_notation__spec_fold__action_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_notation__spec_fold__action_has__view = _init_l_lean_parser_command_notation__spec_fold__action_has__view(); - l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1 = _init_l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1(); - l_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view(); + l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1 = _init_l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1(); l_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens(); + l_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_fold__action_parser___closed__1 = _init_l_lean_parser_command_notation__spec_fold__action_parser___closed__1(); l_lean_parser_command_notation__spec_scoped__action = _init_l_lean_parser_command_notation__spec_scoped__action(); l_lean_parser_command_notation__spec_scoped__action_has__view_x_27 = _init_l_lean_parser_command_notation__spec_scoped__action_has__view_x_27(); @@ -23871,8 +23871,8 @@ void initialize_init_lean_parser_notation() { l_lean_parser_command_notation__spec_action_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_notation__spec_action_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_notation__spec_action_has__view_x_27___lambda__1___closed__3 = _init_l_lean_parser_command_notation__spec_action_has__view_x_27___lambda__1___closed__3(); l_lean_parser_command_notation__spec_action_has__view = _init_l_lean_parser_command_notation__spec_action_has__view(); - l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_action_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation__spec_action_parser_lean_parser_has__tokens(); + l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_action_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_action_parser___closed__1 = _init_l_lean_parser_command_notation__spec_action_parser___closed__1(); l_lean_parser_command_notation__spec_binder = _init_l_lean_parser_command_notation__spec_binder(); l_lean_parser_command_notation__spec_binder_has__view_x_27 = _init_l_lean_parser_command_notation__spec_binder_has__view_x_27(); @@ -23895,16 +23895,16 @@ void initialize_init_lean_parser_notation() { l_lean_parser_command_notation__spec_transition_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_notation__spec_transition_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_notation__spec_transition_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_notation__spec_transition_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_notation__spec_transition_has__view = _init_l_lean_parser_command_notation__spec_transition_has__view(); - l_lean_parser_command_notation__spec_transition_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_transition_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_transition_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation__spec_transition_parser_lean_parser_has__tokens(); + l_lean_parser_command_notation__spec_transition_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_transition_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_transition_parser___closed__1 = _init_l_lean_parser_command_notation__spec_transition_parser___closed__1(); l_lean_parser_command_notation__spec_rule = _init_l_lean_parser_command_notation__spec_rule(); l_lean_parser_command_notation__spec_rule_has__view_x_27 = _init_l_lean_parser_command_notation__spec_rule_has__view_x_27(); l_lean_parser_command_notation__spec_rule_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_notation__spec_rule_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_notation__spec_rule_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_notation__spec_rule_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_notation__spec_rule_has__view = _init_l_lean_parser_command_notation__spec_rule_has__view(); - l_lean_parser_command_notation__spec_rule_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_rule_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_rule_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation__spec_rule_parser_lean_parser_has__tokens(); + l_lean_parser_command_notation__spec_rule_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_rule_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_rule_parser___closed__1 = _init_l_lean_parser_command_notation__spec_rule_parser___closed__1(); l_lean_parser_command_notation__spec = _init_l_lean_parser_command_notation__spec(); l_lean_parser_command_notation__spec_has__view_x_27 = _init_l_lean_parser_command_notation__spec_has__view_x_27(); @@ -23918,24 +23918,24 @@ void initialize_init_lean_parser_notation() { l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__8 = _init_l_lean_parser_command_notation__spec_has__view_x_27___lambda__1___closed__8(); l_lean_parser_command_notation__spec_has__view_x_27___lambda__2___closed__1 = _init_l_lean_parser_command_notation__spec_has__view_x_27___lambda__2___closed__1(); l_lean_parser_command_notation__spec_has__view = _init_l_lean_parser_command_notation__spec_has__view(); - l_lean_parser_command_notation__spec_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation__spec_parser_lean_parser_has__tokens(); + l_lean_parser_command_notation__spec_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__spec_parser_lean_parser_has__view(); l_lean_parser_command_notation__spec_parser___closed__1 = _init_l_lean_parser_command_notation__spec_parser___closed__1(); l_lean_parser_command_notation = _init_l_lean_parser_command_notation(); l_lean_parser_command_notation_has__view_x_27 = _init_l_lean_parser_command_notation_has__view_x_27(); l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_notation_has__view = _init_l_lean_parser_command_notation_has__view(); - l_lean_parser_command_notation_parser_lean_parser_has__view = _init_l_lean_parser_command_notation_parser_lean_parser_has__view(); l_lean_parser_command_notation_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation_parser_lean_parser_has__tokens(); + l_lean_parser_command_notation_parser_lean_parser_has__view = _init_l_lean_parser_command_notation_parser_lean_parser_has__view(); l_lean_parser_command_notation_parser___closed__1 = _init_l_lean_parser_command_notation_parser___closed__1(); l_lean_parser_command_reserve__notation = _init_l_lean_parser_command_reserve__notation(); l_lean_parser_command_reserve__notation_has__view_x_27 = _init_l_lean_parser_command_reserve__notation_has__view_x_27(); l_lean_parser_command_reserve__notation_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_reserve__notation_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_reserve__notation_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_reserve__notation_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_reserve__notation_has__view = _init_l_lean_parser_command_reserve__notation_has__view(); - l_lean_parser_command_reserve__notation_parser_lean_parser_has__view = _init_l_lean_parser_command_reserve__notation_parser_lean_parser_has__view(); l_lean_parser_command_reserve__notation_parser_lean_parser_has__tokens = _init_l_lean_parser_command_reserve__notation_parser_lean_parser_has__tokens(); + l_lean_parser_command_reserve__notation_parser_lean_parser_has__view = _init_l_lean_parser_command_reserve__notation_parser_lean_parser_has__view(); l_lean_parser_command_reserve__notation_parser___closed__1 = _init_l_lean_parser_command_reserve__notation_parser___closed__1(); l_lean_parser_command_mixfix_kind = _init_l_lean_parser_command_mixfix_kind(); l_lean_parser_command_mixfix_kind_has__view_x_27 = _init_l_lean_parser_command_mixfix_kind_has__view_x_27(); @@ -23948,30 +23948,30 @@ void initialize_init_lean_parser_notation() { l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__7 = _init_l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__1___closed__7(); l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__2___closed__1 = _init_l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__2___closed__1(); l_lean_parser_command_mixfix_kind_has__view = _init_l_lean_parser_command_mixfix_kind_has__view(); - l_lean_parser_command_mixfix_kind_parser_lean_parser_has__view = _init_l_lean_parser_command_mixfix_kind_parser_lean_parser_has__view(); l_lean_parser_command_mixfix_kind_parser_lean_parser_has__tokens = _init_l_lean_parser_command_mixfix_kind_parser_lean_parser_has__tokens(); + l_lean_parser_command_mixfix_kind_parser_lean_parser_has__view = _init_l_lean_parser_command_mixfix_kind_parser_lean_parser_has__view(); l_lean_parser_command_mixfix_kind_parser___closed__1 = _init_l_lean_parser_command_mixfix_kind_parser___closed__1(); l_lean_parser_command_mixfix = _init_l_lean_parser_command_mixfix(); l_lean_parser_command_mixfix_has__view_x_27 = _init_l_lean_parser_command_mixfix_has__view_x_27(); l_lean_parser_command_mixfix_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_mixfix_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_mixfix_has__view = _init_l_lean_parser_command_mixfix_has__view(); - l_lean_parser_command_mixfix_parser_lean_parser_has__view = _init_l_lean_parser_command_mixfix_parser_lean_parser_has__view(); l_lean_parser_command_mixfix_parser_lean_parser_has__tokens = _init_l_lean_parser_command_mixfix_parser_lean_parser_has__tokens(); + l_lean_parser_command_mixfix_parser_lean_parser_has__view = _init_l_lean_parser_command_mixfix_parser_lean_parser_has__view(); l_lean_parser_command_mixfix_parser___closed__1 = _init_l_lean_parser_command_mixfix_parser___closed__1(); l_lean_parser_command_notation__like = _init_l_lean_parser_command_notation__like(); l_lean_parser_command_notation__like_has__view_x_27 = _init_l_lean_parser_command_notation__like_has__view_x_27(); l_lean_parser_command_notation__like_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_notation__like_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_notation__like_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_notation__like_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_notation__like_has__view = _init_l_lean_parser_command_notation__like_has__view(); - l_lean_parser_command_notation__like_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__like_parser_lean_parser_has__view(); l_lean_parser_command_notation__like_parser_lean_parser_has__tokens = _init_l_lean_parser_command_notation__like_parser_lean_parser_has__tokens(); + l_lean_parser_command_notation__like_parser_lean_parser_has__view = _init_l_lean_parser_command_notation__like_parser_lean_parser_has__view(); l_lean_parser_command_notation__like_parser___closed__1 = _init_l_lean_parser_command_notation__like_parser___closed__1(); l_lean_parser_command_reserve__mixfix = _init_l_lean_parser_command_reserve__mixfix(); l_lean_parser_command_reserve__mixfix_has__view_x_27 = _init_l_lean_parser_command_reserve__mixfix_has__view_x_27(); l_lean_parser_command_reserve__mixfix_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_command_reserve__mixfix_has__view_x_27___lambda__1___closed__1(); l_lean_parser_command_reserve__mixfix_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_command_reserve__mixfix_has__view_x_27___lambda__1___closed__2(); l_lean_parser_command_reserve__mixfix_has__view = _init_l_lean_parser_command_reserve__mixfix_has__view(); - l_lean_parser_command_reserve__mixfix_parser_lean_parser_has__view = _init_l_lean_parser_command_reserve__mixfix_parser_lean_parser_has__view(); l_lean_parser_command_reserve__mixfix_parser_lean_parser_has__tokens = _init_l_lean_parser_command_reserve__mixfix_parser_lean_parser_has__tokens(); + l_lean_parser_command_reserve__mixfix_parser_lean_parser_has__view = _init_l_lean_parser_command_reserve__mixfix_parser_lean_parser_has__view(); l_lean_parser_command_reserve__mixfix_parser___closed__1 = _init_l_lean_parser_command_reserve__mixfix_parser___closed__1(); } diff --git a/src/boot/init/lean/parser/syntax.cpp b/src/boot/init/lean/parser/syntax.cpp index 9872de0ca4..37138f6da8 100644 --- a/src/boot/init/lean/parser/syntax.cpp +++ b/src/boot/init/lean/parser/syntax.cpp @@ -180,14 +180,6 @@ x_6 = lean_name_mk_string(x_4, x_5); return x_6; } } -obj* _init_l_lean_parser_macro__scope_lean_has__to__format() { -_start: -{ -obj* x_0; -x_0 = lean::alloc_closure(reinterpret_cast(l_lean_nat__has__to__format), 1, 0); -return x_0; -} -} obj* _init_l_lean_parser_macro__scope_decidable__eq() { _start: { @@ -196,6 +188,14 @@ x_0 = lean::alloc_closure(reinterpret_cast(l_nat_dec__eq___boxed), 2, 0); return x_0; } } +obj* _init_l_lean_parser_macro__scope_lean_has__to__format() { +_start: +{ +obj* x_0; +x_0 = lean::alloc_closure(reinterpret_cast(l_lean_nat__has__to__format), 1, 0); +return x_0; +} +} obj* _init_l_lean_parser_macro__scope() { _start: { @@ -2764,8 +2764,8 @@ void initialize_init_lean_parser_syntax() { initialize_init_lean_parser_parsec(); l_lean_parser_choice = _init_l_lean_parser_choice(); l_lean_parser_no__kind = _init_l_lean_parser_no__kind(); - l_lean_parser_macro__scope_lean_has__to__format = _init_l_lean_parser_macro__scope_lean_has__to__format(); l_lean_parser_macro__scope_decidable__eq = _init_l_lean_parser_macro__scope_decidable__eq(); + l_lean_parser_macro__scope_lean_has__to__format = _init_l_lean_parser_macro__scope_lean_has__to__format(); l_lean_parser_macro__scope = _init_l_lean_parser_macro__scope(); l_lean_parser_macro__scopes = _init_l_lean_parser_macro__scopes(); l_lean_parser_inhabited = _init_l_lean_parser_inhabited(); diff --git a/src/boot/init/lean/parser/term.cpp b/src/boot/init/lean/parser/term.cpp index 3652e88c7e..d643b96e97 100644 --- a/src/boot/init/lean/parser/term.cpp +++ b/src/boot/init/lean/parser/term.cpp @@ -30,17 +30,16 @@ obj* l_lean_parser_term_binder__default; obj* l_lean_parser_ident__univ__spec_has__view_x_27; obj* l_lean_parser_term_binders_parser_lean_parser_has__tokens; extern obj* l_lean_parser_match__token___closed__2; -obj* l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_have__proof_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_let__lhs_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_type__spec_has__view_x_27; obj* l_lean_parser_parsec__t_bind__mk__res___rarg(obj*, obj*); obj* l_lean_parser_term_have__proof; obj* l_lean_parser_term_inst__implicit__named__binder_has__view_x_27; -obj* l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_rbmap_find___main___at___private_init_lean_parser_term_2__leading___spec__2___rarg(obj*, obj*); obj* l_lean_parser_term_implicit__binder_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_curr__lbp___at_lean_parser_term__parser_run___spec__4(obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_combinators_any__of___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_arrow_has__view; obj* l_lean_parser_term_app_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_binder__content; @@ -55,7 +54,6 @@ obj* l_lean_parser_term_bracketed__binder_parser___closed__1; obj* l_lean_parser_term_pi_parser_lean_parser_has__view; obj* l_lean_parser_indexed___at___private_init_lean_parser_term_1__trailing___spec__1(obj*); obj* l_lean_parser_term_explicit_parser(obj*, obj*, obj*, obj*, obj*); -obj* l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_ident__univ__spec_parser_lean_parser_has__view___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_have__proof_has__view_x_27; obj* l_lean_parser_term_show; obj* l_lean_parser_term_implicit__binder_has__view_x_27___lambda__1___closed__2; @@ -80,17 +78,16 @@ obj* l_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens; obj* l_lean_parser_term_inst__implicit__named__binder; obj* l_list_foldl___main___at___private_init_lean_parser_term_1__trailing___spec__12(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_number; -obj* l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_let_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_binder__content_has__view_x_27___lambda__1___closed__5; +extern obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; extern obj* l_lean_parser_combinators_many___rarg___closed__1; obj* l_lean_parser_term_binders__ext_has__view_x_27___lambda__1___closed__5; obj* l_lean_parser_term_struct__inst__field_has__view_x_27; obj* l_lean_parser_term_simple__inst__implicit__binder_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_implicit__binder_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_simple__binder_has__view_x_27; -obj* l_list_map___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__2(obj*); obj* l_lean_parser_term_struct__inst__type_has__view_x_27; obj* l_lean_parser_term_tuple_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_explicit__binder; @@ -110,11 +107,10 @@ obj* l_lean_parser_term_binders__ext; namespace lean { obj* nat_add(obj*, obj*); } -obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_explicit__modifier; -obj* l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__2(obj*); obj* l_lean_parser_term_tuple_has__view_x_27___lambda__1(obj*); extern obj* l_lean_parser_trailing__term__parser__m_monad__except; +obj* l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_bracketed__binders_has__view_x_27; obj* l_lean_parser_term_struct__inst__field; obj* l_lean_parser_term_mixed__binder; @@ -127,6 +123,7 @@ obj* l_lean_parser_number_parser___at_lean_parser_term_projection_parser_lean_pa extern obj* l_mjoin___rarg___closed__1; obj* l_lean_parser_term_binders__types_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_binders_has__view_x_27___lambda__1(obj*); +obj* l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__4; obj* l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_anonymous__constructor_parser(obj*, obj*, obj*, obj*, obj*); @@ -142,11 +139,10 @@ obj* l_lean_parser_term_inst__implicit__anonymous__binder_has__view_x_27; obj* l_lean_parser_term_opt__type_parser___closed__1; obj* l_lean_parser_term_show_parser_lean_parser_has__view; obj* l_lean_parser_with__trailing___rarg___lambda__1(obj*, obj*); +obj* l_list_mfoldr___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__5(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_if_has__view; obj* l_lean_parser_term_bracketed__binders; -obj* l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_parsec__t_lookahead___at___private_init_lean_parser_term_2__leading___spec__9(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_combinators_longest__choice___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_term_simple__inst__implicit__binder; obj* l_rbmap_find___main___at___private_init_lean_parser_term_1__trailing___spec__3___rarg(obj*, obj*); @@ -176,14 +172,14 @@ obj* l_lean_parser_term_sort_parser___closed__1; obj* l_lean_parser_term_assume_has__view_x_27; obj* l_lean_parser_pratt__parser___at_lean_parser_term__parser_run___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_option_to__monad___main___at_lean_parser_indexed___spec__2___rarg(obj*, obj*, obj*, obj*); -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__2___rarg(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_if_has__view_x_27; obj* l_lean_parser_parsec__t_try__mk__res___rarg(obj*); +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__2___rarg(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_term_binder__default__tac_has__view_x_27___lambda__2(obj*); +obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4(obj*); obj* l_lean_parser_term_sort__app_parser_lean_parser_has__view; obj* l_lean_parser_term_struct__inst__source_has__view_x_27___lambda__1___closed__1; -obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__4(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_binders__remainder; obj* l_lean_parser_term_paren__special_has__view; obj* l_list_reverse___rarg(obj*); @@ -193,23 +189,24 @@ obj* l_lean_parser_term_typed_has__view; obj* l_lean_parser_term_assume_parser_lean_parser_has__view; obj* l_lean_parser_ident__univs_parser_lean_parser_has__view; obj* l_lean_parser_term_sorry_has__view_x_27___lambda__1(obj*); +obj* l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_type__spec_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_paren__special_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_binders_has__view_x_27; extern "C" obj* lean_name_mk_string(obj*, obj*); +obj* l_list_mfoldl___main___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__4(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_subtype_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_paren__content_has__view; obj* l_lean_parser_term_strict__implicit__binder_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_projection__spec; obj* l_lean_parser_term_opt__type_view__default; -obj* l_lean_parser_monad__parsec_longest__match___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__3(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_error___at_lean_parser_term__parser_run___spec__3(obj*); obj* l_lean_parser_term_explicit_parser___closed__1; -obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4(obj*); obj* l_lean_parser_term_opt__type_parser_lean_parser_has__view; obj* l_lean_parser_term_inst__implicit__anonymous__binder; obj* l_list_enum__from___main___rarg(obj*, obj*); obj* l_lean_parser_term_explicit__modifier_has__view_x_27; +obj* l_lean_parser_combinators_longest__choice___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_inaccessible_parser_lean_parser_has__tokens; obj* l_lean_parser_term_sort_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_binder__default__val_has__view_x_27; @@ -251,15 +248,17 @@ obj* l_lean_parser_term_have__term_has__view; obj* l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_projection__spec_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_term_inst__implicit__binder__content_has__view_x_27___lambda__1(obj*); -obj* l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7(obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_anonymous__constructor_has__view_x_27; obj* l_lean_parser_term_anonymous__constructor_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_ident__univs_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_combinators_sep__by_tokens___rarg(obj*, obj*); obj* l_lean_parser_term_anonymous__constructor; +obj* l_lean_parser_combinators_any__of___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__2(obj*, obj*, obj*, obj*); obj* l_lean_parser_term_explicit_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_paren__content_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_show_has__view_x_27___lambda__1(obj*); +obj* l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_list_map___main___at_lean_parser_term_anonymous__constructor_has__view_x_27___spec__2(obj*); obj* l_lean_parser_term_projection__spec_has__view_x_27; obj* l_lean_parser_term_have__from_has__view_x_27___lambda__1(obj*); @@ -277,9 +276,10 @@ obj* l_lean_parser_parsec__t_failure___at_lean_parser_token___spec__4___rarg(obj obj* l_lean_parser_term_pi_has__view; obj* l_lean_parser_term_binder__default__val_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_sorry_parser(obj*, obj*, obj*, obj*, obj*); +obj* l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__2(obj*); obj* l_lean_parser_term_anonymous__inaccessible_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_observing___at_lean_parser_peek__token___spec__2(obj*, obj*, obj*); -obj* l_lean_parser_combinators_any__of___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_inaccessible; obj* l_lean_parser_term_simple__binder_parser___closed__1; @@ -289,6 +289,7 @@ obj* string_length(obj*); } obj* l_lean_parser_term_projection_parser_lean_parser_has__view___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_binder_parser_lean_parser_has__tokens; +obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__4(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_ident__univs; obj* l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_binder_has__view_x_27___lambda__1___closed__1; @@ -333,6 +334,7 @@ obj* l_lean_parser_monad__parsec_longest__match___at___private_init_lean_parser_ obj* l_lean_parser_term_opt__ident_parser_lean_parser_has__view___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_simple__implicit__binder_has__view_x_27; obj* l_lean_parser_term_anonymous__inaccessible; +extern obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1; obj* l_lean_parser_try__view___at_lean_parser_number_parser___spec__1(obj*); obj* l_lean_parser_term_explicit_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_term_borrowed_parser_lean_parser_has__view; @@ -341,12 +343,14 @@ obj* l_lean_parser_term_inst__implicit__anonymous__binder_has__view_x_27___lambd obj* l_lean_parser_term_explicit__binder_has__view; obj* l_lean_parser_term_assume__binders_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_simple__binder_parser_lean_parser_has__view; +obj* l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__tokens___spec__1(obj*, obj*, uint8, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_binder__default__val_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_struct__inst__source; +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__1___rarg(obj*, obj*, obj*, obj*); obj* l_lean_parser_term_binder__content_has__view_x_27___lambda__2___closed__1; obj* l_lean_parser_term_subtype_parser_lean_parser_has__tokens; obj* l_lean_parser_term_builtin__trailing__parsers_lean_parser_has__tokens; -extern obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1; +obj* l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_binders_has__view; obj* l_lean_parser_term_simple__implicit__binder_has__view_x_27___lambda__1___closed__1; extern obj* l_lean_parser_parsec_result_mk__eps___rarg___closed__1; @@ -377,13 +381,13 @@ obj* l_rbmap_find___main___at___private_init_lean_parser_term_2__leading___spec_ obj* l_lean_parser_term_binders__remainder_has__view; obj* l_lean_parser_term_opt__ident_parser_lean_parser_has__tokens; obj* l_lean_parser_term_explicit_parser_lean_parser_has__view; -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__1___rarg(obj*, obj*, obj*, obj*); extern obj* l_lean_parser_number_has__view; obj* l_rbmap_find___main___at___private_init_lean_parser_term_1__trailing___spec__2___rarg(obj*, obj*); obj* l_lean_parser_term_pi_has__view_x_27___lambda__2(obj*); extern obj* l_lean_parser_command_mixfix_kind_has__view_x_27___lambda__2___closed__1; obj* l_lean_parser_term_struct__inst__type_has__view; obj* l_lean_parser_ident__univ__spec; +obj* l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_have__proof_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_level__parser_run(obj*, obj*, obj*, obj*); @@ -398,8 +402,6 @@ obj* l_lean_parser_term_typed_has__view_x_27; obj* l_lean_parser_term_have_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_app_parser_lean_parser_has__view___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_sorry_has__view_x_27; -obj* l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*); -obj* l_list_mfoldr___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__5(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_pi_parser_lean_parser_has__tokens; obj* l_lean_parser_term_binder__content_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_explicit__binder__content_has__view; @@ -411,7 +413,6 @@ obj* l_lean_parser_term_sorry_parser_lean_parser_has__view; obj* l_lean_parser_term_have__proof_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_hole_parser___closed__1; obj* l_lean_parser_term_sort__app_has__view_x_27___lambda__1___closed__1; -obj* l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_rec__t_run__parsec___at_lean_parser_term__parser_run___spec__5___closed__1; obj* l_rbmap_find___main___at___private_init_lean_parser_term_1__trailing___spec__5(obj*); obj* l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__3; @@ -419,6 +420,7 @@ obj* l_lean_parser_term_simple__binder_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_have__from_has__view; obj* l_lean_parser_term_simple__implicit__binder; extern obj* l_lean_parser_no__kind; +obj* l_lean_parser_combinators_many1___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_anonymous__inaccessible_has__view_x_27; obj* l_lean_parser_syntax_as__node___main(obj*); obj* l_lean_parser_term_binders__remainder_has__view_x_27___lambda__1___closed__4; @@ -432,6 +434,7 @@ obj* l_lean_parser_term_binder__default_parser_lean_parser_has__view; obj* l_lean_parser_term_show_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_typed_has__view_x_27___lambda__1___closed__1; obj* l_rbmap_find___main___at___private_init_lean_parser_term_2__leading___spec__2(obj*); +obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_term_paren_parser_lean_parser_has__tokens___spec__2(obj*, obj*, uint8, uint8, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__4; obj* l_lean_parser_term_anonymous__constructor_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_projection_has__view_x_27; @@ -464,12 +467,14 @@ extern obj* l_lean_parser_command_notation_has__view_x_27___lambda__1___closed__ obj* l_lean_parser_term_simple__strict__implicit__binder_has__view; obj* l_lean_parser_ident__univs_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_ident__univs_has__view_x_27___lambda__1___closed__2; +obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__3___rarg(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_mk__raw__res(obj*, obj*); obj* l_lean_parser_term_simple__inst__implicit__binder_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_assume_parser_lean_parser_has__tokens; obj* l_lean_parser_term_bracketed__binders_parser_lean_parser_has__view; obj* l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__4; obj* l_lean_parser_term_sort__app_has__view_x_27___lambda__2(obj*); +obj* l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__tokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_sort__app_parser_lean_parser_has__view___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_pi_has__view_x_27; obj* l_lean_parser_term_binders__remainder_has__view_x_27___lambda__2___closed__1; @@ -492,12 +497,12 @@ obj* l_lean_parser_term_explicit__binder_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_binders_parser_lean_parser_has__view; obj* l_lean_parser_term_have_parser_lean_parser_has__tokens; -obj* l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_simple__binder_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_inst__implicit__binder__content_has__view_x_27; obj* l_lean_parser_term_arrow_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_binders__ext_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_combinators_sep__by1___at_lean_parser_term_match_has__view_x_27___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_combinators_node_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_strict__implicit__binder_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_binder__content_parser___closed__1; @@ -506,6 +511,7 @@ obj* l_lean_parser_term_if_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_projection_has__view; obj* l_lean_parser_term_assume__binders_has__view_x_27; obj* l_lean_parser_term_binder__default__tac; +obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1(obj*); obj* l_lean_parser_term_show_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_match__equation_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_anonymous__constructor_parser_lean_parser_has__tokens; @@ -529,7 +535,6 @@ obj* l_lean_parser_term_assume__binders_has__view; obj* l_lean_parser_term_struct__inst__source_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_inst__implicit__binder_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_assume__binders_has__view_x_27___lambda__1(obj*); -obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__4___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_bracketed__binder_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_tuple_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_term_bracketed__binder_has__view_x_27; @@ -543,13 +548,13 @@ obj* l_lean_parser_term_opt__ident_parser_lean_parser_has__view; obj* l_lean_parser_term_explicit__binder__content_has__view_x_27; obj* l_lean_parser_ident__univ__spec_parser(obj*, obj*, obj*); obj* l_lean_parser_term_lean_parser_has__view; -obj* l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_simple__strict__implicit__binder_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_syntax_mk__node(obj*, obj*); obj* l_lean_parser_term_match_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_typed_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_inaccessible_parser_lean_parser_has__view; obj* l_lean_parser_term_app_has__view_x_27; +obj* l_list_map___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__2(obj*); obj* l_lean_parser_token__map_of__list___main___rarg(obj*); obj* l_lean_parser_term_opt__ident_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_struct__inst__source_has__view_x_27___lambda__1(obj*); @@ -565,7 +570,6 @@ obj* l_lean_parser_term_inst__implicit__anonymous__binder_has__view; obj* l_lean_parser_term_borrowed_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_struct__inst__field_has__view; obj* l_lean_parser_term_paren_parser_lean_parser_has__tokens; -obj* l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__1___closed__5; obj* l_lean_parser_term_inst__implicit__named__binder_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_let__lhs__id_has__view_x_27___lambda__2(obj*); @@ -586,15 +590,17 @@ obj* l_lean_parser_term_inaccessible_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_ident__univs_has__view; obj* l_lean_parser_term_sort_parser_lean_parser_has__tokens; obj* l_lean_parser_term_from_has__view_x_27___lambda__1___closed__1; +obj* l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*); obj* l_lean_parser_token(obj*, obj*, obj*); obj* l_lean_parser_term_struct__inst__with_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_mixed__binder_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_sort__app_has__view; obj* l_lean_parser_term_explicit_has__view; +obj* l_lean_parser_monad__parsec_longest__match___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_paren_parser_lean_parser_has__view; +obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__3(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_anonymous__inaccessible_parser_lean_parser_has__tokens; obj* l_lean_parser_term_simple__binder; -obj* l_lean_parser_unicode__symbol___at_lean_parser_term_arrow_parser_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_binder_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_binders__ext_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_assume_has__view; @@ -604,7 +610,6 @@ namespace lean { obj* string_iterator_offset(obj*); } obj* l_lean_parser_term_get__leading(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_combinators_many1___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_level_leading_parser_lean_parser_has__tokens; obj* l_lean_parser_term_bracketed__binders_parser_lean_parser_has__tokens; obj* l_lean_parser_term_struct__inst__item_has__view_x_27; @@ -633,21 +638,21 @@ obj* l_reader__t_orelse___at___private_init_lean_parser_term_1__trailing___spec_ obj* l_lean_parser_term_paren; obj* l_lean_parser_term_opt__type_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_projection; +obj* l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_paren__special_has__view_x_27; obj* l_lean_parser_term_type__spec_parser___closed__1; extern obj* l_list_mfoldr___main___at_lean_parser_monad__parsec_longest__match___spec__2___rarg___closed__1; obj* l_lean_parser_combinators_longest__match___at___private_init_lean_parser_term_2__leading___spec__7(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_inaccessible_has__view; obj* l_lean_parser_term_binder__default__tac_has__view; -obj* l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__3___rarg(obj*, obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_curr__lbp___rarg___lambda__3___closed__2; obj* l_lean_parser_term_anonymous__inaccessible_parser_lean_parser_has__view; obj* l_lean_parser_term_hole_has__view; obj* l_lean_parser_term_binder_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_sort__app_parser_lean_parser_has__tokens; +obj* l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_parsec__t_merge___rarg(obj*, obj*); -obj* l_lean_parser_combinators_any__of___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__2(obj*, obj*, obj*, obj*); +obj* l_list_map___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__2___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_inst__implicit__binder__content_has__view_x_27___lambda__2(obj*); extern obj* l_lean_parser_indexed___rarg___lambda__1___closed__1; obj* l_lean_parser_term_simple__explicit__binder; @@ -671,6 +676,7 @@ obj* l_lean_parser_term_sorry_parser_lean_parser_has__tokens; obj* l_lean_parser_term_inst__implicit__binder_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_combinators_optional_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_assume_has__view_x_27___lambda__1(obj*); +obj* l_lean_parser_unicode__symbol___at_lean_parser_term_arrow_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_builtin__leading__parsers_lean_parser_has__tokens; obj* l_lean_parser_term_have__from_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_term_mixed__binder_has__view_x_27; @@ -682,7 +688,6 @@ obj* l_lean_parser_monad__parsec_longest__match___at___private_init_lean_parser_ obj* l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__2___closed__2; obj* l_lean_parser_indexed___at___private_init_lean_parser_term_2__leading___spec__1(obj*); obj* l_lean_parser_term_arrow_has__view_x_27___lambda__1___closed__1; -obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_borrowed; obj* l_lean_parser_term_struct__inst__source_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_typed; @@ -700,6 +705,7 @@ obj* l_lean_parser_term_binders_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_binder__content_parser_lean_parser_has__tokens; obj* l_lean_parser_term_inst__implicit__binder_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_let_has__view_x_27___lambda__2(obj*); +obj* l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_rec__t_run__parsec___at_lean_parser_term__parser_run___spec__5(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_explicit__modifier_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_binder__default__tac_has__view_x_27___lambda__1(obj*); @@ -708,6 +714,7 @@ extern obj* l_lean_parser_level__parser_run_lean_parser_has__view___closed__2; obj* l_lean_parser_term_let_parser_lean_parser_has__view; obj* l_lean_parser_term_opt__ident; obj* l_lean_parser_term_match__equation; +obj* l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__1(obj*, obj*); obj* l_lean_parser_term_from_parser___closed__1; obj* l_lean_parser_term_have__term_has__view_x_27; obj* l_lean_parser_string__lit_parser___at_lean_parser_term_builtin__leading__parsers_lean_parser_has__tokens___spec__1(obj*); @@ -765,14 +772,12 @@ obj* l_lean_parser_term_anonymous__constructor_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_binder__default_parser___closed__1; obj* l_lean_parser_term_arrow_parser_lean_parser_has__tokens; extern obj* l_lean_parser_curr__lbp___rarg___lambda__3___closed__1; -extern obj* l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; obj* l_lean_parser_term_binders__types; obj* l_lean_parser_ident__univ__spec_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_if; obj* l_lean_parser_term_sort_parser_lean_parser_has__view; obj* l_lean_parser_term_assume; obj* l_lean_parser_term_pi_has__view_x_27___lambda__1(obj*); -obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__2(obj*, obj*, uint8, uint8, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_opt__type_parser_lean_parser_has__tokens; obj* l_lean_parser_term_app_parser_lean_parser_has__tokens; obj* l_lean_parser_ident__univ__spec_has__view; @@ -791,7 +796,6 @@ obj* l_lean_parser_term_typed_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_simple__explicit__binder_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_opt__ident_has__view_x_27; obj* l_lean_parser_term_struct__inst__field_has__view_x_27___lambda__2(obj*); -obj* l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__1(obj*, obj*, uint8, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_struct__inst__item_has__view_x_27___lambda__1___closed__2; extern obj* l_lean_parser_trailing__term__parser__m_alternative; obj* l_lean_parser_term_anonymous__inaccessible_has__view_x_27___lambda__1(obj*); @@ -808,7 +812,6 @@ obj* l_lean_parser_term_binder__default__tac_has__view_x_27; obj* l_lean_parser_term_inst__implicit__binder_has__view; obj* l_lean_parser_term_binder__ident_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_have__term_has__view_x_27___lambda__1___closed__1; -obj* l_list_mfoldl___main___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__4(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_strict__implicit__binder_has__view; obj* l_lean_parser_term_strict__implicit__binder; obj* l_lean_parser_string__lit_parser___at_lean_parser_term_builtin__leading__parsers_lean_parser_has__tokens___spec__1___rarg___closed__1; @@ -819,7 +822,7 @@ obj* l_lean_parser_term_inaccessible_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_term_anonymous__constructor_has__view; obj* l_lean_parser_ident__univ__spec_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_sort__app_parser___closed__1; -obj* l_list_map___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__2___lambda__1(obj*, obj*, obj*, obj*, obj*, obj*); +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*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_binder__default__val_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_term_paren__content_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_sort__app_parser_lean_parser_has__view___lambda__2(obj*, obj*, obj*, obj*, obj*); @@ -865,10 +868,8 @@ obj* l_lean_parser_term_binder__content_parser(obj*, obj*, obj*, obj*, obj*); extern obj* l_lean_parser_basic__parser__m_lean_parser_monad__parsec; obj* l_lean_parser_term_binders_has__view_x_27___lambda__1___closed__2; obj* l_lean_parser_term_let_has__view_x_27___lambda__1___closed__1; -obj* l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__1(obj*, obj*); obj* l_lean_parser_term_hole_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_explicit__modifier_has__view; -obj* l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__2___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_ident__univs_has__view_x_27___lambda__1___closed__4; obj* l_lean_parser_term_if_parser(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_term_struct__inst_has__view_x_27___lambda__1(obj*); @@ -894,7 +895,6 @@ obj* l_lean_parser_term_opt__ident_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_let__lhs_has__view_x_27___lambda__1(obj*); extern obj* l_lean_parser_number_has__view_x_27___lambda__1___closed__6; obj* l_option_map___rarg(obj*, obj*); -obj* l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1(obj*); obj* l_lean_parser_ident__univ__spec_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_term_struct__inst_has__view_x_27___lambda__2(obj*); extern obj* l_lean_parser_combinators_any__of___rarg___closed__1; @@ -1645,7 +1645,7 @@ lean::inc(x_0); return x_0; } } -obj* l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_ident__univ__spec_parser_lean_parser_has__view___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_6; uint8 x_7; @@ -1772,7 +1772,7 @@ lean::cnstr_set(x_60, 0, x_53); lean::cnstr_set(x_60, 1, x_1); lean::inc(x_55); lean::inc(x_60); -x_63 = l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_ident__univ__spec_parser_lean_parser_has__view___spec__2(x_0, x_60, x_10, x_3, x_55, x_14); +x_63 = l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens___spec__2(x_0, x_60, x_10, x_3, x_55, x_14); x_64 = lean::cnstr_get(x_63, 0); lean::inc(x_64); x_66 = lean::cnstr_get(x_63, 1); @@ -1911,7 +1911,7 @@ return x_118; } } } -obj* l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { obj* x_4; 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; @@ -1921,7 +1921,7 @@ x_6 = lean::mk_nat_obj(1u); x_7 = lean::nat_add(x_4, x_6); lean::dec(x_6); lean::dec(x_4); -x_10 = l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_ident__univ__spec_parser_lean_parser_has__view___spec__2(x_0, x_5, x_7, x_1, x_2, x_3); +x_10 = l___private_init_lean_parser_combinators_1__many1__aux___main___at_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens___spec__2(x_0, x_5, x_7, 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); @@ -1947,6 +1947,28 @@ lean::cnstr_set(x_19, 1, x_13); return x_19; } } +obj* _init_l_lean_parser_ident__univ__spec_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_13; obj* x_14; +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 = l_lean_parser_level_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_4); +x_6 = l_lean_parser_tokens___rarg(x_4); +x_7 = l_lean_parser_tokens___rarg(x_6); +x_8 = lean::mk_string("}"); +x_9 = l_lean_parser_symbol_tokens___rarg(x_8, x_1); +x_10 = lean::box(0); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_9, x_10); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_7, x_11); +x_13 = l_lean_parser_list_cons_tokens___rarg(x_3, x_12); +x_14 = l_lean_parser_tokens___rarg(x_13); +return x_14; +} +} obj* _init_l_lean_parser_ident__univ__spec_parser_lean_parser_has__view() { _start: { @@ -1958,7 +1980,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); lean::closure_set(x_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -1967,14 +1989,14 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level_parser), 5 lean::closure_set(x_8, 0, x_4); x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level__parser_run), 4, 1); lean::closure_set(x_9, 0, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__view___spec__1), 4, 1); +x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens___spec__1), 4, 1); lean::closure_set(x_10, 0, x_9); x_11 = lean::mk_string("}"); x_12 = l_string_trim(x_11); lean::inc(x_12); x_14 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_14, 0, x_12); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); lean::closure_set(x_15, 0, x_12); lean::closure_set(x_15, 1, x_4); lean::closure_set(x_15, 2, x_14); @@ -2004,28 +2026,6 @@ x_32 = l_lean_parser_combinators_node_view___rarg(x_20, x_21, x_22, x_23, x_24, return x_32; } } -obj* _init_l_lean_parser_ident__univ__spec_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_13; obj* x_14; -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 = l_lean_parser_level_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_4); -x_6 = l_lean_parser_tokens___rarg(x_4); -x_7 = l_lean_parser_tokens___rarg(x_6); -x_8 = lean::mk_string("}"); -x_9 = l_lean_parser_symbol_tokens___rarg(x_8, x_1); -x_10 = lean::box(0); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_9, x_10); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_7, x_11); -x_13 = l_lean_parser_list_cons_tokens___rarg(x_3, x_12); -x_14 = l_lean_parser_tokens___rarg(x_13); -return x_14; -} -} obj* _init_l_lean_parser_ident__univ__spec_parser___closed__1() { _start: { @@ -2037,7 +2037,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); +x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); lean::closure_set(x_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -2046,14 +2046,14 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level_parser), 5 lean::closure_set(x_8, 0, x_4); x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level__parser_run), 4, 1); lean::closure_set(x_9, 0, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__view___spec__1), 4, 1); +x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens___spec__1), 4, 1); lean::closure_set(x_10, 0, x_9); x_11 = lean::mk_string("}"); x_12 = l_string_trim(x_11); lean::inc(x_12); x_14 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_14, 0, x_12); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); +x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); lean::closure_set(x_15, 0, x_12); lean::closure_set(x_15, 1, x_4); lean::closure_set(x_15, 2, x_14); @@ -2078,7 +2078,7 @@ x_3 = l_lean_parser_ident__univ__spec; x_4 = l_lean_parser_ident__univ__spec_parser___closed__1; lean::inc(x_4); lean::inc(x_3); -x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(x_3, x_4, x_0, x_1, x_2); +x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(x_3, x_4, x_0, x_1, x_2); return x_7; } } @@ -2986,20 +2986,36 @@ lean::inc(x_0); 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; +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; +} +} obj* _init_l_lean_parser_ident__univs_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_12; obj* x_19; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident__univs_parser_lean_parser_has__view___lambda__1), 4, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__3___rarg), 6, 1); +x_1 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__3___rarg), 6, 1); lean::closure_set(x_1, 0, x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +x_2 = 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_2, 0, x_1); x_3 = lean::box(0); x_4 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_4, 0, x_2); lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4), 1, 0); +x_5 = 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_6 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_4); @@ -3028,40 +3044,24 @@ x_5 = l_lean_parser_ident__univ__spec; x_6 = l_lean_parser_ident__univ__spec_parser___closed__1; lean::inc(x_6); lean::inc(x_5); -x_9 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(x_5, x_6, x_0, x_2, x_3); +x_9 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(x_5, x_6, x_0, x_2, x_3); return x_9; } } -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; -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; -} -} obj* _init_l_lean_parser_ident__univs_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; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident__univs_parser_lean_parser_has__view___lambda__1), 4, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__3___rarg), 6, 1); +x_1 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__3___rarg), 6, 1); lean::closure_set(x_1, 0, x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +x_2 = 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_2, 0, x_1); x_3 = lean::box(0); x_4 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_4, 0, x_2); lean::cnstr_set(x_4, 1, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4), 1, 0); +x_5 = 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_6 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_6, 0, x_5); lean::cnstr_set(x_6, 1, x_4); @@ -5678,7 +5678,7 @@ lean::inc(x_0); return x_0; } } -obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__2(obj* x_0, obj* x_1, uint8 x_2, uint8 x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8, obj* x_9, obj* x_10) { +obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_term_paren_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, uint8 x_2, uint8 x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8, obj* x_9, obj* x_10) { _start: { obj* x_11; uint8 x_12; @@ -6313,7 +6313,7 @@ lean::cnstr_set(x_280, 1, x_4); x_281 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_281, 0, x_277); lean::cnstr_set(x_281, 1, x_280); -x_282 = l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__2(x_0, x_1, x_2, x_2, x_281, x_15, x_6, x_7, x_8, x_253, x_189); +x_282 = 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_281, x_15, x_6, x_7, x_8, x_253, x_189); x_283 = lean::cnstr_get(x_282, 0); lean::inc(x_283); x_285 = lean::cnstr_get(x_282, 1); @@ -6508,12 +6508,12 @@ x_357 = l_mjoin___rarg___closed__1; lean::inc(x_355); lean::inc(x_357); lean::inc(x_356); -x_361 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__4___rarg(x_356, x_357, x_355, x_355, x_6, x_7, x_8, x_9, x_10); +x_361 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_356, x_357, x_355, x_355, x_6, x_7, x_8, x_9, x_10); return x_361; } } } -obj* l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, uint8 x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, uint8 x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { _start: { obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_14; obj* x_15; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_23; obj* x_24; @@ -6524,7 +6524,7 @@ x_11 = lean::nat_add(x_8, x_10); lean::dec(x_10); lean::dec(x_8); x_14 = 1; -x_15 = l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__2(x_0, x_1, x_2, x_14, x_9, x_11, x_3, x_4, x_5, x_6, x_7); +x_15 = 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_14, x_9, x_11, x_3, x_4, x_5, x_6, x_7); x_16 = lean::cnstr_get(x_15, 0); lean::inc(x_16); x_18 = lean::cnstr_get(x_15, 1); @@ -6550,168 +6550,6 @@ lean::cnstr_set(x_24, 1, x_18); return x_24; } } -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; -x_0 = lean::mk_string("("); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = l_lean_parser_max__prec; -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -x_7 = lean::mk_nat_obj(0u); -lean::inc(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_9, 0, x_7); -x_10 = lean::mk_string(", "); -x_11 = l_string_trim(x_10); -lean::inc(x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_13, 0, x_11); -lean::inc(x_7); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_15, 0, x_11); -lean::closure_set(x_15, 1, x_7); -lean::closure_set(x_15, 2, x_13); -x_16 = 0; -x_17 = lean::box(x_16); -lean::inc(x_15); -lean::inc(x_9); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__1___boxed), 8, 3); -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_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::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__view___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); -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); -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__view___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__view___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; -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_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___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__view___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); -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; -} -} -obj* l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_term_paren_parser_lean_parser_has__view___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) { -_start: -{ -uint8 x_11; uint8 x_12; obj* x_13; -x_11 = lean::unbox(x_2); -x_12 = lean::unbox(x_3); -x_13 = l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__2(x_0, x_1, x_11, x_12, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -return x_13; -} -} -obj* l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__1___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) { -_start: -{ -uint8 x_8; obj* x_9; -x_8 = lean::unbox(x_2); -x_9 = l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__1(x_0, x_1, x_8, x_3, x_4, x_5, x_6, x_7); -return x_9; -} -} obj* _init_l_lean_parser_term_paren_parser_lean_parser_has__tokens() { _start: { @@ -6764,10 +6602,29 @@ x_44 = l_lean_parser_tokens___rarg(x_43); return x_44; } } -obj* _init_l_lean_parser_term_paren_parser___closed__1() { +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) { _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; +uint8 x_11; uint8 x_12; obj* x_13; +x_11 = lean::unbox(x_2); +x_12 = lean::unbox(x_3); +x_13 = 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_11, x_12, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +return x_13; +} +} +obj* l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__tokens___spec__1___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) { +_start: +{ +uint8 x_8; obj* x_9; +x_8 = lean::unbox(x_2); +x_9 = l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__tokens___spec__1(x_0, x_1, x_8, x_3, x_4, x_5, x_6, x_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; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -6775,7 +6632,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -6789,7 +6646,7 @@ lean::inc(x_11); x_13 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_13, 0, x_11); lean::inc(x_7); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_15 = 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_15, 0, x_11); lean::closure_set(x_15, 1, x_7); lean::closure_set(x_15, 2, x_13); @@ -6797,7 +6654,7 @@ x_16 = 0; x_17 = lean::box(x_16); lean::inc(x_15); lean::inc(x_9); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__1___boxed), 8, 3); +x_20 = 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_20, 0, x_9); lean::closure_set(x_20, 1, x_15); lean::closure_set(x_20, 2, x_17); @@ -6820,7 +6677,7 @@ 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_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__view___spec__1), 8, 3); +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); @@ -6845,7 +6702,7 @@ x_43 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_43, 0, x_27); lean::cnstr_set(x_43, 1, x_42); 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__view___spec__3), 7, 2); +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); @@ -6857,7 +6714,7 @@ 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__view___spec__7), 6, 1); +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); @@ -6871,14 +6728,157 @@ 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_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +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__view___spec__1), 8, 3); +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); +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; +} +} +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; +x_0 = lean::mk_string("("); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = l_lean_parser_max__prec; +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +x_7 = lean::mk_nat_obj(0u); +lean::inc(x_7); +x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_9, 0, x_7); +x_10 = lean::mk_string(", "); +x_11 = l_string_trim(x_10); +lean::inc(x_11); +x_13 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_13, 0, x_11); +lean::inc(x_7); +x_15 = 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_15, 0, x_11); +lean::closure_set(x_15, 1, x_7); +lean::closure_set(x_15, 2, x_13); +x_16 = 0; +x_17 = lean::box(x_16); +lean::inc(x_15); +lean::inc(x_9); +x_20 = 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_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_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::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); +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); +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; +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_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); @@ -6962,6 +6962,20 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_term_hole_parser_lean_parser_has__tokens() { +_start: +{ +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; +x_0 = lean::mk_string("_"); +x_1 = l_lean_parser_max__prec; +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_list_cons_tokens___rarg(x_3, x_4); +x_6 = l_lean_parser_tokens___rarg(x_5); +return x_6; +} +} obj* _init_l_lean_parser_term_hole_parser_lean_parser_has__view() { _start: { @@ -6973,7 +6987,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -6997,20 +7011,6 @@ x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x return x_21; } } -obj* _init_l_lean_parser_term_hole_parser_lean_parser_has__tokens() { -_start: -{ -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_0 = lean::mk_string("_"); -x_1 = l_lean_parser_max__prec; -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_list_cons_tokens___rarg(x_3, x_4); -x_6 = l_lean_parser_tokens___rarg(x_5); -return x_6; -} -} obj* _init_l_lean_parser_term_hole_parser___closed__1() { _start: { @@ -7022,7 +7022,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -7541,62 +7541,6 @@ lean::inc(x_0); return x_0; } } -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; -x_0 = lean::mk_string("Sort"); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = l_lean_parser_max__prec; -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -x_7 = lean::mk_string("Type"); -x_8 = l_string_trim(x_7); -lean::inc(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_10, 0, x_8); -lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -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_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__view___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::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; -} -} obj* _init_l_lean_parser_term_sort_parser_lean_parser_has__tokens() { _start: { @@ -7618,10 +7562,10 @@ x_13 = l_lean_parser_tokens___rarg(x_12); return x_13; } } -obj* _init_l_lean_parser_term_sort_parser___closed__1() { +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_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; x_0 = lean::mk_string("Sort"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -7629,7 +7573,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -7639,7 +7583,7 @@ lean::inc(x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_10, 0, x_8); lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_12 = 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_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); @@ -7652,7 +7596,63 @@ 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__view___spec__3), 7, 2); +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::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; +} +} +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; +x_0 = lean::mk_string("Sort"); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = l_lean_parser_max__prec; +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +x_7 = lean::mk_string("Type"); +x_8 = l_string_trim(x_7); +lean::inc(x_8); +x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_10, 0, x_8); +lean::inc(x_4); +x_12 = 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_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_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); @@ -7924,6 +7924,22 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_term_type__spec_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_8; +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); +x_4 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_4); +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); +return x_8; +} +} obj* _init_l_lean_parser_term_type__spec_parser_lean_parser_has__view() { _start: { @@ -7935,7 +7951,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -7964,22 +7980,6 @@ x_23 = l_lean_parser_combinators_node_view___rarg(x_11, x_12, x_13, x_14, x_15, return x_23; } } -obj* _init_l_lean_parser_term_type__spec_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_8; -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); -x_4 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_4); -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); -return x_8; -} -} obj* _init_l_lean_parser_term_type__spec_parser___closed__1() { _start: { @@ -7991,7 +7991,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -8019,6 +8019,16 @@ x_9 = l_lean_parser_combinators_node___at_lean_parser_command_notation__spec_pre return x_9; } } +obj* _init_l_lean_parser_term_opt__type_parser_lean_parser_has__tokens() { +_start: +{ +obj* x_0; obj* x_2; +x_0 = l_lean_parser_term_type__spec_parser_lean_parser_has__tokens; +lean::inc(x_0); +x_2 = l_lean_parser_tokens___rarg(x_0); +return x_2; +} +} obj* _init_l_lean_parser_term_opt__type_parser_lean_parser_has__view() { _start: { @@ -8038,16 +8048,6 @@ x_11 = l_lean_parser_combinators_optional_view___rarg(x_0, x_1, x_2, x_3, x_4, x return x_11; } } -obj* _init_l_lean_parser_term_opt__type_parser_lean_parser_has__tokens() { -_start: -{ -obj* x_0; obj* x_2; -x_0 = l_lean_parser_term_type__spec_parser_lean_parser_has__tokens; -lean::inc(x_0); -x_2 = l_lean_parser_tokens___rarg(x_0); -return x_2; -} -} obj* _init_l_lean_parser_term_opt__type_parser___closed__1() { _start: { @@ -8062,7 +8062,7 @@ _start: obj* x_5; obj* x_7; x_5 = l_lean_parser_term_opt__type_parser___closed__1; lean::inc(x_5); -x_7 = l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7(x_5, x_0, x_1, x_2, x_3, x_4); +x_7 = l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7(x_5, x_0, x_1, x_2, x_3, x_4); return x_7; } } @@ -8514,6 +8514,23 @@ lean::inc(x_0); 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; +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_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__ident_parser_lean_parser_has__view() { _start: { @@ -8524,12 +8541,12 @@ 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__view___spec__4), 1, 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__view___spec__3), 7, 2); +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); @@ -8551,23 +8568,6 @@ x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x return x_21; } } -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; -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_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__ident_parser___closed__1() { _start: { @@ -8578,12 +8578,12 @@ 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__view___spec__4), 1, 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__view___spec__3), 7, 2); +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); @@ -9460,85 +9460,6 @@ lean::inc(x_0); return x_0; } } -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; -x_0 = lean::mk_string(":="); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -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); -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__view___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_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__view___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::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; -} -} obj* _init_l_lean_parser_term_binder__default_parser_lean_parser_has__tokens() { _start: { @@ -9568,10 +9489,10 @@ x_21 = l_lean_parser_tokens___rarg(x_20); return x_21; } } -obj* _init_l_lean_parser_term_binder__default_parser___closed__1() { +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_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; x_0 = lean::mk_string(":="); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -9579,7 +9500,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -9606,7 +9527,7 @@ 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_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -9625,7 +9546,86 @@ lean::cnstr_set(x_28, 1, x_9); 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__view___spec__3), 7, 2); +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::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; +} +} +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; +x_0 = lean::mk_string(":="); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +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); +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_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); @@ -10690,15 +10690,35 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_term_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_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; +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); +x_3 = l_lean_parser_term_binder__default_parser_lean_parser_has__tokens; +lean::inc(x_3); +x_5 = l_lean_parser_tokens___rarg(x_3); +x_6 = lean::box(0); +x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_6); +x_8 = l_lean_parser_term_opt__type_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_2, x_10); +x_12 = l_lean_parser_tokens___rarg(x_11); +return x_12; +} +} obj* _init_l_lean_parser_term_binder__content_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_12; obj* x_13; obj* x_14; obj* x_21; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binder__ident_parser), 5, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__2), 6, 1); +x_1 = 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_1, 0, x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binder__default_parser), 5, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +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); x_5 = lean::alloc_cnstr(1, 2, 0); @@ -10727,35 +10747,15 @@ x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x return x_21; } } -obj* _init_l_lean_parser_term_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_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; -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); -x_3 = l_lean_parser_term_binder__default_parser_lean_parser_has__tokens; -lean::inc(x_3); -x_5 = l_lean_parser_tokens___rarg(x_3); -x_6 = lean::box(0); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_6); -x_8 = l_lean_parser_term_opt__type_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_2, x_10); -x_12 = l_lean_parser_tokens___rarg(x_11); -return x_12; -} -} obj* _init_l_lean_parser_term_binder__content_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; x_0 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binder__ident_parser), 5, 0); -x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many1___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__2), 6, 1); +x_1 = 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_1, 0, x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_binder__default_parser), 5, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7), 6, 1); +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); x_5 = lean::alloc_cnstr(1, 2, 0); @@ -15053,234 +15053,6 @@ lean::inc(x_0); return x_0; } } -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; -x_0 = lean::mk_string("("); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -x_7 = lean::mk_string(" : "); -x_8 = l_string_trim(x_7); -lean::inc(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_10, 0, x_8); -lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_12, 0, x_8); -lean::closure_set(x_12, 1, x_4); -lean::closure_set(x_12, 2, x_10); -lean::inc(x_4); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); -lean::closure_set(x_14, 0, x_4); -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_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___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); -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); -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); -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__view___spec__4), 1, 0); -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); -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::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__view___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); -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__view___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_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); -x_50 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_50, 0, x_14); -lean::cnstr_set(x_50, 1, x_48); -lean::inc(x_12); -x_52 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_52, 0, x_12); -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); -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__view___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); -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__view___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); -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); -lean::inc(x_12); -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::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__view___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); -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__view___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_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); -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); -x_105 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_105, 0, x_103); -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__view___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); -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; -} -} obj* _init_l_lean_parser_term_simple__binder_parser_lean_parser_has__tokens() { _start: { @@ -15364,10 +15136,10 @@ x_75 = l_lean_parser_tokens___rarg(x_74); return x_75; } } -obj* _init_l_lean_parser_term_simple__binder_parser___closed__1() { +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_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; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -15375,7 +15147,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -15385,7 +15157,7 @@ lean::inc(x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_10, 0, x_8); lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_12 = 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_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); @@ -15398,7 +15170,7 @@ 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_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -15415,7 +15187,7 @@ 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__view___spec__4), 1, 0); +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_30 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_30, 0, x_28); @@ -15434,7 +15206,7 @@ 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::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__view___spec__1), 8, 3); +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); @@ -15444,7 +15216,7 @@ 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); 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__view___spec__1), 8, 3); +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); @@ -15478,7 +15250,7 @@ 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); 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__view___spec__1), 8, 3); +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); @@ -15488,7 +15260,7 @@ 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); 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__view___spec__1), 8, 3); +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); @@ -15522,7 +15294,7 @@ 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::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__view___spec__1), 8, 3); +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); @@ -15532,7 +15304,7 @@ 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); 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__view___spec__1), 8, 3); +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); @@ -15570,7 +15342,235 @@ 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__view___spec__3), 7, 2); +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); +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; +} +} +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; +x_0 = lean::mk_string("("); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +x_7 = lean::mk_string(" : "); +x_8 = l_string_trim(x_7); +lean::inc(x_8); +x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_10, 0, x_8); +lean::inc(x_4); +x_12 = 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_12, 0, x_8); +lean::closure_set(x_12, 1, x_4); +lean::closure_set(x_12, 2, x_10); +lean::inc(x_4); +x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_parser), 6, 1); +lean::closure_set(x_14, 0, x_4); +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_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); +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); +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); +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_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::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); +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_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); +x_50 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_50, 0, x_14); +lean::cnstr_set(x_50, 1, x_48); +lean::inc(x_12); +x_52 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_52, 0, x_12); +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); +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); +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); +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); +lean::inc(x_12); +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::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); +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_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); +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); +x_105 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_105, 0, x_103); +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); @@ -16520,6 +16520,31 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_term_anonymous__constructor_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_17; +x_0 = lean::mk_string("\xe2\x9f\xa8"); +x_1 = l_lean_parser_max__prec; +lean::inc(x_1); +x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); +x_4 = lean::mk_string(","); +x_5 = lean::mk_nat_obj(0u); +lean::inc(x_5); +x_7 = l_lean_parser_symbol_tokens___rarg(x_4, x_5); +x_8 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_8); +x_10 = l_lean_parser_combinators_sep__by_tokens___rarg(x_8, x_7); +x_11 = lean::mk_string("\xe2\x9f\xa9"); +x_12 = l_lean_parser_symbol_tokens___rarg(x_11, x_5); +x_13 = lean::box(0); +x_14 = l_lean_parser_list_cons_tokens___rarg(x_12, x_13); +x_15 = l_lean_parser_list_cons_tokens___rarg(x_10, x_14); +x_16 = l_lean_parser_list_cons_tokens___rarg(x_3, x_15); +x_17 = l_lean_parser_tokens___rarg(x_16); +return x_17; +} +} obj* _init_l_lean_parser_term_anonymous__constructor_parser_lean_parser_has__view() { _start: { @@ -16531,7 +16556,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -16545,13 +16570,13 @@ lean::inc(x_11); x_13 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_13, 0, x_11); lean::inc(x_7); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_15 = 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_15, 0, x_11); lean::closure_set(x_15, 1, x_7); lean::closure_set(x_15, 2, x_13); x_16 = 1; x_17 = lean::box(x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__1___boxed), 8, 3); +x_18 = 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_18, 0, x_9); lean::closure_set(x_18, 1, x_15); lean::closure_set(x_18, 2, x_17); @@ -16560,7 +16585,7 @@ 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); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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_20); lean::closure_set(x_23, 1, x_7); lean::closure_set(x_23, 2, x_22); @@ -16590,31 +16615,6 @@ x_40 = l_lean_parser_combinators_node_view___rarg(x_28, x_29, x_30, x_31, x_32, return x_40; } } -obj* _init_l_lean_parser_term_anonymous__constructor_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_17; -x_0 = lean::mk_string("\xe2\x9f\xa8"); -x_1 = l_lean_parser_max__prec; -lean::inc(x_1); -x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); -x_4 = lean::mk_string(","); -x_5 = lean::mk_nat_obj(0u); -lean::inc(x_5); -x_7 = l_lean_parser_symbol_tokens___rarg(x_4, x_5); -x_8 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_8); -x_10 = l_lean_parser_combinators_sep__by_tokens___rarg(x_8, x_7); -x_11 = lean::mk_string("\xe2\x9f\xa9"); -x_12 = l_lean_parser_symbol_tokens___rarg(x_11, x_5); -x_13 = lean::box(0); -x_14 = l_lean_parser_list_cons_tokens___rarg(x_12, x_13); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_10, x_14); -x_16 = l_lean_parser_list_cons_tokens___rarg(x_3, x_15); -x_17 = l_lean_parser_tokens___rarg(x_16); -return x_17; -} -} obj* _init_l_lean_parser_term_anonymous__constructor_parser___closed__1() { _start: { @@ -16626,7 +16626,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -16640,13 +16640,13 @@ lean::inc(x_11); x_13 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_13, 0, x_11); lean::inc(x_7); -x_15 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_15 = 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_15, 0, x_11); lean::closure_set(x_15, 1, x_7); lean::closure_set(x_15, 2, x_13); x_16 = 1; x_17 = lean::box(x_16); -x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_sep__by___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__1___boxed), 8, 3); +x_18 = 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_18, 0, x_9); lean::closure_set(x_18, 1, x_15); lean::closure_set(x_18, 2, x_17); @@ -16655,7 +16655,7 @@ 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); -x_23 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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_20); lean::closure_set(x_23, 1, x_7); lean::closure_set(x_23, 2, x_22); @@ -21541,7 +21541,7 @@ lean::inc(x_0); return x_0; } } -obj* l_list_map___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__2(obj* x_0) { +obj* l_list_map___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__2(obj* x_0) { _start: { if (lean::obj_tag(x_0) == 0) @@ -21566,9 +21566,9 @@ if (lean::is_shared(x_0)) { lean::cnstr_release(x_0, 1); x_7 = x_0; } -x_8 = lean::alloc_closure(reinterpret_cast(l_list_map___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__2___lambda__1), 6, 1); +x_8 = lean::alloc_closure(reinterpret_cast(l_list_map___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__2___lambda__1), 6, 1); lean::closure_set(x_8, 0, x_3); -x_9 = l_list_map___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__2(x_5); +x_9 = l_list_map___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__2(x_5); if (lean::is_scalar(x_7)) { x_10 = lean::alloc_cnstr(1, 2, 0); } else { @@ -21580,7 +21580,7 @@ return x_10; } } } -obj* l_list_map___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__2___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_list_map___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__2___lambda__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; @@ -21680,7 +21680,7 @@ return x_41; } } } -obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__4(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* l_lean_parser_parsec__t_lookahead___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { _start: { obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_15; obj* x_16; obj* x_18; @@ -22075,7 +22075,7 @@ goto lbl_10; } } } -obj* l_list_mfoldr___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__5(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { +obj* l_list_mfoldr___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__5(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { _start: { if (lean::obj_tag(x_1) == 0) @@ -22115,7 +22115,7 @@ lean::inc(x_4); lean::inc(x_3); lean::inc(x_2); lean::inc(x_0); -x_31 = l_list_mfoldr___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__5(x_0, x_24, x_2, x_3, x_4, x_5, x_6); +x_31 = l_list_mfoldr___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__5(x_0, x_24, x_2, x_3, x_4, x_5, x_6); x_32 = lean::cnstr_get(x_31, 0); lean::inc(x_32); x_34 = lean::cnstr_get(x_31, 1); @@ -22138,7 +22138,7 @@ lean::inc(x_39); x_41 = lean::cnstr_get(x_32, 2); lean::inc(x_41); lean::dec(x_32); -x_44 = l_lean_parser_parsec__t_lookahead___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__4(x_0, x_22, x_37, x_2, x_3, x_4, x_39, x_34); +x_44 = l_lean_parser_parsec__t_lookahead___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__4(x_0, x_22, x_37, x_2, x_3, x_4, x_39, x_34); x_45 = lean::cnstr_get(x_44, 0); lean::inc(x_45); x_47 = lean::cnstr_get(x_44, 1); @@ -22192,15 +22192,15 @@ return x_63; } } } -obj* l_lean_parser_monad__parsec_longest__match___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_monad__parsec_longest__match___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_15; x_6 = lean::mk_nat_obj(0u); x_7 = l_list_enum__from___main___rarg(x_6, x_0); -x_8 = l_list_map___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__2(x_7); +x_8 = l_list_map___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__2(x_7); lean::inc(x_4); -x_10 = l_list_mfoldr___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__5(x_4, x_8, x_1, x_2, x_3, x_4, x_5); +x_10 = l_list_mfoldr___main___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__5(x_4, x_8, x_1, x_2, x_3, x_4, x_5); x_11 = lean::cnstr_get(x_10, 0); lean::inc(x_11); x_13 = lean::cnstr_get(x_10, 1); @@ -22269,14 +22269,14 @@ return x_35; } } } -obj* l_lean_parser_combinators_longest__choice___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_combinators_longest__choice___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_9; obj* x_10; obj* x_12; obj* x_14; lean::inc(x_3); lean::inc(x_2); lean::inc(x_1); -x_9 = l_lean_parser_monad__parsec_longest__match___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__view___spec__3(x_0, x_1, x_2, x_3, x_4, x_5); +x_9 = l_lean_parser_monad__parsec_longest__match___at_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens___spec__3(x_0, x_1, x_2, x_3, x_4, x_5); x_10 = lean::cnstr_get(x_9, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_9, 1); @@ -22318,7 +22318,7 @@ 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_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__4___rarg(x_25, x_26, x_24, x_24, x_1, x_2, x_3, x_17, x_12); +x_30 = l_lean_parser_monad__parsec_error___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__4___rarg(x_25, x_26, x_24, x_24, x_1, x_2, x_3, x_17, x_12); x_31 = lean::cnstr_get(x_30, 0); lean::inc(x_31); x_33 = lean::cnstr_get(x_30, 1); @@ -22399,268 +22399,6 @@ return x_58; } } } -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; -x_0 = lean::mk_string("("); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_6, 0, x_1); -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); -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__view___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); -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__view___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); -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__view___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_45 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___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); -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; -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); -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__view___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); -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__view___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); -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__view___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); -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__view___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); -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__view___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__view___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); -lean::inc(x_109); -x_111 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -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__view___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); -x_115 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_115, 0, x_113); -lean::cnstr_set(x_115, 1, x_7); -x_116 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_116, 0, x_107); -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, 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__view___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; -} -} obj* _init_l_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens() { _start: { @@ -22757,10 +22495,10 @@ x_88 = l_lean_parser_tokens___rarg(x_87); return x_88; } } -obj* _init_l_lean_parser_term_bracketed__binder_parser___closed__1() { +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_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; x_0 = lean::mk_string("("); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -22768,7 +22506,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -22784,7 +22522,7 @@ x_13 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_13, 0, x_12); lean::cnstr_set(x_13, 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_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__3), 7, 2); +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); @@ -22802,7 +22540,7 @@ 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); 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__view___spec__1), 8, 3); +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); @@ -22827,7 +22565,7 @@ 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_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -22837,7 +22575,7 @@ 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_45 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -22863,7 +22601,7 @@ 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__view___spec__1), 8, 3); +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); @@ -22873,7 +22611,7 @@ 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); 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__view___spec__1), 8, 3); +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); @@ -22898,7 +22636,7 @@ 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_78 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -22908,7 +22646,7 @@ 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_84 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -22923,7 +22661,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__view___spec__4), 1, 0); +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); @@ -22944,7 +22682,7 @@ 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__view___spec__1), 6, 1); +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); @@ -22961,7 +22699,7 @@ lean::inc(x_109); x_111 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); 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__view___spec__1), 8, 3); +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); @@ -22997,7 +22735,269 @@ 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__view___spec__3), 7, 2); +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; +} +} +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; +x_0 = lean::mk_string("("); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +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); +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); +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); +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); +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); +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; +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); +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); +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); +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); +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); +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); +lean::inc(x_109); +x_111 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +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); +x_115 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_115, 0, x_113); +lean::cnstr_set(x_115, 1, x_7); +x_116 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_116, 0, x_107); +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, 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); @@ -23372,6 +23372,24 @@ lean::inc(x_0); 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; +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; +} +} obj* _init_l_lean_parser_term_binder_parser_lean_parser_has__view() { _start: { @@ -23387,7 +23405,7 @@ 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__view___spec__3), 7, 2); +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); @@ -23409,24 +23427,6 @@ x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x return x_21; } } -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; -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; -} -} obj* _init_l_lean_parser_term_binder_parser___closed__1() { _start: { @@ -23442,7 +23442,7 @@ 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__view___spec__3), 7, 2); +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); @@ -25351,107 +25351,6 @@ lean::inc(x_0); return x_0; } } -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; -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__view___spec__1), 6, 1); -lean::closure_set(x_2, 0, x_0); -x_3 = lean::mk_string(":"); -x_4 = l_string_trim(x_3); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_6, 0, x_4); -x_7 = lean::mk_nat_obj(0u); -lean::inc(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_9, 0, x_4); -lean::closure_set(x_9, 1, x_7); -lean::closure_set(x_9, 2, x_6); -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_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); -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::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__view___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__view___spec__2), 6, 1); -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__view___spec__3), 7, 2); -lean::closure_set(x_34, 0, x_33); -lean::closure_set(x_34, 1, x_7); -lean::inc(x_12); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_34); -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__view___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); -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; -} -} obj* _init_l_lean_parser_term_binders__ext_parser_lean_parser_has__tokens() { _start: { @@ -25494,13 +25393,13 @@ x_34 = l_lean_parser_tokens___rarg(x_33); return x_34; } } -obj* _init_l_lean_parser_term_binders__ext_parser___closed__1() { +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_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; 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__view___spec__1), 6, 1); +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); lean::closure_set(x_2, 0, x_0); x_3 = lean::mk_string(":"); x_4 = l_string_trim(x_3); @@ -25509,7 +25408,7 @@ x_6 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_6, 0, x_4); x_7 = lean::mk_nat_obj(0u); lean::inc(x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_9 = 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_9, 0, x_4); lean::closure_set(x_9, 1, x_7); lean::closure_set(x_9, 2, x_6); @@ -25538,7 +25437,7 @@ 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::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__view___spec__3), 7, 2); +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); @@ -25550,7 +25449,7 @@ 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__view___spec__2), 6, 1); +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); lean::closure_set(x_30, 0, x_29); lean::inc(x_12); x_32 = lean::alloc_cnstr(1, 2, 0); @@ -25559,7 +25458,7 @@ 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__view___spec__3), 7, 2); +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); @@ -25571,7 +25470,108 @@ 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__view___spec__7), 6, 1); +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); +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; +} +} +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; +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); +lean::closure_set(x_2, 0, x_0); +x_3 = lean::mk_string(":"); +x_4 = l_string_trim(x_3); +lean::inc(x_4); +x_6 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_6, 0, x_4); +x_7 = lean::mk_nat_obj(0u); +lean::inc(x_7); +x_9 = 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_9, 0, x_4); +lean::closure_set(x_9, 1, x_7); +lean::closure_set(x_9, 2, x_6); +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_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); +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::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); +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); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_34); +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); @@ -25948,6 +25948,24 @@ lean::inc(x_0); 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; +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; +} +} obj* _init_l_lean_parser_term_binders_parser_lean_parser_has__view() { _start: { @@ -25963,7 +25981,7 @@ 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__view___spec__3), 7, 2); +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); @@ -25985,24 +26003,6 @@ x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x return x_21; } } -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; -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; -} -} obj* _init_l_lean_parser_term_binders_parser___closed__1() { _start: { @@ -26018,7 +26018,7 @@ 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__view___spec__3), 7, 2); +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); @@ -26545,15 +26545,35 @@ lean::inc(x_0); 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; +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); +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; +} +} 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; 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__view___spec__1), 6, 1); +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); x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_simple__binder_parser), 5, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__1), 6, 1); +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); @@ -26564,7 +26584,7 @@ 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__view___spec__3), 7, 2); +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); @@ -26586,35 +26606,15 @@ x_23 = l_lean_parser_combinators_node_view___rarg(x_11, x_12, x_13, x_14, x_15, return x_23; } } -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; -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); -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; -} -} 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; 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__view___spec__1), 6, 1); +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); x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_simple__binder_parser), 5, 0); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__1), 6, 1); +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); @@ -26625,7 +26625,7 @@ 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__view___spec__3), 7, 2); +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); @@ -27180,7 +27180,7 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { _start: { obj* x_10; 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; @@ -27191,7 +27191,7 @@ lean::inc(x_10); x_12 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_12, 0, x_10); lean::inc(x_2); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); +x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); lean::closure_set(x_14, 0, x_10); lean::closure_set(x_14, 1, x_2); lean::closure_set(x_14, 2, x_12); @@ -27199,7 +27199,7 @@ x_15 = l_string_trim(x_1); 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::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); +x_18 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); lean::closure_set(x_18, 0, x_15); lean::closure_set(x_18, 1, x_2); lean::closure_set(x_18, 2, x_17); @@ -27210,10 +27210,35 @@ lean::cnstr_set(x_20, 1, x_19); x_21 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_21, 0, x_14); lean::cnstr_set(x_21, 1, x_20); -x_22 = l_lean_parser_combinators_any__of___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__2(x_21, x_4, x_6, x_7); +x_22 = l_lean_parser_combinators_any__of___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__2(x_21, x_4, x_6, x_7); return x_22; } } +obj* _init_l_lean_parser_term_lambda_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_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; +x_0 = lean::mk_string("\xce\xbb"); +x_1 = lean::mk_string("fun"); +x_2 = l_lean_parser_max__prec; +lean::inc(x_2); +x_4 = l_lean_parser_unicode__symbol_lean_parser_has__tokens___rarg(x_0, x_1, x_2); +x_5 = lean::mk_string(","); +x_6 = lean::mk_nat_obj(0u); +x_7 = l_lean_parser_symbol_tokens___rarg(x_5, x_6); +x_8 = lean::box(0); +x_9 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_9); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_9, x_8); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_7, x_11); +x_13 = l_lean_parser_term_binders_parser_lean_parser_has__tokens; +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_4, x_15); +x_17 = l_lean_parser_tokens___rarg(x_16); +return x_17; +} +} obj* _init_l_lean_parser_term_lambda_parser_lean_parser_has__view() { _start: { @@ -27222,7 +27247,7 @@ x_0 = lean::mk_string("\xce\xbb"); x_1 = lean::mk_string("fun"); x_2 = l_lean_parser_max__prec; lean::inc(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__view___spec__1), 8, 3); +x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__tokens___spec__1), 8, 3); lean::closure_set(x_4, 0, x_0); lean::closure_set(x_4, 1, x_1); lean::closure_set(x_4, 2, x_2); @@ -27233,7 +27258,7 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_8, 0, x_6); x_9 = lean::mk_nat_obj(0u); lean::inc(x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_11 = 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_11, 0, x_6); lean::closure_set(x_11, 1, x_9); lean::closure_set(x_11, 2, x_8); @@ -27269,31 +27294,6 @@ x_31 = l_lean_parser_combinators_node_view___rarg(x_19, x_20, x_21, x_22, x_23, return x_31; } } -obj* _init_l_lean_parser_term_lambda_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_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; -x_0 = lean::mk_string("\xce\xbb"); -x_1 = lean::mk_string("fun"); -x_2 = l_lean_parser_max__prec; -lean::inc(x_2); -x_4 = l_lean_parser_unicode__symbol_lean_parser_has__tokens___rarg(x_0, x_1, x_2); -x_5 = lean::mk_string(","); -x_6 = lean::mk_nat_obj(0u); -x_7 = l_lean_parser_symbol_tokens___rarg(x_5, x_6); -x_8 = lean::box(0); -x_9 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_9); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_9, x_8); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_7, x_11); -x_13 = l_lean_parser_term_binders_parser_lean_parser_has__tokens; -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_4, x_15); -x_17 = l_lean_parser_tokens___rarg(x_16); -return x_17; -} -} obj* _init_l_lean_parser_term_lambda_parser___closed__1() { _start: { @@ -27302,7 +27302,7 @@ x_0 = lean::mk_string("\xce\xbb"); x_1 = lean::mk_string("fun"); x_2 = l_lean_parser_max__prec; lean::inc(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__view___spec__1), 8, 3); +x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__tokens___spec__1), 8, 3); lean::closure_set(x_4, 0, x_0); lean::closure_set(x_4, 1, x_1); lean::closure_set(x_4, 2, x_2); @@ -27313,7 +27313,7 @@ x_8 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_8, 0, x_6); x_9 = lean::mk_nat_obj(0u); lean::inc(x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_11 = 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_11, 0, x_6); lean::closure_set(x_11, 1, x_9); lean::closure_set(x_11, 2, x_8); @@ -28573,103 +28573,6 @@ lean::inc(x_0); return x_0; } } -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; -x_0 = lean::mk_string("assume "); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = l_lean_parser_max__prec; -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -x_7 = lean::mk_string(": "); -x_8 = l_string_trim(x_7); -lean::inc(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_10, 0, x_8); -x_11 = lean::mk_nat_obj(0u); -lean::inc(x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_13, 0, x_8); -lean::closure_set(x_13, 1, x_11); -lean::closure_set(x_13, 2, x_10); -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); -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__view___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__view___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_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::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; -} -} obj* _init_l_lean_parser_term_assume_parser_lean_parser_has__tokens() { _start: { @@ -28707,10 +28610,10 @@ x_29 = l_lean_parser_tokens___rarg(x_28); return x_29; } } -obj* _init_l_lean_parser_term_assume_parser___closed__1() { +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_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; x_0 = lean::mk_string("assume "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -28718,7 +28621,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -28729,7 +28632,7 @@ x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_10, 0, x_8); x_11 = lean::mk_nat_obj(0u); lean::inc(x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_13 = 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_13, 0, x_8); lean::closure_set(x_13, 1, x_11); lean::closure_set(x_13, 2, x_10); @@ -28759,7 +28662,7 @@ x_27 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_27, 0, x_23); lean::cnstr_set(x_27, 1, x_26); 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__view___spec__3), 7, 2); +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); @@ -28775,7 +28678,104 @@ 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__view___spec__1), 8, 3); +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_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::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; +} +} +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; +x_0 = lean::mk_string("assume "); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = l_lean_parser_max__prec; +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +x_7 = lean::mk_string(": "); +x_8 = l_string_trim(x_7); +lean::inc(x_8); +x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_10, 0, x_8); +x_11 = lean::mk_nat_obj(0u); +lean::inc(x_11); +x_13 = 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_13, 0, x_8); +lean::closure_set(x_13, 1, x_11); +lean::closure_set(x_13, 2, x_10); +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); +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); @@ -29337,6 +29337,39 @@ lean::inc(x_0); 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; +x_0 = lean::mk_string("\xce\xa0"); +x_1 = lean::mk_string("Pi"); +x_2 = l_lean_parser_max__prec; +lean::inc(x_2); +x_4 = l_lean_parser_unicode__symbol_lean_parser_has__tokens___rarg(x_0, x_1, x_2); +x_5 = lean::mk_string("\xe2\x88\x80"); +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; +} +} obj* _init_l_lean_parser_term_pi_parser_lean_parser_has__view() { _start: { @@ -29345,14 +29378,14 @@ x_0 = lean::mk_string("\xce\xa0"); x_1 = lean::mk_string("Pi"); x_2 = l_lean_parser_max__prec; lean::inc(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__view___spec__1), 8, 3); +x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__tokens___spec__1), 8, 3); lean::closure_set(x_4, 0, x_0); lean::closure_set(x_4, 1, x_1); lean::closure_set(x_4, 2, x_2); x_5 = lean::mk_string("\xe2\x88\x80"); x_6 = lean::mk_string("forall"); lean::inc(x_2); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__view___spec__1), 8, 3); +x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__tokens___spec__1), 8, 3); lean::closure_set(x_8, 0, x_5); lean::closure_set(x_8, 1, x_6); lean::closure_set(x_8, 2, x_2); @@ -29364,7 +29397,7 @@ 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__view___spec__1), 6, 1); +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); @@ -29373,7 +29406,7 @@ x_17 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 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__view___spec__1), 8, 3); +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); @@ -29408,39 +29441,6 @@ x_39 = l_lean_parser_combinators_node_view___rarg(x_27, x_28, x_29, x_30, x_31, return x_39; } } -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; -x_0 = lean::mk_string("\xce\xa0"); -x_1 = lean::mk_string("Pi"); -x_2 = l_lean_parser_max__prec; -lean::inc(x_2); -x_4 = l_lean_parser_unicode__symbol_lean_parser_has__tokens___rarg(x_0, x_1, x_2); -x_5 = lean::mk_string("\xe2\x88\x80"); -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; -} -} obj* _init_l_lean_parser_term_pi_parser___closed__1() { _start: { @@ -29449,14 +29449,14 @@ x_0 = lean::mk_string("\xce\xa0"); x_1 = lean::mk_string("Pi"); x_2 = l_lean_parser_max__prec; lean::inc(x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__view___spec__1), 8, 3); +x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__tokens___spec__1), 8, 3); lean::closure_set(x_4, 0, x_0); lean::closure_set(x_4, 1, x_1); lean::closure_set(x_4, 2, x_2); x_5 = lean::mk_string("\xe2\x88\x80"); x_6 = lean::mk_string("forall"); lean::inc(x_2); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__view___spec__1), 8, 3); +x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_lambda_parser_lean_parser_has__tokens___spec__1), 8, 3); lean::closure_set(x_8, 0, x_5); lean::closure_set(x_8, 1, x_6); lean::closure_set(x_8, 2, x_2); @@ -29468,7 +29468,7 @@ 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__view___spec__1), 6, 1); +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); @@ -29477,7 +29477,7 @@ x_17 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 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__view___spec__1), 8, 3); +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); @@ -30210,6 +30210,33 @@ lean::inc(x_0); 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; +x_0 = lean::mk_string("@"); +x_1 = l_lean_parser_max__prec; +lean::inc(x_1); +x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); +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; +} +} obj* _init_l_lean_parser_term_explicit_parser_lean_parser_has__view() { _start: { @@ -30221,7 +30248,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -30231,7 +30258,7 @@ lean::inc(x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_10, 0, x_8); lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_12 = 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_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); @@ -30244,7 +30271,7 @@ 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__view___spec__3), 7, 2); +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); @@ -30279,33 +30306,6 @@ x_39 = l_lean_parser_combinators_node_view___rarg(x_27, x_28, x_29, x_30, x_31, return x_39; } } -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; -x_0 = lean::mk_string("@"); -x_1 = l_lean_parser_max__prec; -lean::inc(x_1); -x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); -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; -} -} obj* _init_l_lean_parser_term_explicit_parser___closed__1() { _start: { @@ -30317,7 +30317,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -30327,7 +30327,7 @@ lean::inc(x_8); x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_10, 0, x_8); lean::inc(x_4); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_12 = 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_12, 0, x_8); lean::closure_set(x_12, 1, x_4); lean::closure_set(x_12, 2, x_10); @@ -30340,7 +30340,7 @@ 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__view___spec__3), 7, 2); +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); @@ -30625,6 +30625,22 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_term_from_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_8; +x_0 = lean::mk_string("from "); +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_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_4); +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); +return x_8; +} +} obj* _init_l_lean_parser_term_from_parser_lean_parser_has__view() { _start: { @@ -30636,7 +30652,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -30665,22 +30681,6 @@ x_23 = l_lean_parser_combinators_node_view___rarg(x_11, x_12, x_13, x_14, x_15, return x_23; } } -obj* _init_l_lean_parser_term_from_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_8; -x_0 = lean::mk_string("from "); -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_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_4); -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); -return x_8; -} -} obj* _init_l_lean_parser_term_from_parser___closed__1() { _start: { @@ -30692,7 +30692,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -33014,116 +33014,6 @@ lean::inc(x_0); return x_0; } } -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; -x_0 = lean::mk_string("let "); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_bracketed__binder_parser), 5, 0); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__1), 6, 1); -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_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__view___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::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_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::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__view___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); -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__view___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__view___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_43 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_43, 0, x_42); -lean::cnstr_set(x_43, 1, x_23); -x_44 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_44, 0, x_20); -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, 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); -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; -} -} obj* _init_l_lean_parser_term_let_parser_lean_parser_has__tokens() { _start: { @@ -33168,10 +33058,10 @@ x_36 = l_lean_parser_tokens___rarg(x_35); return x_36; } } -obj* _init_l_lean_parser_term_let_parser___closed__1() { +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_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; x_0 = lean::mk_string("let "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -33179,12 +33069,12 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_bracketed__binder_parser), 5, 0); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_many___at_lean_parser_command_notation__spec_parser_lean_parser_has__view___spec__1), 6, 1); +x_8 = 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_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); @@ -33195,7 +33085,7 @@ 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__view___spec__4), 1, 0); +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); @@ -33217,7 +33107,7 @@ 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::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__view___spec__3), 7, 2); +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); @@ -33234,7 +33124,7 @@ 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_37 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -33243,7 +33133,117 @@ 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__view___spec__1), 8, 3); +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_43 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_43, 0, x_42); +lean::cnstr_set(x_43, 1, x_23); +x_44 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_44, 0, x_20); +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, 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); +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; +} +} +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; +x_0 = lean::mk_string("let "); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_bracketed__binder_parser), 5, 0); +x_8 = 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_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_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::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_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::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); +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); @@ -33742,6 +33742,23 @@ lean::inc(x_0); 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; +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_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; +} +} obj* _init_l_lean_parser_term_opt__ident_parser_lean_parser_has__view() { _start: { @@ -33752,7 +33769,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -33760,7 +33777,7 @@ 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 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4), 1, 0); +x_8 = 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_9 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_9, 0, x_8); lean::cnstr_set(x_9, 1, x_7); @@ -33826,23 +33843,6 @@ lean::cnstr_set(x_15, 1, x_11); return x_15; } } -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; -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_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; -} -} obj* _init_l_lean_parser_term_opt__ident_parser___closed__1() { _start: { @@ -33853,7 +33853,7 @@ lean::inc(x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); -x_5 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_5 = 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_5, 0, x_1); lean::closure_set(x_5, 1, x_4); lean::closure_set(x_5, 2, x_3); @@ -33861,7 +33861,7 @@ 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 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4), 1, 0); +x_8 = 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_9 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_9, 0, x_8); lean::cnstr_set(x_9, 1, x_7); @@ -33876,7 +33876,7 @@ _start: obj* x_5; obj* x_7; x_5 = l_lean_parser_term_opt__ident_parser___closed__1; lean::inc(x_5); -x_7 = l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__7(x_5, x_0, x_1, x_2, x_3, x_4); +x_7 = l_lean_parser_combinators_optional___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__7(x_5, x_0, x_1, x_2, x_3, x_4); return x_7; } } @@ -35853,123 +35853,6 @@ lean::inc(x_0); return x_0; } } -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; -x_0 = lean::mk_string("have "); -x_1 = l_string_trim(x_0); -lean::inc(x_1); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = lean::mk_nat_obj(0u); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -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::mk_string(" := "); -x_10 = l_string_trim(x_9); -lean::inc(x_10); -x_12 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_12, 0, x_10); -lean::inc(x_4); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -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); -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__view___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_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); -x_39 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_39, 0, x_37); -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__view___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_47 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_47, 0, x_45); -lean::cnstr_set(x_47, 1, x_46); -x_48 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_48, 0, x_8); -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); -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; -} -} obj* _init_l_lean_parser_term_have_parser_lean_parser_has__tokens() { _start: { @@ -36016,10 +35899,10 @@ x_38 = l_lean_parser_tokens___rarg(x_37); return x_38; } } -obj* _init_l_lean_parser_term_have_parser___closed__1() { +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_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; x_0 = lean::mk_string("have "); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -36027,7 +35910,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -36040,7 +35923,7 @@ lean::inc(x_10); x_12 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_12, 0, x_10); lean::inc(x_4); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_14 = 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_14, 0, x_10); lean::closure_set(x_14, 1, x_4); lean::closure_set(x_14, 2, x_12); @@ -36065,7 +35948,7 @@ 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_29 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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); @@ -36090,7 +35973,124 @@ 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__view___spec__3), 7, 2); +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_47 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_47, 0, x_45); +lean::cnstr_set(x_47, 1, x_46); +x_48 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_48, 0, x_8); +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); +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; +} +} +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; +x_0 = lean::mk_string("have "); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = lean::mk_nat_obj(0u); +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +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::mk_string(" := "); +x_10 = l_string_trim(x_9); +lean::inc(x_10); +x_12 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_12, 0, x_10); +lean::inc(x_4); +x_14 = 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_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); +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_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); +x_39 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_39, 0, x_37); +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); @@ -36752,6 +36752,29 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_term_show_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_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; +x_0 = lean::mk_string("show "); +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::mk_string(", "); +x_5 = l_lean_parser_symbol_tokens___rarg(x_4, x_1); +x_6 = lean::box(0); +x_7 = l_lean_parser_term_from_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_5, x_9); +x_11 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +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_3, x_13); +x_15 = l_lean_parser_tokens___rarg(x_14); +return x_15; +} +} obj* _init_l_lean_parser_term_show_parser_lean_parser_has__view() { _start: { @@ -36763,7 +36786,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -36775,7 +36798,7 @@ x_10 = l_string_trim(x_9); lean::inc(x_10); x_12 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_12, 0, x_10); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_13 = 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_13, 0, x_10); lean::closure_set(x_13, 1, x_4); lean::closure_set(x_13, 2, x_12); @@ -36809,29 +36832,6 @@ x_32 = l_lean_parser_combinators_node_view___rarg(x_20, x_21, x_22, x_23, x_24, return x_32; } } -obj* _init_l_lean_parser_term_show_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_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; -x_0 = lean::mk_string("show "); -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::mk_string(", "); -x_5 = l_lean_parser_symbol_tokens___rarg(x_4, x_1); -x_6 = lean::box(0); -x_7 = l_lean_parser_term_from_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_5, x_9); -x_11 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -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_3, x_13); -x_15 = l_lean_parser_tokens___rarg(x_14); -return x_15; -} -} obj* _init_l_lean_parser_term_show_parser___closed__1() { _start: { @@ -36843,7 +36843,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -36855,7 +36855,7 @@ x_10 = l_string_trim(x_9); lean::inc(x_10); x_12 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_12, 0, x_10); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_13 = 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_13, 0, x_10); lean::closure_set(x_13, 1, x_4); lean::closure_set(x_13, 2, x_12); @@ -37843,7 +37843,7 @@ x_11 = lean::nat_add(x_8, x_10); lean::dec(x_10); lean::dec(x_8); x_14 = 0; -x_15 = l___private_init_lean_parser_combinators_2__sep__by__aux___main___at_lean_parser_term_paren_parser_lean_parser_has__view___spec__2(x_0, x_1, x_2, x_14, x_9, x_11, x_3, x_4, x_5, x_6, x_7); +x_15 = 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_14, x_9, x_11, x_3, x_4, x_5, x_6, x_7); x_16 = lean::cnstr_get(x_15, 0); lean::inc(x_16); x_18 = lean::cnstr_get(x_15, 1); @@ -39378,6 +39378,51 @@ lean::inc(x_0); 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; +x_0 = lean::mk_string("match "); +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::mk_string(", "); +lean::inc(x_1); +x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_1); +x_7 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_7); +x_9 = l_lean_parser_combinators_sep__by1_tokens___rarg(x_7, x_6); +x_10 = lean::mk_string(" with "); +lean::inc(x_1); +x_12 = l_lean_parser_symbol_tokens___rarg(x_10, x_1); +x_13 = lean::mk_string(" | "); +lean::inc(x_1); +x_15 = l_lean_parser_symbol_tokens___rarg(x_13, x_1); +lean::inc(x_15); +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); +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; +} +} obj* _init_l_lean_parser_term_match_parser_lean_parser_has__view() { _start: { @@ -39389,7 +39434,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -39402,7 +39447,7 @@ lean::inc(x_10); x_12 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_12, 0, x_10); lean::inc(x_4); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_14 = 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_14, 0, x_10); lean::closure_set(x_14, 1, x_4); lean::closure_set(x_14, 2, x_12); @@ -39420,7 +39465,7 @@ 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_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_25 = 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_25, 0, x_21); lean::closure_set(x_25, 1, x_4); lean::closure_set(x_25, 2, x_23); @@ -39430,19 +39475,19 @@ 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); lean::inc(x_4); -x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_31 = 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_31, 0, x_27); lean::closure_set(x_31, 1, x_4); lean::closure_set(x_31, 2, x_29); lean::inc(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__view___spec__7), 6, 1); +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_31); 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__view___spec__1), 8, 3); +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_4); lean::closure_set(x_38, 2, x_37); @@ -39502,51 +39547,6 @@ x_68 = l_lean_parser_combinators_node_view___rarg(x_56, x_57, x_58, x_59, x_60, return x_68; } } -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; -x_0 = lean::mk_string("match "); -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::mk_string(", "); -lean::inc(x_1); -x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_1); -x_7 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_7); -x_9 = l_lean_parser_combinators_sep__by1_tokens___rarg(x_7, x_6); -x_10 = lean::mk_string(" with "); -lean::inc(x_1); -x_12 = l_lean_parser_symbol_tokens___rarg(x_10, x_1); -x_13 = lean::mk_string(" | "); -lean::inc(x_1); -x_15 = l_lean_parser_symbol_tokens___rarg(x_13, x_1); -lean::inc(x_15); -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); -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; -} -} obj* _init_l_lean_parser_term_match_parser___closed__1() { _start: { @@ -39558,7 +39558,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -39571,7 +39571,7 @@ lean::inc(x_10); x_12 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_12, 0, x_10); lean::inc(x_4); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_14 = 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_14, 0, x_10); lean::closure_set(x_14, 1, x_4); lean::closure_set(x_14, 2, x_12); @@ -39589,7 +39589,7 @@ 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_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_25 = 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_25, 0, x_21); lean::closure_set(x_25, 1, x_4); lean::closure_set(x_25, 2, x_23); @@ -39599,19 +39599,19 @@ 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); lean::inc(x_4); -x_31 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_31 = 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_31, 0, x_27); lean::closure_set(x_31, 1, x_4); lean::closure_set(x_31, 2, x_29); lean::inc(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__view___spec__7), 6, 1); +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_31); 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__view___spec__1), 8, 3); +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_4); lean::closure_set(x_38, 2, x_37); @@ -40769,6 +40769,37 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_term_if_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_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; +x_0 = lean::mk_string("if "); +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::mk_string(" then "); +lean::inc(x_1); +x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_1); +x_7 = lean::mk_string(" else "); +x_8 = l_lean_parser_symbol_tokens___rarg(x_7, x_1); +x_9 = lean::box(0); +x_10 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +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_8, x_12); +lean::inc(x_10); +x_15 = l_lean_parser_list_cons_tokens___rarg(x_10, x_13); +x_16 = l_lean_parser_list_cons_tokens___rarg(x_6, x_15); +lean::inc(x_10); +x_18 = l_lean_parser_list_cons_tokens___rarg(x_10, x_16); +x_19 = l_lean_parser_term_opt__ident_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_3, x_21); +x_23 = l_lean_parser_tokens___rarg(x_22); +return x_23; +} +} obj* _init_l_lean_parser_term_if_parser_lean_parser_has__view() { _start: { @@ -40780,7 +40811,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -40793,7 +40824,7 @@ lean::inc(x_10); x_12 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_12, 0, x_10); lean::inc(x_4); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_14 = 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_14, 0, x_10); lean::closure_set(x_14, 1, x_4); lean::closure_set(x_14, 2, x_12); @@ -40802,7 +40833,7 @@ 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); -x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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_16); lean::closure_set(x_19, 1, x_4); lean::closure_set(x_19, 2, x_18); @@ -40847,37 +40878,6 @@ x_43 = l_lean_parser_combinators_node_view___rarg(x_31, x_32, x_33, x_34, x_35, return x_43; } } -obj* _init_l_lean_parser_term_if_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_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; -x_0 = lean::mk_string("if "); -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::mk_string(" then "); -lean::inc(x_1); -x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_1); -x_7 = lean::mk_string(" else "); -x_8 = l_lean_parser_symbol_tokens___rarg(x_7, x_1); -x_9 = lean::box(0); -x_10 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -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_8, x_12); -lean::inc(x_10); -x_15 = l_lean_parser_list_cons_tokens___rarg(x_10, x_13); -x_16 = l_lean_parser_list_cons_tokens___rarg(x_6, x_15); -lean::inc(x_10); -x_18 = l_lean_parser_list_cons_tokens___rarg(x_10, x_16); -x_19 = l_lean_parser_term_opt__ident_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_3, x_21); -x_23 = l_lean_parser_tokens___rarg(x_22); -return x_23; -} -} obj* _init_l_lean_parser_term_if_parser___closed__1() { _start: { @@ -40889,7 +40889,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = lean::mk_nat_obj(0u); lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -40902,7 +40902,7 @@ lean::inc(x_10); x_12 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_12, 0, x_10); lean::inc(x_4); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_14 = 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_14, 0, x_10); lean::closure_set(x_14, 1, x_4); lean::closure_set(x_14, 2, x_12); @@ -40911,7 +40911,7 @@ 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); -x_19 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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_16); lean::closure_set(x_19, 1, x_4); lean::closure_set(x_19, 2, x_18); @@ -44867,6 +44867,78 @@ lean::inc(x_0); 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; +x_0 = lean::mk_string("{"); +x_1 = l_lean_parser_max__prec; +lean::inc(x_1); +x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); +x_4 = lean::box(0); +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_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 "); +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(" := "); +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(".."); +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(", "); +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; +} +} obj* _init_l_lean_parser_term_struct__inst_parser_lean_parser_has__view() { _start: { @@ -44878,7 +44950,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -44889,7 +44961,7 @@ x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_10, 0, x_8); x_11 = lean::mk_nat_obj(0u); lean::inc(x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_13 = 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_13, 0, x_8); lean::closure_set(x_13, 1, x_11); lean::closure_set(x_13, 2, x_10); @@ -44898,14 +44970,14 @@ 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__view___spec__4), 1, 0); +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); 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__view___spec__7), 6, 1); +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); @@ -44916,7 +44988,7 @@ 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_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__view___spec__1), 8, 3); +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); @@ -44930,7 +45002,7 @@ 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__view___spec__7), 6, 1); +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); @@ -44938,7 +45010,7 @@ 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::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__view___spec__1), 8, 3); +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); @@ -44964,11 +45036,11 @@ 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); 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__view___spec__1), 8, 3); +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__view___spec__7), 6, 1); +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); @@ -44990,7 +45062,7 @@ 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::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__view___spec__3), 7, 2); +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); @@ -45008,13 +45080,13 @@ 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__view___spec__1), 8, 3); +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__view___spec__1___boxed), 8, 3); +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); @@ -45023,7 +45095,7 @@ 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__view___spec__1), 8, 3); +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); @@ -45118,78 +45190,6 @@ lean::cnstr_set(x_15, 1, x_11); return x_15; } } -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; -x_0 = lean::mk_string("{"); -x_1 = l_lean_parser_max__prec; -lean::inc(x_1); -x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); -x_4 = lean::box(0); -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_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 "); -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(" := "); -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(".."); -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(", "); -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; -} -} obj* _init_l_lean_parser_term_struct__inst_parser___closed__1() { _start: { @@ -45201,7 +45201,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -45212,7 +45212,7 @@ x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_10, 0, x_8); x_11 = lean::mk_nat_obj(0u); lean::inc(x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_13 = 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_13, 0, x_8); lean::closure_set(x_13, 1, x_11); lean::closure_set(x_13, 2, x_10); @@ -45221,14 +45221,14 @@ 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__view___spec__4), 1, 0); +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); 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__view___spec__7), 6, 1); +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); @@ -45239,7 +45239,7 @@ 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_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__view___spec__1), 8, 3); +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); @@ -45253,7 +45253,7 @@ 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__view___spec__7), 6, 1); +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); @@ -45261,7 +45261,7 @@ 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::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__view___spec__1), 8, 3); +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); @@ -45287,11 +45287,11 @@ 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); 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__view___spec__1), 8, 3); +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__view___spec__7), 6, 1); +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); @@ -45313,7 +45313,7 @@ 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::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__view___spec__3), 7, 2); +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); @@ -45331,13 +45331,13 @@ 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__view___spec__1), 8, 3); +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__view___spec__1___boxed), 8, 3); +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); @@ -45346,7 +45346,7 @@ 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__view___spec__1), 8, 3); +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); @@ -46591,81 +46591,6 @@ lean::inc(x_0); return x_0; } } -obj* _init_l_lean_parser_term_subtype_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_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_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); -x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_3, 0, x_1); -x_4 = l_lean_parser_max__prec; -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_6, 0, x_1); -lean::closure_set(x_6, 1, x_4); -lean::closure_set(x_6, 2, x_3); -x_7 = lean::mk_string("//"); -x_8 = l_string_trim(x_7); -lean::inc(x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_10, 0, x_8); -x_11 = lean::mk_nat_obj(0u); -lean::inc(x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_13, 0, x_8); -lean::closure_set(x_13, 1, x_11); -lean::closure_set(x_13, 2, x_10); -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::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); -x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); -lean::closure_set(x_20, 0, x_17); -lean::closure_set(x_20, 1, x_11); -lean::closure_set(x_20, 2, 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 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_23, 0, x_15); -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 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_opt__type_parser), 5, 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 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4), 1, 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_6); -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_term_subtype; -x_35 = l_lean_parser_term_subtype_has__view; -lean::inc(x_35); -lean::inc(x_34); -lean::inc(x_33); -lean::inc(x_32); -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_subtype_parser_lean_parser_has__tokens() { _start: { @@ -46696,10 +46621,10 @@ x_22 = l_lean_parser_tokens___rarg(x_21); return x_22; } } -obj* _init_l_lean_parser_term_subtype_parser___closed__1() { +obj* _init_l_lean_parser_term_subtype_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_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_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_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_35; obj* x_42; x_0 = lean::mk_string("{"); x_1 = l_string_trim(x_0); lean::inc(x_1); @@ -46707,7 +46632,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -46718,7 +46643,7 @@ x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_10, 0, x_8); x_11 = lean::mk_nat_obj(0u); lean::inc(x_11); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_13 = 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_13, 0, x_8); lean::closure_set(x_13, 1, x_11); lean::closure_set(x_13, 2, x_10); @@ -46730,7 +46655,7 @@ 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_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +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_17); lean::closure_set(x_20, 1, x_11); lean::closure_set(x_20, 2, x_19); @@ -46748,7 +46673,82 @@ x_25 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_opt__type_ 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 = lean::alloc_closure(reinterpret_cast(l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4), 1, 0); +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); +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_6); +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_term_subtype; +x_35 = l_lean_parser_term_subtype_has__view; +lean::inc(x_35); +lean::inc(x_34); +lean::inc(x_33); +lean::inc(x_32); +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_subtype_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_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; +x_0 = lean::mk_string("{"); +x_1 = l_string_trim(x_0); +lean::inc(x_1); +x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_3, 0, x_1); +x_4 = l_lean_parser_max__prec; +lean::inc(x_4); +x_6 = 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_6, 0, x_1); +lean::closure_set(x_6, 1, x_4); +lean::closure_set(x_6, 2, x_3); +x_7 = lean::mk_string("//"); +x_8 = l_string_trim(x_7); +lean::inc(x_8); +x_10 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_10, 0, x_8); +x_11 = lean::mk_nat_obj(0u); +lean::inc(x_11); +x_13 = 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_13, 0, x_8); +lean::closure_set(x_13, 1, x_11); +lean::closure_set(x_13, 2, x_10); +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::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); +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_17); +lean::closure_set(x_20, 1, x_11); +lean::closure_set(x_20, 2, 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 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_23, 0, x_15); +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 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_opt__type_parser), 5, 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 = 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_28 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_28, 0, x_27); lean::cnstr_set(x_28, 1, x_26); @@ -47399,6 +47399,27 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_term_inaccessible_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_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; +x_0 = lean::mk_string(".("); +x_1 = l_lean_parser_max__prec; +lean::inc(x_1); +x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); +x_4 = lean::mk_string(")"); +x_5 = lean::mk_nat_obj(0u); +x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_5); +x_7 = lean::box(0); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_6, x_7); +x_9 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_9); +x_11 = l_lean_parser_list_cons_tokens___rarg(x_9, x_8); +x_12 = l_lean_parser_list_cons_tokens___rarg(x_3, x_11); +x_13 = l_lean_parser_tokens___rarg(x_12); +return x_13; +} +} obj* _init_l_lean_parser_term_inaccessible_parser_lean_parser_has__view() { _start: { @@ -47410,7 +47431,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -47423,7 +47444,7 @@ x_11 = l_string_trim(x_10); lean::inc(x_11); x_13 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_13, 0, x_11); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_14 = 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_14, 0, x_11); lean::closure_set(x_14, 1, x_7); lean::closure_set(x_14, 2, x_13); @@ -47453,27 +47474,6 @@ x_31 = l_lean_parser_combinators_node_view___rarg(x_19, x_20, x_21, x_22, x_23, return x_31; } } -obj* _init_l_lean_parser_term_inaccessible_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_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; -x_0 = lean::mk_string(".("); -x_1 = l_lean_parser_max__prec; -lean::inc(x_1); -x_3 = l_lean_parser_symbol_tokens___rarg(x_0, x_1); -x_4 = lean::mk_string(")"); -x_5 = lean::mk_nat_obj(0u); -x_6 = l_lean_parser_symbol_tokens___rarg(x_4, x_5); -x_7 = lean::box(0); -x_8 = l_lean_parser_list_cons_tokens___rarg(x_6, x_7); -x_9 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_9); -x_11 = l_lean_parser_list_cons_tokens___rarg(x_9, x_8); -x_12 = l_lean_parser_list_cons_tokens___rarg(x_3, x_11); -x_13 = l_lean_parser_tokens___rarg(x_12); -return x_13; -} -} obj* _init_l_lean_parser_term_inaccessible_parser___closed__1() { _start: { @@ -47485,7 +47485,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -47498,7 +47498,7 @@ x_11 = l_string_trim(x_10); lean::inc(x_11); x_13 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_13, 0, x_11); -x_14 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_14 = 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_14, 0, x_11); lean::closure_set(x_14, 1, x_7); lean::closure_set(x_14, 2, x_13); @@ -47583,6 +47583,20 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_term_anonymous__inaccessible_parser_lean_parser_has__tokens() { +_start: +{ +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; +x_0 = lean::mk_string("._"); +x_1 = l_lean_parser_max__prec; +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_list_cons_tokens___rarg(x_3, x_4); +x_6 = l_lean_parser_tokens___rarg(x_5); +return x_6; +} +} obj* _init_l_lean_parser_term_anonymous__inaccessible_parser_lean_parser_has__view() { _start: { @@ -47594,7 +47608,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -47618,20 +47632,6 @@ x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x return x_21; } } -obj* _init_l_lean_parser_term_anonymous__inaccessible_parser_lean_parser_has__tokens() { -_start: -{ -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_0 = lean::mk_string("._"); -x_1 = l_lean_parser_max__prec; -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_list_cons_tokens___rarg(x_3, x_4); -x_6 = l_lean_parser_tokens___rarg(x_5); -return x_6; -} -} obj* _init_l_lean_parser_term_anonymous__inaccessible_parser___closed__1() { _start: { @@ -47643,7 +47643,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -47722,6 +47722,20 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_term_sorry_parser_lean_parser_has__tokens() { +_start: +{ +obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; +x_0 = lean::mk_string("sorry"); +x_1 = l_lean_parser_max__prec; +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_list_cons_tokens___rarg(x_3, x_4); +x_6 = l_lean_parser_tokens___rarg(x_5); +return x_6; +} +} obj* _init_l_lean_parser_term_sorry_parser_lean_parser_has__view() { _start: { @@ -47733,7 +47747,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -47757,20 +47771,6 @@ x_21 = l_lean_parser_combinators_node_view___rarg(x_9, x_10, x_11, x_12, x_13, x return x_21; } } -obj* _init_l_lean_parser_term_sorry_parser_lean_parser_has__tokens() { -_start: -{ -obj* x_0; obj* x_1; obj* x_3; obj* x_4; obj* x_5; obj* x_6; -x_0 = lean::mk_string("sorry"); -x_1 = l_lean_parser_max__prec; -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_list_cons_tokens___rarg(x_3, x_4); -x_6 = l_lean_parser_tokens___rarg(x_5); -return x_6; -} -} obj* _init_l_lean_parser_term_sorry_parser___closed__1() { _start: { @@ -47782,7 +47782,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -48056,6 +48056,23 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_term_borrowed_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; +x_0 = lean::mk_string("@&"); +x_1 = l_lean_parser_max__prec; +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_5); +x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_4); +x_8 = l_lean_parser_list_cons_tokens___rarg(x_3, x_7); +x_9 = l_lean_parser_tokens___rarg(x_8); +return x_9; +} +} obj* _init_l_lean_parser_term_borrowed_parser_lean_parser_has__view() { _start: { @@ -48067,7 +48084,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -48097,23 +48114,6 @@ x_24 = l_lean_parser_combinators_node_view___rarg(x_12, x_13, x_14, x_15, x_16, return x_24; } } -obj* _init_l_lean_parser_term_borrowed_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; -x_0 = lean::mk_string("@&"); -x_1 = l_lean_parser_max__prec; -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_5); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_4); -x_8 = l_lean_parser_list_cons_tokens___rarg(x_3, x_7); -x_9 = l_lean_parser_tokens___rarg(x_8); -return x_9; -} -} obj* _init_l_lean_parser_term_borrowed_parser___closed__1() { _start: { @@ -48125,7 +48125,7 @@ x_3 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, lean::closure_set(x_3, 0, x_1); x_4 = l_lean_parser_max__prec; lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_command_notation__spec_precedence__term_parser_lean_parser_has__view___spec__1), 8, 3); +x_6 = 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_6, 0, x_1); lean::closure_set(x_6, 1, x_4); lean::closure_set(x_6, 2, x_3); @@ -48422,7 +48422,7 @@ 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__view___spec__1), 1, 0); +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); @@ -48843,7 +48843,7 @@ lean::inc(x_0); return x_0; } } -obj* l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__1___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__1___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { _start: { obj* x_12; obj* x_13; obj* x_15; obj* x_17; @@ -48927,17 +48927,17 @@ return x_44; } } } -obj* l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1) { +obj* l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1) { _start: { obj* x_4; lean::dec(x_1); lean::dec(x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__1___rarg), 8, 0); +x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__1___rarg), 8, 0); return x_4; } } -obj* l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__2___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { +obj* l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__2___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { _start: { obj* x_8; @@ -48946,16 +48946,16 @@ x_8 = lean::apply_5(x_0, x_2, x_3, x_4, x_5, x_6); return x_8; } } -obj* l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__2(obj* x_0) { +obj* l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__2(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__2___rarg), 7, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__2___rarg), 7, 0); return x_2; } } -obj* l_list_mfoldl___main___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__4(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* l_list_mfoldl___main___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__4(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) { _start: { if (lean::obj_tag(x_2) == 0) @@ -49164,7 +49164,7 @@ lean::inc(x_82); x_84 = lean::cnstr_get(x_79, 2); lean::inc(x_84); lean::dec(x_79); -x_87 = l_list_mfoldl___main___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__4(x_0, x_80, x_21, x_3, x_4, x_5, x_6, x_82, x_25); +x_87 = l_list_mfoldl___main___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__4(x_0, x_80, x_21, x_3, x_4, x_5, x_6, x_82, x_25); x_88 = lean::cnstr_get(x_87, 0); lean::inc(x_88); x_90 = lean::cnstr_get(x_87, 1); @@ -49258,13 +49258,13 @@ return x_122; } } } -obj* l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__3(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* l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { _start: { obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_15; x_8 = lean::box(0); lean::inc(x_0); -x_10 = l_list_mfoldl___main___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__4(x_0, x_8, x_1, x_2, x_3, x_4, x_5, x_6, x_7); +x_10 = l_list_mfoldl___main___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__4(x_0, x_8, x_1, x_2, x_3, x_4, x_5, x_6, x_7); x_11 = lean::cnstr_get(x_10, 0); lean::inc(x_11); x_13 = lean::cnstr_get(x_10, 1); @@ -49350,6 +49350,26 @@ return x_37; } } } +obj* _init_l_lean_parser_term_sort__app_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_8; obj* x_10; obj* x_11; obj* x_12; +x_0 = l_lean_parser_level_leading_parser_lean_parser_has__tokens; +x_1 = l_lean_parser_level_trailing_parser_lean_parser_has__tokens; +lean::inc(x_1); +lean::inc(x_0); +x_4 = l_list_append___rarg(x_0, x_1); +x_5 = l_lean_parser_tokens___rarg(x_4); +x_6 = lean::box(0); +x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_6); +x_8 = l_lean_parser_term_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_tokens___rarg(x_11); +return x_12; +} +} obj* _init_l_lean_parser_term_sort__app_parser_lean_parser_has__view() { _start: { @@ -49357,7 +49377,7 @@ 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::alloc_closure(reinterpret_cast(l_lean_parser_term_get__leading), 6, 0); x_1 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_sort__app_parser_lean_parser_has__view___lambda__1), 7, 0); lean::inc(x_0); -x_3 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__1___rarg), 8, 2); +x_3 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__1___rarg), 8, 2); lean::closure_set(x_3, 0, x_0); lean::closure_set(x_3, 1, x_1); x_4 = l_lean_parser_max__prec; @@ -49366,9 +49386,9 @@ x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level_parser), 5 lean::closure_set(x_6, 0, x_4); x_7 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_sort__app_parser_lean_parser_has__view___lambda__2), 5, 1); lean::closure_set(x_7, 0, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__3___rarg), 6, 1); +x_8 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__3___rarg), 6, 1); lean::closure_set(x_8, 0, x_7); -x_9 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__2___rarg), 7, 1); +x_9 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__2___rarg), 7, 1); lean::closure_set(x_9, 0, x_8); x_10 = lean::box(0); x_11 = lean::alloc_cnstr(1, 2, 0); @@ -49380,7 +49400,7 @@ lean::cnstr_set(x_12, 1, x_11); x_13 = l_lean_parser_term_sort__app; lean::inc(x_12); lean::inc(x_13); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__3), 8, 2); +x_16 = 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_16, 0, x_13); lean::closure_set(x_16, 1, x_12); x_17 = l_lean_parser_trailing__term__parser__m_monad; @@ -49447,26 +49467,6 @@ x_10 = l_lean_parser_pratt__parser___at_lean_parser_level__parser_run___spec__1( return x_10; } } -obj* _init_l_lean_parser_term_sort__app_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_8; obj* x_10; obj* x_11; obj* x_12; -x_0 = l_lean_parser_level_leading_parser_lean_parser_has__tokens; -x_1 = l_lean_parser_level_trailing_parser_lean_parser_has__tokens; -lean::inc(x_1); -lean::inc(x_0); -x_4 = l_list_append___rarg(x_0, x_1); -x_5 = l_lean_parser_tokens___rarg(x_4); -x_6 = lean::box(0); -x_7 = l_lean_parser_list_cons_tokens___rarg(x_5, x_6); -x_8 = l_lean_parser_term_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_tokens___rarg(x_11); -return x_12; -} -} obj* _init_l_lean_parser_term_sort__app_parser___closed__1() { _start: { @@ -49477,9 +49477,9 @@ x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_level_parser), 5 lean::closure_set(x_2, 0, x_0); x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_sort__app_parser_lean_parser_has__view___lambda__2), 5, 1); lean::closure_set(x_3, 0, x_2); -x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__3___rarg), 6, 1); +x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__3___rarg), 6, 1); lean::closure_set(x_4, 0, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__2___rarg), 7, 1); +x_5 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__2___rarg), 7, 1); lean::closure_set(x_5, 0, x_4); x_6 = lean::box(0); x_7 = lean::alloc_cnstr(1, 2, 0); @@ -49573,7 +49573,7 @@ x_43 = l_lean_parser_term_sort__app; x_44 = l_lean_parser_term_sort__app_parser___closed__1; lean::inc(x_44); lean::inc(x_43); -x_47 = l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__3(x_43, x_44, x_0, x_1, x_2, x_3, x_38, x_34); +x_47 = l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__3(x_43, x_44, x_0, x_1, x_2, x_3, x_38, x_34); x_48 = lean::cnstr_get(x_47, 0); lean::inc(x_48); x_50 = lean::cnstr_get(x_47, 1); @@ -49651,7 +49651,7 @@ x_76 = l_lean_parser_term_sort__app; x_77 = l_lean_parser_term_sort__app_parser___closed__1; lean::inc(x_77); lean::inc(x_76); -x_80 = l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__3(x_76, x_77, x_0, x_1, x_2, x_3, x_71, x_13); +x_80 = l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__3(x_76, x_77, x_0, x_1, x_2, x_3, x_71, x_13); x_81 = lean::cnstr_get(x_80, 0); lean::inc(x_81); x_83 = lean::cnstr_get(x_80, 1); @@ -49889,6 +49889,22 @@ lean::inc(x_0); return x_0; } } +obj* _init_l_lean_parser_term_app_parser_lean_parser_has__tokens() { +_start: +{ +obj* x_0; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; +x_0 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; +lean::inc(x_0); +x_2 = l_lean_parser_tokens___rarg(x_0); +x_3 = lean::box(0); +x_4 = l_lean_parser_list_cons_tokens___rarg(x_2, x_3); +x_5 = l_lean_parser_term_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); +return x_8; +} +} obj* _init_l_lean_parser_term_app_parser_lean_parser_has__view() { _start: { @@ -49929,22 +49945,6 @@ x_9 = l_lean_parser_term_parser(x_7, x_1, x_2, x_3, x_4, x_5); return x_9; } } -obj* _init_l_lean_parser_term_app_parser_lean_parser_has__tokens() { -_start: -{ -obj* x_0; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; -x_0 = l_lean_parser_term_parser_lean_parser_has__tokens___closed__1; -lean::inc(x_0); -x_2 = l_lean_parser_tokens___rarg(x_0); -x_3 = lean::box(0); -x_4 = l_lean_parser_list_cons_tokens___rarg(x_2, x_3); -x_5 = l_lean_parser_term_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); -return x_8; -} -} obj* _init_l_lean_parser_term_app_parser___closed__1() { _start: { @@ -49969,7 +49969,7 @@ x_6 = l_lean_parser_term_app; x_7 = l_lean_parser_term_app_parser___closed__1; lean::inc(x_7); lean::inc(x_6); -x_10 = l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__3(x_6, x_7, x_0, x_1, x_2, x_3, x_4, x_5); +x_10 = l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__3(x_6, x_7, x_0, x_1, x_2, x_3, x_4, x_5); return x_10; } } @@ -50258,7 +50258,7 @@ lean::inc(x_0); return x_0; } } -obj* l_lean_parser_unicode__symbol___at_lean_parser_term_arrow_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8) { +obj* l_lean_parser_unicode__symbol___at_lean_parser_term_arrow_parser_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7, obj* x_8) { _start: { obj* x_12; 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; @@ -50270,7 +50270,7 @@ lean::inc(x_12); x_14 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_14, 0, x_12); lean::inc(x_2); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); lean::closure_set(x_16, 0, x_12); lean::closure_set(x_16, 1, x_2); lean::closure_set(x_16, 2, x_14); @@ -50278,7 +50278,7 @@ x_17 = l_string_trim(x_1); 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_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); +x_20 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); lean::closure_set(x_20, 0, x_17); lean::closure_set(x_20, 1, x_2); lean::closure_set(x_20, 2, x_19); @@ -50289,10 +50289,31 @@ lean::cnstr_set(x_22, 1, x_21); x_23 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_23, 0, x_16); lean::cnstr_set(x_23, 1, x_22); -x_24 = l_lean_parser_combinators_any__of___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__2(x_23, x_5, x_7, x_8); +x_24 = l_lean_parser_combinators_any__of___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__2(x_23, x_5, x_7, x_8); return x_24; } } +obj* _init_l_lean_parser_term_arrow_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_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; +x_0 = lean::mk_string("\xe2\x86\x92"); +x_1 = lean::mk_string("->"); +x_2 = lean::mk_nat_obj(25u); +x_3 = l_lean_parser_unicode__symbol_lean_parser_has__tokens___rarg(x_0, x_1, x_2); +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); +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_term_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_tokens___rarg(x_12); +return x_13; +} +} obj* _init_l_lean_parser_term_arrow_parser_lean_parser_has__view() { _start: { @@ -50300,7 +50321,7 @@ 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("\xe2\x86\x92"); x_1 = lean::mk_string("->"); x_2 = lean::mk_nat_obj(25u); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_arrow_parser_lean_parser_has__view___spec__1), 9, 3); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_arrow_parser_lean_parser_has__tokens___spec__1), 9, 3); lean::closure_set(x_3, 0, x_0); lean::closure_set(x_3, 1, x_1); lean::closure_set(x_3, 2, x_2); @@ -50342,27 +50363,6 @@ x_8 = l_lean_parser_term_parser(x_7, x_1, x_2, x_3, x_4, x_5); return x_8; } } -obj* _init_l_lean_parser_term_arrow_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_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; -x_0 = lean::mk_string("\xe2\x86\x92"); -x_1 = lean::mk_string("->"); -x_2 = lean::mk_nat_obj(25u); -x_3 = l_lean_parser_unicode__symbol_lean_parser_has__tokens___rarg(x_0, x_1, x_2); -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); -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_term_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_tokens___rarg(x_12); -return x_13; -} -} obj* _init_l_lean_parser_term_arrow_parser___closed__1() { _start: { @@ -50370,7 +50370,7 @@ 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("\xe2\x86\x92"); x_1 = lean::mk_string("->"); x_2 = lean::mk_nat_obj(25u); -x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_arrow_parser_lean_parser_has__view___spec__1), 9, 3); +x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol___at_lean_parser_term_arrow_parser_lean_parser_has__tokens___spec__1), 9, 3); lean::closure_set(x_3, 0, x_0); lean::closure_set(x_3, 1, x_1); lean::closure_set(x_3, 2, x_2); @@ -50397,7 +50397,7 @@ x_6 = l_lean_parser_term_arrow; x_7 = l_lean_parser_term_arrow_parser___closed__1; lean::inc(x_7); lean::inc(x_6); -x_10 = l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__3(x_6, x_7, x_0, x_1, x_2, x_3, x_4, x_5); +x_10 = l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__3(x_6, x_7, x_0, x_1, x_2, x_3, x_4, x_5); return x_10; } } @@ -51465,7 +51465,7 @@ lean::cnstr_set(x_30, 2, x_28); x_31 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_30); lean::inc(x_28); x_33 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_28, x_31); -x_34 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; +x_34 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; lean::inc(x_34); x_36 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_33, x_34); x_37 = l_lean_parser_parsec__t_try__mk__res___rarg(x_36); @@ -51501,7 +51501,7 @@ x_46 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_46, 0, x_2); x_47 = lean::box(0); x_48 = l_string_join___closed__1; -x_49 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; +x_49 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; lean::inc(x_49); lean::inc(x_48); x_52 = l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(x_48, x_49, x_46, x_47, x_0, x_15, x_10); @@ -51553,7 +51553,7 @@ x_73 = x_72; x_74 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; lean::inc(x_74); x_76 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_74, x_73); -x_77 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__4___rarg___closed__1; +x_77 = l_lean_parser_ident_parser___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__4___rarg___closed__1; lean::inc(x_77); x_79 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_76, x_77); x_80 = l_lean_parser_parsec__t_try__mk__res___rarg(x_79); @@ -51628,7 +51628,7 @@ x_25 = lean::alloc_cnstr(1, 1, 0); lean::cnstr_set(x_25, 0, x_2); x_26 = lean::box(0); x_27 = l_string_join___closed__1; -x_28 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1; +x_28 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1; lean::inc(x_28); lean::inc(x_27); 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_25, x_26, x_0, x_15, x_10); @@ -51675,7 +51675,7 @@ x_53 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_52); 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_53); -x_57 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1; +x_57 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1; lean::inc(x_57); x_59 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_56, x_57); x_60 = l_lean_parser_parsec__t_try__mk__res___rarg(x_59); @@ -51715,7 +51715,7 @@ x_69 = x_68; 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_69); -x_73 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__1___rarg___closed__1; +x_73 = l_lean_parser_number_parser___at_lean_parser_command_notation__spec_precedence__lit_parser_lean_parser_has__tokens___spec__1___rarg___closed__1; lean::inc(x_73); x_75 = l_lean_parser_parsec__t_labels__mk__res___rarg(x_72, x_73); x_76 = l_lean_parser_parsec__t_try__mk__res___rarg(x_75); @@ -52009,17 +52009,17 @@ x_1 = l_string_quote(x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_2, 0, x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_with__trailing___rarg___lambda__1), 2, 0); -x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__1___rarg), 4, 1); +x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__1___rarg), 4, 1); lean::closure_set(x_4, 0, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__2___rarg), 5, 1); +x_5 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__2___rarg), 5, 1); lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__3___rarg), 6, 1); +x_6 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__3___rarg), 6, 1); lean::closure_set(x_6, 0, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__2___rarg), 7, 1); +x_7 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__2___rarg), 7, 1); lean::closure_set(x_7, 0, x_6); x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_projection_parser_lean_parser_has__view___lambda__1), 8, 1); lean::closure_set(x_8, 0, x_2); -x_9 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__1___rarg), 8, 2); +x_9 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__1___rarg), 8, 2); lean::closure_set(x_9, 0, x_7); lean::closure_set(x_9, 1, x_8); x_10 = lean::box(0); @@ -52042,7 +52042,7 @@ 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__view___spec__3), 8, 2); +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); @@ -52058,7 +52058,7 @@ 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__view___spec__3), 8, 2); +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; @@ -52178,17 +52178,17 @@ x_1 = l_string_quote(x_0); x_2 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_2, 0, x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_with__trailing___rarg___lambda__1), 2, 0); -x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__1___rarg), 4, 1); +x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__1___rarg), 4, 1); lean::closure_set(x_4, 0, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__2___rarg), 5, 1); +x_5 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__2___rarg), 5, 1); lean::closure_set(x_5, 0, x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__view___spec__3___rarg), 6, 1); +x_6 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_command_notation__spec_symbol__quote_parser_lean_parser_has__tokens___spec__3___rarg), 6, 1); lean::closure_set(x_6, 0, x_5); -x_7 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__2___rarg), 7, 1); +x_7 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__2___rarg), 7, 1); lean::closure_set(x_7, 0, x_6); x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_term_projection_parser_lean_parser_has__view___lambda__1), 8, 1); lean::closure_set(x_8, 0, x_2); -x_9 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__1___rarg), 8, 2); +x_9 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__1___rarg), 8, 2); lean::closure_set(x_9, 0, x_7); lean::closure_set(x_9, 1, x_8); x_10 = lean::box(0); @@ -52211,7 +52211,7 @@ 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__view___spec__3), 8, 2); +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); @@ -52235,7 +52235,7 @@ x_6 = l_lean_parser_term_projection; x_7 = l_lean_parser_term_projection_parser___closed__1; lean::inc(x_7); lean::inc(x_6); -x_10 = l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__view___spec__3(x_6, x_7, x_0, x_1, x_2, x_3, x_4, x_5); +x_10 = l_lean_parser_combinators_node___at_lean_parser_term_sort__app_parser_lean_parser_has__tokens___spec__3(x_6, x_7, x_0, x_1, x_2, x_3, x_4, x_5); x_11 = lean::cnstr_get(x_10, 0); lean::inc(x_11); x_13 = lean::cnstr_get(x_10, 1); @@ -54248,7 +54248,7 @@ 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_notation__spec_precedence__lit_parser_lean_parser_has__view___spec__4___rarg(x_8, x_9, x_7, x_7, x_1, x_2, x_3, x_4, x_5); +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_8, x_9, x_7, x_7, x_1, x_2, x_3, x_4, x_5); return x_13; } else @@ -54261,7 +54261,7 @@ lean::inc(x_16); lean::dec(x_0); x_19 = 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_19, 0, x_16); -x_20 = l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__view___spec__2___rarg(x_14, x_19, x_1, x_2, x_3, x_4, x_5); +x_20 = l_reader__t_orelse___at_lean_parser_command_notation__spec_fold__action_parser_lean_parser_has__tokens___spec__2___rarg(x_14, x_19, x_1, x_2, x_3, x_4, x_5); return x_20; } } @@ -56129,8 +56129,8 @@ void initialize_init_lean_parser_term() { l_lean_parser_ident__univ__spec_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_ident__univ__spec_has__view_x_27___lambda__1___closed__1(); l_lean_parser_ident__univ__spec_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_ident__univ__spec_has__view_x_27___lambda__1___closed__2(); l_lean_parser_ident__univ__spec_has__view = _init_l_lean_parser_ident__univ__spec_has__view(); - l_lean_parser_ident__univ__spec_parser_lean_parser_has__view = _init_l_lean_parser_ident__univ__spec_parser_lean_parser_has__view(); l_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens = _init_l_lean_parser_ident__univ__spec_parser_lean_parser_has__tokens(); + l_lean_parser_ident__univ__spec_parser_lean_parser_has__view = _init_l_lean_parser_ident__univ__spec_parser_lean_parser_has__view(); l_lean_parser_ident__univ__spec_parser___closed__1 = _init_l_lean_parser_ident__univ__spec_parser___closed__1(); l_lean_parser_ident__univs = _init_l_lean_parser_ident__univs(); l_lean_parser_ident__univs_has__view_x_27 = _init_l_lean_parser_ident__univs_has__view_x_27(); @@ -56140,8 +56140,8 @@ void initialize_init_lean_parser_term() { l_lean_parser_ident__univs_has__view_x_27___lambda__1___closed__4 = _init_l_lean_parser_ident__univs_has__view_x_27___lambda__1___closed__4(); l_lean_parser_ident__univs_has__view_x_27___lambda__1___closed__5 = _init_l_lean_parser_ident__univs_has__view_x_27___lambda__1___closed__5(); l_lean_parser_ident__univs_has__view = _init_l_lean_parser_ident__univs_has__view(); - l_lean_parser_ident__univs_parser_lean_parser_has__view = _init_l_lean_parser_ident__univs_parser_lean_parser_has__view(); l_lean_parser_ident__univs_parser_lean_parser_has__tokens = _init_l_lean_parser_ident__univs_parser_lean_parser_has__tokens(); + l_lean_parser_ident__univs_parser_lean_parser_has__view = _init_l_lean_parser_ident__univs_parser_lean_parser_has__view(); l_lean_parser_ident__univs_parser___closed__1 = _init_l_lean_parser_ident__univs_parser___closed__1(); l_lean_parser_term_lean_parser_has__tokens = _init_l_lean_parser_term_lean_parser_has__tokens(); l_lean_parser_term_lean_parser_has__view = _init_l_lean_parser_term_lean_parser_has__view(); @@ -56170,14 +56170,14 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_paren_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_paren_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_paren_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_term_paren_has__view_x_27___lambda__1___closed__2(); l_lean_parser_term_paren_has__view = _init_l_lean_parser_term_paren_has__view(); - l_lean_parser_term_paren_parser_lean_parser_has__view = _init_l_lean_parser_term_paren_parser_lean_parser_has__view(); l_lean_parser_term_paren_parser_lean_parser_has__tokens = _init_l_lean_parser_term_paren_parser_lean_parser_has__tokens(); + l_lean_parser_term_paren_parser_lean_parser_has__view = _init_l_lean_parser_term_paren_parser_lean_parser_has__view(); l_lean_parser_term_paren_parser___closed__1 = _init_l_lean_parser_term_paren_parser___closed__1(); l_lean_parser_term_hole = _init_l_lean_parser_term_hole(); l_lean_parser_term_hole_has__view_x_27 = _init_l_lean_parser_term_hole_has__view_x_27(); l_lean_parser_term_hole_has__view = _init_l_lean_parser_term_hole_has__view(); - l_lean_parser_term_hole_parser_lean_parser_has__view = _init_l_lean_parser_term_hole_parser_lean_parser_has__view(); l_lean_parser_term_hole_parser_lean_parser_has__tokens = _init_l_lean_parser_term_hole_parser_lean_parser_has__tokens(); + l_lean_parser_term_hole_parser_lean_parser_has__view = _init_l_lean_parser_term_hole_parser_lean_parser_has__view(); l_lean_parser_term_hole_parser___closed__1 = _init_l_lean_parser_term_hole_parser___closed__1(); l_lean_parser_term_sort = _init_l_lean_parser_term_sort(); l_lean_parser_term_sort_has__view_x_27 = _init_l_lean_parser_term_sort_has__view_x_27(); @@ -56186,18 +56186,18 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__3 = _init_l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__3(); l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__4 = _init_l_lean_parser_term_sort_has__view_x_27___lambda__1___closed__4(); l_lean_parser_term_sort_has__view = _init_l_lean_parser_term_sort_has__view(); - l_lean_parser_term_sort_parser_lean_parser_has__view = _init_l_lean_parser_term_sort_parser_lean_parser_has__view(); l_lean_parser_term_sort_parser_lean_parser_has__tokens = _init_l_lean_parser_term_sort_parser_lean_parser_has__tokens(); + l_lean_parser_term_sort_parser_lean_parser_has__view = _init_l_lean_parser_term_sort_parser_lean_parser_has__view(); l_lean_parser_term_sort_parser___closed__1 = _init_l_lean_parser_term_sort_parser___closed__1(); l_lean_parser_term_type__spec = _init_l_lean_parser_term_type__spec(); l_lean_parser_term_type__spec_has__view_x_27 = _init_l_lean_parser_term_type__spec_has__view_x_27(); l_lean_parser_term_type__spec_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_type__spec_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_type__spec_has__view = _init_l_lean_parser_term_type__spec_has__view(); - l_lean_parser_term_type__spec_parser_lean_parser_has__view = _init_l_lean_parser_term_type__spec_parser_lean_parser_has__view(); l_lean_parser_term_type__spec_parser_lean_parser_has__tokens = _init_l_lean_parser_term_type__spec_parser_lean_parser_has__tokens(); + l_lean_parser_term_type__spec_parser_lean_parser_has__view = _init_l_lean_parser_term_type__spec_parser_lean_parser_has__view(); l_lean_parser_term_type__spec_parser___closed__1 = _init_l_lean_parser_term_type__spec_parser___closed__1(); - l_lean_parser_term_opt__type_parser_lean_parser_has__view = _init_l_lean_parser_term_opt__type_parser_lean_parser_has__view(); l_lean_parser_term_opt__type_parser_lean_parser_has__tokens = _init_l_lean_parser_term_opt__type_parser_lean_parser_has__tokens(); + l_lean_parser_term_opt__type_parser_lean_parser_has__view = _init_l_lean_parser_term_opt__type_parser_lean_parser_has__view(); l_lean_parser_term_opt__type_parser___closed__1 = _init_l_lean_parser_term_opt__type_parser___closed__1(); l_lean_parser_term_opt__type_view__default = _init_l_lean_parser_term_opt__type_view__default(); l_lean_parser_term_binder__ident = _init_l_lean_parser_term_binder__ident(); @@ -56207,8 +56207,8 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__3 = _init_l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__3(); l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__4 = _init_l_lean_parser_term_binder__ident_has__view_x_27___lambda__1___closed__4(); l_lean_parser_term_binder__ident_has__view = _init_l_lean_parser_term_binder__ident_has__view(); - l_lean_parser_term_binder__ident_parser_lean_parser_has__view = _init_l_lean_parser_term_binder__ident_parser_lean_parser_has__view(); l_lean_parser_term_binder__ident_parser_lean_parser_has__tokens = _init_l_lean_parser_term_binder__ident_parser_lean_parser_has__tokens(); + l_lean_parser_term_binder__ident_parser_lean_parser_has__view = _init_l_lean_parser_term_binder__ident_parser_lean_parser_has__view(); l_lean_parser_term_binder__ident_parser___closed__1 = _init_l_lean_parser_term_binder__ident_parser___closed__1(); l_lean_parser_term_binder__default__val = _init_l_lean_parser_term_binder__default__val(); l_lean_parser_term_binder__default__val_has__view_x_27 = _init_l_lean_parser_term_binder__default__val_has__view_x_27(); @@ -56223,8 +56223,8 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_binder__default_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_binder__default_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_binder__default_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_term_binder__default_has__view_x_27___lambda__1___closed__2(); l_lean_parser_term_binder__default_has__view = _init_l_lean_parser_term_binder__default_has__view(); - l_lean_parser_term_binder__default_parser_lean_parser_has__view = _init_l_lean_parser_term_binder__default_parser_lean_parser_has__view(); l_lean_parser_term_binder__default_parser_lean_parser_has__tokens = _init_l_lean_parser_term_binder__default_parser_lean_parser_has__tokens(); + l_lean_parser_term_binder__default_parser_lean_parser_has__view = _init_l_lean_parser_term_binder__default_parser_lean_parser_has__view(); l_lean_parser_term_binder__default_parser___closed__1 = _init_l_lean_parser_term_binder__default_parser___closed__1(); l_lean_parser_term_binder__content = _init_l_lean_parser_term_binder__content(); l_lean_parser_term_binder__content_has__view_x_27 = _init_l_lean_parser_term_binder__content_has__view_x_27(); @@ -56236,8 +56236,8 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_binder__content_has__view_x_27___lambda__2___closed__1 = _init_l_lean_parser_term_binder__content_has__view_x_27___lambda__2___closed__1(); l_lean_parser_term_binder__content_has__view_x_27___lambda__2___closed__2 = _init_l_lean_parser_term_binder__content_has__view_x_27___lambda__2___closed__2(); l_lean_parser_term_binder__content_has__view = _init_l_lean_parser_term_binder__content_has__view(); - l_lean_parser_term_binder__content_parser_lean_parser_has__view = _init_l_lean_parser_term_binder__content_parser_lean_parser_has__view(); l_lean_parser_term_binder__content_parser_lean_parser_has__tokens = _init_l_lean_parser_term_binder__content_parser_lean_parser_has__tokens(); + l_lean_parser_term_binder__content_parser_lean_parser_has__view = _init_l_lean_parser_term_binder__content_parser_lean_parser_has__view(); l_lean_parser_term_binder__content_parser___closed__1 = _init_l_lean_parser_term_binder__content_parser___closed__1(); l_lean_parser_term_simple__explicit__binder = _init_l_lean_parser_term_simple__explicit__binder(); l_lean_parser_term_simple__explicit__binder_has__view_x_27 = _init_l_lean_parser_term_simple__explicit__binder_has__view_x_27(); @@ -56260,15 +56260,15 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_simple__binder_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_simple__binder_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_simple__binder_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_term_simple__binder_has__view_x_27___lambda__1___closed__2(); l_lean_parser_term_simple__binder_has__view = _init_l_lean_parser_term_simple__binder_has__view(); - l_lean_parser_term_simple__binder_parser_lean_parser_has__view = _init_l_lean_parser_term_simple__binder_parser_lean_parser_has__view(); l_lean_parser_term_simple__binder_parser_lean_parser_has__tokens = _init_l_lean_parser_term_simple__binder_parser_lean_parser_has__tokens(); + l_lean_parser_term_simple__binder_parser_lean_parser_has__view = _init_l_lean_parser_term_simple__binder_parser_lean_parser_has__view(); l_lean_parser_term_simple__binder_parser___closed__1 = _init_l_lean_parser_term_simple__binder_parser___closed__1(); l_lean_parser_term_anonymous__constructor = _init_l_lean_parser_term_anonymous__constructor(); l_lean_parser_term_anonymous__constructor_has__view_x_27 = _init_l_lean_parser_term_anonymous__constructor_has__view_x_27(); l_lean_parser_term_anonymous__constructor_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_anonymous__constructor_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_anonymous__constructor_has__view = _init_l_lean_parser_term_anonymous__constructor_has__view(); - l_lean_parser_term_anonymous__constructor_parser_lean_parser_has__view = _init_l_lean_parser_term_anonymous__constructor_parser_lean_parser_has__view(); l_lean_parser_term_anonymous__constructor_parser_lean_parser_has__tokens = _init_l_lean_parser_term_anonymous__constructor_parser_lean_parser_has__tokens(); + l_lean_parser_term_anonymous__constructor_parser_lean_parser_has__view = _init_l_lean_parser_term_anonymous__constructor_parser_lean_parser_has__view(); l_lean_parser_term_anonymous__constructor_parser___closed__1 = _init_l_lean_parser_term_anonymous__constructor_parser___closed__1(); l_lean_parser_term_explicit__binder__content = _init_l_lean_parser_term_explicit__binder__content(); l_lean_parser_term_explicit__binder__content_has__view_x_27 = _init_l_lean_parser_term_explicit__binder__content_has__view_x_27(); @@ -56312,16 +56312,16 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_bracketed__binder_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_bracketed__binder_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_bracketed__binder_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_term_bracketed__binder_has__view_x_27___lambda__1___closed__2(); l_lean_parser_term_bracketed__binder_has__view = _init_l_lean_parser_term_bracketed__binder_has__view(); - l_lean_parser_term_bracketed__binder_parser_lean_parser_has__view = _init_l_lean_parser_term_bracketed__binder_parser_lean_parser_has__view(); l_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens = _init_l_lean_parser_term_bracketed__binder_parser_lean_parser_has__tokens(); + l_lean_parser_term_bracketed__binder_parser_lean_parser_has__view = _init_l_lean_parser_term_bracketed__binder_parser_lean_parser_has__view(); l_lean_parser_term_bracketed__binder_parser___closed__1 = _init_l_lean_parser_term_bracketed__binder_parser___closed__1(); l_lean_parser_term_binder = _init_l_lean_parser_term_binder(); l_lean_parser_term_binder_has__view_x_27 = _init_l_lean_parser_term_binder_has__view_x_27(); l_lean_parser_term_binder_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_binder_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_binder_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_term_binder_has__view_x_27___lambda__1___closed__2(); l_lean_parser_term_binder_has__view = _init_l_lean_parser_term_binder_has__view(); - l_lean_parser_term_binder_parser_lean_parser_has__view = _init_l_lean_parser_term_binder_parser_lean_parser_has__view(); l_lean_parser_term_binder_parser_lean_parser_has__tokens = _init_l_lean_parser_term_binder_parser_lean_parser_has__tokens(); + l_lean_parser_term_binder_parser_lean_parser_has__view = _init_l_lean_parser_term_binder_parser_lean_parser_has__view(); l_lean_parser_term_binder_parser___closed__1 = _init_l_lean_parser_term_binder_parser___closed__1(); l_lean_parser_term_binders__types = _init_l_lean_parser_term_binders__types(); l_lean_parser_term_binders__types_has__view_x_27 = _init_l_lean_parser_term_binders__types_has__view_x_27(); @@ -56348,16 +56348,16 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_binders__ext_has__view_x_27___lambda__1___closed__4 = _init_l_lean_parser_term_binders__ext_has__view_x_27___lambda__1___closed__4(); l_lean_parser_term_binders__ext_has__view_x_27___lambda__1___closed__5 = _init_l_lean_parser_term_binders__ext_has__view_x_27___lambda__1___closed__5(); l_lean_parser_term_binders__ext_has__view = _init_l_lean_parser_term_binders__ext_has__view(); - l_lean_parser_term_binders__ext_parser_lean_parser_has__view = _init_l_lean_parser_term_binders__ext_parser_lean_parser_has__view(); l_lean_parser_term_binders__ext_parser_lean_parser_has__tokens = _init_l_lean_parser_term_binders__ext_parser_lean_parser_has__tokens(); + l_lean_parser_term_binders__ext_parser_lean_parser_has__view = _init_l_lean_parser_term_binders__ext_parser_lean_parser_has__view(); l_lean_parser_term_binders__ext_parser___closed__1 = _init_l_lean_parser_term_binders__ext_parser___closed__1(); l_lean_parser_term_binders = _init_l_lean_parser_term_binders(); l_lean_parser_term_binders_has__view_x_27 = _init_l_lean_parser_term_binders_has__view_x_27(); l_lean_parser_term_binders_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_binders_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_binders_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_term_binders_has__view_x_27___lambda__1___closed__2(); l_lean_parser_term_binders_has__view = _init_l_lean_parser_term_binders_has__view(); - l_lean_parser_term_binders_parser_lean_parser_has__view = _init_l_lean_parser_term_binders_parser_lean_parser_has__view(); l_lean_parser_term_binders_parser_lean_parser_has__tokens = _init_l_lean_parser_term_binders_parser_lean_parser_has__tokens(); + l_lean_parser_term_binders_parser_lean_parser_has__view = _init_l_lean_parser_term_binders_parser_lean_parser_has__view(); l_lean_parser_term_binders_parser___closed__1 = _init_l_lean_parser_term_binders_parser___closed__1(); l_lean_parser_term_bracketed__binders = _init_l_lean_parser_term_bracketed__binders(); l_lean_parser_term_bracketed__binders_has__view_x_27 = _init_l_lean_parser_term_bracketed__binders_has__view_x_27(); @@ -56370,15 +56370,15 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__2___closed__1 = _init_l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__2___closed__1(); l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__2___closed__2 = _init_l_lean_parser_term_bracketed__binders_has__view_x_27___lambda__2___closed__2(); l_lean_parser_term_bracketed__binders_has__view = _init_l_lean_parser_term_bracketed__binders_has__view(); - l_lean_parser_term_bracketed__binders_parser_lean_parser_has__view = _init_l_lean_parser_term_bracketed__binders_parser_lean_parser_has__view(); l_lean_parser_term_bracketed__binders_parser_lean_parser_has__tokens = _init_l_lean_parser_term_bracketed__binders_parser_lean_parser_has__tokens(); + l_lean_parser_term_bracketed__binders_parser_lean_parser_has__view = _init_l_lean_parser_term_bracketed__binders_parser_lean_parser_has__view(); l_lean_parser_term_bracketed__binders_parser___closed__1 = _init_l_lean_parser_term_bracketed__binders_parser___closed__1(); l_lean_parser_term_lambda = _init_l_lean_parser_term_lambda(); l_lean_parser_term_lambda_has__view_x_27 = _init_l_lean_parser_term_lambda_has__view_x_27(); l_lean_parser_term_lambda_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_lambda_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_lambda_has__view = _init_l_lean_parser_term_lambda_has__view(); - l_lean_parser_term_lambda_parser_lean_parser_has__view = _init_l_lean_parser_term_lambda_parser_lean_parser_has__view(); l_lean_parser_term_lambda_parser_lean_parser_has__tokens = _init_l_lean_parser_term_lambda_parser_lean_parser_has__tokens(); + l_lean_parser_term_lambda_parser_lean_parser_has__view = _init_l_lean_parser_term_lambda_parser_lean_parser_has__view(); l_lean_parser_term_lambda_parser___closed__1 = _init_l_lean_parser_term_lambda_parser___closed__1(); l_lean_parser_term_assume__anonymous = _init_l_lean_parser_term_assume__anonymous(); l_lean_parser_term_assume__anonymous_has__view_x_27 = _init_l_lean_parser_term_assume__anonymous_has__view_x_27(); @@ -56393,15 +56393,15 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_assume_has__view_x_27 = _init_l_lean_parser_term_assume_has__view_x_27(); l_lean_parser_term_assume_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_assume_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_assume_has__view = _init_l_lean_parser_term_assume_has__view(); - l_lean_parser_term_assume_parser_lean_parser_has__view = _init_l_lean_parser_term_assume_parser_lean_parser_has__view(); l_lean_parser_term_assume_parser_lean_parser_has__tokens = _init_l_lean_parser_term_assume_parser_lean_parser_has__tokens(); + l_lean_parser_term_assume_parser_lean_parser_has__view = _init_l_lean_parser_term_assume_parser_lean_parser_has__view(); l_lean_parser_term_assume_parser___closed__1 = _init_l_lean_parser_term_assume_parser___closed__1(); l_lean_parser_term_pi = _init_l_lean_parser_term_pi(); l_lean_parser_term_pi_has__view_x_27 = _init_l_lean_parser_term_pi_has__view_x_27(); l_lean_parser_term_pi_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_pi_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_pi_has__view = _init_l_lean_parser_term_pi_has__view(); - l_lean_parser_term_pi_parser_lean_parser_has__view = _init_l_lean_parser_term_pi_parser_lean_parser_has__view(); l_lean_parser_term_pi_parser_lean_parser_has__tokens = _init_l_lean_parser_term_pi_parser_lean_parser_has__tokens(); + l_lean_parser_term_pi_parser_lean_parser_has__view = _init_l_lean_parser_term_pi_parser_lean_parser_has__view(); l_lean_parser_term_pi_parser___closed__1 = _init_l_lean_parser_term_pi_parser___closed__1(); l_lean_parser_term_explicit__modifier = _init_l_lean_parser_term_explicit__modifier(); l_lean_parser_term_explicit__modifier_has__view_x_27 = _init_l_lean_parser_term_explicit__modifier_has__view_x_27(); @@ -56416,15 +56416,15 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_explicit_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_term_explicit_has__view_x_27___lambda__1___closed__2(); l_lean_parser_term_explicit_has__view_x_27___lambda__1___closed__3 = _init_l_lean_parser_term_explicit_has__view_x_27___lambda__1___closed__3(); l_lean_parser_term_explicit_has__view = _init_l_lean_parser_term_explicit_has__view(); - l_lean_parser_term_explicit_parser_lean_parser_has__view = _init_l_lean_parser_term_explicit_parser_lean_parser_has__view(); l_lean_parser_term_explicit_parser_lean_parser_has__tokens = _init_l_lean_parser_term_explicit_parser_lean_parser_has__tokens(); + l_lean_parser_term_explicit_parser_lean_parser_has__view = _init_l_lean_parser_term_explicit_parser_lean_parser_has__view(); l_lean_parser_term_explicit_parser___closed__1 = _init_l_lean_parser_term_explicit_parser___closed__1(); l_lean_parser_term_from = _init_l_lean_parser_term_from(); l_lean_parser_term_from_has__view_x_27 = _init_l_lean_parser_term_from_has__view_x_27(); l_lean_parser_term_from_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_from_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_from_has__view = _init_l_lean_parser_term_from_has__view(); - l_lean_parser_term_from_parser_lean_parser_has__view = _init_l_lean_parser_term_from_parser_lean_parser_has__view(); l_lean_parser_term_from_parser_lean_parser_has__tokens = _init_l_lean_parser_term_from_parser_lean_parser_has__tokens(); + l_lean_parser_term_from_parser_lean_parser_has__view = _init_l_lean_parser_term_from_parser_lean_parser_has__view(); l_lean_parser_term_from_parser___closed__1 = _init_l_lean_parser_term_from_parser___closed__1(); l_lean_parser_term_let__lhs__id = _init_l_lean_parser_term_let__lhs__id(); l_lean_parser_term_let__lhs__id_has__view_x_27 = _init_l_lean_parser_term_let__lhs__id_has__view_x_27(); @@ -56440,16 +56440,16 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_let_has__view_x_27 = _init_l_lean_parser_term_let_has__view_x_27(); l_lean_parser_term_let_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_let_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_let_has__view = _init_l_lean_parser_term_let_has__view(); - l_lean_parser_term_let_parser_lean_parser_has__view = _init_l_lean_parser_term_let_parser_lean_parser_has__view(); l_lean_parser_term_let_parser_lean_parser_has__tokens = _init_l_lean_parser_term_let_parser_lean_parser_has__tokens(); + l_lean_parser_term_let_parser_lean_parser_has__view = _init_l_lean_parser_term_let_parser_lean_parser_has__view(); l_lean_parser_term_let_parser___closed__1 = _init_l_lean_parser_term_let_parser___closed__1(); l_lean_parser_term_opt__ident = _init_l_lean_parser_term_opt__ident(); l_lean_parser_term_opt__ident_has__view_x_27 = _init_l_lean_parser_term_opt__ident_has__view_x_27(); l_lean_parser_term_opt__ident_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_opt__ident_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_opt__ident_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_term_opt__ident_has__view_x_27___lambda__1___closed__2(); l_lean_parser_term_opt__ident_has__view = _init_l_lean_parser_term_opt__ident_has__view(); - l_lean_parser_term_opt__ident_parser_lean_parser_has__view = _init_l_lean_parser_term_opt__ident_parser_lean_parser_has__view(); l_lean_parser_term_opt__ident_parser_lean_parser_has__tokens = _init_l_lean_parser_term_opt__ident_parser_lean_parser_has__tokens(); + l_lean_parser_term_opt__ident_parser_lean_parser_has__view = _init_l_lean_parser_term_opt__ident_parser_lean_parser_has__view(); l_lean_parser_term_opt__ident_parser___closed__1 = _init_l_lean_parser_term_opt__ident_parser___closed__1(); l_lean_parser_term_have__term = _init_l_lean_parser_term_have__term(); l_lean_parser_term_have__term_has__view_x_27 = _init_l_lean_parser_term_have__term_has__view_x_27(); @@ -56471,15 +56471,15 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_have_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_have_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_have_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_term_have_has__view_x_27___lambda__1___closed__2(); l_lean_parser_term_have_has__view = _init_l_lean_parser_term_have_has__view(); - l_lean_parser_term_have_parser_lean_parser_has__view = _init_l_lean_parser_term_have_parser_lean_parser_has__view(); l_lean_parser_term_have_parser_lean_parser_has__tokens = _init_l_lean_parser_term_have_parser_lean_parser_has__tokens(); + l_lean_parser_term_have_parser_lean_parser_has__view = _init_l_lean_parser_term_have_parser_lean_parser_has__view(); l_lean_parser_term_have_parser___closed__1 = _init_l_lean_parser_term_have_parser___closed__1(); l_lean_parser_term_show = _init_l_lean_parser_term_show(); l_lean_parser_term_show_has__view_x_27 = _init_l_lean_parser_term_show_has__view_x_27(); l_lean_parser_term_show_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_show_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_show_has__view = _init_l_lean_parser_term_show_has__view(); - l_lean_parser_term_show_parser_lean_parser_has__view = _init_l_lean_parser_term_show_parser_lean_parser_has__view(); l_lean_parser_term_show_parser_lean_parser_has__tokens = _init_l_lean_parser_term_show_parser_lean_parser_has__tokens(); + l_lean_parser_term_show_parser_lean_parser_has__view = _init_l_lean_parser_term_show_parser_lean_parser_has__view(); l_lean_parser_term_show_parser___closed__1 = _init_l_lean_parser_term_show_parser___closed__1(); l_lean_parser_term_match__equation = _init_l_lean_parser_term_match__equation(); l_lean_parser_term_match__equation_has__view_x_27 = _init_l_lean_parser_term_match__equation_has__view_x_27(); @@ -56491,15 +56491,15 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_match_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_match_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_match_has__view_x_27___lambda__1___closed__2 = _init_l_lean_parser_term_match_has__view_x_27___lambda__1___closed__2(); l_lean_parser_term_match_has__view = _init_l_lean_parser_term_match_has__view(); - l_lean_parser_term_match_parser_lean_parser_has__view = _init_l_lean_parser_term_match_parser_lean_parser_has__view(); l_lean_parser_term_match_parser_lean_parser_has__tokens = _init_l_lean_parser_term_match_parser_lean_parser_has__tokens(); + l_lean_parser_term_match_parser_lean_parser_has__view = _init_l_lean_parser_term_match_parser_lean_parser_has__view(); l_lean_parser_term_match_parser___closed__1 = _init_l_lean_parser_term_match_parser___closed__1(); l_lean_parser_term_if = _init_l_lean_parser_term_if(); l_lean_parser_term_if_has__view_x_27 = _init_l_lean_parser_term_if_has__view_x_27(); l_lean_parser_term_if_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_if_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_if_has__view = _init_l_lean_parser_term_if_has__view(); - l_lean_parser_term_if_parser_lean_parser_has__view = _init_l_lean_parser_term_if_parser_lean_parser_has__view(); l_lean_parser_term_if_parser_lean_parser_has__tokens = _init_l_lean_parser_term_if_parser_lean_parser_has__tokens(); + l_lean_parser_term_if_parser_lean_parser_has__view = _init_l_lean_parser_term_if_parser_lean_parser_has__view(); l_lean_parser_term_if_parser___closed__1 = _init_l_lean_parser_term_if_parser___closed__1(); l_lean_parser_term_struct__inst__type = _init_l_lean_parser_term_struct__inst__type(); l_lean_parser_term_struct__inst__type_has__view_x_27 = _init_l_lean_parser_term_struct__inst__type_has__view_x_27(); @@ -56532,41 +56532,41 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__3 = _init_l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__3(); l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__4 = _init_l_lean_parser_term_struct__inst_has__view_x_27___lambda__1___closed__4(); l_lean_parser_term_struct__inst_has__view = _init_l_lean_parser_term_struct__inst_has__view(); - l_lean_parser_term_struct__inst_parser_lean_parser_has__view = _init_l_lean_parser_term_struct__inst_parser_lean_parser_has__view(); l_lean_parser_term_struct__inst_parser_lean_parser_has__tokens = _init_l_lean_parser_term_struct__inst_parser_lean_parser_has__tokens(); + l_lean_parser_term_struct__inst_parser_lean_parser_has__view = _init_l_lean_parser_term_struct__inst_parser_lean_parser_has__view(); l_lean_parser_term_struct__inst_parser___closed__1 = _init_l_lean_parser_term_struct__inst_parser___closed__1(); l_lean_parser_term_subtype = _init_l_lean_parser_term_subtype(); l_lean_parser_term_subtype_has__view_x_27 = _init_l_lean_parser_term_subtype_has__view_x_27(); l_lean_parser_term_subtype_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_subtype_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_subtype_has__view = _init_l_lean_parser_term_subtype_has__view(); - l_lean_parser_term_subtype_parser_lean_parser_has__view = _init_l_lean_parser_term_subtype_parser_lean_parser_has__view(); l_lean_parser_term_subtype_parser_lean_parser_has__tokens = _init_l_lean_parser_term_subtype_parser_lean_parser_has__tokens(); + l_lean_parser_term_subtype_parser_lean_parser_has__view = _init_l_lean_parser_term_subtype_parser_lean_parser_has__view(); l_lean_parser_term_subtype_parser___closed__1 = _init_l_lean_parser_term_subtype_parser___closed__1(); l_lean_parser_term_inaccessible = _init_l_lean_parser_term_inaccessible(); l_lean_parser_term_inaccessible_has__view_x_27 = _init_l_lean_parser_term_inaccessible_has__view_x_27(); l_lean_parser_term_inaccessible_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_inaccessible_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_inaccessible_has__view = _init_l_lean_parser_term_inaccessible_has__view(); - l_lean_parser_term_inaccessible_parser_lean_parser_has__view = _init_l_lean_parser_term_inaccessible_parser_lean_parser_has__view(); l_lean_parser_term_inaccessible_parser_lean_parser_has__tokens = _init_l_lean_parser_term_inaccessible_parser_lean_parser_has__tokens(); + l_lean_parser_term_inaccessible_parser_lean_parser_has__view = _init_l_lean_parser_term_inaccessible_parser_lean_parser_has__view(); l_lean_parser_term_inaccessible_parser___closed__1 = _init_l_lean_parser_term_inaccessible_parser___closed__1(); l_lean_parser_term_anonymous__inaccessible = _init_l_lean_parser_term_anonymous__inaccessible(); l_lean_parser_term_anonymous__inaccessible_has__view_x_27 = _init_l_lean_parser_term_anonymous__inaccessible_has__view_x_27(); l_lean_parser_term_anonymous__inaccessible_has__view = _init_l_lean_parser_term_anonymous__inaccessible_has__view(); - l_lean_parser_term_anonymous__inaccessible_parser_lean_parser_has__view = _init_l_lean_parser_term_anonymous__inaccessible_parser_lean_parser_has__view(); l_lean_parser_term_anonymous__inaccessible_parser_lean_parser_has__tokens = _init_l_lean_parser_term_anonymous__inaccessible_parser_lean_parser_has__tokens(); + l_lean_parser_term_anonymous__inaccessible_parser_lean_parser_has__view = _init_l_lean_parser_term_anonymous__inaccessible_parser_lean_parser_has__view(); l_lean_parser_term_anonymous__inaccessible_parser___closed__1 = _init_l_lean_parser_term_anonymous__inaccessible_parser___closed__1(); l_lean_parser_term_sorry = _init_l_lean_parser_term_sorry(); l_lean_parser_term_sorry_has__view_x_27 = _init_l_lean_parser_term_sorry_has__view_x_27(); l_lean_parser_term_sorry_has__view = _init_l_lean_parser_term_sorry_has__view(); - l_lean_parser_term_sorry_parser_lean_parser_has__view = _init_l_lean_parser_term_sorry_parser_lean_parser_has__view(); l_lean_parser_term_sorry_parser_lean_parser_has__tokens = _init_l_lean_parser_term_sorry_parser_lean_parser_has__tokens(); + l_lean_parser_term_sorry_parser_lean_parser_has__view = _init_l_lean_parser_term_sorry_parser_lean_parser_has__view(); l_lean_parser_term_sorry_parser___closed__1 = _init_l_lean_parser_term_sorry_parser___closed__1(); l_lean_parser_term_borrowed = _init_l_lean_parser_term_borrowed(); l_lean_parser_term_borrowed_has__view_x_27 = _init_l_lean_parser_term_borrowed_has__view_x_27(); l_lean_parser_term_borrowed_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_borrowed_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_borrowed_has__view = _init_l_lean_parser_term_borrowed_has__view(); - l_lean_parser_term_borrowed_parser_lean_parser_has__view = _init_l_lean_parser_term_borrowed_parser_lean_parser_has__view(); l_lean_parser_term_borrowed_parser_lean_parser_has__tokens = _init_l_lean_parser_term_borrowed_parser_lean_parser_has__tokens(); + l_lean_parser_term_borrowed_parser_lean_parser_has__view = _init_l_lean_parser_term_borrowed_parser_lean_parser_has__view(); l_lean_parser_term_borrowed_parser___closed__1 = _init_l_lean_parser_term_borrowed_parser___closed__1(); l_lean_parser_string__lit_parser___at_lean_parser_term_builtin__leading__parsers_lean_parser_has__tokens___spec__1___rarg___closed__1 = _init_l_lean_parser_string__lit_parser___at_lean_parser_term_builtin__leading__parsers_lean_parser_has__tokens___spec__1___rarg___closed__1(); l_lean_parser_term_builtin__leading__parsers_lean_parser_has__tokens = _init_l_lean_parser_term_builtin__leading__parsers_lean_parser_has__tokens(); @@ -56575,22 +56575,22 @@ void initialize_init_lean_parser_term() { l_lean_parser_term_sort__app_has__view_x_27 = _init_l_lean_parser_term_sort__app_has__view_x_27(); l_lean_parser_term_sort__app_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_sort__app_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_sort__app_has__view = _init_l_lean_parser_term_sort__app_has__view(); - l_lean_parser_term_sort__app_parser_lean_parser_has__view = _init_l_lean_parser_term_sort__app_parser_lean_parser_has__view(); l_lean_parser_term_sort__app_parser_lean_parser_has__tokens = _init_l_lean_parser_term_sort__app_parser_lean_parser_has__tokens(); + l_lean_parser_term_sort__app_parser_lean_parser_has__view = _init_l_lean_parser_term_sort__app_parser_lean_parser_has__view(); l_lean_parser_term_sort__app_parser___closed__1 = _init_l_lean_parser_term_sort__app_parser___closed__1(); l_lean_parser_term_app = _init_l_lean_parser_term_app(); l_lean_parser_term_app_has__view_x_27 = _init_l_lean_parser_term_app_has__view_x_27(); l_lean_parser_term_app_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_app_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_app_has__view = _init_l_lean_parser_term_app_has__view(); - l_lean_parser_term_app_parser_lean_parser_has__view = _init_l_lean_parser_term_app_parser_lean_parser_has__view(); l_lean_parser_term_app_parser_lean_parser_has__tokens = _init_l_lean_parser_term_app_parser_lean_parser_has__tokens(); + l_lean_parser_term_app_parser_lean_parser_has__view = _init_l_lean_parser_term_app_parser_lean_parser_has__view(); l_lean_parser_term_app_parser___closed__1 = _init_l_lean_parser_term_app_parser___closed__1(); l_lean_parser_term_arrow = _init_l_lean_parser_term_arrow(); l_lean_parser_term_arrow_has__view_x_27 = _init_l_lean_parser_term_arrow_has__view_x_27(); l_lean_parser_term_arrow_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_term_arrow_has__view_x_27___lambda__1___closed__1(); l_lean_parser_term_arrow_has__view = _init_l_lean_parser_term_arrow_has__view(); - l_lean_parser_term_arrow_parser_lean_parser_has__view = _init_l_lean_parser_term_arrow_parser_lean_parser_has__view(); l_lean_parser_term_arrow_parser_lean_parser_has__tokens = _init_l_lean_parser_term_arrow_parser_lean_parser_has__tokens(); + l_lean_parser_term_arrow_parser_lean_parser_has__view = _init_l_lean_parser_term_arrow_parser_lean_parser_has__view(); l_lean_parser_term_arrow_parser___closed__1 = _init_l_lean_parser_term_arrow_parser___closed__1(); l_lean_parser_term_projection__spec = _init_l_lean_parser_term_projection__spec(); l_lean_parser_term_projection__spec_has__view_x_27 = _init_l_lean_parser_term_projection__spec_has__view_x_27(); diff --git a/src/boot/init/lean/parser/token.cpp b/src/boot/init/lean/parser/token.cpp index 8e74e6179b..dfcb6eb0b3 100644 --- a/src/boot/init/lean/parser/token.cpp +++ b/src/boot/init/lean/parser/token.cpp @@ -14,12 +14,11 @@ typedef lean::uint32 uint32; typedef lean::uint64 uint64; #pragma GCC diagnostic ignored "-Wunused-label" #pragma GCC diagnostic ignored "-Wunused-but-set-variable" #endif -obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__14(obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__11(obj*, obj*, obj*, obj*); obj* l_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___lambda__2(uint32, obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at___private_init_lean_parser_token_4__ident_x_27___spec__16(obj*, obj*, obj*); -obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__16(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_detail__ident__part_parser_lean_parser_has__tokens; +obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__28(obj*, obj*, obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__22(obj*, obj*, obj*); obj* l_list_mfoldr___main___at_lean_parser_number_x_27___spec__13(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser___spec__10(obj*); @@ -38,6 +37,7 @@ obj* l_lean_parser_monad__parsec_take__while1___at_lean_parser_parse__oct__lit__ obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__19___rarg(obj*, obj*); obj* l_lean_parser_id__part___at___private_init_lean_parser_token_4__ident_x_27___spec__1(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_foldl__aux___main___at___private_init_lean_parser_token_4__ident_x_27___spec__21___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*); +obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__9(obj*, obj*, obj*); obj* l_lean_parser_trie_match__prefix___rarg(obj*, obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_parse__oct__lit___spec__7___boxed(obj*, obj*, obj*, obj*); obj* l_lean_parser_detail__ident__suffix_has__view; @@ -56,6 +56,7 @@ obj* l_lean_parser_number_has__view_x_27___lambda__2___closed__1; obj* l_lean_parser_monad__parsec_error___at_lean_parser_number_x_27___spec__12___rarg(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_raw___rarg___lambda__3(uint8, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_finish__comment__block___closed__1; +obj* l_reader__t_bind___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3(obj*, obj*); obj* l_lean_parser_monad__parsec_error___at_lean_parser_string__lit_view_value___spec__3(obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__2(uint32, obj*, obj*, obj*); obj* l_lean_parser_number; @@ -66,7 +67,6 @@ obj* l_lean_parser_raw__str_view__default___rarg___boxed(obj*, obj*, obj*, obj*, extern obj* l_lean_parser_combinators_many___rarg___closed__1; obj* l_lean_parser_symbol__or__ident___rarg(obj*, obj*); obj* l_lean_parser_raw__str_view__default(obj*); -obj* l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__7(uint32, obj*, obj*, obj*, obj*); obj* l_lean_parser_as__substring___rarg___lambda__2(obj*, obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_parse__oct__lit___spec__5___boxed(obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_token_1__finish__comment__block__aux___main(obj*, obj*, obj*, obj*, obj*); @@ -74,6 +74,7 @@ obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__par obj* l_lean_parser_monad__parsec_take__while1___at_lean_parser_detail__ident__part_parser___spec__1(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_many1__aux_x_27___main___at_lean_parser_parse__bin__lit___spec__2(uint32, uint32, obj*, obj*, obj*, obj*); obj* l_lean_parser_raw___rarg___boxed(obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__10___boxed(obj*, obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__12(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__19(obj*); obj* l_lean_parser_ident_parser_view___rarg___lambda__1___closed__2; @@ -95,11 +96,11 @@ obj* l_lean_parser_symbol__core___rarg(obj*, obj*, obj*, obj*); obj* l_reader__t_lift___at_lean_parser_with__trailing___spec__1___rarg(obj*, obj*, obj*, obj*); extern obj* l_mjoin___rarg___closed__1; obj* l_lean_parser_string__lit_parser_tokens(obj*, obj*); -obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(obj*); obj* l_lean_parser_string__lit_parser___rarg___closed__1; obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at___private_init_lean_parser_token_4__ident_x_27___spec__9(obj*, obj*, obj*); extern obj* l_lean_id__end__escape; obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__18(obj*, obj*, obj*); +obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__9(obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser___spec__11(obj*, obj*, obj*); obj* l_lean_parser_number_view_to__nat(obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__4___boxed(obj*, obj*, obj*, obj*); @@ -126,6 +127,7 @@ obj* l_lean_parser_number_has__view_x_27___lambda__1(obj*); obj* l_lean_parser_raw___rarg___lambda__1(obj*, uint8, obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_error___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__1___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_rec__t_run__parsec___at_lean_parser_detail__ident_parser___spec__1___lambda__1(obj*, obj*, obj*, obj*); +obj* l_reader__t_lift___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__1(obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__3(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_digit___at_lean_parser_string__lit_view_value___spec__8(obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__2___boxed(obj*, obj*, obj*, obj*); @@ -134,7 +136,6 @@ obj* l_lean_parser_string__lit_parser___rarg___lambda__1(obj*, obj*, obj*, obj*) obj* l_lean_parser_parsec__t_try__mk__res___rarg(obj*); obj* l_lean_parser_raw__ident_parser_view___rarg(obj*); obj* l_lean_parser_string__lit_x_27___closed__1; -obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__9(obj*); obj* l_lean_parser_detail__ident__suffix_has__view_x_27; obj* l_lean_parser_monad__parsec_whitespace___at___private_init_lean_parser_token_2__whitespace__aux___main___spec__1(obj*, obj*, obj*); obj* l_list_reverse___rarg(obj*); @@ -147,19 +148,21 @@ obj* l_list_enum__from___main___rarg(obj*, obj*); obj* l_lean_parser_detail__ident__part_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_number_x_27___spec__4___boxed(obj*, obj*, obj*, obj*); obj* l_lean_parser_detail__ident_has__view_x_27; +obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__10(uint32, obj*, obj*, obj*, obj*); obj* l_lean_parser_raw__str___rarg(obj*, obj*, obj*, obj*, uint8); obj* l_lean_parser_number_parser_view___rarg___closed__1; obj* l_lean_parser_monad__parsec_ch___at_lean_parser_string__lit_view_value___spec__2(uint32, obj*); -obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__1(uint32, obj*, obj*, obj*, obj*); uint8 l_char_is__digit(uint32); obj* l_lean_parser_number_view_to__nat___main(obj*); obj* l_lean_parser_as__substring___rarg___lambda__3(obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8___rarg(obj*, obj*); obj* l_lean_parser_parsec__t_labels__mk__res___rarg(obj*, obj*); obj* l_lean_parser_id__part__default___at___private_init_lean_parser_token_4__ident_x_27___spec__3(obj*, obj*, obj*); obj* l___private_init_lean_parser_token_2__whitespace__aux___main(obj*, obj*, obj*, obj*); obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_number_x_27___spec__11(obj*, obj*, obj*, obj*, obj*, obj*); uint8 l_lean_parser_syntax_is__of__kind___main(obj*, obj*); extern obj* l___private_init_lean_parser_combinators_1__many1__aux___main___rarg___closed__1; +obj* l_lean_parser_combinators_node___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__5(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_ident_parser(obj*); obj* l_lean_parser_raw___rarg(obj*, obj*, obj*, obj*, obj*, uint8); obj* l_string_quote(obj*); @@ -174,10 +177,12 @@ obj* l_rbmap_find___main___at_lean_parser_indexed___spec__3___rarg(obj*, obj*); obj* l_lean_parser_raw__str_lean_parser_has__tokens(obj*, obj*, obj*, obj*, obj*, uint8); obj* l_lean_parser_ident_parser_view___rarg___closed__1; obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at___private_init_lean_parser_token_4__ident_x_27___spec__5(obj*, obj*, obj*); +obj* l_lean_parser_combinators_any__of___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__2(obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_longest__match___at_lean_parser_number_x_27___spec__10(obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__7(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_foldl__aux___main___at___private_init_lean_parser_token_4__ident_x_27___spec__21(uint32, obj*, obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__7(obj*, obj*, obj*); +obj* l_list_mfoldl___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__16(obj*, obj*, obj*, obj*, obj*, obj*); uint8 l_lean_is__id__end__escape(uint32); obj* l_lean_parser_parsec__t_run___at_lean_parser_parsec_parse___spec__1___rarg(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_unexpected__at___at_lean_parser_string__lit_x_27___spec__6___rarg(obj*, obj*, obj*, obj*, obj*); @@ -201,7 +206,6 @@ obj* l___private_init_lean_parser_parsec_6__take__while__aux_x_27___main___at___ obj* l_lean_parser_string__lit_parser_view(obj*); obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__25___rarg(obj*, obj*); obj* l_lean_parser_symbol__core(obj*); -obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15___rarg(obj*, obj*); uint8 l_string_is__empty(obj*); obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__10___rarg(obj*, obj*); obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__25(obj*); @@ -216,16 +220,16 @@ uint32 string_iterator_curr(obj*); } obj* l_lean_parser_parse__string__literal__aux___main___at_lean_parser_string__lit_x_27___spec__2(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__17___rarg(obj*, obj*); +obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__29(obj*, obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_token_2__whitespace__aux___main___closed__3; obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_parse__hex__lit___spec__2(uint32, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_number_x_27___spec__2(uint32, obj*, obj*, obj*); extern obj* l_lean_name_to__string___closed__1; -obj* l_list_mfoldl___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__9(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_number_has__view_x_27___lambda__1___closed__5; namespace lean { obj* string_append(obj*, obj*); } -obj* l_reader__t_bind___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__3(obj*, obj*); +obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__8(obj*); obj* l_lean_parser_symbol__or__ident_view___rarg(obj*, obj*); obj* l_function_comp___rarg(obj*, obj*, obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__14(obj*, obj*, obj*); @@ -252,7 +256,6 @@ obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__par obj* l___private_init_lean_parser_parsec_1__str__aux___main(obj*, obj*, obj*); obj* l_rbnode_find___main___at_lean_parser_token__map_insert___spec__2___rarg(obj*, obj*); obj* l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg(obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__10(uint32, obj*, obj*, obj*, obj*); obj* l_lean_parser_number_has__view_x_27___lambda__1___closed__4; obj* l_option_to__monad___main___at_lean_parser_indexed___spec__2(obj*); obj* l_lean_parser_number_has__view; @@ -263,6 +266,7 @@ obj* l_reader__t_lift___at_lean_parser_with__trailing___spec__1(obj*); obj* l_lean_parser_number_has__view_x_27___lambda__2___closed__2; obj* l___private_init_lean_parser_token_2__whitespace__aux___main___closed__2; obj* l_lean_parser_monad__parsec_foldl___at___private_init_lean_parser_token_4__ident_x_27___spec__20___boxed(obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__7___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_unicode__symbol(obj*); obj* l_lean_parser_peek__token(obj*, obj*, obj*); obj* l___private_init_lean_parser_token_3__update__trailing(obj*, obj*); @@ -272,7 +276,6 @@ uint8 l_lean_is__id__rest(uint32); obj* l_lean_parser_parse__hex__digit___at_lean_parser_string__lit_view_value___spec__7(obj*); obj* l___private_init_lean_parser_parsec_6__take__while__aux_x_27___main___at___private_init_lean_parser_token_2__whitespace__aux___main___spec__3___boxed(obj*, obj*, obj*); obj* l_lean_parser_string__lit_x_27___lambda__1(obj*, obj*, obj*, obj*); -obj* l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__3(obj*, obj*, obj*, obj*); obj* l_lean_parser_raw__ident_parser_view(obj*); obj* l_lean_parser_raw__str_lean_parser_has__view(obj*); @@ -289,6 +292,7 @@ obj* l_string_to__nat(obj*); obj* l_lean_parser_monad__parsec_take__while_x_27___at___private_init_lean_parser_token_2__whitespace__aux___main___spec__5(obj*); obj* l_lean_parser_symbol_view___rarg(obj*, obj*, obj*); obj* l_lean_parser_rec__t_run___at_lean_parser_detail__ident_parser___spec__2(obj*, obj*, obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__27___rarg(obj*, obj*); obj* l_lean_parser_symbol_view__default___rarg(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__17(uint32, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_number_x_27___spec__6(obj*, obj*, obj*, obj*); @@ -308,9 +312,7 @@ uint8 nat_dec_eq(obj*, obj*); obj* l_lean_parser_combinators_optional___at_lean_parser_detail__ident_x_27___spec__2(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_raw_view___rarg___lambda__1(obj*); obj* l_lean_parser_detail__ident_parser___closed__2; -obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__8(obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_number_x_27___spec__3(obj*, obj*, obj*); -obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__9___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_mk__raw__res(obj*, obj*); obj* l_lean_parser_detail__ident_has__view; obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_parse__oct__lit___spec__4___boxed(obj*, obj*, obj*, obj*, obj*); @@ -322,13 +324,14 @@ obj* l___private_init_lean_parser_token_2__whitespace__aux___main___closed__1; obj* l_lean_parser_token__cont(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_peek__token___spec__1(obj*, obj*, obj*); obj* l_lean_parser_string__lit_has__view_x_27___lambda__2(obj*); +obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(obj*); obj* l_lean_parser_detail__ident_parser(obj*, obj*, obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at___private_init_lean_parser_token_4__ident_x_27___spec__7(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser___spec__8___rarg(obj*, obj*); obj* l_lean_parser_monad__parsec_curr___at___private_init_lean_parser_token_4__ident_x_27___spec__2(obj*); obj* l_lean_parser_detail__ident_has__view_x_27___lambda__2(obj*); -obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__15(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__13(uint32, obj*, obj*, obj*); +obj* l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_combinators_node_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_detail__ident__part_has__view_x_27___lambda__1___closed__3; obj* l_lean_parser_unicode__symbol___rarg(obj*, obj*, obj*, obj*); @@ -339,13 +342,12 @@ obj* l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_pars obj* l_lean_parser_finish__comment__block___closed__2; obj* l_lean_parser_detail__ident__suffix_has__view_x_27___lambda__2(obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__13___boxed(obj*, obj*, obj*, obj*); -obj* l_lean_parser_monad__parsec_str__core___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); extern obj* l_string_join___closed__1; obj* l_lean_parser_raw__str___rarg___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_id___rarg(obj*); obj* l_lean_parser_detail__ident__part; -obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__16(obj*, obj*, obj*); obj* l_lean_parser_ident_parser_view___rarg___lambda__1___closed__1; +obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__8___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while1___at_lean_parser_number_x_27___spec__1(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__9___boxed(obj*, obj*, obj*, obj*); obj* l_rbmap_find___main___at_lean_parser_indexed___spec__5(obj*); @@ -379,7 +381,6 @@ obj* l_lean_parser_raw__ident_parser___rarg___closed__1; obj* l_lean_parser_ident_parser___rarg___lambda__1(obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_parse__oct__lit___spec__2(uint32, uint32, obj*, obj*, obj*); obj* l_list_map___main___at_lean_parser_number_x_27___spec__9___lambda__1(obj*, obj*, obj*, obj*); -obj* l_reader__t_lift___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__1(obj*); obj* l_lean_parser_combinators_longest__choice___at_lean_parser_number_x_27___spec__8(obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__24(obj*, obj*, obj*); extern obj* l_lean_parser_parsec__t_failure___rarg___closed__1; @@ -394,10 +395,10 @@ obj* l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_pars obj* l_lean_parser_with__trailing___rarg(obj*, obj*, obj*, obj*); extern obj* l_lean_id__begin__escape; obj* l_rbmap_find___main___at_lean_parser_indexed___spec__3(obj*); -obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); namespace lean { obj* string_iterator_offset(obj*); } +obj* l_list_foldl___main___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__3(obj*, obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_token_7__to__nat__core(obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_curr___at___private_init_lean_parser_token_4__ident_x_27___spec__2___rarg(obj*, obj*); obj* l_lean_parser_with__trailing___rarg___lambda__2(obj*, obj*, obj*, obj*); @@ -410,20 +411,20 @@ obj* l_lean_parser_detail__ident_has__view_x_27___lambda__2___closed__1; obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_parse__oct__lit___spec__5(uint32, obj*, obj*, obj*); obj* l_lean_parser_string__lit_parser_view___rarg___closed__1; obj* l_lean_parser_symbol_view__default(obj*); +obj* l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(obj*, obj*, obj*, obj*, obj*); extern obj* l_list_mfoldr___main___at_lean_parser_monad__parsec_longest__match___spec__2___rarg___closed__1; obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__17(obj*); obj* l_lean_parser_detail__ident__part_parser___lambda__1(obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_any___at_lean_parser_string__lit_view_value___spec__5(obj*); -obj* l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser___spec__6(uint32, obj*, obj*, obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at___private_init_lean_parser_token_4__ident_x_27___spec__18(obj*, obj*, obj*); obj* l_lean_parser_parsec__t_merge___rarg(obj*, obj*); -obj* l_lean_parser_combinators_any__of___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__2(obj*, obj*, obj*, obj*); obj* l_lean_parser_indexed___rarg___lambda__1___closed__1; obj* l_lean_parser_monad__parsec_observing___at_lean_parser_token___spec__2(obj*, obj*, obj*); obj* l_lean_parser_substring_to__string(obj*); obj* l_lean_parser_try__view___at_lean_parser_string__lit_parser___spec__1(obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_parse__oct__lit___spec__6(uint32, obj*, obj*, obj*, obj*); +obj* l_list_mfoldl___main___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__6(obj*, obj*, obj*, obj*, obj*, obj*, obj*); extern "C" uint8 lean_name_dec_eq(obj*, obj*); obj* l___private_init_lean_parser_token_1__finish__comment__block__aux___main___closed__2; obj* l_lean_parser_unicode__symbol_lean_parser_has__view(obj*); @@ -435,6 +436,7 @@ uint8 string_dec_eq(obj*, obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser___spec__5(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__17___boxed(obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__12___rarg(obj*, obj*); +obj* l_lean_parser_monad__parsec_str__core___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__2(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_detail__ident__suffix_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_ident_parser_view___rarg___closed__2; obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__10(obj*); @@ -446,14 +448,12 @@ obj* l_lean_parser_combinators_any__of_view___rarg(obj*, obj*, obj*, obj*, obj*) extern obj* l_lean_parser_combinators_choice__aux___main___rarg___closed__1; obj* l___private_init_lean_parser_token_2__whitespace__aux(obj*, obj*, obj*, obj*); obj* l_lean_parser_raw_view___rarg___lambda__3(obj*); -obj* l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__7___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_indexed___rarg(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_foldl__aux___main___at___private_init_lean_parser_token_4__ident_x_27___spec__21___lambda__2(uint32, uint32, obj*, obj*, obj*); obj* l_lean_parser_detail__ident__part__escaped_has__view_x_27___lambda__1(obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__11(obj*, obj*, obj*); obj* l_lean_parser_number_has__view_x_27___lambda__1___closed__1; obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser___spec__12(obj*); -obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__14___rarg(obj*, obj*); obj* l_lean_parser_symbol_tokens(obj*, obj*); obj* l_lean_parser_detail__ident__part__escaped_has__view_x_27; obj* l_lean_parser_number_has__view_x_27___lambda__1___closed__3; @@ -462,6 +462,7 @@ obj* l_lean_parser_as__substring___rarg(obj*, obj*, obj*, obj*); namespace lean { obj* string_iterator_remaining(obj*); } +obj* l_reader__t_bind___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg(obj*, obj*, obj*, obj*, obj*, obj*); namespace lean { obj* string_mk_iterator(obj*); } @@ -469,9 +470,7 @@ extern obj* l_lean_parser_basic__parser__m_alternative; obj* l_lean_parser_with__trailing___rarg___closed__1; obj* l_lean_parser_detail__ident__suffix_parser_lean_parser_has__view; obj* l_rbmap_find___main___at_lean_parser_indexed___spec__4___rarg(obj*, obj*); -obj* l_reader__t_bind___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__3___rarg(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_symbol__or__ident___rarg___lambda__1(obj*, obj*, obj*, obj*); -obj* l_reader__t_lift___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__1___rarg(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_token___spec__1(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while1___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__1(obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_any___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__2(obj*, obj*, obj*); @@ -497,7 +496,9 @@ obj* l_lean_parser_combinators_monad__lift_view___rarg(obj*, obj*, obj*); obj* l_lean_parser_combinators_seq__right_view___rarg(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_reader__t_monad___rarg(obj*); obj* l_lean_parser_detail__ident; +obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__1___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__2(obj*, obj*, obj*, obj*); +obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__1(uint32, obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_token_7__to__nat__core___main(obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at___private_init_lean_parser_token_4__ident_x_27___spec__6___boxed(obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser___spec__2___boxed(obj*, obj*, obj*, obj*); @@ -509,7 +510,6 @@ uint8 l_lean_is__id__first(uint32); obj* l_lean_parser_monad__parsec_foldl__aux___main___at___private_init_lean_parser_token_4__ident_x_27___spec__21___boxed(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_nat_repr(obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_parse__oct__lit___spec__4(uint32, uint32, obj*, obj*, obj*); -obj* l_list_mfoldl___main___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__6(obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_parse__string__literal___at_lean_parser_string__lit_x_27___spec__1(obj*, obj*, obj*); obj* l___private_init_lean_parser_token_1__finish__comment__block__aux___main___closed__4; namespace lean { @@ -518,10 +518,11 @@ obj* nat_mul(obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser___spec__4(obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_parse__hex__lit___spec__2___boxed(obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__23(obj*); -obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__10___boxed(obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__9___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_parsec_3__mk__string__result___rarg(obj*, obj*); obj* l_lean_parser_symbol__or__ident_tokens(obj*, obj*, obj*); obj* l_lean_parser_with__trailing(obj*); +obj* l_reader__t_lift___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__1___rarg(obj*, obj*, obj*, obj*, obj*); uint8 l_lean_is__id__begin__escape(uint32); obj* l_lean_parser_ident_parser_view(obj*); obj* l_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens; @@ -537,7 +538,7 @@ obj* nat_sub(obj*, obj*); } obj* l_lean_parser_string__lit_x_27(obj*, obj*, obj*); obj* l_lean_parser_detail__ident__part_parser___closed__1; -obj* l_lean_parser_rec__t_recurse___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__4(obj*, obj*, obj*, obj*, obj*); +obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__27(obj*); obj* l_lean_parser_number_x_27___lambda__3(obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_parse__oct__lit___spec__2___boxed(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_detail__ident__part_parser_lean_parser_has__view; @@ -556,12 +557,10 @@ extern obj* l_lean_parser_basic__parser__m_monad__except; obj* l_lean_parser_parsec__t_orelse__mk__res___rarg(obj*, obj*); obj* l_lean_parser_symbol_view(obj*); obj* l_lean_parser_unicode__symbol_lean_parser_has__view___rarg(obj*, obj*, obj*, obj*); -obj* l_list_foldl___main___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__3(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_detail__ident__part__escaped_has__view_x_27___lambda__1___closed__1; obj* l_rbmap_find___main___at_lean_parser_indexed___spec__5___rarg(obj*, obj*); obj* l_lean_parser_detail__ident__suffix_parser___closed__1; obj* l_lean_parser_monad__parsec_ch___at_lean_parser_string__lit_view_value___spec__2___boxed(obj*, obj*); -obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__8___rarg(obj*, obj*, obj*, obj*, obj*, obj*, obj*, obj*); obj* l___private_init_lean_parser_token_3__update__trailing__lst(obj*, obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser___spec__13(obj*, obj*, obj*); obj* l_lean_parser_number_has__view_x_27___lambda__1___closed__6; @@ -575,9 +574,9 @@ obj* l_lean_parser_number_parser_view___rarg(obj*); obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__3(obj*, obj*, obj*); obj* l_lean_parser_number_parser___rarg(obj*); obj* l_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___lambda__2___boxed(obj*, obj*, obj*, obj*, obj*); -obj* l_lean_parser_combinators_node___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__5(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_raw__str_lean_parser_has__tokens___boxed(obj*, obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_substring_of__string(obj*); +obj* l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__7(uint32, obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser___spec__6___boxed(obj*, obj*, obj*, obj*); obj* l_lean_parser_string__lit_view_value(obj*); obj* l_lean_parser_parse__quoted__char___at_lean_parser_string__lit_x_27___spec__3(obj*, obj*, obj*); @@ -587,6 +586,7 @@ obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_pa obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_number_x_27___spec__2___boxed(obj*, obj*, obj*, obj*); obj* l_lean_parser_detail__ident__suffix_parser(obj*, obj*, obj*, obj*); obj* l_reader__t_lift___at_lean_parser_detail__ident_x_27___spec__1(obj*); +obj* l_lean_parser_rec__t_recurse___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__4(obj*, obj*, obj*, obj*, obj*); obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__9(uint32, obj*, obj*, obj*); obj* l_lean_parser_number_x_27___lambda__4(obj*, obj*, obj*, obj*); obj* l_lean_parser_string__lit_parser_view___rarg(obj*); @@ -3432,6 +3432,28 @@ x_7 = l_lean_parser_raw_view___rarg(x_0, x_1, x_2, x_3, x_4, x_6); return x_7; } } +obj* l_lean_parser_raw__str_lean_parser_has__tokens(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, uint8 x_5) { +_start: +{ +obj* x_11; +lean::dec(x_4); +lean::dec(x_3); +lean::dec(x_2); +lean::dec(x_1); +lean::dec(x_0); +x_11 = lean::box(0); +return x_11; +} +} +obj* l_lean_parser_raw__str_lean_parser_has__tokens___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +_start: +{ +uint8 x_6; obj* x_7; +x_6 = lean::unbox(x_5); +x_7 = l_lean_parser_raw__str_lean_parser_has__tokens(x_0, x_1, x_2, x_3, x_4, x_6); +return x_7; +} +} obj* l_lean_parser_raw__str_lean_parser_has__view___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, uint8 x_4) { _start: { @@ -3465,28 +3487,6 @@ x_6 = l_lean_parser_raw__str_lean_parser_has__view___rarg(x_0, x_1, x_2, x_3, x_ return x_6; } } -obj* l_lean_parser_raw__str_lean_parser_has__tokens(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, uint8 x_5) { -_start: -{ -obj* x_11; -lean::dec(x_4); -lean::dec(x_3); -lean::dec(x_2); -lean::dec(x_1); -lean::dec(x_0); -x_11 = lean::box(0); -return x_11; -} -} -obj* l_lean_parser_raw__str_lean_parser_has__tokens___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -uint8 x_6; obj* x_7; -x_6 = lean::unbox(x_5); -x_7 = l_lean_parser_raw__str_lean_parser_has__tokens(x_0, x_1, x_2, x_3, x_4, x_6); -return x_7; -} -} obj* l_lean_parser_raw__str___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, uint8 x_4) { _start: { @@ -4606,1780 +4606,6 @@ lean::inc(x_0); return x_0; } } -obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__3(obj* x_0, obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; uint8 x_4; -x_3 = lean::mk_nat_obj(0u); -x_4 = lean::nat_dec_eq(x_0, x_3); -lean::dec(x_3); -if (x_4 == 0) -{ -uint8 x_6; -x_6 = lean::string_iterator_has_next(x_2); -if (x_6 == 0) -{ -obj* x_8; -lean::dec(x_0); -x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = lean::string_iterator_curr(x_2); -x_10 = l_lean_is__id__end__escape(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_15; obj* x_16; -x_11 = lean::mk_nat_obj(1u); -x_12 = lean::nat_sub(x_0, x_11); -lean::dec(x_11); -lean::dec(x_0); -x_15 = lean::string_push(x_1, x_9); -x_16 = lean::string_iterator_next(x_2); -x_0 = x_12; -x_1 = x_15; -x_2 = x_16; -goto _start; -} -else -{ -obj* x_19; -lean::dec(x_0); -x_19 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_19; -} -} -} -else -{ -obj* x_21; -lean::dec(x_0); -x_21 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_21; -} -} -} -obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__2(uint32 x_0, obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -lean::dec(x_1); -x_5 = l_string_join___closed__1; -lean::inc(x_5); -x_7 = lean::string_push(x_5, x_0); -x_8 = lean::string_iterator_remaining(x_2); -x_9 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__3(x_8, x_7, x_2); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_3); -return x_10; -} -} -obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__5(obj* x_0, obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; uint8 x_4; -x_3 = lean::mk_nat_obj(0u); -x_4 = lean::nat_dec_eq(x_0, x_3); -lean::dec(x_3); -if (x_4 == 0) -{ -uint8 x_6; -x_6 = lean::string_iterator_has_next(x_2); -if (x_6 == 0) -{ -obj* x_8; -lean::dec(x_0); -x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = lean::string_iterator_curr(x_2); -x_10 = l_lean_is__id__end__escape(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_15; obj* x_16; -x_11 = lean::mk_nat_obj(1u); -x_12 = lean::nat_sub(x_0, x_11); -lean::dec(x_11); -lean::dec(x_0); -x_15 = lean::string_push(x_1, x_9); -x_16 = lean::string_iterator_next(x_2); -x_0 = x_12; -x_1 = x_15; -x_2 = x_16; -goto _start; -} -else -{ -obj* x_19; -lean::dec(x_0); -x_19 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_19; -} -} -} -else -{ -obj* x_21; -lean::dec(x_0); -x_21 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_21; -} -} -} -obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; -lean::dec(x_1); -x_5 = lean::string_iterator_curr(x_0); -lean::dec(x_0); -x_7 = l_string_join___closed__1; -lean::inc(x_7); -x_9 = lean::string_push(x_7, x_5); -x_10 = lean::string_iterator_remaining(x_2); -x_11 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__5(x_10, x_9, x_2); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_3); -return x_12; -} -} -obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__7(obj* x_0, obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; uint8 x_4; -x_3 = lean::mk_nat_obj(0u); -x_4 = lean::nat_dec_eq(x_0, x_3); -lean::dec(x_3); -if (x_4 == 0) -{ -uint8 x_6; -x_6 = lean::string_iterator_has_next(x_2); -if (x_6 == 0) -{ -obj* x_8; -lean::dec(x_0); -x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = lean::string_iterator_curr(x_2); -x_10 = l_lean_is__id__end__escape(x_9); -if (x_10 == 0) -{ -obj* x_11; obj* x_12; obj* x_15; obj* x_16; -x_11 = lean::mk_nat_obj(1u); -x_12 = lean::nat_sub(x_0, x_11); -lean::dec(x_11); -lean::dec(x_0); -x_15 = lean::string_push(x_1, x_9); -x_16 = lean::string_iterator_next(x_2); -x_0 = x_12; -x_1 = x_15; -x_2 = x_16; -goto _start; -} -else -{ -obj* x_19; -lean::dec(x_0); -x_19 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_19; -} -} -} -else -{ -obj* x_21; -lean::dec(x_0); -x_21 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_21; -} -} -} -obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__6(uint32 x_0, obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; -lean::dec(x_1); -x_5 = l_string_join___closed__1; -lean::inc(x_5); -x_7 = lean::string_push(x_5, x_0); -x_8 = lean::string_iterator_remaining(x_2); -x_9 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__7(x_8, x_7, x_2); -x_10 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_10, 0, x_9); -lean::cnstr_set(x_10, 1, x_3); -return x_10; -} -} -obj* l_lean_parser_monad__parsec_take__while1___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2) { -_start: -{ -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; -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); -} else { - lean::cnstr_release(x_11, 0); - lean::cnstr_release(x_11, 1); - x_16 = x_11; -} -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) -{ -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); -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); -} else { - x_36 = x_16; -} -lean::cnstr_set(x_36, 0, x_35); -lean::cnstr_set(x_36, 1, x_32); -return x_36; -} -else -{ -obj* x_38; uint8 x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; -lean::dec(x_0); -x_38 = lean::cnstr_get(x_19, 0); -lean::inc(x_38); -x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); -if (lean::is_shared(x_19)) { - lean::dec(x_19); - x_41 = lean::box(0); -} else { - lean::cnstr_release(x_19, 0); - x_41 = x_19; -} -if (lean::is_scalar(x_41)) { - x_42 = lean::alloc_cnstr(1, 1, 1); -} else { - x_42 = x_41; -} -lean::cnstr_set(x_42, 0, x_38); -lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); -x_43 = x_42; -if (lean::is_scalar(x_16)) { - x_44 = lean::alloc_cnstr(0, 2, 0); -} else { - x_44 = x_16; -} -lean::cnstr_set(x_44, 0, x_43); -lean::cnstr_set(x_44, 1, x_14); -return x_44; -} -} -else -{ -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) -{ -obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; -lean::inc(x_1); -x_48 = lean::string_iterator_next(x_1); -x_49 = l_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); -} else { - lean::cnstr_release(x_49, 0); - lean::cnstr_release(x_49, 1); - x_54 = x_49; -} -x_55 = lean::box(0); -x_56 = l_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); -} else { - x_57 = x_54; -} -lean::cnstr_set(x_57, 0, x_56); -lean::cnstr_set(x_57, 1, x_52); -return x_57; -} -else -{ -obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; -x_58 = l_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; -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); -lean::inc(x_70); -x_72 = lean::cnstr_get(x_69, 1); -lean::inc(x_72); -if (lean::is_shared(x_69)) { - lean::dec(x_69); - x_74 = lean::box(0); -} else { - lean::cnstr_release(x_69, 0); - lean::cnstr_release(x_69, 1); - x_74 = x_69; -} -x_75 = l_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) -{ -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); -lean::inc(x_78); -x_80 = lean::cnstr_get(x_77, 1); -lean::inc(x_80); -x_82 = lean::cnstr_get(x_77, 2); -lean::inc(x_82); -lean::dec(x_77); -x_85 = lean::unbox_uint32(x_78); -lean::dec(x_78); -x_87 = l_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::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); -} else { - x_94 = x_74; -} -lean::cnstr_set(x_94, 0, x_93); -lean::cnstr_set(x_94, 1, x_90); -return x_94; -} -else -{ -obj* x_96; uint8 x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; -lean::dec(x_0); -x_96 = lean::cnstr_get(x_77, 0); -lean::inc(x_96); -x_98 = lean::cnstr_get_scalar(x_77, sizeof(void*)*1); -if (lean::is_shared(x_77)) { - lean::dec(x_77); - x_99 = lean::box(0); -} else { - lean::cnstr_release(x_77, 0); - x_99 = x_77; -} -if (lean::is_scalar(x_99)) { - x_100 = lean::alloc_cnstr(1, 1, 1); -} else { - x_100 = x_99; -} -lean::cnstr_set(x_100, 0, x_96); -lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_98); -x_101 = x_100; -if (lean::is_scalar(x_74)) { - x_102 = lean::alloc_cnstr(0, 2, 0); -} else { - x_102 = x_74; -} -lean::cnstr_set(x_102, 0, x_101); -lean::cnstr_set(x_102, 1, x_72); -return x_102; -} -} -} -} -} -obj* l_list_mfoldl___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__9(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { -_start: -{ -if (lean::obj_tag(x_2) == 0) -{ -obj* x_9; obj* x_11; obj* x_12; -lean::dec(x_3); -lean::dec(x_0); -lean::dec(x_2); -x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_9); -x_11 = lean::alloc_cnstr(0, 3, 0); -lean::cnstr_set(x_11, 0, x_1); -lean::cnstr_set(x_11, 1, x_4); -lean::cnstr_set(x_11, 2, x_9); -x_12 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_12, 0, x_11); -lean::cnstr_set(x_12, 1, x_5); -return x_12; -} -else -{ -obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_22; obj* x_23; obj* x_25; -x_13 = lean::cnstr_get(x_2, 0); -lean::inc(x_13); -x_15 = lean::cnstr_get(x_2, 1); -lean::inc(x_15); -if (lean::is_shared(x_2)) { - lean::dec(x_2); - x_17 = lean::box(0); -} else { - lean::cnstr_release(x_2, 0); - lean::cnstr_release(x_2, 1); - x_17 = x_2; -} -lean::inc(x_3); -x_22 = lean::apply_3(x_13, x_3, x_4, x_5); -x_23 = lean::cnstr_get(x_22, 0); -lean::inc(x_23); -x_25 = lean::cnstr_get(x_22, 1); -lean::inc(x_25); -lean::dec(x_22); -if (lean::obj_tag(x_23) == 0) -{ -x_18 = x_23; -x_19 = x_25; -goto lbl_20; -} -else -{ -obj* x_28; uint8 x_30; obj* x_31; -x_28 = lean::cnstr_get(x_23, 0); -lean::inc(x_28); -x_30 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); -if (lean::is_shared(x_23)) { - lean::dec(x_23); - x_31 = lean::box(0); -} else { - lean::cnstr_release(x_23, 0); - x_31 = x_23; -} -if (lean::obj_tag(x_1) == 0) -{ -if (x_30 == 0) -{ -uint8 x_32; obj* x_33; obj* x_34; -x_32 = 0; -if (lean::is_scalar(x_31)) { - x_33 = lean::alloc_cnstr(1, 1, 1); -} else { - x_33 = x_31; -} -lean::cnstr_set(x_33, 0, x_28); -lean::cnstr_set_scalar(x_33, sizeof(void*)*1, x_32); -x_34 = x_33; -x_18 = x_34; -x_19 = x_25; -goto lbl_20; -} -else -{ -obj* x_35; obj* x_36; -if (lean::is_scalar(x_31)) { - x_35 = lean::alloc_cnstr(1, 1, 1); -} else { - x_35 = x_31; -} -lean::cnstr_set(x_35, 0, x_28); -lean::cnstr_set_scalar(x_35, sizeof(void*)*1, x_30); -x_36 = x_35; -x_18 = x_36; -x_19 = x_25; -goto lbl_20; -} -} -else -{ -obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_44; obj* x_46; obj* x_49; obj* x_51; obj* x_52; obj* x_53; -x_37 = lean::cnstr_get(x_28, 3); -lean::inc(x_37); -x_39 = l_option_get___main___at_lean_parser_run___spec__2(x_37); -lean::inc(x_1); -x_41 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_41, 0, x_39); -lean::cnstr_set(x_41, 1, x_1); -x_42 = lean::cnstr_get(x_28, 0); -lean::inc(x_42); -x_44 = lean::cnstr_get(x_28, 1); -lean::inc(x_44); -x_46 = lean::cnstr_get(x_28, 2); -lean::inc(x_46); -lean::dec(x_28); -x_49 = l_list_reverse___rarg(x_41); -lean::inc(x_0); -x_51 = l_lean_parser_syntax_mk__node(x_0, x_49); -x_52 = lean::alloc_cnstr(1, 1, 0); -lean::cnstr_set(x_52, 0, x_51); -x_53 = lean::alloc_cnstr(0, 4, 0); -lean::cnstr_set(x_53, 0, x_42); -lean::cnstr_set(x_53, 1, x_44); -lean::cnstr_set(x_53, 2, x_46); -lean::cnstr_set(x_53, 3, x_52); -if (x_30 == 0) -{ -uint8 x_54; obj* x_55; obj* x_56; -x_54 = 0; -if (lean::is_scalar(x_31)) { - x_55 = lean::alloc_cnstr(1, 1, 1); -} else { - x_55 = x_31; -} -lean::cnstr_set(x_55, 0, x_53); -lean::cnstr_set_scalar(x_55, sizeof(void*)*1, x_54); -x_56 = x_55; -x_18 = x_56; -x_19 = x_25; -goto lbl_20; -} -else -{ -obj* x_57; obj* x_58; -if (lean::is_scalar(x_31)) { - x_57 = lean::alloc_cnstr(1, 1, 1); -} else { - x_57 = x_31; -} -lean::cnstr_set(x_57, 0, x_53); -lean::cnstr_set_scalar(x_57, sizeof(void*)*1, x_30); -x_58 = x_57; -x_18 = x_58; -x_19 = x_25; -goto lbl_20; -} -} -} -lbl_20: -{ -if (lean::obj_tag(x_18) == 0) -{ -obj* x_59; obj* x_61; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_69; obj* x_70; -x_59 = lean::cnstr_get(x_18, 0); -lean::inc(x_59); -x_61 = lean::cnstr_get(x_18, 1); -lean::inc(x_61); -x_63 = lean::cnstr_get(x_18, 2); -lean::inc(x_63); -if (lean::is_shared(x_18)) { - lean::dec(x_18); - x_65 = lean::box(0); -} else { - lean::cnstr_release(x_18, 0); - lean::cnstr_release(x_18, 1); - lean::cnstr_release(x_18, 2); - x_65 = x_18; -} -if (lean::is_scalar(x_17)) { - x_66 = lean::alloc_cnstr(1, 2, 0); -} else { - x_66 = x_17; -} -lean::cnstr_set(x_66, 0, x_59); -lean::cnstr_set(x_66, 1, x_1); -x_67 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_67); -if (lean::is_scalar(x_65)) { - x_69 = lean::alloc_cnstr(0, 3, 0); -} else { - x_69 = x_65; -} -lean::cnstr_set(x_69, 0, x_66); -lean::cnstr_set(x_69, 1, x_61); -lean::cnstr_set(x_69, 2, x_67); -x_70 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_63, x_69); -if (lean::obj_tag(x_70) == 0) -{ -obj* x_71; obj* x_73; obj* x_75; obj* x_78; obj* x_79; obj* x_81; obj* x_83; obj* x_84; obj* x_85; -x_71 = lean::cnstr_get(x_70, 0); -lean::inc(x_71); -x_73 = lean::cnstr_get(x_70, 1); -lean::inc(x_73); -x_75 = lean::cnstr_get(x_70, 2); -lean::inc(x_75); -lean::dec(x_70); -x_78 = l_list_mfoldl___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__9(x_0, x_71, x_15, x_3, x_73, x_19); -x_79 = lean::cnstr_get(x_78, 0); -lean::inc(x_79); -x_81 = lean::cnstr_get(x_78, 1); -lean::inc(x_81); -if (lean::is_shared(x_78)) { - lean::dec(x_78); - x_83 = lean::box(0); -} else { - lean::cnstr_release(x_78, 0); - lean::cnstr_release(x_78, 1); - x_83 = x_78; -} -x_84 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_75, x_79); -if (lean::is_scalar(x_83)) { - x_85 = lean::alloc_cnstr(0, 2, 0); -} else { - x_85 = x_83; -} -lean::cnstr_set(x_85, 0, x_84); -lean::cnstr_set(x_85, 1, x_81); -return x_85; -} -else -{ -obj* x_89; uint8 x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; -lean::dec(x_15); -lean::dec(x_3); -lean::dec(x_0); -x_89 = lean::cnstr_get(x_70, 0); -lean::inc(x_89); -x_91 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); -if (lean::is_shared(x_70)) { - lean::dec(x_70); - x_92 = lean::box(0); -} else { - lean::cnstr_release(x_70, 0); - x_92 = x_70; -} -if (lean::is_scalar(x_92)) { - x_93 = lean::alloc_cnstr(1, 1, 1); -} else { - x_93 = x_92; -} -lean::cnstr_set(x_93, 0, x_89); -lean::cnstr_set_scalar(x_93, sizeof(void*)*1, x_91); -x_94 = x_93; -x_95 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_95, 0, x_94); -lean::cnstr_set(x_95, 1, x_19); -return x_95; -} -} -else -{ -obj* x_101; uint8 x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; -lean::dec(x_15); -lean::dec(x_1); -lean::dec(x_3); -lean::dec(x_0); -lean::dec(x_17); -x_101 = lean::cnstr_get(x_18, 0); -lean::inc(x_101); -x_103 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); -if (lean::is_shared(x_18)) { - lean::dec(x_18); - x_104 = lean::box(0); -} else { - lean::cnstr_release(x_18, 0); - x_104 = x_18; -} -if (lean::is_scalar(x_104)) { - x_105 = lean::alloc_cnstr(1, 1, 1); -} else { - x_105 = x_104; -} -lean::cnstr_set(x_105, 0, x_101); -lean::cnstr_set_scalar(x_105, sizeof(void*)*1, x_103); -x_106 = x_105; -x_107 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_107, 0, x_106); -lean::cnstr_set(x_107, 1, x_19); -return x_107; -} -} -} -} -} -obj* l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_12; -x_5 = lean::box(0); -lean::inc(x_0); -x_7 = l_list_mfoldl___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__9(x_0, x_5, x_1, x_2, x_3, x_4); -x_8 = lean::cnstr_get(x_7, 0); -lean::inc(x_8); -x_10 = lean::cnstr_get(x_7, 1); -lean::inc(x_10); -if (lean::is_shared(x_7)) { - lean::dec(x_7); - x_12 = lean::box(0); -} else { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - x_12 = x_7; -} -if (lean::obj_tag(x_8) == 0) -{ -obj* x_13; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; -x_13 = lean::cnstr_get(x_8, 0); -lean::inc(x_13); -x_15 = lean::cnstr_get(x_8, 1); -lean::inc(x_15); -x_17 = lean::cnstr_get(x_8, 2); -lean::inc(x_17); -if (lean::is_shared(x_8)) { - lean::dec(x_8); - x_19 = lean::box(0); -} else { - lean::cnstr_release(x_8, 0); - lean::cnstr_release(x_8, 1); - lean::cnstr_release(x_8, 2); - x_19 = x_8; -} -x_20 = l_list_reverse___rarg(x_13); -x_21 = l_lean_parser_syntax_mk__node(x_0, x_20); -x_22 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_22); -if (lean::is_scalar(x_19)) { - x_24 = lean::alloc_cnstr(0, 3, 0); -} else { - x_24 = x_19; -} -lean::cnstr_set(x_24, 0, x_21); -lean::cnstr_set(x_24, 1, x_15); -lean::cnstr_set(x_24, 2, x_22); -x_25 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_24); -if (lean::is_scalar(x_12)) { - x_26 = lean::alloc_cnstr(0, 2, 0); -} else { - x_26 = x_12; -} -lean::cnstr_set(x_26, 0, x_25); -lean::cnstr_set(x_26, 1, x_10); -return x_26; -} -else -{ -obj* x_28; uint8 x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; -lean::dec(x_0); -x_28 = lean::cnstr_get(x_8, 0); -lean::inc(x_28); -x_30 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); -if (lean::is_shared(x_8)) { - lean::dec(x_8); - x_31 = lean::box(0); -} else { - lean::cnstr_release(x_8, 0); - x_31 = x_8; -} -if (lean::is_scalar(x_31)) { - x_32 = lean::alloc_cnstr(1, 1, 1); -} else { - x_32 = x_31; -} -lean::cnstr_set(x_32, 0, x_28); -lean::cnstr_set_scalar(x_32, sizeof(void*)*1, x_30); -x_33 = x_32; -if (lean::is_scalar(x_12)) { - x_34 = lean::alloc_cnstr(0, 2, 0); -} else { - x_34 = x_12; -} -lean::cnstr_set(x_34, 0, x_33); -lean::cnstr_set(x_34, 1, x_10); -return x_34; -} -} -} -obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__11(obj* x_0, obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; uint8 x_4; -x_3 = lean::mk_nat_obj(0u); -x_4 = lean::nat_dec_eq(x_0, x_3); -lean::dec(x_3); -if (x_4 == 0) -{ -uint8 x_6; -x_6 = lean::string_iterator_has_next(x_2); -if (x_6 == 0) -{ -obj* x_8; -lean::dec(x_0); -x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = lean::string_iterator_curr(x_2); -x_10 = l_lean_is__id__rest(x_9); -if (x_10 == 0) -{ -obj* x_12; -lean::dec(x_0); -x_12 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_17; obj* x_18; -x_13 = lean::mk_nat_obj(1u); -x_14 = lean::nat_sub(x_0, x_13); -lean::dec(x_13); -lean::dec(x_0); -x_17 = lean::string_push(x_1, x_9); -x_18 = lean::string_iterator_next(x_2); -x_0 = x_14; -x_1 = x_17; -x_2 = x_18; -goto _start; -} -} -} -else -{ -obj* x_21; -lean::dec(x_0); -x_21 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_21; -} -} -} -obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__10___rarg(obj* x_0, obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_5; obj* x_6; -x_2 = lean::string_iterator_remaining(x_0); -x_3 = l_string_join___closed__1; -lean::inc(x_3); -x_5 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__11(x_2, x_3, x_0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -return x_6; -} -} -obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__10(obj* x_0) { -_start: -{ -obj* x_2; -lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__10___rarg), 2, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__13(obj* x_0, obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; uint8 x_4; -x_3 = lean::mk_nat_obj(0u); -x_4 = lean::nat_dec_eq(x_0, x_3); -lean::dec(x_3); -if (x_4 == 0) -{ -uint8 x_6; -x_6 = lean::string_iterator_has_next(x_2); -if (x_6 == 0) -{ -obj* x_8; -lean::dec(x_0); -x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = lean::string_iterator_curr(x_2); -x_10 = l_lean_is__id__rest(x_9); -if (x_10 == 0) -{ -obj* x_12; -lean::dec(x_0); -x_12 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_17; obj* x_18; -x_13 = lean::mk_nat_obj(1u); -x_14 = lean::nat_sub(x_0, x_13); -lean::dec(x_13); -lean::dec(x_0); -x_17 = lean::string_push(x_1, x_9); -x_18 = lean::string_iterator_next(x_2); -x_0 = x_14; -x_1 = x_17; -x_2 = x_18; -goto _start; -} -} -} -else -{ -obj* x_21; -lean::dec(x_0); -x_21 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_21; -} -} -} -obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__12___rarg(obj* x_0, obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_5; obj* x_6; -x_2 = lean::string_iterator_remaining(x_0); -x_3 = l_string_join___closed__1; -lean::inc(x_3); -x_5 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__13(x_2, x_3, x_0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -return x_6; -} -} -obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__12(obj* x_0) { -_start: -{ -obj* x_2; -lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__12___rarg), 2, 0); -return x_2; -} -} -obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__15(obj* x_0, obj* x_1, obj* x_2) { -_start: -{ -obj* x_3; uint8 x_4; -x_3 = lean::mk_nat_obj(0u); -x_4 = lean::nat_dec_eq(x_0, x_3); -lean::dec(x_3); -if (x_4 == 0) -{ -uint8 x_6; -x_6 = lean::string_iterator_has_next(x_2); -if (x_6 == 0) -{ -obj* x_8; -lean::dec(x_0); -x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = lean::string_iterator_curr(x_2); -x_10 = l_lean_is__id__rest(x_9); -if (x_10 == 0) -{ -obj* x_12; -lean::dec(x_0); -x_12 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_12; -} -else -{ -obj* x_13; obj* x_14; obj* x_17; obj* x_18; -x_13 = lean::mk_nat_obj(1u); -x_14 = lean::nat_sub(x_0, x_13); -lean::dec(x_13); -lean::dec(x_0); -x_17 = lean::string_push(x_1, x_9); -x_18 = lean::string_iterator_next(x_2); -x_0 = x_14; -x_1 = x_17; -x_2 = x_18; -goto _start; -} -} -} -else -{ -obj* x_21; -lean::dec(x_0); -x_21 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_21; -} -} -} -obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__14___rarg(obj* x_0, obj* x_1) { -_start: -{ -obj* x_2; obj* x_3; obj* x_5; obj* x_6; -x_2 = lean::string_iterator_remaining(x_0); -x_3 = l_string_join___closed__1; -lean::inc(x_3); -x_5 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__15(x_2, x_3, x_0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -return x_6; -} -} -obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__14(obj* x_0) { -_start: -{ -obj* x_2; -lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__14___rarg), 2, 0); -return x_2; -} -} -obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__16(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -if (lean::obj_tag(x_0) == 0) -{ -obj* x_7; obj* x_8; obj* x_9; obj* x_13; -lean::dec(x_1); -lean::dec(x_0); -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___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; -} -else -{ -obj* x_14; obj* x_16; obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_28; -x_14 = lean::cnstr_get(x_0, 0); -lean::inc(x_14); -x_16 = lean::cnstr_get(x_0, 1); -lean::inc(x_16); -if (lean::is_shared(x_0)) { - lean::dec(x_0); - x_18 = lean::box(0); -} else { - lean::cnstr_release(x_0, 0); - lean::cnstr_release(x_0, 1); - x_18 = x_0; -} -lean::inc(x_3); -lean::inc(x_2); -x_21 = lean::apply_3(x_14, x_2, x_3, x_4); -x_22 = lean::cnstr_get(x_21, 0); -lean::inc(x_22); -x_24 = lean::cnstr_get(x_21, 1); -lean::inc(x_24); -if (lean::is_shared(x_21)) { - lean::dec(x_21); - x_26 = lean::box(0); -} else { - lean::cnstr_release(x_21, 0); - lean::cnstr_release(x_21, 1); - x_26 = x_21; -} -x_27 = lean::mk_nat_obj(1u); -x_28 = lean::nat_add(x_1, x_27); -lean::dec(x_27); -if (lean::obj_tag(x_22) == 0) -{ -obj* x_30; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_44; obj* x_45; -x_30 = lean::cnstr_get(x_22, 0); -lean::inc(x_30); -x_32 = lean::cnstr_get(x_22, 1); -lean::inc(x_32); -x_34 = lean::cnstr_get(x_22, 2); -lean::inc(x_34); -if (lean::is_shared(x_22)) { - lean::dec(x_22); - x_36 = lean::box(0); -} else { - lean::cnstr_release(x_22, 0); - lean::cnstr_release(x_22, 1); - lean::cnstr_release(x_22, 2); - x_36 = x_22; -} -x_37 = lean::box(0); -lean::inc(x_37); -x_39 = lean_name_mk_numeral(x_37, x_1); -if (lean::is_scalar(x_18)) { - x_40 = lean::alloc_cnstr(1, 2, 0); -} else { - x_40 = x_18; -} -lean::cnstr_set(x_40, 0, x_30); -lean::cnstr_set(x_40, 1, x_37); -x_41 = l_lean_parser_syntax_mk__node(x_39, x_40); -x_42 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_42); -if (lean::is_scalar(x_36)) { - x_44 = lean::alloc_cnstr(0, 3, 0); -} else { - x_44 = x_36; -} -lean::cnstr_set(x_44, 0, x_41); -lean::cnstr_set(x_44, 1, x_32); -lean::cnstr_set(x_44, 2, x_42); -x_45 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_34, x_44); -if (lean::obj_tag(x_45) == 0) -{ -obj* x_50; -lean::dec(x_28); -lean::dec(x_3); -lean::dec(x_16); -lean::dec(x_2); -if (lean::is_scalar(x_26)) { - x_50 = lean::alloc_cnstr(0, 2, 0); -} else { - x_50 = x_26; -} -lean::cnstr_set(x_50, 0, x_45); -lean::cnstr_set(x_50, 1, x_24); -return x_50; -} -else -{ -obj* x_51; uint8 x_53; -x_51 = lean::cnstr_get(x_45, 0); -lean::inc(x_51); -x_53 = lean::cnstr_get_scalar(x_45, sizeof(void*)*1); -if (x_53 == 0) -{ -obj* x_55; obj* x_56; obj* x_58; obj* x_61; obj* x_62; -lean::dec(x_45); -x_55 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__16(x_16, x_28, x_2, x_3, x_24); -x_56 = lean::cnstr_get(x_55, 0); -lean::inc(x_56); -x_58 = lean::cnstr_get(x_55, 1); -lean::inc(x_58); -lean::dec(x_55); -x_61 = l_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_62 = x_26; -} -lean::cnstr_set(x_62, 0, x_61); -lean::cnstr_set(x_62, 1, x_58); -return x_62; -} -else -{ -obj* x_68; -lean::dec(x_28); -lean::dec(x_3); -lean::dec(x_16); -lean::dec(x_2); -lean::dec(x_51); -if (lean::is_scalar(x_26)) { - x_68 = lean::alloc_cnstr(0, 2, 0); -} else { - x_68 = x_26; -} -lean::cnstr_set(x_68, 0, x_45); -lean::cnstr_set(x_68, 1, x_24); -return x_68; -} -} -} -else -{ -obj* x_71; uint8 x_73; obj* x_74; -lean::dec(x_18); -lean::dec(x_1); -x_71 = lean::cnstr_get(x_22, 0); -lean::inc(x_71); -x_73 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); -if (lean::is_shared(x_22)) { - lean::dec(x_22); - x_74 = lean::box(0); -} else { - lean::cnstr_release(x_22, 0); - x_74 = x_22; -} -if (x_73 == 0) -{ -obj* x_76; obj* x_77; obj* x_79; obj* x_82; obj* x_83; -lean::dec(x_74); -x_76 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__16(x_16, x_28, x_2, x_3, x_24); -x_77 = lean::cnstr_get(x_76, 0); -lean::inc(x_77); -x_79 = lean::cnstr_get(x_76, 1); -lean::inc(x_79); -lean::dec(x_76); -x_82 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_71, x_77); -if (lean::is_scalar(x_26)) { - x_83 = lean::alloc_cnstr(0, 2, 0); -} else { - x_83 = x_26; -} -lean::cnstr_set(x_83, 0, x_82); -lean::cnstr_set(x_83, 1, x_79); -return x_83; -} -else -{ -obj* x_88; obj* x_89; obj* x_90; -lean::dec(x_28); -lean::dec(x_3); -lean::dec(x_16); -lean::dec(x_2); -if (lean::is_scalar(x_74)) { - x_88 = lean::alloc_cnstr(1, 1, 1); -} else { - x_88 = x_74; -} -lean::cnstr_set(x_88, 0, x_71); -lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_73); -x_89 = x_88; -if (lean::is_scalar(x_26)) { - x_90 = lean::alloc_cnstr(0, 2, 0); -} else { - x_90 = x_26; -} -lean::cnstr_set(x_90, 0, x_89); -lean::cnstr_set(x_90, 1, x_24); -return x_90; -} -} -} -} -} -obj* _init_l_lean_parser_detail__ident__part_parser_lean_parser_has__view() { -_start: -{ -obj* x_0; obj* x_1; uint32 x_2; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; uint32 x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_53; -x_0 = lean::mk_string(""); -x_1 = l_lean_id__begin__escape; -x_2 = lean::unbox_uint32(x_1); -lean::inc(x_0); -x_4 = lean::string_push(x_0, x_2); -lean::inc(x_4); -x_6 = l_string_quote(x_4); -x_7 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_7, 0, x_6); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_with__trailing___rarg___lambda__1), 2, 0); -x_9 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_with__trailing___spec__1___rarg), 4, 1); -lean::closure_set(x_9, 0, x_8); -x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__1), 6, 2); -lean::closure_set(x_10, 0, x_4); -lean::closure_set(x_10, 1, x_7); -lean::inc(x_9); -x_12 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg), 5, 2); -lean::closure_set(x_12, 0, x_9); -lean::closure_set(x_12, 1, x_10); -x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__2), 4, 0); -lean::inc(x_9); -x_15 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg), 5, 2); -lean::closure_set(x_15, 0, x_9); -lean::closure_set(x_15, 1, x_13); -x_16 = l_lean_id__end__escape; -x_17 = lean::unbox_uint32(x_16); -x_18 = lean::string_push(x_0, x_17); -lean::inc(x_18); -x_20 = l_string_quote(x_18); -x_21 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_21, 0, x_20); -x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__1), 6, 2); -lean::closure_set(x_22, 0, x_18); -lean::closure_set(x_22, 1, x_21); -lean::inc(x_9); -x_24 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg), 5, 2); -lean::closure_set(x_24, 0, x_9); -lean::closure_set(x_24, 1, x_22); -x_25 = lean::box(0); -lean::inc(x_25); -x_27 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_27, 0, x_24); -lean::cnstr_set(x_27, 1, x_25); -x_28 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_28, 0, x_15); -lean::cnstr_set(x_28, 1, x_27); -x_29 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_29, 0, x_12); -lean::cnstr_set(x_29, 1, x_28); -x_30 = l_lean_parser_detail__ident__part__escaped; -lean::inc(x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8), 5, 2); -lean::closure_set(x_32, 0, x_30); -lean::closure_set(x_32, 1, x_29); -x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__3), 4, 0); -x_34 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg), 5, 2); -lean::closure_set(x_34, 0, x_9); -lean::closure_set(x_34, 1, x_33); -lean::inc(x_25); -x_36 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_36, 0, x_34); -lean::cnstr_set(x_36, 1, x_25); -x_37 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_37, 0, x_32); -lean::cnstr_set(x_37, 1, x_36); -x_38 = lean::mk_nat_obj(0u); -x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__16), 5, 2); -lean::closure_set(x_39, 0, x_37); -lean::closure_set(x_39, 1, x_38); -x_40 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_40, 0, x_39); -lean::cnstr_set(x_40, 1, x_25); -x_41 = l_lean_parser_basic__parser__m_monad; -x_42 = l_lean_parser_basic__parser__m_monad__except; -x_43 = l_lean_parser_basic__parser__m_lean_parser_monad__parsec; -x_44 = l_lean_parser_basic__parser__m_alternative; -x_45 = l_lean_parser_detail__ident__part; -x_46 = l_lean_parser_detail__ident__part_has__view; -lean::inc(x_46); -lean::inc(x_45); -lean::inc(x_44); -lean::inc(x_43); -lean::inc(x_42); -lean::inc(x_41); -x_53 = l_lean_parser_combinators_node_view___rarg(x_41, x_42, x_43, x_44, x_45, x_40, x_46); -return x_53; -} -} -obj* l_lean_parser_detail__ident__part_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) { -_start: -{ -obj* x_6; obj* x_7; obj* x_9; obj* x_11; -x_6 = l_lean_parser_monad__parsec_str__core___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__3(x_0, x_1, x_3, x_4, x_5); -x_7 = lean::cnstr_get(x_6, 0); -lean::inc(x_7); -x_9 = lean::cnstr_get(x_6, 1); -lean::inc(x_9); -if (lean::is_shared(x_6)) { - lean::dec(x_6); - x_11 = lean::box(0); -} else { - lean::cnstr_release(x_6, 0); - lean::cnstr_release(x_6, 1); - x_11 = x_6; -} -if (lean::obj_tag(x_7) == 0) -{ -obj* x_12; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; -x_12 = lean::cnstr_get(x_7, 1); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_7, 2); -lean::inc(x_14); -if (lean::is_shared(x_7)) { - lean::dec(x_7); - x_16 = lean::box(0); -} else { - lean::cnstr_release(x_7, 0); - lean::cnstr_release(x_7, 1); - lean::cnstr_release(x_7, 2); - x_16 = x_7; -} -lean::inc(x_12); -x_18 = l_lean_parser_mk__raw__res(x_2, x_12); -x_19 = l_lean_parser_finish__comment__block___closed__2; -lean::inc(x_19); -if (lean::is_scalar(x_16)) { - x_21 = lean::alloc_cnstr(0, 3, 0); -} else { - x_21 = x_16; -} -lean::cnstr_set(x_21, 0, x_18); -lean::cnstr_set(x_21, 1, x_12); -lean::cnstr_set(x_21, 2, x_19); -x_22 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_14, x_21); -if (lean::is_scalar(x_11)) { - x_23 = lean::alloc_cnstr(0, 2, 0); -} else { - x_23 = x_11; -} -lean::cnstr_set(x_23, 0, x_22); -lean::cnstr_set(x_23, 1, x_9); -return x_23; -} -else -{ -obj* x_25; uint8 x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; -lean::dec(x_2); -x_25 = lean::cnstr_get(x_7, 0); -lean::inc(x_25); -x_27 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); -if (lean::is_shared(x_7)) { - lean::dec(x_7); - x_28 = lean::box(0); -} else { - lean::cnstr_release(x_7, 0); - x_28 = x_7; -} -if (lean::is_scalar(x_28)) { - x_29 = lean::alloc_cnstr(1, 1, 1); -} else { - x_29 = x_28; -} -lean::cnstr_set(x_29, 0, x_25); -lean::cnstr_set_scalar(x_29, sizeof(void*)*1, x_27); -x_30 = x_29; -if (lean::is_scalar(x_11)) { - x_31 = lean::alloc_cnstr(0, 2, 0); -} else { - x_31 = x_11; -} -lean::cnstr_set(x_31, 0, x_30); -lean::cnstr_set(x_31, 1, x_9); -return x_31; -} -} -} -obj* l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_5; obj* x_7; obj* x_9; -x_4 = l_lean_parser_monad__parsec_take__while1___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__1(x_1, x_2, x_3); -x_5 = lean::cnstr_get(x_4, 0); -lean::inc(x_5); -x_7 = lean::cnstr_get(x_4, 1); -lean::inc(x_7); -if (lean::is_shared(x_4)) { - lean::dec(x_4); - x_9 = lean::box(0); -} else { - lean::cnstr_release(x_4, 0); - lean::cnstr_release(x_4, 1); - x_9 = x_4; -} -if (lean::obj_tag(x_5) == 0) -{ -obj* x_10; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; -x_10 = lean::cnstr_get(x_5, 1); -lean::inc(x_10); -x_12 = lean::cnstr_get(x_5, 2); -lean::inc(x_12); -if (lean::is_shared(x_5)) { - lean::dec(x_5); - x_14 = lean::box(0); -} else { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - x_14 = x_5; -} -lean::inc(x_10); -x_16 = l_lean_parser_mk__raw__res(x_0, x_10); -x_17 = l_lean_parser_finish__comment__block___closed__2; -lean::inc(x_17); -if (lean::is_scalar(x_14)) { - x_19 = lean::alloc_cnstr(0, 3, 0); -} else { - x_19 = x_14; -} -lean::cnstr_set(x_19, 0, x_16); -lean::cnstr_set(x_19, 1, x_10); -lean::cnstr_set(x_19, 2, x_17); -x_20 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_12, x_19); -if (lean::is_scalar(x_9)) { - x_21 = lean::alloc_cnstr(0, 2, 0); -} else { - x_21 = x_9; -} -lean::cnstr_set(x_21, 0, x_20); -lean::cnstr_set(x_21, 1, x_7); -return x_21; -} -else -{ -obj* x_23; uint8 x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; -lean::dec(x_0); -x_23 = lean::cnstr_get(x_5, 0); -lean::inc(x_23); -x_25 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); -if (lean::is_shared(x_5)) { - lean::dec(x_5); - x_26 = lean::box(0); -} else { - lean::cnstr_release(x_5, 0); - x_26 = x_5; -} -if (lean::is_scalar(x_26)) { - x_27 = lean::alloc_cnstr(1, 1, 1); -} else { - x_27 = x_26; -} -lean::cnstr_set(x_27, 0, x_23); -lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); -x_28 = x_27; -if (lean::is_scalar(x_9)) { - x_29 = lean::alloc_cnstr(0, 2, 0); -} else { - x_29 = x_9; -} -lean::cnstr_set(x_29, 0, x_28); -lean::cnstr_set(x_29, 1, x_7); -return x_29; -} -} -} -obj* l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -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; -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) -{ -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__10___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; -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); -} else { - lean::cnstr_release(x_22, 0); - x_38 = x_22; -} -if (lean::is_scalar(x_38)) { - x_39 = lean::alloc_cnstr(1, 1, 1); -} else { - x_39 = x_38; -} -lean::cnstr_set(x_39, 0, x_35); -lean::cnstr_set_scalar(x_39, sizeof(void*)*1, x_37); -x_40 = x_39; -x_4 = x_40; -x_5 = x_17; -goto lbl_6; -} -} -else -{ -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) -{ -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; -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); -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) -{ -obj* x_62; obj* x_64; obj* x_67; obj* x_68; obj* x_70; obj* x_73; -x_62 = lean::cnstr_get(x_61, 1); -lean::inc(x_62); -x_64 = lean::cnstr_get(x_61, 2); -lean::inc(x_64); -lean::dec(x_61); -x_67 = l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__12___rarg(x_62, x_56); -x_68 = lean::cnstr_get(x_67, 0); -lean::inc(x_68); -x_70 = lean::cnstr_get(x_67, 1); -lean::inc(x_70); -lean::dec(x_67); -x_73 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_64, x_68); -x_4 = x_73; -x_5 = x_70; -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); -} else { - lean::cnstr_release(x_61, 0); - x_77 = x_61; -} -if (lean::is_scalar(x_77)) { - x_78 = lean::alloc_cnstr(1, 1, 1); -} else { - x_78 = x_77; -} -lean::cnstr_set(x_78, 0, x_74); -lean::cnstr_set_scalar(x_78, sizeof(void*)*1, x_76); -x_79 = x_78; -x_4 = x_79; -x_5 = x_56; -goto lbl_6; -} -} -else -{ -obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_88; obj* x_89; -lean::dec(x_1); -x_81 = lean::string_iterator_next(x_2); -x_82 = l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__14___rarg(x_81, x_3); -x_83 = lean::cnstr_get(x_82, 0); -lean::inc(x_83); -x_85 = lean::cnstr_get(x_82, 1); -lean::inc(x_85); -lean::dec(x_82); -x_88 = lean::box(0); -x_89 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_88, x_83); -x_4 = x_89; -x_5 = x_85; -goto lbl_6; -} -} -lbl_6: -{ -if (lean::obj_tag(x_4) == 0) -{ -obj* x_90; obj* x_92; obj* x_94; obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_101; -x_90 = lean::cnstr_get(x_4, 1); -lean::inc(x_90); -x_92 = lean::cnstr_get(x_4, 2); -lean::inc(x_92); -if (lean::is_shared(x_4)) { - lean::dec(x_4); - x_94 = lean::box(0); -} else { - lean::cnstr_release(x_4, 0); - lean::cnstr_release(x_4, 1); - lean::cnstr_release(x_4, 2); - x_94 = x_4; -} -lean::inc(x_90); -x_96 = l_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); -} else { - x_99 = x_94; -} -lean::cnstr_set(x_99, 0, x_96); -lean::cnstr_set(x_99, 1, x_90); -lean::cnstr_set(x_99, 2, x_97); -x_100 = l_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; -} -else -{ -obj* x_103; uint8 x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; -lean::dec(x_0); -x_103 = lean::cnstr_get(x_4, 0); -lean::inc(x_103); -x_105 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); -if (lean::is_shared(x_4)) { - lean::dec(x_4); - x_106 = lean::box(0); -} else { - lean::cnstr_release(x_4, 0); - x_106 = x_4; -} -if (lean::is_scalar(x_106)) { - x_107 = lean::alloc_cnstr(1, 1, 1); -} else { - x_107 = x_106; -} -lean::cnstr_set(x_107, 0, x_103); -lean::cnstr_set_scalar(x_107, sizeof(void*)*1, x_105); -x_108 = x_107; -x_109 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_109, 0, x_108); -lean::cnstr_set(x_109, 1, x_5); -return x_109; -} -} -} -} -obj* l_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) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_0); -x_5 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__2(x_4, x_1, x_2, x_3); -return x_5; -} -} -obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__6___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -uint32 x_4; obj* x_5; -x_4 = lean::unbox_uint32(x_0); -x_5 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__6(x_4, x_1, x_2, x_3); -return x_5; -} -} obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__3(obj* x_0, obj* x_1, obj* x_2) { _start: { @@ -7246,82 +5472,387 @@ return x_102; } } } -obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__16(obj* x_0, obj* x_1, obj* x_2) { +obj* l_list_mfoldl___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__16(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { -obj* x_3; uint8 x_4; -x_3 = lean::mk_nat_obj(0u); -x_4 = lean::nat_dec_eq(x_0, x_3); +if (lean::obj_tag(x_2) == 0) +{ +obj* x_9; obj* x_11; obj* x_12; lean::dec(x_3); -if (x_4 == 0) -{ -uint8 x_6; -x_6 = lean::string_iterator_has_next(x_2); -if (x_6 == 0) -{ -obj* x_8; lean::dec(x_0); -x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_8; -} -else -{ -uint32 x_9; uint8 x_10; -x_9 = lean::string_iterator_curr(x_2); -x_10 = l_lean_is__id__rest(x_9); -if (x_10 == 0) -{ -obj* x_12; -lean::dec(x_0); -x_12 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +lean::dec(x_2); +x_9 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_9); +x_11 = lean::alloc_cnstr(0, 3, 0); +lean::cnstr_set(x_11, 0, x_1); +lean::cnstr_set(x_11, 1, x_4); +lean::cnstr_set(x_11, 2, x_9); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_11); +lean::cnstr_set(x_12, 1, x_5); return x_12; } else { -obj* x_13; obj* x_14; obj* x_17; obj* x_18; -x_13 = lean::mk_nat_obj(1u); -x_14 = lean::nat_sub(x_0, x_13); -lean::dec(x_13); -lean::dec(x_0); -x_17 = lean::string_push(x_1, x_9); -x_18 = lean::string_iterator_next(x_2); -x_0 = x_14; -x_1 = x_17; -x_2 = x_18; -goto _start; +obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_22; obj* x_23; obj* x_25; +x_13 = lean::cnstr_get(x_2, 0); +lean::inc(x_13); +x_15 = lean::cnstr_get(x_2, 1); +lean::inc(x_15); +if (lean::is_shared(x_2)) { + lean::dec(x_2); + x_17 = lean::box(0); +} else { + lean::cnstr_release(x_2, 0); + lean::cnstr_release(x_2, 1); + x_17 = x_2; } +lean::inc(x_3); +x_22 = lean::apply_3(x_13, x_3, x_4, x_5); +x_23 = lean::cnstr_get(x_22, 0); +lean::inc(x_23); +x_25 = lean::cnstr_get(x_22, 1); +lean::inc(x_25); +lean::dec(x_22); +if (lean::obj_tag(x_23) == 0) +{ +x_18 = x_23; +x_19 = x_25; +goto lbl_20; +} +else +{ +obj* x_28; uint8 x_30; obj* x_31; +x_28 = lean::cnstr_get(x_23, 0); +lean::inc(x_28); +x_30 = lean::cnstr_get_scalar(x_23, sizeof(void*)*1); +if (lean::is_shared(x_23)) { + lean::dec(x_23); + x_31 = lean::box(0); +} else { + lean::cnstr_release(x_23, 0); + x_31 = x_23; +} +if (lean::obj_tag(x_1) == 0) +{ +if (x_30 == 0) +{ +uint8 x_32; obj* x_33; obj* x_34; +x_32 = 0; +if (lean::is_scalar(x_31)) { + x_33 = lean::alloc_cnstr(1, 1, 1); +} else { + x_33 = x_31; +} +lean::cnstr_set(x_33, 0, x_28); +lean::cnstr_set_scalar(x_33, sizeof(void*)*1, x_32); +x_34 = x_33; +x_18 = x_34; +x_19 = x_25; +goto lbl_20; +} +else +{ +obj* x_35; obj* x_36; +if (lean::is_scalar(x_31)) { + x_35 = lean::alloc_cnstr(1, 1, 1); +} else { + x_35 = x_31; +} +lean::cnstr_set(x_35, 0, x_28); +lean::cnstr_set_scalar(x_35, sizeof(void*)*1, x_30); +x_36 = x_35; +x_18 = x_36; +x_19 = x_25; +goto lbl_20; } } else { -obj* x_21; +obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_44; obj* x_46; obj* x_49; obj* x_51; obj* x_52; obj* x_53; +x_37 = lean::cnstr_get(x_28, 3); +lean::inc(x_37); +x_39 = l_option_get___main___at_lean_parser_run___spec__2(x_37); +lean::inc(x_1); +x_41 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_41, 0, x_39); +lean::cnstr_set(x_41, 1, x_1); +x_42 = lean::cnstr_get(x_28, 0); +lean::inc(x_42); +x_44 = lean::cnstr_get(x_28, 1); +lean::inc(x_44); +x_46 = lean::cnstr_get(x_28, 2); +lean::inc(x_46); +lean::dec(x_28); +x_49 = l_list_reverse___rarg(x_41); +lean::inc(x_0); +x_51 = l_lean_parser_syntax_mk__node(x_0, x_49); +x_52 = lean::alloc_cnstr(1, 1, 0); +lean::cnstr_set(x_52, 0, x_51); +x_53 = lean::alloc_cnstr(0, 4, 0); +lean::cnstr_set(x_53, 0, x_42); +lean::cnstr_set(x_53, 1, x_44); +lean::cnstr_set(x_53, 2, x_46); +lean::cnstr_set(x_53, 3, x_52); +if (x_30 == 0) +{ +uint8 x_54; obj* x_55; obj* x_56; +x_54 = 0; +if (lean::is_scalar(x_31)) { + x_55 = lean::alloc_cnstr(1, 1, 1); +} else { + x_55 = x_31; +} +lean::cnstr_set(x_55, 0, x_53); +lean::cnstr_set_scalar(x_55, sizeof(void*)*1, x_54); +x_56 = x_55; +x_18 = x_56; +x_19 = x_25; +goto lbl_20; +} +else +{ +obj* x_57; obj* x_58; +if (lean::is_scalar(x_31)) { + x_57 = lean::alloc_cnstr(1, 1, 1); +} else { + x_57 = x_31; +} +lean::cnstr_set(x_57, 0, x_53); +lean::cnstr_set_scalar(x_57, sizeof(void*)*1, x_30); +x_58 = x_57; +x_18 = x_58; +x_19 = x_25; +goto lbl_20; +} +} +} +lbl_20: +{ +if (lean::obj_tag(x_18) == 0) +{ +obj* x_59; obj* x_61; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_69; obj* x_70; +x_59 = lean::cnstr_get(x_18, 0); +lean::inc(x_59); +x_61 = lean::cnstr_get(x_18, 1); +lean::inc(x_61); +x_63 = lean::cnstr_get(x_18, 2); +lean::inc(x_63); +if (lean::is_shared(x_18)) { + lean::dec(x_18); + x_65 = lean::box(0); +} else { + lean::cnstr_release(x_18, 0); + lean::cnstr_release(x_18, 1); + lean::cnstr_release(x_18, 2); + x_65 = x_18; +} +if (lean::is_scalar(x_17)) { + x_66 = lean::alloc_cnstr(1, 2, 0); +} else { + x_66 = x_17; +} +lean::cnstr_set(x_66, 0, x_59); +lean::cnstr_set(x_66, 1, x_1); +x_67 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_67); +if (lean::is_scalar(x_65)) { + x_69 = lean::alloc_cnstr(0, 3, 0); +} else { + x_69 = x_65; +} +lean::cnstr_set(x_69, 0, x_66); +lean::cnstr_set(x_69, 1, x_61); +lean::cnstr_set(x_69, 2, x_67); +x_70 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_63, x_69); +if (lean::obj_tag(x_70) == 0) +{ +obj* x_71; obj* x_73; obj* x_75; obj* x_78; obj* x_79; obj* x_81; obj* x_83; obj* x_84; obj* x_85; +x_71 = lean::cnstr_get(x_70, 0); +lean::inc(x_71); +x_73 = lean::cnstr_get(x_70, 1); +lean::inc(x_73); +x_75 = lean::cnstr_get(x_70, 2); +lean::inc(x_75); +lean::dec(x_70); +x_78 = l_list_mfoldl___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__16(x_0, x_71, x_15, x_3, x_73, x_19); +x_79 = lean::cnstr_get(x_78, 0); +lean::inc(x_79); +x_81 = lean::cnstr_get(x_78, 1); +lean::inc(x_81); +if (lean::is_shared(x_78)) { + lean::dec(x_78); + x_83 = lean::box(0); +} else { + lean::cnstr_release(x_78, 0); + lean::cnstr_release(x_78, 1); + x_83 = x_78; +} +x_84 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_75, x_79); +if (lean::is_scalar(x_83)) { + x_85 = lean::alloc_cnstr(0, 2, 0); +} else { + x_85 = x_83; +} +lean::cnstr_set(x_85, 0, x_84); +lean::cnstr_set(x_85, 1, x_81); +return x_85; +} +else +{ +obj* x_89; uint8 x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; +lean::dec(x_15); +lean::dec(x_3); lean::dec(x_0); -x_21 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); -return x_21; +x_89 = lean::cnstr_get(x_70, 0); +lean::inc(x_89); +x_91 = lean::cnstr_get_scalar(x_70, sizeof(void*)*1); +if (lean::is_shared(x_70)) { + lean::dec(x_70); + x_92 = lean::box(0); +} else { + lean::cnstr_release(x_70, 0); + x_92 = x_70; +} +if (lean::is_scalar(x_92)) { + x_93 = lean::alloc_cnstr(1, 1, 1); +} else { + x_93 = x_92; +} +lean::cnstr_set(x_93, 0, x_89); +lean::cnstr_set_scalar(x_93, sizeof(void*)*1, x_91); +x_94 = x_93; +x_95 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_95, 0, x_94); +lean::cnstr_set(x_95, 1, x_19); +return x_95; +} +} +else +{ +obj* x_101; uint8 x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; +lean::dec(x_15); +lean::dec(x_1); +lean::dec(x_3); +lean::dec(x_0); +lean::dec(x_17); +x_101 = lean::cnstr_get(x_18, 0); +lean::inc(x_101); +x_103 = lean::cnstr_get_scalar(x_18, sizeof(void*)*1); +if (lean::is_shared(x_18)) { + lean::dec(x_18); + x_104 = lean::box(0); +} else { + lean::cnstr_release(x_18, 0); + x_104 = x_18; +} +if (lean::is_scalar(x_104)) { + x_105 = lean::alloc_cnstr(1, 1, 1); +} else { + x_105 = x_104; +} +lean::cnstr_set(x_105, 0, x_101); +lean::cnstr_set_scalar(x_105, sizeof(void*)*1, x_103); +x_106 = x_105; +x_107 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_107, 0, x_106); +lean::cnstr_set(x_107, 1, x_19); +return x_107; } } } -obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15___rarg(obj* x_0, obj* x_1) { +} +} +obj* l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { -obj* x_2; obj* x_3; obj* x_5; obj* x_6; -x_2 = lean::string_iterator_remaining(x_0); -x_3 = l_string_join___closed__1; -lean::inc(x_3); -x_5 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__16(x_2, x_3, x_0); -x_6 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_6, 0, x_5); -lean::cnstr_set(x_6, 1, x_1); -return x_6; +obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_12; +x_5 = lean::box(0); +lean::inc(x_0); +x_7 = l_list_mfoldl___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__16(x_0, x_5, x_1, x_2, x_3, x_4); +x_8 = lean::cnstr_get(x_7, 0); +lean::inc(x_8); +x_10 = lean::cnstr_get(x_7, 1); +lean::inc(x_10); +if (lean::is_shared(x_7)) { + lean::dec(x_7); + x_12 = lean::box(0); +} else { + lean::cnstr_release(x_7, 0); + lean::cnstr_release(x_7, 1); + x_12 = x_7; } -} -obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(obj* x_0) { -_start: +if (lean::obj_tag(x_8) == 0) { -obj* x_2; +obj* x_13; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; +x_13 = lean::cnstr_get(x_8, 0); +lean::inc(x_13); +x_15 = lean::cnstr_get(x_8, 1); +lean::inc(x_15); +x_17 = lean::cnstr_get(x_8, 2); +lean::inc(x_17); +if (lean::is_shared(x_8)) { + lean::dec(x_8); + x_19 = lean::box(0); +} else { + lean::cnstr_release(x_8, 0); + lean::cnstr_release(x_8, 1); + lean::cnstr_release(x_8, 2); + x_19 = x_8; +} +x_20 = l_list_reverse___rarg(x_13); +x_21 = l_lean_parser_syntax_mk__node(x_0, x_20); +x_22 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_22); +if (lean::is_scalar(x_19)) { + x_24 = lean::alloc_cnstr(0, 3, 0); +} else { + x_24 = x_19; +} +lean::cnstr_set(x_24, 0, x_21); +lean::cnstr_set(x_24, 1, x_15); +lean::cnstr_set(x_24, 2, x_22); +x_25 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_17, x_24); +if (lean::is_scalar(x_12)) { + x_26 = lean::alloc_cnstr(0, 2, 0); +} else { + x_26 = x_12; +} +lean::cnstr_set(x_26, 0, x_25); +lean::cnstr_set(x_26, 1, x_10); +return x_26; +} +else +{ +obj* x_28; uint8 x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15___rarg), 2, 0); -return x_2; +x_28 = lean::cnstr_get(x_8, 0); +lean::inc(x_28); +x_30 = lean::cnstr_get_scalar(x_8, sizeof(void*)*1); +if (lean::is_shared(x_8)) { + lean::dec(x_8); + x_31 = lean::box(0); +} else { + lean::cnstr_release(x_8, 0); + x_31 = x_8; +} +if (lean::is_scalar(x_31)) { + x_32 = lean::alloc_cnstr(1, 1, 1); +} else { + x_32 = x_31; +} +lean::cnstr_set(x_32, 0, x_28); +lean::cnstr_set_scalar(x_32, sizeof(void*)*1, x_30); +x_33 = x_32; +if (lean::is_scalar(x_12)) { + x_34 = lean::alloc_cnstr(0, 2, 0); +} else { + x_34 = x_12; +} +lean::cnstr_set(x_34, 0, x_33); +lean::cnstr_set(x_34, 1, x_10); +return x_34; +} } } obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__18(obj* x_0, obj* x_1, obj* x_2) { @@ -7714,6 +6245,298 @@ x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_ta return x_2; } } +obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__28(obj* x_0, obj* x_1, obj* x_2) { +_start: +{ +obj* x_3; uint8 x_4; +x_3 = lean::mk_nat_obj(0u); +x_4 = lean::nat_dec_eq(x_0, x_3); +lean::dec(x_3); +if (x_4 == 0) +{ +uint8 x_6; +x_6 = lean::string_iterator_has_next(x_2); +if (x_6 == 0) +{ +obj* x_8; +lean::dec(x_0); +x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_8; +} +else +{ +uint32 x_9; uint8 x_10; +x_9 = lean::string_iterator_curr(x_2); +x_10 = l_lean_is__id__rest(x_9); +if (x_10 == 0) +{ +obj* x_12; +lean::dec(x_0); +x_12 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_12; +} +else +{ +obj* x_13; obj* x_14; obj* x_17; obj* x_18; +x_13 = lean::mk_nat_obj(1u); +x_14 = lean::nat_sub(x_0, x_13); +lean::dec(x_13); +lean::dec(x_0); +x_17 = lean::string_push(x_1, x_9); +x_18 = lean::string_iterator_next(x_2); +x_0 = x_14; +x_1 = x_17; +x_2 = x_18; +goto _start; +} +} +} +else +{ +obj* x_21; +lean::dec(x_0); +x_21 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_21; +} +} +} +obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__27___rarg(obj* x_0, obj* x_1) { +_start: +{ +obj* x_2; obj* x_3; obj* x_5; obj* x_6; +x_2 = lean::string_iterator_remaining(x_0); +x_3 = l_string_join___closed__1; +lean::inc(x_3); +x_5 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__28(x_2, x_3, x_0); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_1); +return x_6; +} +} +obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__27(obj* x_0) { +_start: +{ +obj* x_2; +lean::dec(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__27___rarg), 2, 0); +return x_2; +} +} +obj* l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__29(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +_start: +{ +if (lean::obj_tag(x_0) == 0) +{ +obj* x_7; obj* x_8; obj* x_9; obj* x_13; +lean::dec(x_1); +lean::dec(x_0); +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___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; +} +else +{ +obj* x_14; obj* x_16; obj* x_18; obj* x_21; obj* x_22; obj* x_24; obj* x_26; obj* x_27; obj* x_28; +x_14 = lean::cnstr_get(x_0, 0); +lean::inc(x_14); +x_16 = lean::cnstr_get(x_0, 1); +lean::inc(x_16); +if (lean::is_shared(x_0)) { + lean::dec(x_0); + x_18 = lean::box(0); +} else { + lean::cnstr_release(x_0, 0); + lean::cnstr_release(x_0, 1); + x_18 = x_0; +} +lean::inc(x_3); +lean::inc(x_2); +x_21 = lean::apply_3(x_14, x_2, x_3, x_4); +x_22 = lean::cnstr_get(x_21, 0); +lean::inc(x_22); +x_24 = lean::cnstr_get(x_21, 1); +lean::inc(x_24); +if (lean::is_shared(x_21)) { + lean::dec(x_21); + x_26 = lean::box(0); +} else { + lean::cnstr_release(x_21, 0); + lean::cnstr_release(x_21, 1); + x_26 = x_21; +} +x_27 = lean::mk_nat_obj(1u); +x_28 = lean::nat_add(x_1, x_27); +lean::dec(x_27); +if (lean::obj_tag(x_22) == 0) +{ +obj* x_30; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_44; obj* x_45; +x_30 = lean::cnstr_get(x_22, 0); +lean::inc(x_30); +x_32 = lean::cnstr_get(x_22, 1); +lean::inc(x_32); +x_34 = lean::cnstr_get(x_22, 2); +lean::inc(x_34); +if (lean::is_shared(x_22)) { + lean::dec(x_22); + x_36 = lean::box(0); +} else { + lean::cnstr_release(x_22, 0); + lean::cnstr_release(x_22, 1); + lean::cnstr_release(x_22, 2); + x_36 = x_22; +} +x_37 = lean::box(0); +lean::inc(x_37); +x_39 = lean_name_mk_numeral(x_37, x_1); +if (lean::is_scalar(x_18)) { + x_40 = lean::alloc_cnstr(1, 2, 0); +} else { + x_40 = x_18; +} +lean::cnstr_set(x_40, 0, x_30); +lean::cnstr_set(x_40, 1, x_37); +x_41 = l_lean_parser_syntax_mk__node(x_39, x_40); +x_42 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_42); +if (lean::is_scalar(x_36)) { + x_44 = lean::alloc_cnstr(0, 3, 0); +} else { + x_44 = x_36; +} +lean::cnstr_set(x_44, 0, x_41); +lean::cnstr_set(x_44, 1, x_32); +lean::cnstr_set(x_44, 2, x_42); +x_45 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_34, x_44); +if (lean::obj_tag(x_45) == 0) +{ +obj* x_50; +lean::dec(x_28); +lean::dec(x_3); +lean::dec(x_16); +lean::dec(x_2); +if (lean::is_scalar(x_26)) { + x_50 = lean::alloc_cnstr(0, 2, 0); +} else { + x_50 = x_26; +} +lean::cnstr_set(x_50, 0, x_45); +lean::cnstr_set(x_50, 1, x_24); +return x_50; +} +else +{ +obj* x_51; uint8 x_53; +x_51 = lean::cnstr_get(x_45, 0); +lean::inc(x_51); +x_53 = lean::cnstr_get_scalar(x_45, sizeof(void*)*1); +if (x_53 == 0) +{ +obj* x_55; obj* x_56; obj* x_58; obj* x_61; obj* x_62; +lean::dec(x_45); +x_55 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__29(x_16, x_28, x_2, x_3, x_24); +x_56 = lean::cnstr_get(x_55, 0); +lean::inc(x_56); +x_58 = lean::cnstr_get(x_55, 1); +lean::inc(x_58); +lean::dec(x_55); +x_61 = l_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_62 = x_26; +} +lean::cnstr_set(x_62, 0, x_61); +lean::cnstr_set(x_62, 1, x_58); +return x_62; +} +else +{ +obj* x_68; +lean::dec(x_28); +lean::dec(x_3); +lean::dec(x_16); +lean::dec(x_2); +lean::dec(x_51); +if (lean::is_scalar(x_26)) { + x_68 = lean::alloc_cnstr(0, 2, 0); +} else { + x_68 = x_26; +} +lean::cnstr_set(x_68, 0, x_45); +lean::cnstr_set(x_68, 1, x_24); +return x_68; +} +} +} +else +{ +obj* x_71; uint8 x_73; obj* x_74; +lean::dec(x_18); +lean::dec(x_1); +x_71 = lean::cnstr_get(x_22, 0); +lean::inc(x_71); +x_73 = lean::cnstr_get_scalar(x_22, sizeof(void*)*1); +if (lean::is_shared(x_22)) { + lean::dec(x_22); + x_74 = lean::box(0); +} else { + lean::cnstr_release(x_22, 0); + x_74 = x_22; +} +if (x_73 == 0) +{ +obj* x_76; obj* x_77; obj* x_79; obj* x_82; obj* x_83; +lean::dec(x_74); +x_76 = l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__29(x_16, x_28, x_2, x_3, x_24); +x_77 = lean::cnstr_get(x_76, 0); +lean::inc(x_77); +x_79 = lean::cnstr_get(x_76, 1); +lean::inc(x_79); +lean::dec(x_76); +x_82 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_71, x_77); +if (lean::is_scalar(x_26)) { + x_83 = lean::alloc_cnstr(0, 2, 0); +} else { + x_83 = x_26; +} +lean::cnstr_set(x_83, 0, x_82); +lean::cnstr_set(x_83, 1, x_79); +return x_83; +} +else +{ +obj* x_88; obj* x_89; obj* x_90; +lean::dec(x_28); +lean::dec(x_3); +lean::dec(x_16); +lean::dec(x_2); +if (lean::is_scalar(x_74)) { + x_88 = lean::alloc_cnstr(1, 1, 1); +} else { + x_88 = x_74; +} +lean::cnstr_set(x_88, 0, x_71); +lean::cnstr_set_scalar(x_88, sizeof(void*)*1, x_73); +x_89 = x_88; +if (lean::is_scalar(x_26)) { + x_90 = lean::alloc_cnstr(0, 2, 0); +} else { + x_90 = x_26; +} +lean::cnstr_set(x_90, 0, x_89); +lean::cnstr_set(x_90, 1, x_24); +return x_90; +} +} +} +} +} obj* _init_l_lean_parser_detail__ident__part_parser_lean_parser_has__tokens() { _start: { @@ -7771,6 +6594,1183 @@ x_5 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ide return x_5; } } +obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__3(obj* x_0, obj* x_1, obj* x_2) { +_start: +{ +obj* x_3; uint8 x_4; +x_3 = lean::mk_nat_obj(0u); +x_4 = lean::nat_dec_eq(x_0, x_3); +lean::dec(x_3); +if (x_4 == 0) +{ +uint8 x_6; +x_6 = lean::string_iterator_has_next(x_2); +if (x_6 == 0) +{ +obj* x_8; +lean::dec(x_0); +x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_8; +} +else +{ +uint32 x_9; uint8 x_10; +x_9 = lean::string_iterator_curr(x_2); +x_10 = l_lean_is__id__end__escape(x_9); +if (x_10 == 0) +{ +obj* x_11; obj* x_12; obj* x_15; obj* x_16; +x_11 = lean::mk_nat_obj(1u); +x_12 = lean::nat_sub(x_0, x_11); +lean::dec(x_11); +lean::dec(x_0); +x_15 = lean::string_push(x_1, x_9); +x_16 = lean::string_iterator_next(x_2); +x_0 = x_12; +x_1 = x_15; +x_2 = x_16; +goto _start; +} +else +{ +obj* x_19; +lean::dec(x_0); +x_19 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_19; +} +} +} +else +{ +obj* x_21; +lean::dec(x_0); +x_21 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_21; +} +} +} +obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__2(uint32 x_0, obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; +lean::dec(x_1); +x_5 = l_string_join___closed__1; +lean::inc(x_5); +x_7 = lean::string_push(x_5, x_0); +x_8 = lean::string_iterator_remaining(x_2); +x_9 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__3(x_8, x_7, x_2); +x_10 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_3); +return x_10; +} +} +obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__5(obj* x_0, obj* x_1, obj* x_2) { +_start: +{ +obj* x_3; uint8 x_4; +x_3 = lean::mk_nat_obj(0u); +x_4 = lean::nat_dec_eq(x_0, x_3); +lean::dec(x_3); +if (x_4 == 0) +{ +uint8 x_6; +x_6 = lean::string_iterator_has_next(x_2); +if (x_6 == 0) +{ +obj* x_8; +lean::dec(x_0); +x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_8; +} +else +{ +uint32 x_9; uint8 x_10; +x_9 = lean::string_iterator_curr(x_2); +x_10 = l_lean_is__id__end__escape(x_9); +if (x_10 == 0) +{ +obj* x_11; obj* x_12; obj* x_15; obj* x_16; +x_11 = lean::mk_nat_obj(1u); +x_12 = lean::nat_sub(x_0, x_11); +lean::dec(x_11); +lean::dec(x_0); +x_15 = lean::string_push(x_1, x_9); +x_16 = lean::string_iterator_next(x_2); +x_0 = x_12; +x_1 = x_15; +x_2 = x_16; +goto _start; +} +else +{ +obj* x_19; +lean::dec(x_0); +x_19 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_19; +} +} +} +else +{ +obj* x_21; +lean::dec(x_0); +x_21 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_21; +} +} +} +obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +uint32 x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; +lean::dec(x_1); +x_5 = lean::string_iterator_curr(x_0); +lean::dec(x_0); +x_7 = l_string_join___closed__1; +lean::inc(x_7); +x_9 = lean::string_push(x_7, x_5); +x_10 = lean::string_iterator_remaining(x_2); +x_11 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__5(x_10, x_9, x_2); +x_12 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_12, 0, x_11); +lean::cnstr_set(x_12, 1, x_3); +return x_12; +} +} +obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__7(obj* x_0, obj* x_1, obj* x_2) { +_start: +{ +obj* x_3; uint8 x_4; +x_3 = lean::mk_nat_obj(0u); +x_4 = lean::nat_dec_eq(x_0, x_3); +lean::dec(x_3); +if (x_4 == 0) +{ +uint8 x_6; +x_6 = lean::string_iterator_has_next(x_2); +if (x_6 == 0) +{ +obj* x_8; +lean::dec(x_0); +x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_8; +} +else +{ +uint32 x_9; uint8 x_10; +x_9 = lean::string_iterator_curr(x_2); +x_10 = l_lean_is__id__end__escape(x_9); +if (x_10 == 0) +{ +obj* x_11; obj* x_12; obj* x_15; obj* x_16; +x_11 = lean::mk_nat_obj(1u); +x_12 = lean::nat_sub(x_0, x_11); +lean::dec(x_11); +lean::dec(x_0); +x_15 = lean::string_push(x_1, x_9); +x_16 = lean::string_iterator_next(x_2); +x_0 = x_12; +x_1 = x_15; +x_2 = x_16; +goto _start; +} +else +{ +obj* x_19; +lean::dec(x_0); +x_19 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_19; +} +} +} +else +{ +obj* x_21; +lean::dec(x_0); +x_21 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_21; +} +} +} +obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__6(uint32 x_0, obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; +lean::dec(x_1); +x_5 = l_string_join___closed__1; +lean::inc(x_5); +x_7 = lean::string_push(x_5, x_0); +x_8 = lean::string_iterator_remaining(x_2); +x_9 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__7(x_8, x_7, x_2); +x_10 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_10, 0, x_9); +lean::cnstr_set(x_10, 1, x_3); +return x_10; +} +} +obj* l_lean_parser_monad__parsec_take__while1___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2) { +_start: +{ +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; +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); +} else { + lean::cnstr_release(x_11, 0); + lean::cnstr_release(x_11, 1); + x_16 = x_11; +} +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) +{ +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); +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); +} else { + x_36 = x_16; +} +lean::cnstr_set(x_36, 0, x_35); +lean::cnstr_set(x_36, 1, x_32); +return x_36; +} +else +{ +obj* x_38; uint8 x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; +lean::dec(x_0); +x_38 = lean::cnstr_get(x_19, 0); +lean::inc(x_38); +x_40 = lean::cnstr_get_scalar(x_19, sizeof(void*)*1); +if (lean::is_shared(x_19)) { + lean::dec(x_19); + x_41 = lean::box(0); +} else { + lean::cnstr_release(x_19, 0); + x_41 = x_19; +} +if (lean::is_scalar(x_41)) { + x_42 = lean::alloc_cnstr(1, 1, 1); +} else { + x_42 = x_41; +} +lean::cnstr_set(x_42, 0, x_38); +lean::cnstr_set_scalar(x_42, sizeof(void*)*1, x_40); +x_43 = x_42; +if (lean::is_scalar(x_16)) { + x_44 = lean::alloc_cnstr(0, 2, 0); +} else { + x_44 = x_16; +} +lean::cnstr_set(x_44, 0, x_43); +lean::cnstr_set(x_44, 1, x_14); +return x_44; +} +} +else +{ +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) +{ +obj* x_48; obj* x_49; obj* x_50; obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; +lean::inc(x_1); +x_48 = lean::string_iterator_next(x_1); +x_49 = l_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); +} else { + lean::cnstr_release(x_49, 0); + lean::cnstr_release(x_49, 1); + x_54 = x_49; +} +x_55 = lean::box(0); +x_56 = l_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); +} else { + x_57 = x_54; +} +lean::cnstr_set(x_57, 0, x_56); +lean::cnstr_set(x_57, 1, x_52); +return x_57; +} +else +{ +obj* x_58; obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_69; obj* x_70; obj* x_72; obj* x_74; obj* x_75; obj* x_77; +x_58 = l_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; +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); +lean::inc(x_70); +x_72 = lean::cnstr_get(x_69, 1); +lean::inc(x_72); +if (lean::is_shared(x_69)) { + lean::dec(x_69); + x_74 = lean::box(0); +} else { + lean::cnstr_release(x_69, 0); + lean::cnstr_release(x_69, 1); + x_74 = x_69; +} +x_75 = l_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) +{ +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); +lean::inc(x_78); +x_80 = lean::cnstr_get(x_77, 1); +lean::inc(x_80); +x_82 = lean::cnstr_get(x_77, 2); +lean::inc(x_82); +lean::dec(x_77); +x_85 = lean::unbox_uint32(x_78); +lean::dec(x_78); +x_87 = l_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::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); +} else { + x_94 = x_74; +} +lean::cnstr_set(x_94, 0, x_93); +lean::cnstr_set(x_94, 1, x_90); +return x_94; +} +else +{ +obj* x_96; uint8 x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; +lean::dec(x_0); +x_96 = lean::cnstr_get(x_77, 0); +lean::inc(x_96); +x_98 = lean::cnstr_get_scalar(x_77, sizeof(void*)*1); +if (lean::is_shared(x_77)) { + lean::dec(x_77); + x_99 = lean::box(0); +} else { + lean::cnstr_release(x_77, 0); + x_99 = x_77; +} +if (lean::is_scalar(x_99)) { + x_100 = lean::alloc_cnstr(1, 1, 1); +} else { + x_100 = x_99; +} +lean::cnstr_set(x_100, 0, x_96); +lean::cnstr_set_scalar(x_100, sizeof(void*)*1, x_98); +x_101 = x_100; +if (lean::is_scalar(x_74)) { + x_102 = lean::alloc_cnstr(0, 2, 0); +} else { + x_102 = x_74; +} +lean::cnstr_set(x_102, 0, x_101); +lean::cnstr_set(x_102, 1, x_72); +return x_102; +} +} +} +} +} +obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__9(obj* x_0, obj* x_1, obj* x_2) { +_start: +{ +obj* x_3; uint8 x_4; +x_3 = lean::mk_nat_obj(0u); +x_4 = lean::nat_dec_eq(x_0, x_3); +lean::dec(x_3); +if (x_4 == 0) +{ +uint8 x_6; +x_6 = lean::string_iterator_has_next(x_2); +if (x_6 == 0) +{ +obj* x_8; +lean::dec(x_0); +x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_8; +} +else +{ +uint32 x_9; uint8 x_10; +x_9 = lean::string_iterator_curr(x_2); +x_10 = l_lean_is__id__rest(x_9); +if (x_10 == 0) +{ +obj* x_12; +lean::dec(x_0); +x_12 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_12; +} +else +{ +obj* x_13; obj* x_14; obj* x_17; obj* x_18; +x_13 = lean::mk_nat_obj(1u); +x_14 = lean::nat_sub(x_0, x_13); +lean::dec(x_13); +lean::dec(x_0); +x_17 = lean::string_push(x_1, x_9); +x_18 = lean::string_iterator_next(x_2); +x_0 = x_14; +x_1 = x_17; +x_2 = x_18; +goto _start; +} +} +} +else +{ +obj* x_21; +lean::dec(x_0); +x_21 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_21; +} +} +} +obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8___rarg(obj* x_0, obj* x_1) { +_start: +{ +obj* x_2; obj* x_3; obj* x_5; obj* x_6; +x_2 = lean::string_iterator_remaining(x_0); +x_3 = l_string_join___closed__1; +lean::inc(x_3); +x_5 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__9(x_2, x_3, x_0); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_1); +return x_6; +} +} +obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(obj* x_0) { +_start: +{ +obj* x_2; +lean::dec(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8___rarg), 2, 0); +return x_2; +} +} +obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__11(obj* x_0, obj* x_1, obj* x_2) { +_start: +{ +obj* x_3; uint8 x_4; +x_3 = lean::mk_nat_obj(0u); +x_4 = lean::nat_dec_eq(x_0, x_3); +lean::dec(x_3); +if (x_4 == 0) +{ +uint8 x_6; +x_6 = lean::string_iterator_has_next(x_2); +if (x_6 == 0) +{ +obj* x_8; +lean::dec(x_0); +x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_8; +} +else +{ +uint32 x_9; uint8 x_10; +x_9 = lean::string_iterator_curr(x_2); +x_10 = l_lean_is__id__rest(x_9); +if (x_10 == 0) +{ +obj* x_12; +lean::dec(x_0); +x_12 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_12; +} +else +{ +obj* x_13; obj* x_14; obj* x_17; obj* x_18; +x_13 = lean::mk_nat_obj(1u); +x_14 = lean::nat_sub(x_0, x_13); +lean::dec(x_13); +lean::dec(x_0); +x_17 = lean::string_push(x_1, x_9); +x_18 = lean::string_iterator_next(x_2); +x_0 = x_14; +x_1 = x_17; +x_2 = x_18; +goto _start; +} +} +} +else +{ +obj* x_21; +lean::dec(x_0); +x_21 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_21; +} +} +} +obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__10___rarg(obj* x_0, obj* x_1) { +_start: +{ +obj* x_2; obj* x_3; obj* x_5; obj* x_6; +x_2 = lean::string_iterator_remaining(x_0); +x_3 = l_string_join___closed__1; +lean::inc(x_3); +x_5 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__11(x_2, x_3, x_0); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_1); +return x_6; +} +} +obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__10(obj* x_0) { +_start: +{ +obj* x_2; +lean::dec(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__10___rarg), 2, 0); +return x_2; +} +} +obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__13(obj* x_0, obj* x_1, obj* x_2) { +_start: +{ +obj* x_3; uint8 x_4; +x_3 = lean::mk_nat_obj(0u); +x_4 = lean::nat_dec_eq(x_0, x_3); +lean::dec(x_3); +if (x_4 == 0) +{ +uint8 x_6; +x_6 = lean::string_iterator_has_next(x_2); +if (x_6 == 0) +{ +obj* x_8; +lean::dec(x_0); +x_8 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_8; +} +else +{ +uint32 x_9; uint8 x_10; +x_9 = lean::string_iterator_curr(x_2); +x_10 = l_lean_is__id__rest(x_9); +if (x_10 == 0) +{ +obj* x_12; +lean::dec(x_0); +x_12 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_12; +} +else +{ +obj* x_13; obj* x_14; obj* x_17; obj* x_18; +x_13 = lean::mk_nat_obj(1u); +x_14 = lean::nat_sub(x_0, x_13); +lean::dec(x_13); +lean::dec(x_0); +x_17 = lean::string_push(x_1, x_9); +x_18 = lean::string_iterator_next(x_2); +x_0 = x_14; +x_1 = x_17; +x_2 = x_18; +goto _start; +} +} +} +else +{ +obj* x_21; +lean::dec(x_0); +x_21 = l___private_init_lean_parser_parsec_3__mk__string__result___rarg(x_1, x_2); +return x_21; +} +} +} +obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__12___rarg(obj* x_0, obj* x_1) { +_start: +{ +obj* x_2; obj* x_3; obj* x_5; obj* x_6; +x_2 = lean::string_iterator_remaining(x_0); +x_3 = l_string_join___closed__1; +lean::inc(x_3); +x_5 = l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__13(x_2, x_3, x_0); +x_6 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_6, 0, x_5); +lean::cnstr_set(x_6, 1, x_1); +return x_6; +} +} +obj* l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__12(obj* x_0) { +_start: +{ +obj* x_2; +lean::dec(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_take__while___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__12___rarg), 2, 0); +return x_2; +} +} +obj* _init_l_lean_parser_detail__ident__part_parser_lean_parser_has__view() { +_start: +{ +obj* x_0; obj* x_1; uint32 x_2; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; uint32 x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_53; +x_0 = lean::mk_string(""); +x_1 = l_lean_id__begin__escape; +x_2 = lean::unbox_uint32(x_1); +lean::inc(x_0); +x_4 = lean::string_push(x_0, x_2); +lean::inc(x_4); +x_6 = l_string_quote(x_4); +x_7 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_7, 0, x_6); +x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_with__trailing___rarg___lambda__1), 2, 0); +x_9 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_with__trailing___spec__1___rarg), 4, 1); +lean::closure_set(x_9, 0, x_8); +x_10 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__1), 6, 2); +lean::closure_set(x_10, 0, x_4); +lean::closure_set(x_10, 1, x_7); +lean::inc(x_9); +x_12 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg), 5, 2); +lean::closure_set(x_12, 0, x_9); +lean::closure_set(x_12, 1, x_10); +x_13 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__2), 4, 0); +lean::inc(x_9); +x_15 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg), 5, 2); +lean::closure_set(x_15, 0, x_9); +lean::closure_set(x_15, 1, x_13); +x_16 = l_lean_id__end__escape; +x_17 = lean::unbox_uint32(x_16); +x_18 = lean::string_push(x_0, x_17); +lean::inc(x_18); +x_20 = l_string_quote(x_18); +x_21 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_21, 0, x_20); +x_22 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__1), 6, 2); +lean::closure_set(x_22, 0, x_18); +lean::closure_set(x_22, 1, x_21); +lean::inc(x_9); +x_24 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg), 5, 2); +lean::closure_set(x_24, 0, x_9); +lean::closure_set(x_24, 1, x_22); +x_25 = lean::box(0); +lean::inc(x_25); +x_27 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_27, 0, x_24); +lean::cnstr_set(x_27, 1, x_25); +x_28 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_28, 0, x_15); +lean::cnstr_set(x_28, 1, x_27); +x_29 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_29, 0, x_12); +lean::cnstr_set(x_29, 1, x_28); +x_30 = l_lean_parser_detail__ident__part__escaped; +lean::inc(x_30); +x_32 = 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_32, 0, x_30); +lean::closure_set(x_32, 1, x_29); +x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__3), 4, 0); +x_34 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_with__trailing___spec__2___rarg), 5, 2); +lean::closure_set(x_34, 0, x_9); +lean::closure_set(x_34, 1, x_33); +lean::inc(x_25); +x_36 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_36, 0, x_34); +lean::cnstr_set(x_36, 1, x_25); +x_37 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_37, 0, x_32); +lean::cnstr_set(x_37, 1, x_36); +x_38 = lean::mk_nat_obj(0u); +x_39 = lean::alloc_closure(reinterpret_cast(l_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_39, 0, x_37); +lean::closure_set(x_39, 1, x_38); +x_40 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_40, 0, x_39); +lean::cnstr_set(x_40, 1, x_25); +x_41 = l_lean_parser_basic__parser__m_monad; +x_42 = l_lean_parser_basic__parser__m_monad__except; +x_43 = l_lean_parser_basic__parser__m_lean_parser_monad__parsec; +x_44 = l_lean_parser_basic__parser__m_alternative; +x_45 = l_lean_parser_detail__ident__part; +x_46 = l_lean_parser_detail__ident__part_has__view; +lean::inc(x_46); +lean::inc(x_45); +lean::inc(x_44); +lean::inc(x_43); +lean::inc(x_42); +lean::inc(x_41); +x_53 = l_lean_parser_combinators_node_view___rarg(x_41, x_42, x_43, x_44, x_45, x_40, x_46); +return x_53; +} +} +obj* l_lean_parser_detail__ident__part_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) { +_start: +{ +obj* x_6; obj* x_7; obj* x_9; obj* x_11; +x_6 = l_lean_parser_monad__parsec_str__core___at___private_init_lean_parser_token_1__finish__comment__block__aux___main___spec__3(x_0, x_1, x_3, x_4, x_5); +x_7 = lean::cnstr_get(x_6, 0); +lean::inc(x_7); +x_9 = lean::cnstr_get(x_6, 1); +lean::inc(x_9); +if (lean::is_shared(x_6)) { + lean::dec(x_6); + x_11 = lean::box(0); +} else { + lean::cnstr_release(x_6, 0); + lean::cnstr_release(x_6, 1); + x_11 = x_6; +} +if (lean::obj_tag(x_7) == 0) +{ +obj* x_12; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; +x_12 = lean::cnstr_get(x_7, 1); +lean::inc(x_12); +x_14 = lean::cnstr_get(x_7, 2); +lean::inc(x_14); +if (lean::is_shared(x_7)) { + lean::dec(x_7); + x_16 = lean::box(0); +} else { + lean::cnstr_release(x_7, 0); + lean::cnstr_release(x_7, 1); + lean::cnstr_release(x_7, 2); + x_16 = x_7; +} +lean::inc(x_12); +x_18 = l_lean_parser_mk__raw__res(x_2, x_12); +x_19 = l_lean_parser_finish__comment__block___closed__2; +lean::inc(x_19); +if (lean::is_scalar(x_16)) { + x_21 = lean::alloc_cnstr(0, 3, 0); +} else { + x_21 = x_16; +} +lean::cnstr_set(x_21, 0, x_18); +lean::cnstr_set(x_21, 1, x_12); +lean::cnstr_set(x_21, 2, x_19); +x_22 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_14, x_21); +if (lean::is_scalar(x_11)) { + x_23 = lean::alloc_cnstr(0, 2, 0); +} else { + x_23 = x_11; +} +lean::cnstr_set(x_23, 0, x_22); +lean::cnstr_set(x_23, 1, x_9); +return x_23; +} +else +{ +obj* x_25; uint8 x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; +lean::dec(x_2); +x_25 = lean::cnstr_get(x_7, 0); +lean::inc(x_25); +x_27 = lean::cnstr_get_scalar(x_7, sizeof(void*)*1); +if (lean::is_shared(x_7)) { + lean::dec(x_7); + x_28 = lean::box(0); +} else { + lean::cnstr_release(x_7, 0); + x_28 = x_7; +} +if (lean::is_scalar(x_28)) { + x_29 = lean::alloc_cnstr(1, 1, 1); +} else { + x_29 = x_28; +} +lean::cnstr_set(x_29, 0, x_25); +lean::cnstr_set_scalar(x_29, sizeof(void*)*1, x_27); +x_30 = x_29; +if (lean::is_scalar(x_11)) { + x_31 = lean::alloc_cnstr(0, 2, 0); +} else { + x_31 = x_11; +} +lean::cnstr_set(x_31, 0, x_30); +lean::cnstr_set(x_31, 1, x_9); +return x_31; +} +} +} +obj* l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +obj* x_4; obj* x_5; obj* x_7; obj* x_9; +x_4 = l_lean_parser_monad__parsec_take__while1___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__1(x_1, x_2, x_3); +x_5 = lean::cnstr_get(x_4, 0); +lean::inc(x_5); +x_7 = lean::cnstr_get(x_4, 1); +lean::inc(x_7); +if (lean::is_shared(x_4)) { + lean::dec(x_4); + x_9 = lean::box(0); +} else { + lean::cnstr_release(x_4, 0); + lean::cnstr_release(x_4, 1); + x_9 = x_4; +} +if (lean::obj_tag(x_5) == 0) +{ +obj* x_10; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; +x_10 = lean::cnstr_get(x_5, 1); +lean::inc(x_10); +x_12 = lean::cnstr_get(x_5, 2); +lean::inc(x_12); +if (lean::is_shared(x_5)) { + lean::dec(x_5); + x_14 = lean::box(0); +} else { + lean::cnstr_release(x_5, 0); + lean::cnstr_release(x_5, 1); + lean::cnstr_release(x_5, 2); + x_14 = x_5; +} +lean::inc(x_10); +x_16 = l_lean_parser_mk__raw__res(x_0, x_10); +x_17 = l_lean_parser_finish__comment__block___closed__2; +lean::inc(x_17); +if (lean::is_scalar(x_14)) { + x_19 = lean::alloc_cnstr(0, 3, 0); +} else { + x_19 = x_14; +} +lean::cnstr_set(x_19, 0, x_16); +lean::cnstr_set(x_19, 1, x_10); +lean::cnstr_set(x_19, 2, x_17); +x_20 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_12, x_19); +if (lean::is_scalar(x_9)) { + x_21 = lean::alloc_cnstr(0, 2, 0); +} else { + x_21 = x_9; +} +lean::cnstr_set(x_21, 0, x_20); +lean::cnstr_set(x_21, 1, x_7); +return x_21; +} +else +{ +obj* x_23; uint8 x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; +lean::dec(x_0); +x_23 = lean::cnstr_get(x_5, 0); +lean::inc(x_23); +x_25 = lean::cnstr_get_scalar(x_5, sizeof(void*)*1); +if (lean::is_shared(x_5)) { + lean::dec(x_5); + x_26 = lean::box(0); +} else { + lean::cnstr_release(x_5, 0); + x_26 = x_5; +} +if (lean::is_scalar(x_26)) { + x_27 = lean::alloc_cnstr(1, 1, 1); +} else { + x_27 = x_26; +} +lean::cnstr_set(x_27, 0, x_23); +lean::cnstr_set_scalar(x_27, sizeof(void*)*1, x_25); +x_28 = x_27; +if (lean::is_scalar(x_9)) { + x_29 = lean::alloc_cnstr(0, 2, 0); +} else { + x_29 = x_9; +} +lean::cnstr_set(x_29, 0, x_28); +lean::cnstr_set(x_29, 1, x_7); +return x_29; +} +} +} +obj* l_lean_parser_detail__ident__part_parser_lean_parser_has__view___lambda__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +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; +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) +{ +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; +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); +} else { + lean::cnstr_release(x_22, 0); + x_38 = x_22; +} +if (lean::is_scalar(x_38)) { + x_39 = lean::alloc_cnstr(1, 1, 1); +} else { + x_39 = x_38; +} +lean::cnstr_set(x_39, 0, x_35); +lean::cnstr_set_scalar(x_39, sizeof(void*)*1, x_37); +x_40 = x_39; +x_4 = x_40; +x_5 = x_17; +goto lbl_6; +} +} +else +{ +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) +{ +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; +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); +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) +{ +obj* x_62; obj* x_64; obj* x_67; obj* x_68; obj* x_70; obj* x_73; +x_62 = lean::cnstr_get(x_61, 1); +lean::inc(x_62); +x_64 = lean::cnstr_get(x_61, 2); +lean::inc(x_64); +lean::dec(x_61); +x_67 = l_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::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; +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); +} else { + lean::cnstr_release(x_61, 0); + x_77 = x_61; +} +if (lean::is_scalar(x_77)) { + x_78 = lean::alloc_cnstr(1, 1, 1); +} else { + x_78 = x_77; +} +lean::cnstr_set(x_78, 0, x_74); +lean::cnstr_set_scalar(x_78, sizeof(void*)*1, x_76); +x_79 = x_78; +x_4 = x_79; +x_5 = x_56; +goto lbl_6; +} +} +else +{ +obj* x_81; obj* x_82; obj* x_83; obj* x_85; obj* x_88; obj* x_89; +lean::dec(x_1); +x_81 = lean::string_iterator_next(x_2); +x_82 = l_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); +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; +goto lbl_6; +} +} +lbl_6: +{ +if (lean::obj_tag(x_4) == 0) +{ +obj* x_90; obj* x_92; obj* x_94; obj* x_96; obj* x_97; obj* x_99; obj* x_100; obj* x_101; +x_90 = lean::cnstr_get(x_4, 1); +lean::inc(x_90); +x_92 = lean::cnstr_get(x_4, 2); +lean::inc(x_92); +if (lean::is_shared(x_4)) { + lean::dec(x_4); + x_94 = lean::box(0); +} else { + lean::cnstr_release(x_4, 0); + lean::cnstr_release(x_4, 1); + lean::cnstr_release(x_4, 2); + x_94 = x_4; +} +lean::inc(x_90); +x_96 = l_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); +} else { + x_99 = x_94; +} +lean::cnstr_set(x_99, 0, x_96); +lean::cnstr_set(x_99, 1, x_90); +lean::cnstr_set(x_99, 2, x_97); +x_100 = l_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; +} +else +{ +obj* x_103; uint8 x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; +lean::dec(x_0); +x_103 = lean::cnstr_get(x_4, 0); +lean::inc(x_103); +x_105 = lean::cnstr_get_scalar(x_4, sizeof(void*)*1); +if (lean::is_shared(x_4)) { + lean::dec(x_4); + x_106 = lean::box(0); +} else { + lean::cnstr_release(x_4, 0); + x_106 = x_4; +} +if (lean::is_scalar(x_106)) { + x_107 = lean::alloc_cnstr(1, 1, 1); +} else { + x_107 = x_106; +} +lean::cnstr_set(x_107, 0, x_103); +lean::cnstr_set_scalar(x_107, sizeof(void*)*1, x_105); +x_108 = x_107; +x_109 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_109, 0, x_108); +lean::cnstr_set(x_109, 1, x_5); +return x_109; +} +} +} +} +obj* l_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) { +_start: +{ +uint32 x_4; obj* x_5; +x_4 = lean::unbox_uint32(x_0); +x_5 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__2(x_4, x_1, x_2, x_3); +return x_5; +} +} +obj* l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__6___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +uint32 x_4; obj* x_5; +x_4 = lean::unbox_uint32(x_0); +x_5 = l_lean_parser_monad__parsec_take__while__cont___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__6(x_4, x_1, x_2, x_3); +return x_5; +} +} obj* l___private_init_lean_parser_parsec_4__take__while__aux___main___at_lean_parser_detail__ident__part_parser___spec__3(obj* x_0, obj* x_1, obj* x_2) { _start: { @@ -8493,7 +8493,7 @@ lean::cnstr_set(x_29, 0, x_12); lean::cnstr_set(x_29, 1, x_28); x_30 = l_lean_parser_detail__ident__part__escaped; lean::inc(x_30); -x_32 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8), 5, 2); +x_32 = 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_32, 0, x_30); lean::closure_set(x_32, 1, x_29); x_33 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__part_parser___lambda__2), 4, 0); @@ -8508,7 +8508,7 @@ x_37 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_37, 0, x_32); lean::cnstr_set(x_37, 1, x_36); x_38 = lean::mk_nat_obj(0u); -x_39 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_choice__aux___main___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__16), 5, 2); +x_39 = 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_39, 0, x_37); lean::closure_set(x_39, 1, x_38); x_40 = lean::alloc_cnstr(1, 2, 0); @@ -8525,7 +8525,7 @@ x_3 = l_lean_parser_detail__ident__part; x_4 = l_lean_parser_detail__ident__part_parser___closed__1; lean::inc(x_4); lean::inc(x_3); -x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(x_3, x_4, x_0, x_1, x_2); +x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(x_3, x_4, x_0, x_1, x_2); return x_7; } } @@ -9108,7 +9108,7 @@ lean::inc(x_0); return x_0; } } -obj* l_reader__t_lift___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__1___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +obj* l_reader__t_lift___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__1___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { obj* x_6; @@ -9117,16 +9117,16 @@ x_6 = lean::apply_3(x_0, x_2, x_3, x_4); return x_6; } } -obj* l_reader__t_lift___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__1(obj* x_0) { +obj* l_reader__t_lift___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__1(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__1___rarg), 5, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__1___rarg), 5, 0); return x_2; } } -obj* l_lean_parser_monad__parsec_str__core___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_monad__parsec_str__core___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { uint8 x_9; @@ -9204,7 +9204,7 @@ return x_40; } } } -obj* l_reader__t_bind___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__3___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_reader__t_bind___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_8; obj* x_9; obj* x_11; obj* x_13; @@ -9284,17 +9284,17 @@ return x_38; } } } -obj* l_reader__t_bind___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__3(obj* x_0, obj* x_1) { +obj* l_reader__t_bind___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3(obj* x_0, obj* x_1) { _start: { obj* x_4; lean::dec(x_1); lean::dec(x_0); -x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__3___rarg), 6, 0); +x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg), 6, 0); return x_4; } } -obj* l_lean_parser_rec__t_recurse___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +obj* l_lean_parser_rec__t_recurse___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__4(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; @@ -9324,7 +9324,7 @@ lean::cnstr_set(x_14, 1, x_8); return x_14; } } -obj* l_list_mfoldl___main___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__6(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { +obj* l_list_mfoldl___main___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__6(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) { _start: { if (lean::obj_tag(x_2) == 0) @@ -9529,7 +9529,7 @@ lean::inc(x_76); x_78 = lean::cnstr_get(x_73, 2); lean::inc(x_78); lean::dec(x_73); -x_81 = l_list_mfoldl___main___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__6(x_0, x_74, x_17, x_3, x_4, x_76, x_21); +x_81 = l_list_mfoldl___main___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__6(x_0, x_74, x_17, x_3, x_4, x_76, x_21); x_82 = lean::cnstr_get(x_81, 0); lean::inc(x_82); x_84 = lean::cnstr_get(x_81, 1); @@ -9619,13 +9619,13 @@ return x_112; } } } -obj* l_lean_parser_combinators_node___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__5(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_combinators_node___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__5(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_13; x_6 = lean::box(0); lean::inc(x_0); -x_8 = l_list_mfoldl___main___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__6(x_0, x_6, x_1, x_2, x_3, x_4, x_5); +x_8 = l_list_mfoldl___main___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__6(x_0, x_6, x_1, x_2, x_3, x_4, x_5); x_9 = lean::cnstr_get(x_8, 0); lean::inc(x_9); x_11 = lean::cnstr_get(x_8, 1); @@ -9711,7 +9711,7 @@ return x_35; } } } -obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__8___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__8___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { _start: { obj* x_10; obj* x_11; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; @@ -9734,16 +9734,16 @@ lean::cnstr_set(x_15, 1, x_7); return x_15; } } -obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__8(obj* x_0) { +obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__8(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__8___rarg), 8, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__8___rarg), 8, 0); return x_2; } } -obj* l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__7(uint32 x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +obj* l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__7(uint32 x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { uint8 x_5; @@ -9757,7 +9757,7 @@ 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__view___spec__8___rarg(x_7, x_8, x_6, x_6, x_1, x_2, x_3, x_4); +x_12 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__8___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); @@ -9804,7 +9804,7 @@ x_34 = lean::box(0); x_35 = l_mjoin___rarg___closed__1; lean::inc(x_34); lean::inc(x_35); -x_38 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__8___rarg(x_33, x_35, x_34, x_34, x_1, x_2, x_3, x_4); +x_38 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__8___rarg(x_33, x_35, x_34, x_34, x_1, x_2, x_3, x_4); x_39 = lean::cnstr_get(x_38, 0); lean::inc(x_39); x_41 = lean::cnstr_get(x_38, 1); @@ -9848,7 +9848,7 @@ return x_53; } } } -obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__9___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { +obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__9___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6, obj* x_7) { _start: { obj* x_10; obj* x_11; uint8 x_12; obj* x_13; obj* x_14; obj* x_15; @@ -9871,23 +9871,23 @@ lean::cnstr_set(x_15, 1, x_7); return x_15; } } -obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__9(obj* x_0) { +obj* l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__9(obj* x_0) { _start: { obj* x_2; lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__9___rarg), 8, 0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__9___rarg), 8, 0); return x_2; } } -obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__10(uint32 x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__10(uint32 x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; lean::inc(x_3); lean::inc(x_2); lean::inc(x_1); -x_11 = l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__7(x_0, x_1, x_2, x_3, x_4); +x_11 = l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__7(x_0, x_1, x_2, x_3, x_4); x_12 = lean::cnstr_get(x_11, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_11, 1); @@ -9914,7 +9914,7 @@ x_23 = lean::unbox_uint32(x_22); lean::inc(x_17); lean::inc(x_2); lean::inc(x_1); -x_27 = l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__7(x_23, x_1, x_2, x_17, x_14); +x_27 = l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__7(x_23, x_1, x_2, x_17, x_14); x_28 = lean::cnstr_get(x_27, 0); lean::inc(x_28); x_30 = lean::cnstr_get(x_27, 1); @@ -9953,7 +9953,7 @@ x_46 = l_mjoin___rarg___closed__1; lean::inc(x_44); lean::inc(x_46); lean::inc(x_45); -x_50 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__9___rarg(x_45, x_46, x_44, x_44, x_1, x_2, x_17, x_30); +x_50 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__9___rarg(x_45, x_46, x_44, x_44, x_1, x_2, x_17, x_30); x_51 = lean::cnstr_get(x_50, 0); lean::inc(x_51); x_53 = lean::cnstr_get(x_50, 1); @@ -9987,7 +9987,270 @@ x_70 = lean::box(0); x_71 = l_mjoin___rarg___closed__1; lean::inc(x_70); lean::inc(x_71); -x_74 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__9___rarg(x_69, x_71, x_70, x_70, x_1, x_2, x_17, x_30); +x_74 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__9___rarg(x_69, x_71, x_70, x_70, x_1, x_2, x_17, x_30); +x_75 = lean::cnstr_get(x_74, 0); +lean::inc(x_75); +x_77 = lean::cnstr_get(x_74, 1); +lean::inc(x_77); +lean::dec(x_74); +x_80 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_80); +x_82 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_80, x_75); +x_83 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_38, x_82); +x_84 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_83); +x_5 = x_84; +x_6 = x_77; +goto lbl_7; +} +else +{ +obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; +lean::dec(x_1); +lean::dec(x_2); +lean::dec(x_38); +x_88 = lean::string_iterator_next(x_17); +x_89 = lean::box(0); +x_90 = lean::box_uint32(x_61); +if (lean::is_scalar(x_21)) { + x_91 = lean::alloc_cnstr(0, 3, 0); +} else { + x_91 = x_21; +} +lean::cnstr_set(x_91, 0, x_90); +lean::cnstr_set(x_91, 1, x_88); +lean::cnstr_set(x_91, 2, x_89); +x_92 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_91); +x_5 = x_92; +x_6 = x_30; +goto lbl_7; +} +} +} +else +{ +obj* x_98; +lean::dec(x_17); +lean::dec(x_21); +lean::dec(x_1); +lean::dec(x_2); +lean::dec(x_38); +x_98 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_28); +x_5 = x_98; +x_6 = x_30; +goto lbl_7; +} +} +} +else +{ +obj* x_101; uint8 x_103; obj* x_104; obj* x_105; obj* x_106; +lean::dec(x_1); +lean::dec(x_2); +x_101 = lean::cnstr_get(x_12, 0); +lean::inc(x_101); +x_103 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); +if (lean::is_shared(x_12)) { + lean::dec(x_12); + x_104 = lean::box(0); +} else { + lean::cnstr_release(x_12, 0); + x_104 = x_12; +} +if (lean::is_scalar(x_104)) { + x_105 = lean::alloc_cnstr(1, 1, 1); +} else { + x_105 = x_104; +} +lean::cnstr_set(x_105, 0, x_101); +lean::cnstr_set_scalar(x_105, sizeof(void*)*1, x_103); +x_106 = x_105; +x_5 = x_106; +x_6 = x_14; +goto lbl_7; +} +lbl_7: +{ +if (lean::obj_tag(x_5) == 0) +{ +obj* x_107; obj* x_109; obj* x_110; obj* x_112; obj* x_113; +x_107 = lean::cnstr_get(x_5, 0); +lean::inc(x_107); +if (lean::is_shared(x_5)) { + lean::dec(x_5); + x_109 = lean::box(0); +} else { + lean::cnstr_release(x_5, 0); + lean::cnstr_release(x_5, 1); + lean::cnstr_release(x_5, 2); + x_109 = x_5; +} +x_110 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; +lean::inc(x_110); +if (lean::is_scalar(x_109)) { + x_112 = lean::alloc_cnstr(0, 3, 0); +} else { + x_112 = x_109; +} +lean::cnstr_set(x_112, 0, x_107); +lean::cnstr_set(x_112, 1, x_3); +lean::cnstr_set(x_112, 2, x_110); +x_113 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_113, 0, x_112); +lean::cnstr_set(x_113, 1, x_6); +return x_113; +} +else +{ +obj* x_115; +lean::dec(x_3); +x_115 = lean::alloc_cnstr(0, 2, 0); +lean::cnstr_set(x_115, 0, x_5); +lean::cnstr_set(x_115, 1, x_6); +return x_115; +} +} +} +} +obj* _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; +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; +} +} +obj* l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +_start: +{ +uint32 x_5; obj* x_6; +x_5 = lean::unbox_uint32(x_0); +x_6 = l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__7(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__10___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +_start: +{ +uint32 x_5; obj* x_6; +x_5 = lean::unbox_uint32(x_0); +x_6 = l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__10(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__1(uint32 x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +_start: +{ +obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; +lean::inc(x_3); +lean::inc(x_2); +lean::inc(x_1); +x_11 = l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__7(x_0, x_1, x_2, x_3, x_4); +x_12 = lean::cnstr_get(x_11, 0); +lean::inc(x_12); +x_14 = lean::cnstr_get(x_11, 1); +lean::inc(x_14); +lean::dec(x_11); +if (lean::obj_tag(x_12) == 0) +{ +obj* x_17; obj* x_19; obj* x_21; obj* x_22; uint32 x_23; obj* x_27; obj* x_28; obj* x_30; +x_17 = lean::cnstr_get(x_12, 1); +lean::inc(x_17); +x_19 = lean::cnstr_get(x_12, 2); +lean::inc(x_19); +if (lean::is_shared(x_12)) { + lean::dec(x_12); + x_21 = lean::box(0); +} else { + lean::cnstr_release(x_12, 0); + lean::cnstr_release(x_12, 1); + lean::cnstr_release(x_12, 2); + x_21 = x_12; +} +x_22 = l_lean_id__begin__escape; +x_23 = lean::unbox_uint32(x_22); +lean::inc(x_17); +lean::inc(x_2); +lean::inc(x_1); +x_27 = l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__7(x_23, x_1, x_2, x_17, x_14); +x_28 = lean::cnstr_get(x_27, 0); +lean::inc(x_28); +x_30 = lean::cnstr_get(x_27, 1); +lean::inc(x_30); +lean::dec(x_27); +if (lean::obj_tag(x_28) == 0) +{ +obj* x_37; +lean::dec(x_17); +lean::dec(x_21); +lean::dec(x_1); +lean::dec(x_2); +x_37 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_28); +x_5 = x_37; +x_6 = x_30; +goto lbl_7; +} +else +{ +obj* x_38; uint8 x_40; +x_38 = lean::cnstr_get(x_28, 0); +lean::inc(x_38); +x_40 = lean::cnstr_get_scalar(x_28, sizeof(void*)*1); +if (x_40 == 0) +{ +uint8 x_42; +lean::dec(x_28); +x_42 = lean::string_iterator_has_next(x_17); +if (x_42 == 0) +{ +obj* x_44; obj* x_45; obj* x_46; obj* x_50; obj* x_51; obj* x_53; obj* x_56; obj* x_58; obj* x_59; obj* x_60; +lean::dec(x_21); +x_44 = lean::box(0); +x_45 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; +x_46 = l_mjoin___rarg___closed__1; +lean::inc(x_44); +lean::inc(x_46); +lean::inc(x_45); +x_50 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__9___rarg(x_45, x_46, x_44, x_44, x_1, x_2, x_17, x_30); +x_51 = lean::cnstr_get(x_50, 0); +lean::inc(x_51); +x_53 = lean::cnstr_get(x_50, 1); +lean::inc(x_53); +lean::dec(x_50); +x_56 = l_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_orelse__mk__res___rarg(x_38, x_58); +x_60 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_59); +x_5 = x_60; +x_6 = x_53; +goto lbl_7; +} +else +{ +uint32 x_61; uint8 x_62; +x_61 = lean::string_iterator_curr(x_17); +x_62 = l_lean_is__id__first(x_61); +if (x_62 == 0) +{ +obj* x_64; obj* x_65; obj* x_67; obj* x_69; obj* x_70; obj* x_71; obj* x_74; obj* x_75; obj* x_77; obj* x_80; obj* x_82; obj* x_83; obj* x_84; +lean::dec(x_21); +x_64 = l_char_quote__core(x_61); +x_65 = l_char_has__repr___closed__1; +lean::inc(x_65); +x_67 = lean::string_append(x_65, x_64); +lean::dec(x_64); +x_69 = lean::string_append(x_67, x_65); +x_70 = lean::box(0); +x_71 = l_mjoin___rarg___closed__1; +lean::inc(x_70); +lean::inc(x_71); +x_74 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__9___rarg(x_69, x_71, x_70, x_70, x_1, x_2, x_17, x_30); x_75 = lean::cnstr_get(x_74, 0); lean::inc(x_75); x_77 = lean::cnstr_get(x_74, 1); @@ -10140,16 +10403,16 @@ lean::closure_set(x_20, 0, x_19); x_21 = lean::alloc_closure(reinterpret_cast(l_lean_parser_with__trailing___rarg___lambda__1), 2, 0); x_22 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_with__trailing___spec__1___rarg), 4, 1); lean::closure_set(x_22, 0, x_21); -x_23 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__1___rarg), 5, 1); +x_23 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__1___rarg), 5, 1); lean::closure_set(x_23, 0, x_22); x_24 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___lambda__1), 6, 1); lean::closure_set(x_24, 0, x_20); -x_25 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__3___rarg), 6, 2); +x_25 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg), 6, 2); lean::closure_set(x_25, 0, x_23); lean::closure_set(x_25, 1, x_24); x_26 = lean::box(0); lean::inc(x_26); -x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__4), 5, 1); +x_28 = lean::alloc_closure(reinterpret_cast(l_lean_parser_rec__t_recurse___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__4), 5, 1); lean::closure_set(x_28, 0, x_26); x_29 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_29, 0, x_28); @@ -10160,7 +10423,7 @@ lean::cnstr_set(x_30, 1, x_29); x_31 = l_lean_parser_detail__ident__suffix; lean::inc(x_30); lean::inc(x_31); -x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__5), 6, 2); +x_34 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_node___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__5), 6, 2); lean::closure_set(x_34, 0, x_31); lean::closure_set(x_34, 1, x_30); x_35 = l_lean_parser_detail__ident__suffix_has__view; @@ -10226,7 +10489,7 @@ _start: obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_13; x_6 = l_lean_name_to__string___closed__1; lean::inc(x_6); -x_8 = l_lean_parser_monad__parsec_str__core___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__2(x_6, x_0, x_2, x_3, x_4, x_5); +x_8 = l_lean_parser_monad__parsec_str__core___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__2(x_6, x_0, x_2, x_3, x_4, x_5); x_9 = lean::cnstr_get(x_8, 0); lean::inc(x_9); x_11 = lean::cnstr_get(x_8, 1); @@ -10314,7 +10577,7 @@ obj* l_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___lambda__ _start: { obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_11; obj* x_12; -x_5 = l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__10(x_0, x_1, x_2, x_3, x_4); +x_5 = l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__1(x_0, x_1, x_2, x_3, x_4); x_6 = lean::cnstr_get(x_5, 0); lean::inc(x_6); x_8 = lean::cnstr_get(x_5, 1); @@ -10338,21 +10601,12 @@ lean::cnstr_set(x_12, 1, x_8); return x_12; } } -obj* l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__7___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { uint32 x_5; obj* x_6; x_5 = lean::unbox_uint32(x_0); -x_6 = l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__7(x_5, x_1, x_2, x_3, x_4); -return x_6; -} -} -obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__10___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -uint32 x_5; obj* x_6; -x_5 = lean::unbox_uint32(x_0); -x_6 = l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__10(x_5, x_1, x_2, x_3, x_4); +x_6 = l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__1(x_5, x_1, x_2, x_3, x_4); return x_6; } } @@ -10365,260 +10619,6 @@ x_6 = l_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___lambda_ return x_6; } } -obj* l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__1(uint32 x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { -_start: -{ -obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; -lean::inc(x_3); -lean::inc(x_2); -lean::inc(x_1); -x_11 = l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__7(x_0, x_1, x_2, x_3, x_4); -x_12 = lean::cnstr_get(x_11, 0); -lean::inc(x_12); -x_14 = lean::cnstr_get(x_11, 1); -lean::inc(x_14); -lean::dec(x_11); -if (lean::obj_tag(x_12) == 0) -{ -obj* x_17; obj* x_19; obj* x_21; obj* x_22; uint32 x_23; obj* x_27; obj* x_28; obj* x_30; -x_17 = lean::cnstr_get(x_12, 1); -lean::inc(x_17); -x_19 = lean::cnstr_get(x_12, 2); -lean::inc(x_19); -if (lean::is_shared(x_12)) { - lean::dec(x_12); - x_21 = lean::box(0); -} else { - lean::cnstr_release(x_12, 0); - lean::cnstr_release(x_12, 1); - lean::cnstr_release(x_12, 2); - x_21 = x_12; -} -x_22 = l_lean_id__begin__escape; -x_23 = lean::unbox_uint32(x_22); -lean::inc(x_17); -lean::inc(x_2); -lean::inc(x_1); -x_27 = l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__7(x_23, x_1, x_2, x_17, x_14); -x_28 = lean::cnstr_get(x_27, 0); -lean::inc(x_28); -x_30 = lean::cnstr_get(x_27, 1); -lean::inc(x_30); -lean::dec(x_27); -if (lean::obj_tag(x_28) == 0) -{ -obj* x_37; -lean::dec(x_17); -lean::dec(x_21); -lean::dec(x_1); -lean::dec(x_2); -x_37 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_28); -x_5 = x_37; -x_6 = x_30; -goto lbl_7; -} -else -{ -obj* x_38; uint8 x_40; -x_38 = lean::cnstr_get(x_28, 0); -lean::inc(x_38); -x_40 = lean::cnstr_get_scalar(x_28, sizeof(void*)*1); -if (x_40 == 0) -{ -uint8 x_42; -lean::dec(x_28); -x_42 = lean::string_iterator_has_next(x_17); -if (x_42 == 0) -{ -obj* x_44; obj* x_45; obj* x_46; obj* x_50; obj* x_51; obj* x_53; obj* x_56; obj* x_58; obj* x_59; obj* x_60; -lean::dec(x_21); -x_44 = lean::box(0); -x_45 = l_lean_parser_monad__parsec_eoi__error___rarg___closed__1; -x_46 = l_mjoin___rarg___closed__1; -lean::inc(x_44); -lean::inc(x_46); -lean::inc(x_45); -x_50 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__9___rarg(x_45, x_46, x_44, x_44, x_1, x_2, x_17, x_30); -x_51 = lean::cnstr_get(x_50, 0); -lean::inc(x_51); -x_53 = lean::cnstr_get(x_50, 1); -lean::inc(x_53); -lean::dec(x_50); -x_56 = l_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_orelse__mk__res___rarg(x_38, x_58); -x_60 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_59); -x_5 = x_60; -x_6 = x_53; -goto lbl_7; -} -else -{ -uint32 x_61; uint8 x_62; -x_61 = lean::string_iterator_curr(x_17); -x_62 = l_lean_is__id__first(x_61); -if (x_62 == 0) -{ -obj* x_64; obj* x_65; obj* x_67; obj* x_69; obj* x_70; obj* x_71; obj* x_74; obj* x_75; obj* x_77; obj* x_80; obj* x_82; obj* x_83; obj* x_84; -lean::dec(x_21); -x_64 = l_char_quote__core(x_61); -x_65 = l_char_has__repr___closed__1; -lean::inc(x_65); -x_67 = lean::string_append(x_65, x_64); -lean::dec(x_64); -x_69 = lean::string_append(x_67, x_65); -x_70 = lean::box(0); -x_71 = l_mjoin___rarg___closed__1; -lean::inc(x_70); -lean::inc(x_71); -x_74 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__9___rarg(x_69, x_71, x_70, x_70, x_1, x_2, x_17, x_30); -x_75 = lean::cnstr_get(x_74, 0); -lean::inc(x_75); -x_77 = lean::cnstr_get(x_74, 1); -lean::inc(x_77); -lean::dec(x_74); -x_80 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_80); -x_82 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_80, x_75); -x_83 = l_lean_parser_parsec__t_orelse__mk__res___rarg(x_38, x_82); -x_84 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_83); -x_5 = x_84; -x_6 = x_77; -goto lbl_7; -} -else -{ -obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; -lean::dec(x_1); -lean::dec(x_2); -lean::dec(x_38); -x_88 = lean::string_iterator_next(x_17); -x_89 = lean::box(0); -x_90 = lean::box_uint32(x_61); -if (lean::is_scalar(x_21)) { - x_91 = lean::alloc_cnstr(0, 3, 0); -} else { - x_91 = x_21; -} -lean::cnstr_set(x_91, 0, x_90); -lean::cnstr_set(x_91, 1, x_88); -lean::cnstr_set(x_91, 2, x_89); -x_92 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_91); -x_5 = x_92; -x_6 = x_30; -goto lbl_7; -} -} -} -else -{ -obj* x_98; -lean::dec(x_17); -lean::dec(x_21); -lean::dec(x_1); -lean::dec(x_2); -lean::dec(x_38); -x_98 = l_lean_parser_parsec__t_bind__mk__res___rarg(x_19, x_28); -x_5 = x_98; -x_6 = x_30; -goto lbl_7; -} -} -} -else -{ -obj* x_101; uint8 x_103; obj* x_104; obj* x_105; obj* x_106; -lean::dec(x_1); -lean::dec(x_2); -x_101 = lean::cnstr_get(x_12, 0); -lean::inc(x_101); -x_103 = lean::cnstr_get_scalar(x_12, sizeof(void*)*1); -if (lean::is_shared(x_12)) { - lean::dec(x_12); - x_104 = lean::box(0); -} else { - lean::cnstr_release(x_12, 0); - x_104 = x_12; -} -if (lean::is_scalar(x_104)) { - x_105 = lean::alloc_cnstr(1, 1, 1); -} else { - x_105 = x_104; -} -lean::cnstr_set(x_105, 0, x_101); -lean::cnstr_set_scalar(x_105, sizeof(void*)*1, x_103); -x_106 = x_105; -x_5 = x_106; -x_6 = x_14; -goto lbl_7; -} -lbl_7: -{ -if (lean::obj_tag(x_5) == 0) -{ -obj* x_107; obj* x_109; obj* x_110; obj* x_112; obj* x_113; -x_107 = lean::cnstr_get(x_5, 0); -lean::inc(x_107); -if (lean::is_shared(x_5)) { - lean::dec(x_5); - x_109 = lean::box(0); -} else { - lean::cnstr_release(x_5, 0); - lean::cnstr_release(x_5, 1); - lean::cnstr_release(x_5, 2); - x_109 = x_5; -} -x_110 = l_lean_parser_parsec_result_mk__eps___rarg___closed__1; -lean::inc(x_110); -if (lean::is_scalar(x_109)) { - x_112 = lean::alloc_cnstr(0, 3, 0); -} else { - x_112 = x_109; -} -lean::cnstr_set(x_112, 0, x_107); -lean::cnstr_set(x_112, 1, x_3); -lean::cnstr_set(x_112, 2, x_110); -x_113 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_113, 0, x_112); -lean::cnstr_set(x_113, 1, x_6); -return x_113; -} -else -{ -obj* x_115; -lean::dec(x_3); -x_115 = lean::alloc_cnstr(0, 2, 0); -lean::cnstr_set(x_115, 0, x_5); -lean::cnstr_set(x_115, 1, x_6); -return x_115; -} -} -} -} -obj* _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; -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; -} -} -obj* l_lean_parser_parsec__t_lookahead___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) { -_start: -{ -uint32 x_5; obj* x_6; -x_5 = lean::unbox_uint32(x_0); -x_6 = l_lean_parser_parsec__t_lookahead___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__1(x_5, x_1, x_2, x_3, x_4); -return x_6; -} -} 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, uint32 x_3, obj* x_4) { _start: { @@ -10626,7 +10626,7 @@ obj* x_5; obj* x_6; obj* x_11; obj* x_12; obj* x_14; lean::inc(x_2); lean::inc(x_1); lean::inc(x_0); -x_11 = l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__7(x_3, x_0, x_1, x_2, x_4); +x_11 = l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__7(x_3, x_0, x_1, x_2, x_4); x_12 = lean::cnstr_get(x_11, 0); lean::inc(x_12); x_14 = lean::cnstr_get(x_11, 1); @@ -10653,7 +10653,7 @@ x_23 = lean::unbox_uint32(x_22); lean::inc(x_17); lean::inc(x_1); lean::inc(x_0); -x_27 = l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__7(x_23, x_0, x_1, x_17, x_14); +x_27 = l_lean_parser_monad__parsec_ch___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__7(x_23, x_0, x_1, x_17, x_14); x_28 = lean::cnstr_get(x_27, 0); lean::inc(x_28); x_30 = lean::cnstr_get(x_27, 1); @@ -10692,7 +10692,7 @@ x_46 = l_mjoin___rarg___closed__1; lean::inc(x_44); lean::inc(x_46); lean::inc(x_45); -x_50 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__9___rarg(x_45, x_46, x_44, x_44, x_0, x_1, x_17, x_30); +x_50 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__9___rarg(x_45, x_46, x_44, x_44, x_0, x_1, x_17, x_30); x_51 = lean::cnstr_get(x_50, 0); lean::inc(x_51); x_53 = lean::cnstr_get(x_50, 1); @@ -10726,7 +10726,7 @@ x_70 = lean::box(0); x_71 = l_mjoin___rarg___closed__1; lean::inc(x_70); lean::inc(x_71); -x_74 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__9___rarg(x_69, x_71, x_70, x_70, x_0, x_1, x_17, x_30); +x_74 = l_lean_parser_monad__parsec_error___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__9___rarg(x_69, x_71, x_70, x_70, x_0, x_1, x_17, x_30); x_75 = lean::cnstr_get(x_74, 0); lean::inc(x_75); x_77 = lean::cnstr_get(x_74, 1); @@ -10861,16 +10861,16 @@ lean::closure_set(x_2, 0, x_1); x_3 = lean::alloc_closure(reinterpret_cast(l_lean_parser_with__trailing___rarg___lambda__1), 2, 0); x_4 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_with__trailing___spec__1___rarg), 4, 1); lean::closure_set(x_4, 0, x_3); -x_5 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__1___rarg), 5, 1); +x_5 = lean::alloc_closure(reinterpret_cast(l_reader__t_lift___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__1___rarg), 5, 1); lean::closure_set(x_5, 0, x_4); x_6 = lean::alloc_closure(reinterpret_cast(l_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___lambda__1), 6, 1); lean::closure_set(x_6, 0, x_2); -x_7 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__3___rarg), 6, 2); +x_7 = lean::alloc_closure(reinterpret_cast(l_reader__t_bind___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__3___rarg), 6, 2); 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__view___spec__4), 5, 1); +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__4), 5, 1); lean::closure_set(x_10, 0, x_8); x_11 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_11, 0, x_10); @@ -10970,7 +10970,7 @@ x_42 = l_lean_parser_detail__ident__suffix; x_43 = l_lean_parser_detail__ident__suffix_parser___closed__1; lean::inc(x_43); lean::inc(x_42); -x_46 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__5(x_42, x_43, x_0, x_1, x_37, x_33); +x_46 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__5(x_42, x_43, x_0, x_1, x_37, x_33); x_47 = lean::cnstr_get(x_46, 0); lean::inc(x_47); x_49 = lean::cnstr_get(x_46, 1); @@ -11910,7 +11910,7 @@ x_4 = l_lean_parser_detail__ident; x_5 = l_lean_parser_detail__ident_x_27___closed__1; lean::inc(x_5); lean::inc(x_4); -x_8 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__5(x_4, x_5, x_0, x_1, x_2, x_3); +x_8 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__5(x_4, x_5, x_0, x_1, x_2, x_3); return x_8; } } @@ -12032,7 +12032,7 @@ x_6 = l_lean_parser_detail__ident; x_7 = l_lean_parser_detail__ident_x_27___closed__1; lean::inc(x_7); lean::inc(x_6); -x_10 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__view___spec__5(x_6, x_7, x_1, x_2, x_3, x_4); +x_10 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens___spec__5(x_6, x_7, x_1, x_2, x_3, x_4); return x_10; } } @@ -19352,7 +19352,7 @@ x_3 = l_lean_parser_number; x_4 = l_lean_parser_number_x_27___closed__1; lean::inc(x_4); lean::inc(x_3); -x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(x_3, x_4, x_0, x_1, x_2); +x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(x_3, x_4, x_0, x_1, x_2); return x_7; } } @@ -24111,7 +24111,7 @@ x_3 = l_lean_parser_string__lit; x_4 = l_lean_parser_string__lit_x_27___closed__1; lean::inc(x_4); lean::inc(x_3); -x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(x_3, x_4, x_0, x_1, x_2); +x_7 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(x_3, x_4, x_0, x_1, x_2); return x_7; } } @@ -24239,7 +24239,7 @@ lean::inc(x_1); lean::inc(x_0); lean::inc(x_4); lean::inc(x_3); -x_9 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(x_3, x_4, x_0, x_1, x_2); +x_9 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(x_3, x_4, x_0, x_1, x_2); x_10 = lean::cnstr_get(x_9, 0); lean::inc(x_10); x_12 = lean::cnstr_get(x_9, 1); @@ -24280,7 +24280,7 @@ x_22 = l_lean_parser_string__lit; x_23 = l_lean_parser_string__lit_x_27___closed__1; lean::inc(x_23); lean::inc(x_22); -x_26 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__view___spec__8(x_22, x_23, x_0, x_1, x_12); +x_26 = l_lean_parser_combinators_node___at_lean_parser_detail__ident__part_parser_lean_parser_has__tokens___spec__15(x_22, x_23, x_0, x_1, x_12); x_27 = lean::cnstr_get(x_26, 0); lean::inc(x_27); x_29 = lean::cnstr_get(x_26, 1); @@ -32233,7 +32233,7 @@ x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__or__iden return x_2; } } -obj* l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { +obj* l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) { _start: { obj* x_9; obj* x_10; obj* x_12; obj* x_14; obj* x_16; @@ -32509,7 +32509,7 @@ return x_131; } } } -obj* l_list_foldl___main___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { +obj* l_list_foldl___main___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__3(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) { _start: { if (lean::obj_tag(x_1) == 0) @@ -32536,7 +32536,7 @@ goto _start; } } } -obj* l_lean_parser_combinators_any__of___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_combinators_any__of___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__2(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { if (lean::obj_tag(x_0) == 0) @@ -32560,64 +32560,11 @@ lean::inc(x_12); x_14 = lean::cnstr_get(x_0, 1); lean::inc(x_14); lean::dec(x_0); -x_17 = l_list_foldl___main___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__3(x_12, x_14, x_1, x_2, x_3); +x_17 = l_list_foldl___main___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__3(x_12, x_14, x_1, x_2, x_3); return x_17; } } } -obj* l_lean_parser_unicode__symbol_lean_parser_has__view___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { -_start: -{ -obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_26; obj* x_27; -x_4 = l_string_trim(x_1); -lean::inc(x_4); -x_6 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_6, 0, x_4); -lean::inc(x_3); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); -lean::closure_set(x_8, 0, x_4); -lean::closure_set(x_8, 1, x_3); -lean::closure_set(x_8, 2, x_6); -x_9 = l_string_trim(x_2); -lean::inc(x_9); -x_11 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); -lean::closure_set(x_11, 0, x_9); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); -lean::closure_set(x_12, 0, x_9); -lean::closure_set(x_12, 1, x_3); -lean::closure_set(x_12, 2, x_11); -x_13 = lean::box(0); -x_14 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_14, 0, x_12); -lean::cnstr_set(x_14, 1, x_13); -x_15 = lean::alloc_cnstr(1, 2, 0); -lean::cnstr_set(x_15, 0, x_8); -lean::cnstr_set(x_15, 1, x_14); -lean::inc(x_15); -x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_any__of___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__2), 4, 1); -lean::closure_set(x_17, 0, x_15); -x_18 = l_lean_parser_basic__parser__m_monad; -x_19 = l_lean_parser_basic__parser__m_monad__except; -x_20 = l_lean_parser_basic__parser__m_lean_parser_monad__parsec; -x_21 = l_lean_parser_basic__parser__m_alternative; -lean::inc(x_21); -lean::inc(x_20); -lean::inc(x_19); -lean::inc(x_18); -x_26 = l_lean_parser_combinators_any__of_view___rarg(x_18, x_19, x_20, x_21, x_15); -x_27 = l_lean_parser_combinators_monad__lift_view___rarg(x_0, x_17, x_26); -return x_27; -} -} -obj* l_lean_parser_unicode__symbol_lean_parser_has__view(obj* x_0) { -_start: -{ -obj* x_2; -lean::dec(x_0); -x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol_lean_parser_has__view___rarg), 4, 0); -return x_2; -} -} obj* l_lean_parser_unicode__symbol_lean_parser_has__tokens___rarg(obj* x_0, obj* x_1, obj* x_2) { _start: { @@ -32643,16 +32590,16 @@ x_4 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol_ return x_4; } } -obj* l_lean_parser_unicode__symbol___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +obj* l_lean_parser_unicode__symbol_lean_parser_has__view___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { _start: { -obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; +obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_26; obj* x_27; x_4 = l_string_trim(x_1); lean::inc(x_4); x_6 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_6, 0, x_4); lean::inc(x_3); -x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); +x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); lean::closure_set(x_8, 0, x_4); lean::closure_set(x_8, 1, x_3); lean::closure_set(x_8, 2, x_6); @@ -32660,7 +32607,7 @@ x_9 = l_string_trim(x_2); lean::inc(x_9); x_11 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); lean::closure_set(x_11, 0, x_9); -x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__1), 6, 3); +x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); lean::closure_set(x_12, 0, x_9); lean::closure_set(x_12, 1, x_3); lean::closure_set(x_12, 2, x_11); @@ -32671,7 +32618,60 @@ lean::cnstr_set(x_14, 1, x_13); x_15 = lean::alloc_cnstr(1, 2, 0); lean::cnstr_set(x_15, 0, x_8); lean::cnstr_set(x_15, 1, x_14); -x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_any__of___at_lean_parser_unicode__symbol_lean_parser_has__view___spec__2), 4, 1); +lean::inc(x_15); +x_17 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_any__of___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__2), 4, 1); +lean::closure_set(x_17, 0, x_15); +x_18 = l_lean_parser_basic__parser__m_monad; +x_19 = l_lean_parser_basic__parser__m_monad__except; +x_20 = l_lean_parser_basic__parser__m_lean_parser_monad__parsec; +x_21 = l_lean_parser_basic__parser__m_alternative; +lean::inc(x_21); +lean::inc(x_20); +lean::inc(x_19); +lean::inc(x_18); +x_26 = l_lean_parser_combinators_any__of_view___rarg(x_18, x_19, x_20, x_21, x_15); +x_27 = l_lean_parser_combinators_monad__lift_view___rarg(x_0, x_17, x_26); +return x_27; +} +} +obj* l_lean_parser_unicode__symbol_lean_parser_has__view(obj* x_0) { +_start: +{ +obj* x_2; +lean::dec(x_0); +x_2 = lean::alloc_closure(reinterpret_cast(l_lean_parser_unicode__symbol_lean_parser_has__view___rarg), 4, 0); +return x_2; +} +} +obj* l_lean_parser_unicode__symbol___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) { +_start: +{ +obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; +x_4 = l_string_trim(x_1); +lean::inc(x_4); +x_6 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_6, 0, x_4); +lean::inc(x_3); +x_8 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); +lean::closure_set(x_8, 0, x_4); +lean::closure_set(x_8, 1, x_3); +lean::closure_set(x_8, 2, x_6); +x_9 = l_string_trim(x_2); +lean::inc(x_9); +x_11 = lean::alloc_closure(reinterpret_cast(l_dlist_singleton___rarg), 2, 1); +lean::closure_set(x_11, 0, x_9); +x_12 = lean::alloc_closure(reinterpret_cast(l_lean_parser_symbol__core___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__1), 6, 3); +lean::closure_set(x_12, 0, x_9); +lean::closure_set(x_12, 1, x_3); +lean::closure_set(x_12, 2, x_11); +x_13 = lean::box(0); +x_14 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_14, 0, x_12); +lean::cnstr_set(x_14, 1, x_13); +x_15 = lean::alloc_cnstr(1, 2, 0); +lean::cnstr_set(x_15, 0, x_8); +lean::cnstr_set(x_15, 1, x_14); +x_16 = lean::alloc_closure(reinterpret_cast(l_lean_parser_combinators_any__of___at_lean_parser_unicode__symbol_lean_parser_has__tokens___spec__2), 4, 1); lean::closure_set(x_16, 0, x_15); x_17 = lean::apply_2(x_0, lean::box(0), x_16); return x_17; @@ -33110,15 +33110,15 @@ void initialize_init_lean_parser_token() { l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1 = _init_l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__1(); l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2 = _init_l_lean_parser_detail__ident__part_has__view_x_27___lambda__2___closed__2(); l_lean_parser_detail__ident__part_has__view = _init_l_lean_parser_detail__ident__part_has__view(); - l_lean_parser_detail__ident__part_parser_lean_parser_has__view = _init_l_lean_parser_detail__ident__part_parser_lean_parser_has__view(); l_lean_parser_detail__ident__part_parser_lean_parser_has__tokens = _init_l_lean_parser_detail__ident__part_parser_lean_parser_has__tokens(); + l_lean_parser_detail__ident__part_parser_lean_parser_has__view = _init_l_lean_parser_detail__ident__part_parser_lean_parser_has__view(); l_lean_parser_detail__ident__part_parser___closed__1 = _init_l_lean_parser_detail__ident__part_parser___closed__1(); l_lean_parser_detail__ident__suffix = _init_l_lean_parser_detail__ident__suffix(); l_lean_parser_detail__ident__suffix_has__view_x_27 = _init_l_lean_parser_detail__ident__suffix_has__view_x_27(); l_lean_parser_detail__ident__suffix_has__view_x_27___lambda__1___closed__1 = _init_l_lean_parser_detail__ident__suffix_has__view_x_27___lambda__1___closed__1(); l_lean_parser_detail__ident__suffix_has__view = _init_l_lean_parser_detail__ident__suffix_has__view(); - l_lean_parser_detail__ident__suffix_parser_lean_parser_has__view = _init_l_lean_parser_detail__ident__suffix_parser_lean_parser_has__view(); l_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens = _init_l_lean_parser_detail__ident__suffix_parser_lean_parser_has__tokens(); + l_lean_parser_detail__ident__suffix_parser_lean_parser_has__view = _init_l_lean_parser_detail__ident__suffix_parser_lean_parser_has__view(); l_lean_parser_detail__ident__suffix_parser___closed__1 = _init_l_lean_parser_detail__ident__suffix_parser___closed__1(); l_lean_parser_detail__ident = _init_l_lean_parser_detail__ident(); l_lean_parser_detail__ident_has__view_x_27 = _init_l_lean_parser_detail__ident_has__view_x_27();